home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er 1993 May
/
64er_Magazin_93-05_1993_Markt__Technik_de_Side_A.d64
/
demo.show
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
1KB
|
46 lines
100 if m=0 then m=1:load "show.49408",8,1
101 if m=1 then m=2:load "depacker.49152",8,1
102 if m=2 then m=3:load "[bi] quadrant",8,1
103 rem ******************************
104 rem * *
105 rem * basic demo zu den routinen *
106 rem * -show.49408 *
107 rem * -depacker.49152 *
108 rem * *
109 rem * beachten sie dass das bild *
110 rem * (zeile 102) auch wirklich *
111 rem * ein flip-bild ist und sich *
112 rem * auf der eingelegten *
113 rem * diskette befindet, *
114 rem * ansonsten kann es zum *
115 rem * absturz kommen!! *
116 rem ******************************
117 rem
118 rem
119 : sys49152
120 rem
130 rem
140 rem
150 rem wird ein normales fli bild
160 rem mit der startadresse $3c00
170 rem geladen, dann kann dieser
180 rem sys-befehl entfallen.
190 rem
200 rem
210 rem
220 : sys49408
230 rem
240 rem
250 rem
260 rem das bild wird jetzt darge-
270 rem stellt und auf einen tasten-
280 rem druck gewartet. danach wird
290 rem wieder auf den geloeschten
300 rem bildschirm umgeschaltet.
310 rem
320 rem
330 rem
340 : print"das war's ...."
350 : print:print
360 : print" michael"