þþ  %X;SUBROUTINE JS15W:THIS SUBROUTINE"X;IS USE TO READ IN AND DISPLAY"X;THE FRONT VIEW OF THE WIZARD.($X;THE WIZARD DRAWING IS DISPLAYED2X;IN PLAYER 0.<X;F*…JS15W%„END1;;VERT ENDING POS OF WIZP$>;;# OF (BYTES-1) TO MOVEZ&‚W1Q„WIZ19;;GET BYTE OF WIZ DRAWINGdP„PL0R8;;SAVE IN PLAYER 0n#Q„WIZM9;;GET BYTE OF WIZ DRAWINGx2LƒMIS8;;"OR" SINCE ONLY MISSILE 2AND 3 ARE USED‚!PƒMIS8;;SAVE IN MISSILE MEMORYŒ1;;NEXT VERT POS–0;;NEXT DRAWING BYTE I‚W1¡Q>¢PÒª:´X;¾X;È&X;SUBROUTINE WIZPOS:THIS SUBROUTINEÒ!X;SETS THE STARTING POS OF THEÜX;WIZARD AND IS USED DURINGæX;THE COMBAT PHASEðX;ú†WIZPOSQ>°;;VERT END OF WIZ P„END1Q>©;;VERT START OF WIZ P„TOP1"Q>;;SET WIDTH,PÐ6P Ð@Q>ä;;SET COLORJPÀT$>´;;HORIZ POS OF WIZ^„POSW&‚P0;;SAVE IN POINTERh&Ð;;SAVE IN HPOSP0r2;;POS FOR MISS 3|&Ð;;SAVE IN HPOSM2†2;;SET POS OF MISS 22š2¤&Ð;;SAVE IN HPOSM2® ‡WSIGNAL:¸X;ÂX;Ì!X;SUBROUTINE JS7W:USED TO MOVEÖ%X;THE WIZARD RIGHT WHEN JPYSTICK 1àX;IS IN POSITION 7êX;ô„JS7WQ‚P0;;LOAD HORIZ POSþR>Å;;IS IT AT RIGHT LIMITE‡WSIGNAL;;IF YES ,EXIT#‚P0;;ELSE ADD 1 TO POS$‚P0&%!„POSW;;JMP TO MOVE WIZ TO NEW POS0X;:X;D!X;SUBROUTINE JS11W:USE TO MOVEN$X;THE WIZARD LEFT WHEN JOYSTICK 1XX;IS IN POSITION 7bX;l…JS11WQ‚P0;;LOAD HORIZ POSvR>5;;IS IT AT LEFT LIMIT€D‡WSIGNAL;;IF YES ,EXITŠ"‚P0;;ELSE SUB 1 FROM POS”$‚P0ž%!„POSW;;JMP TO MOVE WIZ TO NEW POS¨X;²X;¼"X;SUBROUTINE JS13W:MOVES WIZARDÆX;DOWN WHEN JOYSTICK 1 IS INÐX;POSITION 13ÚX;ä'…JS13WQ„END1;;VERT END POS OF WIZîR>Ï;;IS IT AT LOWER LIMITøE…EX13W;;IF YES ,THEN EXIT#„END1;;ELSE SET NEW POS  $„END1%>;;# OF BYTES TO MOVE $…DOWNWQ„PL0R9;;BYTE IN OLD POS*P„PL0R9;;SAVE IN NEW POS4QƒMIS9;;BYTE IN OLD POS>'M><;;"AND" FOR VALUE OF MISSILE 2/3H%LƒMIS9;;"OR" WITH VALUE IN NEW POSRPƒMIS9;;SAVE IN NEW POS\QƒMIS9;;LOAD OLD VALUEfM>Ã;;CLEAR MISSILE 2/3p'PƒMIS9;;SAVE NEW VALUE IN OLD POSz0;;NEXT BYTE TO MOVE„1;;ALL BYTES MOVED?Ž H…DOWNW˜"#„TOP1;;SET NEW VERT TOP POS¢ …EX13W:¬X;¶X;À&X;SUBROUTINE JS14W:MOVES THE WIZARDÊX;UP WHEN JOYSTICK 1 IS INÔX;POSITION 14ÞX;è)…JS14WQ„TOP1;;VERT START POS OF WIZòR>!;;IS IT AT UPPER LIMITüD…EX14W;;IF YES ,THEN EXIT"„END1;;ELSE SET NEW POS "„TOP1 $„TOP1$%>;;#OF BYTES TO MOVE.#ƒUPWQ„PL0R9;;VALUE IN OLD POS8P„PL0R9;;SAVE IN NEW POSBQƒMIS9;;VALUE IN OLD POSL*M><;;"AND" TO GET VALUE IN MISSILE 2/3V"LƒMIS9;;"OR" TO SAVE IN NEW POS` PƒMIS9j#QƒMIS9;;LOAD VALUE IN OLD POStM>Ã;;CLEAR MISSILE 2/3~PƒMIS9;;SAVE NEW VALUEˆ2;;NEXT BYTE TO MOVE’1;;ALL BYTES MOVEDœHƒUPW¦ …EX14W: