10 MODE7:VDU23;8202;0;0;0;:PROCtitle:PROCvaribles:PROCwords:PROCintro_envs
   15 P$="0":PROCmusic:SOUND0,0,0,1:PROCfade_envelopes:PROCenvelopes:P$="123456789:;<=>;?@A@BCD=>E?@A@BFGHIJKLMNO;?@A@BPQRSTUTVW":PROCmusic:PROCfade:PROCend
   20 DEFPROCvaribles:v=0:D=0:N=1:I=0:T%=40:FORC=0TO3:SOUNDC,0,0,1:NEXTC:DIMm$(4),e$(4),S(3),W$(395):ONERRORPROCend
   23 PRINT''''
   25 WP$="012553556455555555":IFINKEY(-256)=253 OR INKEY(-256)=245 T%=T%+30
   40 ENDPROC
   50 DEFPROCwords:FORJ=1TOLENWP$:D%=ASCMID$(WP$,J,1)-&30:R%=D%*20+4000:RESTORE R%:REPEAT:I=I+1:READW$(I):UNTILW$(I)="E":I=I-1:NEXT:ENDPROC
   60 DEFPROCmusic:FORJ=1TOLENP$:D%=ASCMID$(P$,J,1)-&30:R%=D%*90+400:RESTORE R%:PROCplay:NEXT:ENDPROC
   70 DEFPROCplay:FORX=0TO3:READm$(X):NEXT:FORX=0TO3:READe$(X):NEXT:READwd$:FORL=1TOLENm$(0)
   80 IFMID$(wd$,L,1)=","PRINTW$(N);:N=N+1
   90 IFMID$(wd$,L,1)="/"PRINT
  100 FORV=1TO3:P=4*ASCMID$(m$(V),L,1):E$=MID$(e$(V),L,1):IFMID$(m$(V),L,1)=""THENP=128
  110 IFE$=" "ORE$=""S(V)=S(V):GOTO130
  120 S(V)=ASC(E$)-&40
  130 G%=V OR &200:G%=G% OR -&1000*(P=128):P=P:SOUNDG%,S(V),P,1:NEXT
  140 P=ASCMID$(m$(0),L,1)-&30:E$=MID$(e$(0),L,1):IF E$=" "ORE$=""THEN D=D:GOTO 160
  150 D=ASC(E$)-&40
  160 SOUND-&1000*(P=-16),D,P,1
  170 FORtime=1TOT%:NEXTtime:NEXT:ENDPROC
  180 DEFPROCfade:QQ=4180:F=9:T%=T%+4:REPEAT:v=v+F:PROCfade_envelopes:RESTORE QQ:PROCplay:QQ=QQ+90:F=F+2:UNTILQQ=4810:ENDPROC
  400 DATA"                  4  4  4 4  4"
  410 DATA"] [] ["
  420 DATA"Q OQ O"
  430 DATA"Q OQ O  O  O  O   O"
  440 DATA"                  A  B  C A  B"
  450 DATA"D"
  460 DATA"E"
  470 DATA"D    E  F  G  GH"
  480 DATA", ,, ,       //////"
  490 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
  500 DATA"V       R       T       V     T"
  510 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
  520 DATA"J  J JE F     FFH HH HC J     FH"
  530 DATA"M L KLM   L KLN M L KLM   L KLN"
  540 DATA"G       E                     G"
  550 DATA"C"
  560 DATA"D"
  570 DATA""
  580 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
  590 DATA"V       R       T       V     T"
  600 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
  610 DATA"J  J JE F     FFH HH HC J     EE"
  620 DATA"M L KLM   L KLN M L KLM   L KLN"
  630 DATA"G       E                     G"
  640 DATA"C"
  650 DATA"D"
  660 DATA""
  670 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
  680 DATA"V       T       Q       V     T"
  690 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
  700 DATA"C  C CC H     HFE EE EJ J J H"
  710 DATA"M L KLM   L KLN M L KLM   L KLN "
  720 DATA"G       E                     G"
  730 DATA"C"
  740 DATA"D"
  750 DATA""
  760 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
  770 DATA"V       T       Q       V     T"
  780 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
  790 DATA"C  C CC H     HFE EE EJ J H J"
  800 DATA"M L KLM   L KLN M L KLM   L KLN"
  810 DATA"G       E                     G"
  820 DATA"C"
  830 DATA"D"
  840 DATA"/"
  850 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
  860 DATA"V   V   R V V XV   T    V TVY XV"
  870 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
  880 DATA"J  J JE F     FFH HH HC J     FH"
  890 DATA"M L KLM   L KLN M L KLM   L KLN"
  900 DATA"G   E     H        E      H"
  910 DATA"C"
  920 DATA"D"
  930 DATA""
  940 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
  950 DATA"V   V   R VT  V  @TTV VY YX V T"
  960 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
  970 DATA"J  J JE F     FFH HH HC J     EE"
  980 DATA"M L KLM   L KLN M L KLM   L KLN"
  990 DATA"G   E     H      @H           G"
 1000 DATA"C"
 1010 DATA"D"
 1020 DATA""
 1030 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 1040 DATA"V  C CC H V  VTT  EE EJ T  TV V"
 1050 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
 1060 DATA"Y       [       [       ]     T"
 1070 DATA"M L KLM   L KLN M L KLM   L KLN"
 1080 DATA"GD        H       D     H"
 1090 DATA"C"
 1100 DATA"F                             G"
 1110 DATA""
 1120 DATA"6 4 446 6 4 4 5 6 4 44444   4   "
 1130 DATA"V  C CC H VT  V   EE EJ T   V   "
 1140 DATA"VV] [ ]V V] bb] VV] [ ]VT ] V Y"
 1150 DATA"Y       [       [       J H J"
 1160 DATA"M L KLM   L KLN M L KLK"
 1170 DATA"GD       H       D      H       "
 1180 DATA"C                       H C HC"
 1190 DATA"F                       D"
 1200 DATA"/"
 1210 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 1220 DATA"J  J JE F     FFH HH HC J     FH"
 1230 DATA"V       R       T       T"
 1240 DATA"  Q YY  X         V VR  T"
 1250 DATA"M L KLM   L KLN M L KLM   L KLN"
 1260 DATA"D"
 1270 DATA"E"
 1280 DATA"A"
 1290 DATA"  , ,,  ,   /     , ,,  ,   /"
 1300 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 1310 DATA"J  J JE C     FFH HH HC J   O  Q"
 1320 DATA"V       R       T       V"
 1330 DATA"  Q YY  X Y X      VV R T"
 1340 DATA"M L KLM   L KLN M L KLM   L KLN"
 1350 DATA"D                           P"
 1360 DATA"E"
 1370 DATA"A"
 1380 DATA"  , ,,  , , ,   /  ,, , ,   /"
 1390 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 1400 DATA"M @C CC H     HFE EE EJ J J M"
 1410 DATA"Y       [       [       ]"
 1420 DATA"  T ] ] ]  YY ]   V ][ ]"
 1430 DATA"M L KLM   L KLN M L KLM   L KLN"
 1440 DATA"P @D                        P"
 1450 DATA"F"
 1460 DATA"A"
 1470 DATA"  , , , ,  ,, , / , ,, ,   /"
 1480 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 4 "
 1490 DATA"J @C CC H     HFE  E EJ J H J"
 1500 DATA"Y       [       [       ]"
 1510 DATA"  T ] ] ]  YY ]   V ][ ]"
 1520 DATA"M L KLM   L KLN M L KLM   LK"
 1530 DATA"P @D"
 1540 DATA"F"
 1550 DATA"A"
 1560 DATA"  , , , ,  ,, , / , ,, ,   //"
 1570 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 1580 DATA"J  JVJE F   V FFH HHVHC J   V FH"
 1590 DATA"Q       M       O       M"
 1600 DATA"  Q YY  X         V VR  T"
 1610 DATA"M L KLM   L KLN M L KLM   L KLN"
 1620 DATA"D   ND      ND      ND      ND"
 1630 DATA"O"
 1640 DATA"A"
 1650 DATA"  , ,,  ,   /     , ,,  ,   /"
 1660 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 1670 DATA"J  JVJE C   V FFH HHVHC J   O  Q"
 1680 DATA"Q       M       O       Q"
 1690 DATA"  Q YY  X Y X      VV R T"
 1700 DATA"M L KLM   L KLN M L KLM   L KLN"
 1710 DATA"D   ND      ND      ND      P"
 1720 DATA"O"
 1730 DATA"A"
 1740 DATA"  , ,,  , , ,   /  ,, , ,   /"
 1750 DATA"6 4 446 6 4 4 5 6 4 446 444 4 4 "
 1760 DATA"J @C CC H     HFT  E EJ TTT V"
 1770 DATA"Y       [       [       ]"
 1780 DATA"  T ] ] ]  YY ]   V ][ ]"
 1790 DATA"M L KLM   L KLN M L KLM K"
 1800 DATA"H @D            HD      OPH"
 1810 DATA"F"
 1820 DATA"A"
 1830 DATA"  , , , ,  ,, , / , ,, ,   //"
 1840 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 1850 DATA"V  C CC H     HFE EE EJ J J H T"
 1860 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
 1870 DATA"  ] [] [        `   ] Y   V   Y "
 1880 DATA"M L KLM   L KLN M L KLM   L KLN"
 1890 DATA"GD                            G"
 1900 DATA"C"
 1910 DATA"B               A"
 1920 DATA"  , ,, ,   /    ,   , ,   ,   ,"
 1930 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 1940 DATA"V  C CC H     HFT   Q M       T"
 1950 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
 1960 DATA"  ] [] [        ` ` ] Y   V     "
 1970 DATA"M L KLM   L KLN M L KLM   L KLN"
 1980 DATA"GD              F             G"
 1990 DATA"C"
 2000 DATA"B        A"
 2010 DATA"/ , ,, ,   /    , , , ,   ,   //"
 2020 DATA"6 4 446 6 4 4 5 6 4 446 6 4 444 "
 2030 DATA"V  C CC H     HFE EE EJ T   V"
 2040 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
 2050 DATA"  ] [] [        ` ` ] Y   V"
 2060 DATA"M L KLM   L KLN M L KLM   L K"
 2070 DATA"GD                      H"
 2080 DATA"C"
 2090 DATA"B"
 2100 DATA"/ , ,, ,   /    , , , ,   ,   //"
 2110 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 2120 DATA"C  C CC H     HFE EE EJ J J H"
 2130 DATA"Y       [       [       ]"
 2140 DATA"   ]] ] ]  YY ]   ] ][ ]"
 2150 DATA"M L KLM   L KLN M L KLM   L KLN"
 2160 DATA"D"
 2170 DATA"O"
 2180 DATA"I"
 2190 DATA"/ / / / / / / / / / / / / / / / "
 2200 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 44"
 2210 DATA"C  C CC H     HFE EE EJ J H J"
 2220 DATA"Y       [       [       ]"
 2230 DATA"   ]] ] ]  YY ]   ] ][ ]T   V"
 2240 DATA"M L KLM   L KLN M L KLM   L K"
 2250 DATA"D"
 2260 DATA"O"
 2270 DATA"I                       H"
 2280 DATA"/ / / / / / / / / / / / / / / / "
 2290 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 2300 DATA"M @C CC H     HFE EE E Y Y  Y"
 2310 DATA"Y       [       [ Q VY ] ] V] V"
 2320 DATA"  T ] ] ]  YY ]   V ][ ]    M"
 2330 DATA"M L KLM   L KLN M L KLM   L KLN"
 2340 DATA"P @D                   J"
 2350 DATA"F                 J"
 2360 DATA"A                           P"
 2370 DATA"  , , , ,  ,, , / , ,, ,   /"
 2380 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 4 "
 2390 DATA"M  M MH A     HHJ  J JC J     JJ"
 2400 DATA"]               ["
 2410 DATA"Y               V"
 2420 DATA"M L KLM   L KLN M L KLM   L K"
 2430 DATA"D"
 2440 DATA"O"
 2450 DATA"O"
 2460 DATA"////,   /       ,   /       ,  /"
 2470 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 44"
 2480 DATA"M  M MH A     HHJ  J JC J     JJ"
 2490 DATA"]               ["
 2500 DATA"Y               V"
 2510 DATA"M L KLM   L KLN M L KLM   L K"
 2520 DATA"D"
 2530 DATA"O"
 2540 DATA"O"
 2550 DATA"            ,   //////"
 2560 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 2570 DATA"F  F FA F     FFH  H HC H     HH"
 2580 DATA"Y     V R   ]   [           X"
 2590 DATA"V               X"
 2600 DATA"M L KLM   L KLN M L KLM   L KLN"
 2610 DATA"D"
 2620 DATA"F"
 2630 DATA"O"
 2640 DATA""
 2650 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 44"
 2660 DATA"F  F FA F     FFH  H HC H     HH"
 2670 DATA"Y     V R   ]   [             T"
 2680 DATA"V               X"
 2690 DATA"M L KLM   L KLN M L KLM   L K"
 2700 DATA"D"
 2710 DATA"F                G"
 2720 DATA"O"
 2730 DATA""
 2740 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 2750 DATA"J  J JE F     FFH HH HC J     FH"
 2760 DATA" VY] Y V         TX[ X Y"
 2770 DATA"V   @                         T"
 2780 DATA"M L KLM   L KLN M L KLM   L KLN"
 2790 DATA"D"
 2800 DATA"J"
 2810 DATA"G   @G"
 2820 DATA""
 2830 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 4 "
 2840 DATA"J  J JE F     FFH HH HC J     FH"
 2850 DATA" VY] Y V         TX[ X Y"
 2860 DATA"V   @                   T   V"
 2870 DATA"M L KLM   L KLN M L KLM   L K"
 2880 DATA"D"
 2890 DATA"J"
 2900 DATA"G   @H"
 2910 DATA""
 2920 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 4 "
 2930 DATA"V  F FF H     FFE  E EE J     T"
 2940 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
 2950 DATA"  ] [] [        QQQ     TTT"
 2960 DATA"M L KLM   L KLN M L KLM   L KLN"
 2970 DATA"GD                            G"
 2980 DATA"C"
 2990 DATA"B               OPH     OPH"
 3000 DATA"  , ,, , /"
 3010 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 3020 DATA"V  F FF H     FFE  E EE T   V"
 3030 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
 3040 DATA"  ] [] [        `   ] Y"
 3050 DATA"M L KLM   L KLN M L KLM   L KLN"
 3060 DATA"GD                      H"
 3070 DATA"C"
 3080 DATA"B       F"
 3090 DATA"  , ,, , /              //////"
 3100 DATA"5 4  45 5 4   5 5 4  45 5 4   5 "
 3110 DATA"J  JV E F   V FFH HHV C J   V FH"
 3120 DATA"Q       M       O       M"
 3130 DATA"  Q YY  X         V VR  T"
 3140 DATA"N L  LN   L  LN N L  LN   L  LN"
 3150 DATA"D   JD      JD      JD      JD"
 3160 DATA"E"
 3170 DATA"A"
 3180 DATA"  , ,,  ,   /     , ,,  ,   /"
 3190 DATA"5 4  45 5 4   5 5 4  45 5 4 4 4 "
 3200 DATA"J  JV E C   V FFH HHV C J   O  Q"
 3210 DATA"Q       M       O       Q"
 3220 DATA"  Q YY  X Y X      VV R T"
 3230 DATA"N L  LN   L  LN N L  LN   L K"
 3240 DATA"D   JD      JD      JD      P"
 3250 DATA"E"
 3260 DATA"A"
 3270 DATA"  , ,,  , , ,   /  ,, , ,   /"
 3280 DATA"  44 4444   4     44 4444   4   "
 3290 DATA"  ] [] [        `   ] Y   V   Y "
 3300 DATA"F       H       E       J"
 3310 DATA"M   V   O   V   O   V   Q   V"
 3320 DATA"L"
 3330 DATA"B        A"
 3340 DATA"O"
 3350 DATA"E   J   E   J   E   J   E   J"
 3360 DATA"  , ,, ,   /    ,   , ,   ,   ,"
 3370 DATA"  44 4444   4     44 4444   4 4 "
 3380 DATA"  ] [] [        ` ` ] Y   V     "
 3390 DATA"F       H       E       J"
 3400 DATA"M   V   O   V   O   V   Q   V"
 3410 DATA"L                         K"
 3420 DATA"B        A"
 3430 DATA"O"
 3440 DATA"E   J   E   J   E   J   E   J"
 3450 DATA"/ , ,, ,   /    , , , ,   ,   //"
 3460 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 3470 DATA"  ] [] [        `   ] Y   V   Y "
 3480 DATA"V  CVCC H   V V E EE EJ J J H T"
 3490 DATA"M   V   O   V V O   V   Q   V"
 3500 DATA"M L NLM   L NLN M L NLM   L NLN"
 3510 DATA"B        A"
 3520 DATA"GD  HD      H   D             G"
 3530 DATA"E   H   E   P   E   J   E   J"
 3540 DATA"  , ,, ,   /    ,   , ,   ,   ,"
 3550 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 44"
 3560 DATA"  ] [] [        ` ` ] Y   V     "
 3570 DATA"V  C CC H     HFE EE EJ T   V"
 3580 DATA"M   V   O   V   O   V   Q   V"
 3590 DATA"M L NLM   L NLN M L NLM   K"
 3600 DATA"B        A"
 3610 DATA"GD                      H"
 3620 DATA"E   J   E   J   E   J   E   J"
 3630 DATA"/ , ,, ,   /    , , , ,   ,   //"
 3640 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 3650 DATA"V  C CC H     HFE EE EJ TVYYV T"
 3660 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
 3670 DATA"  ] [] [        `   ] Y   V   Y "
 3680 DATA"M L KLM   L KLN M L KLM   L KLN"
 3690 DATA"GD                      H     G"
 3700 DATA"C"
 3710 DATA"B               A"
 3720 DATA"  , ,, ,   /    ,   , ,   ,   ,"
 3730 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 44"
 3740 DATA"V  C CC H     HFE EEJ TVY YX VT"
 3750 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
 3760 DATA"  ] [] [        ` ` ] Y   V     "
 3770 DATA"M L KLM   L KLN M L KLM   L K"
 3780 DATA"GD                    H"
 3790 DATA"C"
 3800 DATA"B        A"
 3810 DATA"/ , ,, ,   /    , , , ,   ,   //"
 3820 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 4 "
 3830 DATA"V  C CC H     HFE EEJ TVY YX VT"
 3840 DATA"     VXY^]]^^]^`]]]]]]]]]]]]  \]"
 3850 DATA"  ] [] [        ` ` ] Y   V     "
 3860 DATA"M L KLM   L KLN M L KLM   K"
 3870 DATA"GD                    H"
 3880 DATA"H"
 3890 DATA"B        A"
 3900 DATA"/ , ,, ,   /    , , , ,   ,/////"
 3910 DATA"6 4 446 6 4 4 5 6 4 446 6 4 4 5 "
 3920 DATA"V  C CC H     HFE EE EJ TVYYV T"
 3930 DATA"VV] [ ]V V] bb] VV] [ ]V V] XXY"
 3940 DATA"bde ee dedbb  ` b`]]]]]]]]"
 3950 DATA"M L KLM   L KLN M L KLM   L KLN"
 3960 DATA"GD                      H     G"
 3970 DATA"C"
 3980 DATA"H"
 3990 DATA""
 4000 DATA"�All ","day, ",all ,day!,E
 4020 DATA"�I ",don't ,know ,"why,","�I ",don't ,know ,"how,","�I ",thought ,it ,looked ,good ,"but,","�I'm ",not ,sure ,"now,","�I've ",seen ,it ,fall ,to ,piec,"es,","�Too ",ma,ny ,"times,","�The ",glue ,I ,"want, ",is ,of ,a,"�a ",dif
 4030 DATAferent ,kind.,E
 4040 DATA"�Re",mem,ber ,we ,"�thought ",it ,would be ,"fun,","�We ",pro,grammed ,Au,to,"cad,","�How ",good ,it ,"seemed,","�I ",ne,ver ,thought ,of ,pro,"blems,","�As ",Ger,ald ,"said,","�And ",when ,I ,tried ,to ,make ,"it,","�It ",fell
 4050 DATA" like ",lead!,E
 4060 DATA"�I ",thought ,that ,I'd designed,"�A ",fool,proof ,"thing,","�But ",now ,I ,know ,it ,"is,","�A ",dif,ferent ,"game,","�I ",know ,that ,I ,should ,sling ,"it,","�Out ",through ,the ,"door,","�And ",Sav,ille's ,nicked ,the ,ca
 4065 DATA"ble,",
 4070 DATA"�From ",the ,store.,E
 4080 DATA" I ",don't ,know ,"why,"," I ",don't ,know ,"how,"," I ",thought ,I'd ,fixed ,it ,"but,"," I'm ",not ,sure ,"now,"," I've ",seen ,the ,Nim,bus ,crash,"ing,"," The ",screen ,is ,"dark,"
 4085 DATA" And ",I've ,had ,prob,lems ,with," it,"," Right ",from ,the ,start.,E
 4090 DATA" heart.",E
 4100 DATA"�All ","day, ",all ,"day, ","�Watch ",it ,all ,fall ,"down,","�All ","day, ",all ,"day, ","�A-",Lev,el ,Pro,ject.,E
 4120 DATA"�When you look around,","�you wonder,","�Do you just build it,","�or are you REALLY stupid?","�All ","day, ",all ,"day, ","�All ","day, ",all ,day.,E
 4180 DATA"6 4 446 6 4 4 5 "
 4190 DATA"V  C CC H     HF"
 4200 DATA"VV] [ ]V V] bb] "
 4210 DATA"  ^ ^^"
 4220 DATA"M L KLM   L KL"
 4230 DATA"GD"
 4240 DATA"C"
 4250 DATA"H"
 4260 DATA""
 4270 DATA"6 4 446 6 4 4 44"
 4280 DATA"E EEJ TVY YX VT"
 4290 DATA"VV] [ ]V V] XXY"
 4300 DATA"  ] ]]       V]`"
 4310 DATA"M L KLM   L K"
 4320 DATA"      H       G"
 4330 DATA"C"
 4340 DATA"H"
 4350 DATA""
 4360 DATA"6 4 446 6 4 4 5 "
 4370 DATA"V  C CC H     HF"
 4380 DATA"VV] [ ]V V] bb]"
 4390 DATA"^] [  Y X V T R"
 4400 DATA"M L KLM   L KL"
 4410 DATA"GD"
 4420 DATA"C"
 4430 DATA"H"
 4440 DATA""
 4450 DATA"6 4 446 "
 4460 DATA"E EE EJ "
 4470 DATA"VV] [ ]V"
 4480 DATA"V V YXVT"
 4490 DATA"M L KLM"
 4500 DATA"      H "
 4510 DATA"C"
 4520 DATA"H"
 4530 DATA""
 4540 DATA"6 4 4 5 "
 4550 DATA"TVYYV T"
 4560 DATA" V] XXY"
 4570 DATA" V  T"
 4580 DATA"  L KL"
 4590 DATA"      G"
 4600 DATA"C"
 4610 DATA"H"
 4620 DATA""
 4630 DATA"6 4 446 "
 4640 DATA"V  C CC H"
 4650 DATA"VV] [ ]V"
 4660 DATA"T V V XY"
 4670 DATA"M L KLM"
 4680 DATA"GD"
 4690 DATA"C"
 4700 DATA"H"
 4710 DATA""
 4720 DATA"6 4 4 4 "
 4730 DATA"H     HF"
 4740 DATA"V] bb] V"
 4750 DATA"Y V R O"
 4760 DATA"M L KL"
 4770 DATA"GD"
 4780 DATA"C"
 4790 DATA"H"
 4800 DATA""
 5100 DEFPROCenvelopes
 5110 ENVELOPE 1,4,1,-1,1,1,2,1,105,-2,-4,-3,115,60
 5120 ENVELOPE 2,5,0,-1,1,1,1,1,126,-1,-1,-2,118,10
 5150 ENVELOPE 5,6,0,0,0,0,0,0,127,0,0,0,65,55
 5160 ENVELOPE 6,4,1,-1,1,1,2,1,126,-1,-1,-1,105,95
 5190 ENVELOPE 9,130,1,-1,0,1,1,0,127,-10,-5,-5,110,0
 5200 ENVELOPE 10,1,0,0,0,0,0,0,127,-1,-1,-2,118,10
 5240 ENVELOPE 14,1,0,0,0,0,0,0,90,-30,-10,-2,115,50
 5250 ENVELOPE 15,6,0,0,0,0,0,0,127,0,0,-1,90,70
 5260 ENVELOPE 16,18,0,0,0,0,0,0,127,-20,-20,-20,120,100
 5270 ENDPROC
 5300 DEFPROCfade_envelopes
 5310 ENVELOPE 3,1,0,0,0,0,0,0,127,-3,-2,-2,110-v,50-(v/2)
 5320 ENVELOPE 4,2,0,0,0,0,0,0,127,-14,-14,-4,126-v,40-(v/2)
 5330 ENVELOPE 7,4,0,0,0,0,0,0,127,127,-10,-3,126-v,126-v
 5340 ENVELOPE 11,1,0,0,0,0,0,0,127,0,-40,-3,120-v,96-v
 5350 ENVELOPE 12,1,0,0,0,0,0,0,127,-25,-4,-3,115-v,0
 5360 ENVELOPE 13,2,0,0,0,0,0,0,127,-50,-6,-4,122-v,0
 5370 ENVELOPE 8,7,0,0,0,0,0,0,127,60,-50,-6,126-v,0
 5380 ENDPROC
 5500 DEFPROCintro_envs
 5510 ENVELOPE 1,1,0,0,0,0,0,0,127,0,-40,-3,126,96
 5520 ENVELOPE 2,1,0,0,0,0,0,0,127,0,-30,-4,96,66
 5530 ENVELOPE 3,1,0,0,0,0,0,0,127,0,-20,-5,66,36
 5540 ENVELOPE 4,5,1,-1,1,1,2,1,126,-1,-2,-3,110,80
 5550 ENVELOPE 5,5,1,-1,1,1,2,1,126,-1,-2,-6,100,0
 5560 ENVELOPE 6,4,1,-1,1,1,2,1,126,-8,-2,-4,80,0
 5570 ENVELOPE 7,4,1,-1,1,1,2,1,126,-8,-2,-4,60,0
 5580 ENVELOPE 8,4,1,-1,1,1,2,1,126,-8,-2,-4,40,0
 5590 ENDPROC
 6040 DEFPROCend:CLS
 6041 PRINT"�Written partly to annoy QEGS Computer  �Centre and for QEGS DT Department."
 6060 END
 9000 DEFPROCtitle
 9010 CLS
 9011 PRINT"�,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,((((";   
 9015 PRINT"���Fantastically Fruity freakouT Music"  
 9016 PRINT"���               presents"
 9020 PRINT"�$$$$,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,"; 
 9030 PRINT"����          A-Level Project           ����          A-Level Project           ���      (Watch It All Fall Down)       �,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,((((";
 9035 PRINT''''''''  
 9040 PRINT'"�$$$$,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,";
 9041 PRINT"���A tale of doom and despondency from  ���a prospective A-Level candidate...!  ���Music by Danny Pugh, Words by Joel.  �,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,((((";  
 9042 VDU28,0,16,39,9
 9050 ENDPROC