100 REM HEARTS DEMO 3 110 PRINT "READY FOR SOME HEARTS?" 120 GET K$:IF K$="" GOTO 130 130 SYS 1152 140 REM ML RANGE STARTS AT {ASMSTART} * = $0480 ;routine to fill the screen with hearts lda #83 ;screen code for heart character ldx #0 loop: sta $8000,x sta $8100,x sta $8200,x sta $8300,x dex bne loop rts ;return to BASIC