5 IFA=0THENA=1:LOAD"STAMP-MAKER V2",8,1
10 POKE53280,0:POKE53281,0:POKE53272,23:POKE657,128:GOTO 30
12 PRINT"[147][176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]";
14 PRINT"[221][149]                                      [146][129][221]";
16 PRINT"[221][149]       [211][212][193][205][208]-[205][193][203][197][210] [214]2  -  [196][197][205][207]        [146][129][221]";
18 PRINT"[221][149]                                      [146][129][221]";
20 PRINT"[221][149]      ([195]) 1990 BY [202]OERG [206]EUMANN       [146][129][221]";
22 PRINT"[221][149]                                      [146][129][221]";
24 PRINT"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189]";:RETURN
30 GOSUB12
32 PRINT"[196]IESES [208]ROGRAMM DEMONSTRIERT DIE [198]AEHIG-";
34 PRINT"KEITEN VON [211][212][193][205][208]-[205][193][203][197][210] [214]2. [215]ENN [211]IE NUN
36 [153]"EINE (null)ASTE DRUECKEN, LAED ES ZWEI
38 PRINT"[199]RAFIKEN, DIE EINE [193]NIMATION BILDEN. [196]AS";
40 PRINT"[208]ROGRAMM GENERIERT NUN JEDOCH MIT [200]ILFE
42 [153]"VON (null)(null)ATN(null)(null)-(null)ATN(null)VAL(null) (null)2 (null)LEINBILDER,DIE
44 PRINT"SPEICHERSPARENDER SIND. [196]IE [193]NIMATION,
46 [153]"DIE DANN FOLGT SPIELT SICH NUR AUF EINER";
48 [153]"CHR$RAFIKSEITE AB. (null)IT LEFT$ILFE EINER (null)CHLEIFE";
50 [153]"WERDEN DORT DIE (null)LEINBILDER GELESEN UND
52 PRINT"AUF DIE [199]RAFIKSEITE GESCHRIEBEN. [200]IERBEI";
54 PRINT"ENTSTEHT DER [197]INDRUCK, ALS WUERDE SICH
56 [153]"DIE CHR$RAFIK BEWEGEN. STR$OCH WERDEN DIE
58 PRINT"[199]RAFIKEN NICHT AUSGETAUSCHT. [211]O BE-
60 [153]"NOETIGT MAN AUCH NUR 12785 PEEKYTES FUER
62 PRINT"DIE [199]RAFIK,ANSTATT 20000 [194]YTES FUER ZWEI";
64 PRINT"[199]RAFIKSEITEN.                  <[212]ASTE>[146]";:POKE198,0:WAIT198,1:GOTO100
70 GOSUB12
72 PRINT"[205]AN KANN MIT [200]ILFE VON [211][212][193][205][208]-[205][193][203][197][210][160][214]2
74 [153]"AUCH (null)LEINGRAFIKEN BEWEGEN, WAS DIE
76 PRINT"FOLGENDE [196]EMO BEWEIST.
78 [153]"<(null)ASTE>";:[151]198,0:[146]198,1:[137]600
89 [128]
90 :
91 :
92 :
93 :
94 :  [172][172][172] GRAFIK EINSCHALTEN [172][172][172]
95 :
100 [141]540:[141]300:[141]520: [143] BILDER LADEN, GENERIEREN UND FARBE SETZEN
101 [151]53265,59:[151]53270,216:[151]53272,125:[151]56576,198:[151]198,0:[137]200
190 :
191 :
192 :
193 :
194 :  [172][172][172] ANIMATI[145]SSCHLE[139]E [172][172][172]
195 :
200 [141]400 : [143] ANIMATIONSTEIL 1
202 [161]Z$:[139]Z$[179][177]""[167]214
204 [129]A[178]1[164]2:[130] : [143] VERZOEGERUNG
206 [141]500 : [143] ANIMATIONSTEIL 2
208 [129]A[178]1[164]2:[130] : [143] VERZOEGERUNG
210 [161]Z$:[139]Z$[179][177]""[167]214
212 [137]200
214 [141]560:[137]70: [143] GRAFIK AUS
290 :
291 :
292 :
293 :
294 :  [172][172][172] KLEINBILDER GENERIEREN [172][172][172]
295 :
300 [158]49152,8,7,24576,32576,33576,34576,35024,35136,0,1,12,3
302 [158]49152,8,7,57344,16384,17384,35192,35640,35696,1,1,12,3
304 [158]49152,7,3,24576,32576,33576,35752,35920,35941,0,1,25,1
306 [158]49152,7,3,57344,16384,17384,35962,36130,36151,1,1,25,1
308 [158]49152,6,5,24576,32576,33576,36172,36412,36442,0,1,2,17
310 [158]49152,6,5,57344,16384,17384,36472,36712,36742,1,1,2,17
312 [158]49152,8,3,24576,32576,33576,8192,8472,8507,0,1,25,21
314 [158]49152,8,3,57344,16384,17384,8542,8822,8857,1,1,25,21
316 [158]49152,5,5,24576,32576,33576,8881,9081,9106,0,1,23,8
318 [158]49152,5,5,57344,16384,17384,9131,9331,9356,1,1,23,8:[142]
390 :
391 :
392 :
393 :
394 :    [172][172][172] ANIMATI[145]STEIL 1 [172][172][172]
395 :
400 [158]49152,8,7,34576,35024,35136,24576,23552,55296,0,0,12,3
406 [158]49152,7,3,35752,35920,35941,24576,23552,55296,0,0,25,1
410 [158]49152,6,5,36172,36412,36442,24576,23552,55296,0,0,2,17
414 [158]49152,8,3,8192,8472,8507,24576,23552,55296,0,0,25,21
418 [158]49152,5,5,8881,9081,9106,24576,23552,55296,0,0,23,8:[142]
490 :
491 :
492 :
493 :
494 :    [172][172][172] ANIMATI[145]STEIL 2 [172][172][172]
495 :
500 [158]49152,8,7,35192,35640,35696,24576,23552,55296,0,0,12,3
502 [158]49152,7,3,35962,36130,36151,24576,23552,55296,0,0,25,1
504 [158]49152,6,5,36472,36712,36742,24576,23552,55296,0,0,2,17
506 [158]49152,8,3,8542,8822,8857,24576,23552,55296,0,0,25,21
508 [158]49152,5,5,9131,9331,9356,24576,23552,55296,0,0,23,8:[142]
510 :
511 :
512 :  [172][172][172] FARBSPEICHER FUEL[195] [172][172][172]
513 :
520 [158]50075,32576,23552:[158]50075,33576,55296:[142]
530 :
531 :
532 :  [172][172][172] BILDER UND FARBE LADEN [172][172][172]
533 :
540 [158]50033,"DEMO-1"
541 [158]50033,"DEMO-2"
542 [158]50033,"DEMO-3":[142]
550 :
551 :
552 :  [172][172][172] GRAFIK AUSSCHALTEN [172][172][172]
553 :
560 [153]"LOADFOR":[151]53265,155:[151]53270,200:[151]53272,23:[151]56576,151:[142]
570 :
571 :
572 :  [172][172][172] KLEINGRAFIK BEWEGEN [172][172][172]
573 :
580 [143]
600 [158]50135,8192
602 [151]53272,29:[151]53265,59:[151]53270,216:[151]53280,0:[151]53281,0:[153]"LOAD"
606 [129]I[178]0[164]10
608 [158]49152,13,3,18384,18696,18735,8192,1024,55296,0,0,0[170]I,0[170]I:[130]
609 [151]198,0:[146]198,1:[158]50135,8192
614 [129]I[178]0[164]10
616 [158]49152,13,3,18774,19086,19125,8192,1024,55296,0,0,0[170]I,0[170]I:[130]
618 [151]198,0:[146]198,1:[141]560:[141]12:[153]"STR$EMO NOCHEINMAL? (J/N)"
620 [161]Z$:[139]Z$[179][177]"J"[175]Z$[179][177]"N"[167]620
622 [139]Z$[178]"J"[167]10
624 [158]64738