Routines

28216: Turn ERIC round


Used by routines at 28436, 28460, 28484, 28576 and 64316

28216 CD5471 CALL 29012 Make sound effect
28219 3AF17F LD A,(32753) Get keypress table offset of last key pressed
28222 CB5F BIT 3,A
28224 210004 LD HL,1024 H=4, L=0
28227 2802 JR Z,28231 Jump if an uppercase (fast) key was pressed
28229 2609 LD H,9
28231 22F27F LD (32754),HL
28234 26D2 LD H,210 210=ERIC
28236 C33064 JP 25648 Turn ERIC round