Tiger Disk 124/Tiger_Disk_124_20xx_Tiger-Crew-Disk_de_Side_B.d64/cp-load.64

Commodore BASIC | 2023-02-26 | 1KB | 36 lines

100 rem cp-load by a.m.
110 rem
120 gosub340:printchr$(14)
130 printchr$(147)spc(11)"[195][208]-[204][207][193][196]/[214]1.1
140 [153]:[153]" valin len(NULL)-(NULL)rogramm starten (NULL)ie durch die"
150 [153]" die valingabe des (NULL)rogrammnamens."
160 [153]:[153]" valine atnuflistung vorhandener"
170 [153]" len(NULL)-(NULL)rogramme erhalten (NULL)ie durch:":[153]
180 [153][166]16)"dir /*":[153]
190 [153]" str$er (NULL)usatz .exe kennzeichnet dabei"
200 [153]" len(NULL)-(NULL)rogramme."
210 [153]:[153]" str$ieses (NULL)adeprogramm wird durch die"
220 [153]" valingabe des (NULL)ortes end mit einem"
230 [153]" (NULL)eset verlassen.":[153]:[153]
240 fi$[178]"":[133]fi$:[139]fi$[178]"x"[167][159]8,8,15,"i0":[160]8:[137]240
250 i[178]1:[139]fi$[178]""[167]130
260 [139] fi$[178]"end"[167][158]64738
270 [139]i[179][178][195](fi$)[167][139][202](fi$,i,1)[179][177]" "[167]i[178]i[170]1:[137]270
280 fi$[178][200](fi$,i[171]1):[141]300:[137]240
290 [141]410:[158]50387:[142]
300 [139]fi$[178]fa$[167]290
310 [158]57812"/"[170]fi$[170]".exe",8,1:[141]500
320 [139]st[179][177]64[167][142]
330 fa$[178]fi$:[151]51698,0:[151]50489,[194](781):[151]50490,[194](782):[137]290
340 [131]4096,cpv1.1mc,"syscon64"
350 [135]pr:a[178]pr[171]1:[141]400
360 [139]ah[178][194](56)[175]al[178][194](55)[167][142]
370 [151]55,al:[151]56,ah:[156]
380 [135]pr:[135]f$:[141]490:[135]f$:[141]490
390 [151]65028,255:[151]65029,191:[138]
400 ah[178][181](a[173]256):al[178]a[171]256[172]ah:[142]
410 a[178]256[172]([194](50490)[170][194](4097))[170][194](50489)[170][194](4096):[141]400
420 [151]65026,al:[151]65027,ah:[142]
490 [158]57812f$,8,1
500 [151]780,0:[158]65493:[142]