home *** CD-ROM | disk | FTP | other *** search
- 10 READA:IFA=-1THEN14: REM Q-L 178
- 12 POKE49152+B,A:B=B+1:GOTO10
- 14 POKE53281,0:POKE53280,0
- 17 SP$=" "
- 18 PRINT"[147][144]";SP$SP$SP$;
- 20 PRINT" [212]HIS IS A DEMONSTRATION OF AN ";
- 22 PRINT" INTERESTING EFFECT YOU CAN ";
- 24 PRINT" OBTAIN USING A BIT OF MACHINE ";
- 26 PRINT" LANGUAGE. [212]HE [205][204] SECTION CHANGES ";
- 28 PRINT" THE BACKGROUND COLOR REPEAT- ";
- 30 PRINT" EDLY. [212]HE CHARACTERS ARE PRINT- ";
- 32 PRINT" ED IN REVERSE MODE.[160] "SP$;
- 34 PRINT" [215]RITTEN [198]EBRUARY 29, 1988 ";
- 36 PRINT" BY [204]EE [211]EMEL. "SP$;
- 38 PRINT" [205]ARY HAD A LITTLE LAMB.... ";
- 40 PRINT" [201]T'S FLEECE WAS WHITE AS SNOW! "SP$;
- 44 PRINT" [215]HO CARES!! "SP$;
- 46 PRINT" *** [208]RESS <[211][208][193][195][197]> [212]O [197]XIT *** "SP$SP$SP$;
- 48 PRINT" [157][148] ";
- 100 SYS49152:PRINT"[147]":END
- 1000 DATA 169,0,133,198,238,33,208,234,234,234,234,234,234,234,234,234,234,234
- 1002 DATA 234,234,234,234,234,234,234,234,234,234,234,234,234,234,234,234,234
- 1004 DATA 234,234,234,165,198,240,218,169,6,141,33,208,96,13,-1
-