home *** CD-ROM | disk | FTP | other *** search
-
-
- 2062
-
-
- {SHIFT-POUND},_{SHIFT-POUND}{$60}{SHIFT-POUND}z{SHIFT-POUND}[{SHIFT-POUND}vx{SHIFT-POUND}Gy {CBM-B}{CBM-T}l
- {SHIFT-*} L~{SHIFT-POUND}
- K{SHIFT-*}{SHIFT-POUND}AL{SHIFT-*}{SHIFT-POUND} R~{SHIFT-POUND}
- Y{SHIFT-*}Z{SHIFT-*}{SHIFT-+}{SHIFT-*}X{CBM-Z}B{SHIFT-*}{CBM-Z}C{SHIFT-*}{SHIFT-POUND}6{SHIFT-POUND}{SHIFT-*}x{$60}{CBM-Z}Y{SHIFT-*}I
- Pl{CBM-Z}{SHIFT-+}{SHIFT-*}I
- P {CBM-G}FI
- P J{SHIFT-*}I
- {$f0}'I\{$f0}iI_{$f0}W{$e6}F N{SHIFT-*}l1{$ea}{CBM-G}EIP{$f7}{SHIFT-POUND}
- {SHIFT-+}{SHIFT-*}lA{SHIFT-*}{$ee}{SHIFT-+}{SHIFT-*}l^{SHIFT-*}X{CBM-Z}B{SHIFT-*}{CBM-Z}C{SHIFT-*}xlA{SHIFT-*}{$ee}Z{SHIFT-*}{CBM-Z}Z{SHIFT-*}I<P{SHIFT-POUND}
- Z{SHIFT-*}NY{SHIFT-*}lA{SHIFT-*} {CBM-H}{SHIFT-*}
-
-
-
- Y{SHIFT-*} {CBM-H}{SHIFT-*}
- Y{SHIFT-*}Y{SHIFT-*}l^{SHIFT-*} N{SHIFT-*} J{SHIFT-*}{CBM-I}
- {SHIFT--}{CBM--}{SHIFT-*}{$f0}{$e8} P{$f6}{CBM-I}
- {$60}{CBM-Z}
- A{$60}{$ee}K{SHIFT-*}P{$ee}L{SHIFT-*}{$f0} {$60}
-
-
- 0123456789abcdef
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- \01\01I\01 am\01 a\01 STAR\01 BATCH\01 file.\02\01\01I\01 execute\01 your\01 stored\01 keystrokes\01\01\01through\01 the\01 keyboard\01 buffer.\02\01\01THE\01 BORDER\01 COLOR\02\01\01poke\0153280\01,0\02
- \01\01THE\01 BACKGROUND\01 COLOR\02\01\01poke\0153281\01,0\02
- \01\01THE\01 TEXT\01 C\01O\01L\01O\01R\02\01\01CLEAR\01 THE\01 SCREEN\02\01\01uppercase\01 mode\02\01\01Lowercase\01 Mode\02\01\01n\01e\01w\02
- \01\01LOWER\01 TOP\01 OF\01 BASIC\01 AREA\02\01\01poke\0155\01,0\01:poke\0156\01,32\01:clr\02
- \01\01?\01fre(8)\02
- \01\01poke\0156\01,160\01:clr\02
- \01\01?\01fre(8)\02
- \03\01POKE\01 THE\01 SID\01 CHIP\02\01\01:for\01 x= \010\01to\0124\01:poke\0154272\01+\01x\01,\010\01:next\02
- \01poke\0154273\01,100\01:poke\0154277\01,80\01:poke\0154278\01,159:::poke\0154276\01,16\02
- \01poke\0154296\01,9\02
- \01poke\0154276\01,17\02
- \03poke\0154296\01,0\02
- \02\01MAKE\01 AND\01 RUN\01 A\01 BASIC\01 PROGRAM\02\01\0110\01 ?\01"Press SPACE to continue"\01
- \0120\01 poke\01198\01,0\01
- \0130\01 get\01a$\01:if\01a$\01<>\01" "\01then\0130\01
- \0140\01 ?\01:input\01"What is your name"\01;n$\01
- \0150\01 ?\01:?\01n$\01
- \01l\01i\01s\01t\01
- \03ANSWER\01 GET\01 AND\01 INPUT\01 PROMPTS\02\01\01r\01u\01n\01
- \02 \02K\01e\01n\01 R\01o\01b\01i\01n\01s\01o\01n\01
- \04\01WAIT\01 FOR\01 YOU\01 TO\01 ANSWER\01 PROMPT\02\01\01r\01u\01n\0140\02
- _\01\01?\01:?\01"Greetings "\01;n$\02
- \02\01BOOTING\01 PROGRAMS\02\01\01n\01e\01w\01
- \01\01 v\01=\01peek\01(186)\01:if\01 v\01<\018\01then\01 v\01=\018\02
- \01\01load\01"hello connect"\01, v\02
- \01r\01u\01n\02
-
-