home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Columbia Kermit
/
kermit.zip
/
bin
/
c64kerfast.sda
/
KERMIT24
(
.txt
)
next >
Wrap
Commodore BASIC
|
2020-01-01
|
3KB
|
15 lines
10 REM ** BOOTER BY ANDREW E. MILESKI **
20 REM ** 2400 BAUD PATCH BY UWE HORN **
30 POKE53280,0:POKE53281,0
35 D$=STR$(PEEK(186))
40 PRINT"[147][158] KERMIT V2.2 2400 BAUD PATCH BOOTER"
50 PRINT"[154] ONCE BOOTED, PRESS '?'"
60 PRINT"[144]LOAD"CHR$(34)"KERMIT24.ML"CHR$(34)","D$",1"
70 PRINT"NEW"
80 PRINT"LOAD"CHR$(34)"KERMIT"CHR$(34)","D$""
90 PRINT"POKE7580,0:POKE7581,146"
100 PRINT"RUN"
110 PRINT"";
120 FORI=0TO4:POKE631+I,13:NEXT
130 POKE198,5