home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tiger Disk 10
/
Tiger_Disk_010_19xx_Tiger-Crew-Disk_de_Side_A.d64
/
tigermag-loader
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2023-02-26
|
518b
|
18 lines
1000 poke44,32:poke43,31
1010 poke8222,0:clr:poke53280,0:poke53281,0
1020 print"[147]"
1021 print"[155][213][192][192][201][213][201][213][192][192][201][213][192][192][201][213][192][192][201] [213][192][192][201][213][192][192][201][213][192][192][201][213][201] [213][201]
1022 [153]"mid$right$(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)tan(NULL)(NULL)(NULL)tan(NULL)(NULL)(NULL)right$(NULL) (NULL)(NULL)tan(NULL)(NULL)(NULL)right$(NULL)(NULL)(NULL)tan(NULL)(NULL)(NULL) (NULL)(NULL)
1023 print" [221][221] [221][221][221][221] [221][221] [221][202][203][221] [221][221] [221][202][203][221][221][202][201] [221][221] [221][221]
1024 [153]" (NULL)(NULL) (NULL)(NULL)(NULL)(NULL)orright$(NULL)(NULL) (NULL) < (NULL)(NULL) (NULL) <(NULL)(NULL)(NULL) (NULL)(NULL)(NULL)right$(NULL)(NULL)
1025 print" [221][221] [221][221][221][202][203][221][221][202][192][201][221][171][201][221] [221][202][192][201][221][176][201][221][221][202][192][201][221][202][203][202][203][221]
1026 [153]" mid$(NULL) mid$(NULL)mid$tantan(NULL)mid$tantan(NULL)mid$(NULL)mid$(NULL) mid$tantan(NULL)mid$(NULL)mid$(NULL)mid$tantan(NULL)mid$tantantantan(NULL)
1030 print" ladevorgang, bitte warten !"
1050 print"[144]load"chr$(34)"tigerchen.main"chr$(34)",8"
1060 print"run"
1070 poke631,19
1080 poke632,13
1090 poke633,13
1100 poke634,13
1110 poke198,4