1 REM HAUNTED HOUSE, PART 2¢2 REM BY ROBIN ALAN SHERER¢3 REM (c) 1987, ANTIC PUBLISHING INC.¢100 REM CHAR2 ADDS 8*8 PIXEL PROTO¢110 DIM MM$(41):MM$="hhàנhàמhàעhàסh¬á¯èס⇩h¿õמæסêij¯ס≈µנµעטα¯סΘ`"¢130 REM MAINLINE¢140 DIM CHARSET$(24)¢150 CHARSET$="8\³|DJ@á8l³|DDD¬8t³|Dñ⇦
"¢160 TM=PEEK(106)¢170 CB=TM-4:CA=CB*256:NCA=CA+24¢180 POKE 106,CB-4¢190 X=USR(ADR(MM$),224*256,CA,1023)¢200 X=USR(ADR(MM$),ADR(CHARSET$),NCA,24)¢2000 POKE 756,CB¢2010 C=5:R=22¢2020 POSITION C,R¢2030 ? #6;"#";:GOSUB 2090¢2040 POSITION C,R¢2050 ? #6;"$";:GOSUB 2090¢2060 POSITION C,R¢2070 ? #6;"%";:GOSUB 2090¢2080 GOTO 2020¢2090 FOR I=1 TO 50¢2100 NEXT I¢2110 RETURN ¢
