5748447 [rkeene@sledge /home/rkeene/devel/archive/quickbasic]$ cat -n musicmar.bas
   1: PS
   2: WRI` "(
   3: S?[LE= GFG>`DGkFDB"
   4: ;LA{J"M5
   5: vAYC+L6I
   6: 3R C =
   7: p T4D6
   8: 9+LA~"O8&+ ^R$u%)6PLS "~, +SAR`;R$zCAvp$)NE, I#
   9: 1cCLns
  10: I}hUTPJENu7R gTAZ (dHFAFyT { 4>ID/ ItINoCTE 8\";c
  11: jT y$ D%"Ot+ UR$M)
  12: [NP "XW }7NYYOT! 1V0"2>Z
  13: 5
  14: RI
  15:  "lwAMRE DR Wr Q%!TE$NOI L GT\= }9HA NS~E d(2 'vOL$NOT ="
  16: fNP*) "WTE-G`LLEQTHE-6D7; SW, U
  17: I@mZ D2 qzTOn0
  18: =NPU) "lCTEALEV,THb B B#\IFd> < GYO ,
  19: PU<}"N-E,fEN5DH"OC$qkC
  20: F 3< bGO 2"
  21: I)UTNO", mdNGLS";*$,2
  22: aN Z; 50OTd20{WINqT OT LZGTL; *	, 
  23: IoZ K6 hTO90
  24: +NP "VTELEaTH
  25:  Fh FIF:G <S0 GDO K%
  26: *PUR"N ~E,|@EN/H"gG$]NG
  27: \AF s< |oGOOk 2a
  28: IwdUTYNO:L, lNG8";K$,f
  29: y ZT 9WOT20
  30: INT _OTK LGT;; J(, @
  31: I9^Z ]w10soOT^20UINFT OT] LgGT5; +, )
  32: I<Z A@11?OT207_INT SOTLV LSGT; c, X9
  33: IJZ ?12XOTL#20QmIN%T zOTX L *GTN; v, =
  34: I:Z kJ13ZlOTp200IN9T OTl L<GT'; L, 0*
  35: IvZ '14y)OTq20eINXT r OTn LI0GTh; p, #
  36: IN|Z 
  37: 1537OTe20BINT &OT| LiGT~; a, p
  38: I,Z Xw16	lOT20L+INT OTKE LGTG; H, 0
  39: I`Z zD17\OT,]20>9INPT F8OTn L]GT?; AO, 2
  40: IMZ -18ZOT}20$INHST ACOT
  41:  LGTY9; i5, Dc
  42: I?Z y19u]OT+20q*IN*T 3OT) LGTU; H, O^
  43: IMZ 20DMOTu20-INT ]OT LGTb; , ,
  44: Iq;Z sb218OTR20pINnT jOT Lh1GTN; , W}
  45: IyMZ 	22	OOT20IINT DOT_ LDGTU; r, M
  46: IGQZ !23POTO205IN0T 0OTi LkXGT^; , S
  47: IZZ \24%OTI203IN-T 3OT LXGTT; t, 
  48: 
  49: IiZ '$25tOT!o20EIN`T .OT6 LDGT+l; @, Hh
  50: IZ n261OTX20rIN|wT SOTY LLGTC; k$,A
  51: 7@F '< K G/nO 
  52: cuPU="NEE,8EN`H"/BA9 Bzs
  53: I2Z HN28>{OTn20qINX|T LOT
  54: D L]GT; J$,]A
  55: [tF o$< ? GwO "
  56: LfPUR"N|3E,eEN3UH"DA4k D
  57: I'Z 530IOT120%IN`T z	OT!] LKGTP; k$,pSA
  58: F (< dX GIO Q
  59: orPUx`"N
  60: E,EN.vH"FAD FYg
  61: INZ O-32HOT920 LINT vOTv LCSGT; T$,sA
  62: U)F << F GD8O B
  63: s7PUI"NXE,:EN!H"HACl H:f
  64: IN7Z 434>2OT720i1INT OTwi L;GT	=; jR$,A
  65: kvF my< C G3:O .G
  66: 3PU]p"NPE,|ENWH"`JAs[ JnY
  67: I Z h36bKOT-20INBT  OOT{! LGTZ; 7$,_A
  68: %F r2<  G
  69: O 
  70: 5PU31"NfE,sEN:H">2LA4 LnI
  71: IZ ^r38w3OT=20UwINKwT qOT LGT*k; 5$,D*A
  72: l5F '< u G1EO i,
  73: APUbo"N+E,OENtH"RNA N-
  74: IkZ -40GOTV20oE20	LAX"MJ 
  75: %uAYVC$HIN&T Nid,ouakEa st@e k MT$7IFsISdo =tY"$HEWGOfB 5\]
  76: 4tPLe "h +CTR*2A){PLt6 A
  77: IB [0 VEN=XET+ =S
  78: FAYyrL"# SS"$(?
  79: HAY4;$
  80: =F i= 'TH: L3Y CP, BmPL32 "O +H
  81: TRfvC)HPLz7 Cg
  82: I8D |0 GENSET& =5
  83: L$AYRKL" S($(9
  84: oAY\$
  85: zF d= 8THG Lc EOl D_PL@ "n +qTR$hE)PLW E9
  86: IGF r0 iENNET| =
  87: qAY9L"hO S$(
  88: [PAYD$
  89: vF = %TH6 LUG GmY F]PLK "Q +PTRC+G)vrPLI G
  90: IH R0 
  91: ENkfETk =I;
  92: FXAYcKL"_ Svz$(A
  93: qAYS,$
  94: nF 5= %THB Lq In HGPLoz "O +TREI)PLc I=
  95: I:bJ ,0 /ENETE\ =N
  96: ^IAY)lL"8e S^$(3
  97: AY$
  98: 2F ~= =,TH Li K J}PL
  99:  "f +~TRfK)vuPL K+
 100: I=SL R0 3
 101: EN5ET;" =`,
 102: +bAY21L"n S$(4@
 103: [_AY1h$
 104: F  = &TH[ L' Mn. LCPL' "u +[TRM)DPLV M
 105: IN /o0 EaENETH =h
 106: AYTL"ip SK$(
 107: G'AY!,$
 108: $F 9= HTH6 LQ O NY[PL ":~ +gpTR\O)PL O
 109: I+GP 880 MgEN&ET%? =
 110: }AYXL"
 111:  Sc$(6
 112: >AYV$
 113: cF @= THQJ LBc Qo PRPLy "r +#TR'`Q)"PLL QxD
 114: IIR 90 bENETu =cj
 115: .#AYhlL"V Sg$(f)
 116: 8XAY0$
 117: F 7+= @HTHn LZ SI R;PL/ "Y +TRaS)^<PLQ Sz
 118: IT 	0 YENLETk =Z
 119: wAYL"P S($(N
 120: ^AYv$
 121: IF I= 5THa LSF U5Z T2PL0 "4 +|:TR+U)80PL^h U
 122: I"V H0 'EN.WET_ =L
 123: nAYzFL"=c Sv$(M
 124: AY}$
 125: }F = )TH[ L4 WD V^PL "3 +y+TR%W)9PL!e W
 126: IX CC0 /EN*\ET =w
 127: ]HAYIL"j S3$(;
 128: #AY	$
 129: &F >= 
 130: THP Ly Y? XPL^ "zi +d,TRp+Y)PLr Y^*
 131: IneZ 0 #EN^ETlg =b
 132: ,AYJL"R8 S4$(\:
 133: ~AY@	$
 134: oF Z =< T'N BT z =VI
 135: _EAY1L" Slc$(~#)
 136: -RLAUhAA>
 137: I^sBAe 0qHELEHBAt& A^
 138: PIY X" nST#(Bq
 139: D7AY%A$IF	A H-0 {EN_ETA TBA1PLXv "
 140:  +TRpDCA(@
 141: PY &$
 142: SF  =iD T'dN @T # =UA
 143: lALA"LP+ hbR$@A)APL{ D|
 144:  E/= !'THi/ L Ey2= Y$
 145: tAYDL"_" Sr\$()
 146: h8LAiEA
 147: IFAKt 0fHELEsVFA9 E=
 148: P~Y H'" }ST.(F{
 149: AYMA$cIIFzA D0 _~EN,EThA kFARPLCu "I +vTRCGA:O
 150: P6Y RK$
 151: kXF 0 =F T+N #T w- =*A
 152: HLA8"Lc+ "cR$XA)~PLb HJz
 153: f IX= GTHZk L- Ih= Z
 154: )0AYL"HR Sx$()
 155: 0ZLAkIA\z
 156: I}JAE_ 0bHEHrLE4JA, IBR
 157: PShY ," puST55(J!
 158: gJAY5nA$DIF&!A o0 : ENZETA KDJAPLg "` +0rTRKA
 159: P9Y +	$
 160: jF \ =OK TPN N7T m =^6A
 161: HXLA@X"L2+ S_R$_A)<TPL~ L-
 162: a M;#= ZMTHI L+ M= _J
 163: RAYMeL"F SE$(V)
 164: 5ALA?MA:
 165: INA( 0U$HEm%LENAu M
 166: PY """ [ST/v(NI
 167: ?AYzA$uINRvT ^uiw(y") %z QST$IFUI =Y"
 168: HEZ_GO\ 3
 169: I QUa$ D"yGTH]I GyO =!
 170: Y0 Q0T$3 " TN TO5
 171: #F QITO= 7a" CENIbOT115)W150NPEM "C^ay/gar) "3ZPLx>$
 172: LF P~AY2= C:" DEN}OT#<402IF$	LA=5 =ry"8HEiGO 4/H
 173: I
 174: {PLR$ F-"n	TH% GvO 
 175: U PPY$o "' TjN 0lTO0
 176: i<EEr
 177: G/O 
 178: O S(TEa
 179: 5ZPRoT ,vST.HOTLERTH; 
 180: ; [ ";#: uPU#{" 7 T#S (RR\T"oCOC$
 181: h
5748448 [rkeene@sledge /home/rkeene/devel/archive/quickbasic]$

Click here to go back to the directory listing.
Click here to download this file.
last modified: 2000-05-09 21:06:07