BAS.MUSIC V1#BAC .*:'************************************:'* **:'* BASIC MUSIC V.1.0 **:'* (HLAVNI CAST) **:'************************************:'* BOMI M H **:'* ZDECHOV .208 75607 PRO MZ-800 **:'*************23/04/1997-08/06/1997*+ :'==== START =========================d ()G WDz(W)"G.1"( ):"OK!":"L PISEN A"::"PISEN A #USR":PZWI"CRT:M1":W: :"S !!":Dz()"RUN"( ):Q:W,Q:M,W:IW:[I]@I,I,"BASIC MUSIC",,:I:[E],,,:M,Q::PZ():MC::MCQ:T(MC):MMQ22 X:[W]Q,(,,?:W,:E, (<W,:""+FIWE:" ":I-PIW:" ":I=Z,@,G,@: ,3:[,W] ,A$(dp,H,"SKLADBA:",W,W: :~n,*,"A: M H",W,E:, ,"P: [A] - [G]",W,E:, ,"' '",W,E:(, ,"",W,E)x:'== HLAVNI CAST SYSTEMU ===========0A0:A1Q:A2W:A4:A5Q:A6Q:A7Q:A8QIQA0:F$:F$ (@)Q"MIT$(T$(A1),A2,W)T$"" T$"" T: !M,A9:Q,@:();:IA8A8A7:[A4]I,@A6,T$" ",W,W,A5:I M,Q1U$(T$(A1)" ",A2W,W):U$"" U$""  : 6A2A2W:A2(T$(A1))WA2W:A1A1W:A1A3A1Q :A5 ,4A8,@A6:[A4],H$((U$))HA7IA8A8A7:I,@A6:[A4,W],H$((U$)):I",A5W A5E06,?A6:[A4],H$((U$))H@A7IA7:I,?A6:[A4,W],H$((U$)):IJDT :I(T$):I I r, r, r, |, , , , , ^I I hIXX : rA4I: |A9W: A9Q: A7W: A7Q: A7E:A7E:A8W:A6Q:A5Q:A6(T$):(F$)A0(F$)W: ?F$"A" PZ::"V15";"V15";"V15":():MC: :F$( ) 0F$( ):F$""PF$"A" F$(MA)MC(F$)B:::T(MC):MMQ: ::"M":  ):'== SPUSTENI HUDBY V.1.0 =========="M":MC():0M$(M(Q),MC);M$(M(W),MC);M$(M(E),MC)&MMMMW:MM(M$(Q,MC))MMQ&!0::"SYS.ROLOVANI#BAS"U:, ,p:[Q], ,:, ,@:MC N&D[E],,(MCE),W,E:!N[E],,"1",W,E:X[E,W]Q,@,"",$,W: ,@,"** MOMENT **",W,W:,@,"%",W,W:W:P:IQ:[Q](IW)P,@,IP,G,Q:,@:[]("###"),(I@);bQ,IE(,I,(:,IE(,I,?:,(I)E(,I,(:Q,IE(,(I),?:I::[Q]Q,@,"",8,W:):'== BOMI SOFTWARE =================):'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%):'% KONECNE JE TENTO PROGRAM HOTOV!%):'% A JE TU JESTE TOLIK MISTA !!!!!%):'% ALE NEBYLO TO ZAS TAK TEZKE!!!!%):'% A JDE SE NA DALSI ! %):'% AHOJ!! BOMI SOFTWARE %):'%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%) :'% "U:" %):'%(V.1.01)%) :'% 1) PROGRAM ZMENIL FUNKCI PRIKA-%)*:'% ZU OFF NA ZMENU OKOLI(BORDER)%)4:'% 2) PROGRAM NEMA PODPORU VE ST- %)>:'% ROJOVEM KODU %)H:'% 3) PROGRAM NEVYUZIVA NOISE GE- %)R:'% NERATORU ANI VIDEORAMKY!! %)\:'% 4) UPRAVY MUZE PROVADET POUZE %)f:'% AUTOR PROGRAMU - BOMI%)p:'% 5) VYTVORENO PRO BASIC 1Z-016 %)z:'% V.1.0A ! KDE KLAVESA [F1] MA %):'% FUNKCI SMAZANI OBRAZOVKY + %):'% "RUN" + [CR] !!! %):'% 6) PROGRAM POZADUJE RETEZCE %):'% Z PRVNI CASTI,JINAK SE PROVE-%):'% DE UKONCENI PROGRAMU !!!!!! %):'% %):'%(C) COPYRIGHT%%%%%%%%%10/08/1997% : : - :