10 cY:dP2040:cW:dSc3:c\0,14,15:d 20 cU13,7,"SPRITE - DEMO" 30 cU7,15,"BITTE EINE TASTE DRUECKEN" 40 c; 50 ci4,15,31,1,1 60 FORI=1TO150:NEXT 70 GETA$ 80 c@A$<>"" 90 cY:cU20,5 100 PRINT"[154][215][157][157][215][157][157][215][157][157][215][157][157][157][169][223][146][144][165][157][157][157][157][169][160][160][223][157][157][157][157][144] [157][157][157][157] [149] [144] [157][157][157][157] [149] [144] " 110 c`0,13,40,12,160,5 120 : 130 d_ d d` 140 : 150 d1,13,0 160 : 170 d_ d d` 180 : 190 d"........................" 200 d"........................" 210 d"........................" 220 d".......BBBB............." 230 d".......BBBBBB..........." 240 d".......BBBB............." 250 d".......BBBB............." 260 d"........BB.......BB....." 270 d".......BBBB.....BB......" 280 d".......BBBBBBBBBB......." 290 d".......BBBBBBBBB........" 300 d".......BBBB............." 310 d".......BBBB............." 320 d".......BBBB............." 330 d".......BBBB............." 340 d".......BBBB............." 350 d".......BBBBB............" 360 d"......BBB.BB............" 370 d".....BBB..BB............" 380 d"....BB....BB............" 390 d"...BBBBB..BBBB.........." 400 d1,14,0 410 d"........................" 420 d"........................" 430 d"........................" 440 d".......BBBB............." 450 d".......BBBBBB..........." 460 d".......BBBB............." 470 d".......BBBB............." 480 d"........BB.......BB....." 490 d".......BBBB.....BB......" 500 d".......BBBBBBBBBB......." 510 d".......BBBBBBBBB........" 520 d".......BBBB............." 530 d".......BBBB............." 540 d".......BBBB............." 550 d"BB....BBBBBB............" 560 d"BBB..BB....BB..........." 570 d"B.BBBB......BB.........." 580 d"B..BB........BB........." 590 d".............BB........." 600 d"............BB.........." 610 d"...........BBBB........." 620 : 630 d_ d d` 640 : 650 d 660 : 670 d_ d d` 680 : 690 d1,110,133 700 dO13,14,6 710 FORI=1TO14 720 d1,13,I,1,0 730 dQ1 740 NEXT 750 : 760 d_ d d` 770 : 780 d11,0 790 : 800 d_ d d` 810 : 820 d1,11,0 830 d"*/*/*/======" 840 d"/*/*/*//////" 850 d"*/*/*/======" 860 d"/*/*/*//////" 870 d"*/*/*/======" 880 d"/*/*/*//////" 890 d"============" 900 d"////////////" 910 d"============" 920 d"////////////" 930 d"============" 940 d"////////////" 950 d2,11,6,1,1 960 d1,2 970 : 980 d_ d d` 990 : 1000 c`27,6,1,7,101,12 1010 d2,243,98 1020 : 1030 d_ d d` 1040 : 1050 d2,243,155,250 1060 : 1070 d_ d d` 1080 : 1090 d2 1100 : 1110 d_ d d` 1120 : 1130 d11,0:d1,11,0 1140 d"...*****......*****....." 1150 d"..**..***....***..**...." 1160 d".**.....**..**.....**..." 1170 d"**......**..**......**.." 1180 d"*........****........*.." 1190 d".........****..........." 1200 d"..........**............" 1210 d"..........**............" 1220 d"..........**............" 1230 d15,0:d1,15,0 1240 d"........................" 1250 d"........................" 1260 d"...*****........*****..." 1270 d"..********....********.." 1280 d"****....***..***....****" 1290 d"**.......******.......**" 1300 d"..........****.........." 1310 d"...........**..........." 1320 d"...........**..........." 1330 d1,138,133,150 1340 dO11,15,8:d1,11,11,1,0 1350 d1,1,0 1360 : 1370 d_ d d` 1380 : 1390 A=0:E=350 1400 FORI=1TO3 1410 d1,A,65,E,65,9:A=350-A:E=350-E 1420 NEXT 1430 : 1440 d_ c d` 1450 : 1460 X=350:Y=70 1470 c; 1480 X=X-3:Y=Y+1 1490 d1,X,Y 1500 c@c(1)=1 1510 : 1520 d_ d! d` 1530 : 1540 c]27,8,1,5,2:cU26,12,"[164][204][164]" 1550 dO:d!11,0:d1,11,2,0,0 1560 d1,255,133,20 1570 : 1580 d_ d d` 1590 : 1600 dP2041:d2,140,133:d2,13,14,1,0:dO13,14,6 1610 d2,325,133,80 1620 d13,0,1:d14,0,1 1630 d2,323,133,323,20,70 1640 : 1650 d_ d d` 1660 : 1670 d13,0:d1,13,0 1680 d"************************",9 1690 d"**....****....****....**" 1700 d"**....****....****....**" 1710 d"************************" 1720 d14,0:d1,14,0 1730 d"........................" 1740 d"........................" 1750 d"...........**..........." 1760 d"...........**..........." 1770 d"..........****.........." 1780 d"........********........" 1790 d"....****************...." 1800 d".**********************." 1810 d"........................" 1820 d"........................" 1830 d"........................" 1840 d"........................" 1850 d".**********************." 1860 d"......************......" 1870 d"..........*****........." 1880 d13,0,14,0,15,0 1890 d3,15,12,0,0 1900 d3,1,0 1910 d3,0,60,128,60,4 1920 d3,128,80,4 1930 : 1940 d_ d d` 1950 : 1960 d4,13,11,0,0:d4,1,0:d4,128,80 1970 d5,14,12,0,0:d5,1,0:d5,128,80:d3 1980 FORY=4TO13STEP0.3 1990 d$L13,0,1,1 2000 c_14,Y,6,1,32 2010 FORI=1TO100:NEXT 2020 NEXT 2030 d3,15,12,0,0:d4:d5 2040 d3,128,125,4 2050 d3,0,125,4:d3 2060 : 2070 d13,0:d1,13,0 2080 d"..****.................." 2090 d".******................." 2100 d".**..**................." 2110 d".**..**................." 2120 d".******................." 2130 d"..****.................." 2140 d8,13,14,0,0:d8,184,91:cU20,5," " 2150 d8,250,40,150 2160 cTA$