10 SYS57812("SPRITES*"),8,1:POKE780,0:SYS65493:REM SPRITES EINLADEN
11 PRINT"[147]"CHR$(14):REM CLR & KLEINSCHRIFT AN
12 POKE53281,15:POKE53280,11:POKE646,0:REM FARBEN SETZEN
13 REM
14 POKE2040,226:POKE2041,227:POKE53276,3:REM SPRITES INSTALLIEREN
15 POKE53285,1:POKE53286,12:REM MULTI-COLOR-FARBEN
16 POKE53287,11:POKE53288,11:REM SPRITEFARBEN
17 POKE53248,28:POKE53249,226:REM POSITION SPRITE 1
18 POKE53250,58:POKE53251,226:POKE53264,2:REM POSITION SPRITE 2
19 POKE53269,3:REM SPRITES AN
20 REM
21 REM SCROLL - TEXTE  (JE 32 ZEICHEN)
22 REM
23 S$(1)="[196]IES IST DIE [196]EMONSTRATION EINES"
24 S$(2)="BELIEBTEN [212]EXT-[197]INBLEND-[197]FFEKTES"
25 S$(3)=" WIE ER AUCH IN DER [208][213][194][204][201][195][193][212][201][207][206] "
26 S$(4)="        VERWENDET WIRD !        "
27 S$(5)=" [214]IEL [211]PASS MIT DIESEM [197]FFEKT ! "
28 REM
29 REM FARBEN
30 REM
31 F(1)=6:F(2)=4:F(3)=14:F(4)=1:F(5)=15:F(6)=12:F(7)=11:F(8)=0
32 REM
33 REM DIESE WERTE WERDEN Z.B. IM DEMO
34 REM BASIC DELIRIUM VERWENDET !
35 REM
36 F=1:S=1:REM FARB- UND SCROLLWERT = 1
37 POKE646,F(F)
38 POKE211,4:POKE214,23:SYS58732:REM POSITIONIERUNG
39 PRINTS$(S):REM TEXTAUSGABE
40 F=F+1:IFF=9THENS=S+1:F=1
41 IFS=6THENS=1
42 FORX=1TO50:NEXT:REM WARTESCHLEIFE
43 GOTO37
100 REM
101 REM *******************************
102 REM *                             *
103 REM *     TEXT - EINBLENDUNG      *
104 REM *    --------------------     *
105 REM *                             *
106 REM * AUS DEM PUBLICATION-MAGSYS! *
107 REM *                             *
108 REM *******************************
109 REM