Prev: 33129 Up: Map Next: 33269
33180: Show "WELL DONE MAGIC KNIGHT" screen with animated starfield, jumping to game over on key-press
Used by the routine at 33312.
33180 IM 1 Set interrupt mode 1
33182 LD A,(23506) Increase "characters sent home" score...
33185 INC A ...
33186 LD (23506),A ...
33189 CALL 33278 Flash border and screen (as in cast a spell)
33192 LD A,36 Draw window 36...
33194 CALL 36987 ...
33197 LD HL,43663 Print "WELL DONE MAGIC KNIGHT..." text...
33200 CALL 36725 ...
33203 LD HL,16384 Blank out top two thirds of display file...
33206 LD DE,16385 ...
33209 LD BC,4095 ...
33212 LD (HL),L ...
33213 LDIR ...
33215 LD A,71 Load A with 71 (white INK, black PAPER, BRIGHT)...
33217 LD (23695),A ...store this value at 23693 and 23695...
33220 LD (23693),A ...and flood top two thirds of attribute file with this attribute...
33223 LD HL,22528 ...
33226 LD DE,22529 ...
33229 LD BC,511 ...
33232 LD (HL),A ...
33233 LDIR ...
33235 LD HL,0 Set Magic Knight's x- and y-velocities to zero...
33238 LD (25391),HL ...
33241 LD HL,19320 Set Magic Knight's x-coordinate to 120 and y-coordinate to 75...
33244 LD (25387),HL ...
33247 XOR A Set Magic Knight's current frame to erase to zero (frame 0 is blank graphic data) so Magic Knight is drawn but not erased...
33248 LD (25389),A ...
33251 LD A,1 Set Magic Knight's current frame to 1...
33253 LD (25390),A ...
33256 XOR A Set A to zero (Magic Knight) and...
33257 CALL 39224 ...draw Magic Knight (erase old frame and draw new frame)
33260 CALL 38884 Animate starfield until a key is pressed
33263 LD HL,43789 Point HL at "YOU HAVE SUCCEEDED IN YOUR TASK..." text
33266 JP 35101 Jump to "game over" window routine and exit
Prev: 33129 Up: Map Next: 33269