NNNNNNTp@ NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN]O  @`! #@%`')+-/1 3@5`79;=?A C@E`GIKMOQ OU`WY[]a c@e`gikmqs@owy{} @` @ `  @ ` @ `  @ ` ǀ ɠ  # ` ׀ ٠  @` @`!Aa   !Aa!!#%a')+-/1!3A5a79;=?A!CAEaIKMOQ!SAUaW[]_a!cAeagikoq!sAuawy{}!Aa!Aa!Aa!Aa!Aaǁɡ!Aaׁ١!Aa!Aa " B b  !O!b!!!!!"!""#B"%b"'")"+"-"/#1"#3B#5b#7#9#;#=#?$A"$CB$Eb$G$O%Q"%SB%Ub%W%Y%[%]%_&a"&cB&eb&g&i&k0&o'q"'sB'ub'w''{'}'("(B((((()")B)b)))))*/*B*b****"+B+b+++++,",B,ǂ,ɢ,,,-"-B-b-ׂ-٢---.".B.b....//B/////0C0c00 0 0#1O1O  @`! #@%`')+-/1 3@5`79;=?A C@E`GIKMOQ OU`WY[]a c@e`gikmqs@owy{} @` @ `  @ ` @ `  @ ` ǀ ɠ  # ` ׀ ٠  @` @`!Aa   !Aa!!#%a')+-/1!3A5a79;=?A!CAEaIKMOQ!SAUaW[]_a!cAeagikoq!sAuawy{}!Aa!Aa!Aa!Aa!Aaǁɡ!Aaׁ١!Aa!Aa " B b  !O!b!!!!!"!""#B"%b"'")"+"-"/#1"#3B#5b#7#9#;#=#?$A"$CB$Eb$G$O%Q"%SB%Ub%W%Y%[%]%_&a"&cB&eb&g&i&k0&o'q"'sB'ub'w''{'}'("(B((((()")B)b)))))*/*B*b****"+B+b+++++,",B,ǂ,ɢ,,,-"-B-b-ׂ-٢---.".B.b....//B/////0C0c00 0 0#1O1AUTO at STOS ft BASIC205PRGt CONFIG BASt rMZOLTAR t ANIMALS1MBKt ,LhFONTS ACBt GEICON ACBt YMMUSIC ACBt mSPRITE ACBt ~STOSCOPYACBt  ORBIT t SPRITE2 ACB t NxASCII ACBWt l^BACKGRNDMBK[t m-COMPACT ACBbt y1DROID MBKft iDUMP ACBlt FONT1 MBKqt  FONT2 MBKut  PROTECT BAS@#t FONTSET MBK}t b2ICON MBKt "INPDATA ACBt MAP ACBt hrMAP DOCt MAP MAPt .MAP MBKt MOUSE ACBt  MUSIC MBKt OUTDATA ACBt  SCANASCIACBt SPRDEMO MBKt $TUNES MBK/t  TYPE ACB4t " FUNFARESMBK+t . a t.. a tBASIC205PRGbt `j`x'@O v&'"& &'H D& &'H D(k (((>( (h)*~f\STOSPIC.PI1PIC.PI3SPRIT???.BINWINDO???.BINFLOAT???.BINMUSIC???.BINBASIC???.BIN*.EXY70Tos 1.6Y7DTos 1.6B oAJgR#?<NNT#Hz ?<&NN\MX?<NNT3KD m p, J"Kޓ~cRF|dbXz2F|de.EdHp $$$$&&&&QLQ` AFa|AaGN#AalGN#AabfGNAaFGN#BGMD^9A^Aaf$AaHGLN#L@<N-`RG|eA yfAaA]a/AaP,_?<%NNT z0<?BQ yg?</NAXNu/?< NA\NuafNuHppafaf&:ֺ`d\ax zaa"z )Щ$I$ BJg` g<gՒ`` z кvgR#LpNuLpNu|(P8 & " <<~. f t.. f tBASIC205BINgt -FLOAT102BINqt S #RUN__205BINtt \" SPRIT101BINvt _?MOUSE SPRzt o 8X8 CR0|t r 8X8 CR1t u8X16 CR2t x MUSIC101BINt |PIC PI1t "}PIC PI3t B}COMPACT EXAt pEDITOR ENVt WINDO102BINt q1TARS EXH K! `"`^BdebutLine Ligne : =, Sure ? (Y/N) .BAS.BAK*.*.ACBneopi1pi2pi3mbkmbsprgvarasc.PRGRUN__205.BINSTOS\Insert a disk which has a STOS folder into drive, then press any key... Introduisez dans le lecteur un disque contenant le dossier STOS, puis pressez une touche... Drive Lecteur , path: , dir: bytes used. octets utiliss. byte used octet utilise* -----------> stos\editor.envautoexec.basrun "autoexec"` Loading : Je charge : SAVE file. SAUVER un fichier. LOAD file. CHARGER un ficher."""FILE SELECTORSELECTEUR DE FICHIER UP HAUT DOWN BAS PREVIOUSARRIERE DIR. DIR. QUIT QUITTER RETURN OK      'A[m    LionpoulosLionpoubnkLionpouvar STOS BASIC V 2.5 By F. Lionet & C. Sotiropoulos 1988 Jawx / Mandarin All Rights Reserved. BASIC STOS V 2.5 Par F. Lionet et C. Sotiropoulos 1988 Jawx / Mandarin Tous droits rservs. Bytes Free. Octets libres. pp 0PU33ss77wWfff0ff defwWRUc(000,2)(220,2)(440,2)(550,2)(660,2)(770,2)(772,2)(774,2)(776,2)(777,2)(557,2)(446,2)(335,2)(113,2)(002,2)(001,2)(PP( P P( P P ( ( (( (( ( ( (( ((((((PP(PP(PP(PP(PP @    7(g7x (gx ( 7(g7(gx7x (g<g7xHwx ((7Hw (g7(gx7x 7(gHw(g7xHwx 7(Hw(7HwThis multi-screen mode DOES NOT contain windows selected for program # Ce mode d'ecran ne PERMET PAS l'dition du programme ! Editing program : Programme dit: |P| Size |Wd #1|Wd #2|Wd #3|Wd #4| |P| Taille |Fn #1|Fn #2|Fn #3|Fn #4| Basic accessories loaded : Accessoires basic chargs: Remaining memory: bytes.Mmoire restante: bytes. ------------------------------------ | | | | | | | ------------------------------------ |1| | | | | | |2| | | | | | |3| | | | | | |4| | | | | | ------------------------------------ f1- f5- f9- f2- f6- f10- f3- f7- f11- f4- f8- f12- end               Ok Reserved memory banks: Banques mmoire rserves: work screen program data dscreen sprites icons music 3D menus chr set S: E: L:" ""\" "&"/""e"8"A"J"S list listbank`fload"*.bas"`fsave"*.bas"`run`dir`dir$= dir$ + "\`previous`off`full`multi 2`multi 3`multi 4`mode 0`mode 1`accnew:accload"*"`default`env`key list`f1: f2: f3: f4: f5: f6: f7: f8: f9: f10:f11:f12:f13:f14:f15:f16:f17:f18:f19:f20:HP(HP( t|d t|d t|d t|dScantb !"#$%&'()  *+,-./0123 !"#$%&'()  *+,-./0123Tspeciff>Rftff        w  P       2   /// M / haw GGp1S$~Z8{fR?- wqjd_YTPKGC?<852/-*(&$" tostepthenelsexororandgotogosub<>><<==<>==>=<>+-mod*/^astostepnextwenduntildimpokedokelokereadrem'returnpopresume nextresumeon errorscreen copyswapplotpiedrawpolylinepolymarkgotogosubthenelserestoreforwhilerepeatprint?ifupdatespritefreezeoffonlocatepaperpenhome.b.w.lcupcdowncleftcrightclsincdecscreen swappsgscrndregaregpointdrive$dir$abscolourfkeysincosdrivetimerlogicfnnotrndvalascchr$inkey$scancodemid$right$left$lengthstartlenpipeekdeekleekzonex spritey spritex mousey mousemouse keyphysicbacklogpofmodetime$date$screen$default xor or and <>><<==<>==>=<>+- mod */^hsinhcoshtanasinacosatanupper$lower$currentmatcherrnerrlvarptrinput$flip$freestr$hex$bin$string$space$instrmaxminlofeofdir first$dir next$btstcollideaccnblanguagehunttruefalsexcursycursjupjleftjrightjdownfirejoymovonicon$tabexpcharlenmnbarmnselectwindonxtextytextxgraphicygraphicsqrdivxdivylntandrvmapfile select$dfreesgnportpvoiceintdetectdegraddir/wpfadeqbcopyrsquarespreviousttransposeushiftvwait keywdirxldirybloadzbsave{qwindow|as set}charcopy~undermenu$menutitleborderhardcopywindcopyredrawcentretempovolumeenvelboomshootbellplaynoisevoicemusicboxrboxbarrbarappearbclrbsetrolrorcursclwbchgcalltraprunclear keyline inputinputcleardataenderasereserveas datascreenas workas screenas datacopydefhideshowchange mouselimit mousemove xmove yfixbgrabfillkey listkey speedmoveanimunfreezeset zonereset zonelimit spritepriorityreduceput spriteget spriteloadsavepalettesynchroerrorbreakletkeyopen inopen outopenclosefield asput keyget palettekillrenamerm dirmk dirstopwait vblsortgetflashusinglprintauto backset linegr writingset markset paintset patterncliparcpolygoncircleearcepieellipsewritingpaintinkwaitclickputzoomset cursscroll downscroll upscrollinverseshadewindopenwindowwindmovewindellistbankllistbankfollowfrequencycontchangesearchdeletemergeauto new unnew fload fsave resetsystemenvrenummultifullgrablistllisthexaaccloadaccnewlowerupperenglishfrancaisJinstr@$* $hŒXHP4Ǟ͒|ʬ˜JZŦX^dj,* ~$ݎծ՚HbTܲ$VJfonct 4lFzݨ<>:bJ"<ت ,84z,:|jxNH|\<PdpZJfctex>HR\fp۞únvXNش׺jx @P~"6   (2<(FXB lJdireczBxxt|kvwh{`bdhyutPtFppltJexten(z :<*b6`TF $   j Z z  B RtB"lvκJ62JPJ T PjVj6B{f°N̔d"҈ BT&l"Nt,xx,(2p  n^578:89:@DS(T>>?@AB߰Bc,cҼV "& &extension #@?Rt    ( xXt    ( xXtt    ( xXVditab>>?@A   ;B@'d 0800010203040506070809101112131415E+000 This line can't be changed: Cette ligne n'a pu etre change: Please redo from start. Recommencer au dbut S.V.P. ?? Not doneNon effectuBad file formatMauvais format de fichierOut of memoryMmoire pleineThis line does not existCette ligne n'existe pasThis line already existsCette ligne existe djSearch failedLa recherche a chouLine too longLigne trop longueCan't continueImpossible de continuerOut of memoryMemoire pleineFollow too longFollow trop longPrinter not readyL'imprimante n'est pas prteCan't renumRenumrotation impossibleSyntax errorErreur de syntaxeIllegal function callAppel illgal de fonctionIllegal direct modeInstruction interdite en mode directDirect command usedInstruction interdite en mode programmeIn/Out errorErreur d'entre/sortieBreakStopNon declared arrayTableau non dclarType mismatchTypes de variable incompatiblesFunction not implementedFonction non implmenteOverflow errorDpassement de capacitFor without nextFor sans nextNext without forNext sans forWhile without wendWhile sans wendWend without whileWend sans whileRepeat without untilRepeat sans untilUntil without repeatUntil sans repeatArray already dimensionedTableau dja dfiniUndefined line numberNumero de ligne non dfiniString too longChaine trop longueBus errorErreur de busAddress errorErreur d'adresseNo data on this linePas de 'data' sur cette ligneNo more dataPlus de donneToo many gosubsTrop de gosubsReturn without gosubReturn sans gosubPop without gosubPop sans gosubResume without errorResume sans erreurUser function not definedFonction utilisateur non definieIllegal user-function callMauvais appel de fonction utilisateurMemory bank already reservedBanque mmoire dj rserveMemory bank not defined as screenBanque mmoire non cranBad screen addressMauvaise adresse d'cranMemory bank not reservedBanque mmoire non rserveResolution not allowedRsolution non autoriseDivision by zeroDivision par zroIllegal negative operandOprande ngatifFile not foundFichier introuvableDrive not readyLecteur pas prtDisc is write protectedDisquette protgeDisc fullDisquette pleineDisc errorErreur disquetteBad file nameMauvais nom de fichierBad timeMauvaise heureBad dateMauvaise dateSprite errorErreur de spriteMovement declaration errorMauvais appel de MOVEAnimation declaration errorMauvais appel d'ANIMFile not openFichier non ouvertFile type mismatchMelange de types de fichiersInput string too longChaine en entree trop longueFile already openFichier dj ouvertFile already closedFichier dj fermEnd of fileFin de fichierInput string too longChaine en entre trop longueField too longChamp trop longFlash declaration errorMauvais appel de FLASHWindow parameter out of rangeParamtre de fenetre trop grandWindow already openedFentre dj ouverteWindow not openedFentre non ouverteWindow too smallFentre trop petiteWindow too largeFentre trop grandeCharacter set not definedJeux de caractres non dfiniNo more text buffer spaceBuffer texte pleinMusic not definedMusique non dfinieSystem window calledAppel d'une fentre systmeSystem character set calledAppel d'un jeu de caractres systmeCharacter set not foundJeu de caractres introuvableMenu not definedMenu non dfiniBank 15 already reservedLa banque 15 est dj rserveBank 15 is reserved for menusLa banque 15 est rserve pour les menusIllegal instructionInstruction illegaleDrive not connectedLecteur non connectExtension not presentExtension non chargeSubscript out of rangeIndice trop grandScrolling not definedScrolling non definiString is not a screen blocLa chaine n'est pas un bloc ecran in line en ligne Varsys y"y$ypO3SL#Z#SN#SR#Sf#SV#SZ#S^#Sb#S(B?< NA\aO <" @#U 9.#T#T#UU#U BBBBBBBBBBBBBBBBQByUAU<#U"9U #U#UU"AU $ B#U*#U.T0< TQAU#U0< 2<BQQA& C"0<$If(Qa3U4BySByZ3S3SlB9 3UA&pafA&pak3SA <a&/a: JkjM3U?<NNT|gVg?/<NC*yZBEMZJg("UA<NCOBySaJgkZBySv`@BySv< g:< ḛ<g?JySrf~NC2H@~NC<f ~0NC`0BGNC`~NC`AIA)( pN`|MS,,, ,,,## #c##VpASzNE~NCpNG yS^3S|#SH# Nu#SHpNG~NCpNE##p3e>By>By>3T>N$#MS,## ###Nu,yZ|Jg nhg HNL@@XQNuJf[*a$fa)aa8 yS(.yTONNvA~NCa\Jg?BySa 0<yg<YNuH&9TNd 9T#T#T?<NCLNu g><NC`Nu<4k,6fBDBEX`8:BCDE20<NERF`NuA!><NCNuBySv>< A0<NCJ@faaL`jBySvJySrf3Sr~NCNuBySr~NCNuJySjf*ySv ySvfByTXa>09TDgNBySvNu09SpgLS@A"0g,<`g BAySpNu< <BySpJyStfnNuBySpJyStgaZ?< NC?0<><NCK29SAfB@BA`0<22<G&GC"CJyTg4< `4<2<  $IBCJyTg  KfSg RCBmlBl RC` RA(|mf `| fBA><NC0><NC*_Nug< g<ae 0Nu<Nuaf d4BANuBBBC Na´< d&2 H@ H@J@f ЁeЂkRC`,H2<NuSJCgBANu2<NCNu?0 gB0*Nu0<`T(NSgHkB< gg"j<.< g<Ae <[d fgj<g<fR`B@NupNuMK BEagjRkB]:gR jdrg$fP<"fBf"Ba8#TByT` yTB09T!@`gyT`< ggG+ agVfG+uagD"yZEZtJg&RagXPRB|f`~f`BA`,<f<g<f۲<e <dBaZ,LgB@`<f`fg,S`S<ae <{d <f4<Aeְ<ZbBaA#T 3T`ΰ<_g<Zb&<Ad <9b<0eyT yTeS69Tf08.aS@QJySgySe 3Sa `BySa:LNuJySgByS0<`P0Uge Uad0`B0Va80`*I`*yU2gmge (M`BANu2<Nu2"$/ 6<14xza6 _" SA .g Eg Q.0BAX`X<d<d<eJg <f3Sx<fI/` <f I-ffU$jfvR`r<g<fTTB@. yZHJfI=#=/9A=/`4IZH(t.gҴfSJ$j`I+ufS$jRkJySg<ae <zb `BLNu"yUBD:<g"<g(H@aBJL dL\8gLDfJDg*:`&<fL0RgH @aBL0dL&:,IJDg0a,MNuajJg< g<g H@<gB@Nu0<NCNH&H6<`NBg?<NMXJ@fNQ`KB@g?Bg?<NM\6<` KLN/Jf|  B( _Nu3S`BySaBBIY09UH09Yg0JySf(a.HS@HTeNlbHTd8lc:,aJVg,ne*aAata agkagk`aq`aDJDg*|g"*NJVg ne` a^a5v`t0<`Ka6xNVfv `a@tJgJzdJp3NVfv ` ,fJDa@FJgJLdJB3NVg ,fJa#33"N$yU"&yU&4969dIJQg0)@e44Ce.`U"g496*"yUJQg0)DdBdEeCc` yUJPgCBBgXj<g<g<g<fRR`ܰ<d <e"<d2 gR<fXX<c`<g `` fR2 gR"b&yU"SgXe`2+#A ,f^R`"y:94969JQg렺ie3BC`p NH yU#SBP#Uaf/9U*#U.U* yUCS0<"BQa34#S3 S3 SLpNu yU f0<JfQ 9U&U*fz 9Sgp#U*AS йU#U"yU0<"Q yU Sa2`AK BA85g0ggR@`RAR@`4<NuJg2a=(dGvA a] ,gSa3S3SA JSgfJg`<9S09Sa,Ma(kKJVg@ne8a>JVfBS`3SB@a>gA><NCaV`BS0<`Ga<*g` `JGg HaLaj`JXADO><NCaANCaN`^JfEyT y TeByTA"yT}$Ip4Q09T yTgAH"` A H2au yTg A$rp(NENu yTgE\y Nu/<?<NA\Nu?/?<NNAPAJ@Nu?<ONATAJ@Nu/?<ANAJ@Nu/ /Bg?<VNA J@Nu?/?<NAXJ@NufNua:fJBg6|?dDHSB2CQB I .g \gQ IBNuRpNuAa.aaB$C4gbag Bf (Af (Sf S"HB`pa`azang@aJ@g|cذ|g ް|g f|g|g ڰ| gB`jJySjf1`A/ aACa"_AaAB@af0AB@afAakACakJySjf0acB@Aak^3SA < a kD yUXpak2 yU <@ak"yU Y ak a"abNu/ab ` xJyU2g apNu|g|g|g|gp4`Clp0`Cfp3`C`p1`CZp2`CTp>`CNp?`CHp<`CBp;`CaJ@g6|c|g|gְ|g,|g || g`VJySjf-LAaY@ܹUU.d>a yUXpak: yU <@ak& yU ( yUankaa_NB@NuaHB``JySjf,ApafvpAak`3S"9A0<Hpa kLS ( f  g2 ( f  g$  g  g  d RJgVQ`/B(A~NCaA< g<1e <9b 9U*Uea"fVa`aaf Aa` aJ@fABaf?9U09U4|d3U2a^LACafnY@ܹU U.ea`Ra2fD09U4Y@C!fA0<g<.gQ` QyU4ag\0a]ByU2NuEpr"H<Ae <Zb fQNuJfR@| fBNu yTBAasg6 ,f/BAafBAaLk3S# 9#a&a[ng9 #I )Щ$I$ JgB` g<gՒ``NuAaApakJg`ApakNVg$ ,f9Fa/HJg9Nb9D#&9aZ|f JyZf:&9@caM&9a[H"9&/$9/a\&aZL I a,k4a>`[AaApa kJfzJyZf9Apak 9U.U*&9@caMaV^CS yUX$Hp"QpNAXaVjQNu>g|ggjagB8LB62@ gBaCL r@* 2/ /?*?<?NA Jk0 gR#U"RG|eNuagDj:a>B2IB62 gfI r* PB8Cge8//?*?<@NA Jk릸Cd*aB  SCf//?*?<@NA JkxRG|eaLe%@Nu?<Hy?<6NAPJ@fFA,( ( &BNua^Hy?<9NA\J@fNuaDHy?<:NA\J@fNu f-la"Hy?<;NA\J@fNu&<aB TBg/?<GNAPJ@fAJfS U2`EBgHy?<GNAPJ@fApR@JfJ@g \gfB(Hy?<;NA\Nu?<NATBBAN?<NATB6BNu f,a"` f,a"B|aeC CA?< NMTd,gf??<NAXJ@kNu?< NMTBB&NuaaB|f,8/a @epAa`aJ@fD(v,a@2- Ip, Q IEf| / E **I a0E>* IaHE>* I!aHBE**I*a*_ I-U`CvH a3 BgHy ?<GNAPJ@fJ9 f3\ L#*.*JBgSBC( J6<:g<\f $H6SC( R<*g<?g QB`"DB JCJCkQBJ9g0E *:fvT/ a,$_Jg/ ?<;NA\J@f(Nuv69 aHy ?<;NA\J@fNuByS `3SB9 `BySB9 a#*.*ta`ga Xa?9TX3TXHaHAaa@aNAAB(a(AaaBgHy?<GNAPJ@fAa`aaBT$yU"SyZkJ9 g, *ѹT JaA !| aݬ`T *fAaݘAaݐa݆`4Aa݂ *ѹTK: / aӜB$_AaZaPEagfk\agkR`Va0 9TKaZBAaJTg TfA`AaaaaLp3TXNuaha\gAaffFakapgNua>a2gACa f(\agAafCaPka gNu 9U& (U"ba;> yU"pr  QBXBQaByZApafE *fa"agABaf a agNu yZdA "Hp  QBY"HE!j*g*REBAg<.gRA`JAgA g`$yU"49Zg\SBA "Jg<*f<g<*f<ge EQ`&09ZйU" @geHS@C# QpA QyZNu yU""HNuJAfH灀~pNCLNuH灀~pNCLNuH灀~pNC~NC#ZLNuH灀 9Z2H@~NC~pNCLNuHJE"H4~NC0~#NC40~$NC4 I~NC~NC2H@~#NC40~$NC yTfP@P@4LNuHaH4HC$ Y|da02aLNuaBpBAaA\0(2(~NCaAA:Bg/?<GNAPA"HJf|\B~NCANCaJyZga NuaH?< NMT,?<NAT:BDBBBCgBgRBRC|e`^Ed0H0*2*~NCab09Zrt~'NCrCfraD0*2*R@RA4BCAAB(azRD|eByZLaDNuHa2ayZ4VApBa>LNua09Zt BAaR@QaNuHAT0(yZ2(~NCByZLNuHAJf3ZC\0)HyZBA| er@ i~NC3ZLNuC f3Z3Z3Za?9S`:JySjg#ByZByZ3Z (f#?9SBySaaa$pARJf3ZJyZf ySgvJySf#d ,f#\aa|@d#^A a93Z ySg6JySf#$ ,f#3SaVJg#d#3Z3SAp?BQa[09T Ap 29ZHA2468:<9THF<9T~NCJ@gN ~pNCpNCJyZfAa L~NC` A ~NCEv02~NC2409Z~'NCQB@BAa>R@|eByZA p BQaaHaaByZ3Zata4J9Szj$9SzgSzgp ~ NCaZNpNEBBAPehe hdhePRB| eJyZf3Z`nJyZgyZg^BA49Z3Z`3Zr3Z|d0aaPa`&|e 0@yZyZd aataaɘgajJ@fH@<Hg <Pg`< fJyZgfVJyZfC 29Z<f,JAgSA3Z1 A~NC< g`<.f2| d|g p ~NCRA`3Z<.`8<ae <_g<0eX<:e<AeJ<[dB|g:| d2RA3Z~NC`C29Z<f JAgSA3ZB1A~NC`<ae <*g0<.g*<?g$<_g<0e°<:e<Ae<[d| d4yZ|p ~ NCv NnTE BAg < gRA`2HaVLNז|f a`|f a`|d@QA??< NMT2BBBCgBgRBRC`??<NAXaRA\B`AyZyZd0a *f0CJfSg< gea``B`ByZaaC BABBBCRA< g4fRC| fB3ZA ~NCa| g`:9YATŰgJjNu29YA@0NuA@0NuA 09Yg6a@g.49UJ0SAIAAYJgaka`pNE$~%NCJ@kB~&NCJ@kt2~NC@fH@@g0><NC`V09UHCY09Yg.aX40R@|f0<24SAIJgaka6` ?49UJCY4<JfRB|f2B@Nu02?ak26<NuJfJyYgB@BAa`a edyYgj209Y:apgargaP`L09U@1>Aa><NCA>NC` 29Yf 3Y`ByY09YH49YIBCm4<B@k2aJ@g0><NCQL3Y?a"03Y~NC ySra^NNu09YgS@l29T$AE`aJgdg <,fhRSCKCU<"QaJVgnea.``(A!02 IA><NCG0S@IY0H2SAIANuH BEaA!><NCa2IAU< 0UK?a*8BA><NC`H BEREajA!"KaL0,g|fA! "Ka4` *K?a8 K><NC|fL0NuAY0<BQ8<:REa(9|QNuH 0<BGNCazL0NuBySvJyZf$ 9TưTfa7a7~ NC3U:paJ@f A2a `~pNCB@r~NCAna~NCB@r ~NCAav~NCB@r~NCAa`~NCBDaRD|fE!fxBa<NC89U:<B@BA~NCADa~NC0@1BGNC0<BGNCaFaBCaXJg"HA<bg̲<ag< g<;e@<Ee<Te0<Vd(7B@yU4da8>3U6`v<Kgj<Mgp<Hgz<Pg<g&< mh<l`|gXRCBGNC`LJCgF0<BGNC0< NC0<NCSC< `(SEf:<`RE|f :<`aSDj8<`aRD|fBD`a`?:<a,Kajgjg<eg <EgB@`0<9@BTRE|f:<ahBB04 g|gP9 t e XB9 `< <<0NCRF|e89U80a6J29Yg09YaAYS@H09UHJf~0anga`nB@BAa@`b>< NCJ@fRNu?<NNTNuJySlgJfNuBySlNu3SlNua4a4 yZpJg "PH瀀NLXQByU6#U*U& yUBX#U"3T3T3ThByTjBS#]T#]TByTByT#]T"BT0BT4BT8BT@BTFByTDByT>ByTNBTPBTTBSByTBTByTByTXByZByZfAZhp BQaj\BySvNuaa Nu6<`BC yU2g0<0j<gR<g<g<gz<d <dr<elfR@<gV<fp<bHf:`< 0f8JT4f0<f*#T0#T4"HT#T8`JCfB`X@T@R@R@R@AeX`HBySNuaIg2/a<,_Jg jaaf AaζaӮ` a Xa` yU/aaaa*_3SjOJUfJySjg`^JySjgTJUgN,MXgk <:g(N`@HA5 pJ9Szjaa|JyT-yTZeҾyT\bH~NC/A^a~NCB0-KarBA~NCAmNCM Jgt"NR0 gR/ X@AS@QB~ANCApNCBySaoBySaoA~NC _JgAr~NC`Au~NC 2H@~NCa^\aJgL`R0gR f"yU&$ (9U*BBdPfRf N0@S@f Q `B0@RԀg"B ` pgXԀ"B`fr 9U&@U"da!"yU&g&j#9U`HH0<NFL##L`B 2A NSA Q2 gB!#U&"@3S4Cfg k &()Nu&Nu&NuJyTgNu?9S?BX?Bg/ RBySa"JkgaLo4/8/Db "WYbDd B<RRB`ׯJySf<,f R` ySf "_48Bf &4g3S`6<f da0<`xByT 8Xf jByT,/?0@RaJJk FgaJg .d $yT,/JySf<,f R` ySf JyT,g &<A>9T,SG, RQ$8g 9U&e e U"da"yU&$Ipg&kH0<NF "L##Sf` 9U#Sf09T,S@A"3Q39T,Y" _0@S@ Q0 gB!#U&<,fR<g` Nu (f f a )f Jk& BNuTBNu0gR&BNu0gR&(4<@Nu0gRTJySjf$$NB6a T0g RCKSC0Q#U"& ` &JVf&9U<NuBgg FjF<g2A7@@e ,H pN0gJg k 0<NFNuDNuJWf >`<(f ySa`GByS0<`H87a~@SbS2AgIA8: pLN`ذ<)f ySNuJk gaJk gH8p "$NF,BLNuJk ~f Jk vfaܺfJNuJk bJk \f"0<NF&(<@NuH8"0<NF,.L<@NuBySGa`aJySf Jk g`@Nua`aJySf Jj $CB4NuaJySf Jk g/ "$0< NF&"_BNuaJySf Jk f/ "0<NF&("_<@Nu g .f R g?$f FJySjg T f 4aJf *" N<:<a,HNu f aJg $C?9S<(f (gf <f (g v`lJ/ fax$_J/ H @BySaL a$_JySf ,fJ ,f` ySfJ )f  fnJ/ByS,JaJySfT,_3SNu fBGaH @<f*aBJySfL fJg k "#DNu"Nu"NuJkJkfat`aB` fGaH @ ,f fGadL fJgk )#j%@ "$Nu f3Ta*ByTg,B0H@R?9S?az0S@JySf ,gf< ySf0J@f*3SLE~kg~]NuGat&gpz(H@ IS"H,.(&()H atLJg&Jgk (!i#@  "Lgd`LR c`Nu (f~aH#@ ,fn?9S3SaJySfR3SLgJk\JkVga`aB"H@چ,.)H?a&JfhLaJgL`LچJg`d6H@,.)H?aJf$LadJfLR`L&RDBNuLL&ֆBNu fGa0JfiNu fdGa JfrizNuagkp"$NF&(<@NuֆiXNu$C/B6gT$FB0gDրdha00gS@Q$_0gS@Q0gR#U"& <Nu&<NuX&<Nuajgkp`ti&Nu($FB6"ap0g RCKSC0Q#U"T$DB4BH``aLJg6 I( S*ւÒځSkQ0gR#U""D3E"`<& UNuag kp`ڶd dNuBDJjDFDJjDFD2kHF0H@k J@fҀiHC0fHF0H@kJ@fҀiJDgD&NuaPkgp`XJgNBGJjFGDdJjFGD iv6`"JjFGDzxB㑲eLQ&JGgDNuap`aa&Nu F"CBBB02g&J@gfS@gSAf|NuSAgvNudeJAgfJ@gfagk"0<a&BNugBBNu&aHfNup`.a8f Jgj &p:`8pC`2pL`,pM`&pN` pO`pP`pQ`pR`pU`8HEDS@kJfQHN{*BSByTByS#TNL ySvgJySjf4JySLfdByT<NC<.BGNCNbByTN#TP#TT#TJ3TDJyT>fBJT@g:|g43T>#TF*yT@O``"yTFByTDBySv`&JySLf yUX"HdY#TFByT>BySja0 Ja><NCAS apNCB0)Ka.BA><NC3TNa-v yTDgVByT<NCNb f80gR&f,BySHna"Jga6& _JySf `/a&#T@Nua궼Vd `JyT>gZa3g aa BTFByTDByT>`(yTJ,LS*yTFBTFByTDByT>`pJyT>g yTJ*yTFBTFBTDBT>gl<:gh<gb<gNJj<g<g<g<fTR`Ĵ<d <e<d6gR<fXX`,MX`S,H`vt 9TFg @6(NuB69TDBNua2Rkf 3TXNuByTXNuSzJyTXf0<``JJyTNf0<`ByTN3Sj`0gR f@/XBySaLad"_ JySjf/aza8 3Sj` JySf"*@,MX09T yT29TAg$Jhg4<`4<&be RAAfNu#T3TNuJySjg0gR f./BySaa"_ JySf"#@BA."yT"]&e#9T39T#TT3TT# ##T"*@MNu yT"]g,X*X3T#T#T"` yT"]gP` f .ga<g<f?0gR(f2/ N<:a&( <, NzagREe-D&B.bJf T,DNu N/<,(Sg agT`,HaRaj ,_2<g&`Ta/k&fZf _ONZf _ON f0gRXr CZhBQr CZhH@@aaL" ,fRQ3ZfNua f0gR Jg2f|.gX<eHnaha"_ `TJg<gb@aB ` NX3T&<<ag2k yT&`yT&fY |eB,Ha `fJySjg,MXaX`*Jk춼d*JCg$ yU`JPghfNua&f JySjg yT(JPg #T(X`Nu"HgdjN<g<g<g<fRR`0<d <e$<d6gR<fX<fXg f4<Nu4< INC JNCaa g kagk (QNu0gRJySjg f>a(g.ByS/aa"_ JySf&",I` 9T0-@.A#T4 @ hf\#T8NuJySjgX`޾JySjg fbGa H BJT4g,yT8<,fJkBB`8&9U`0aB<,g&Jf,yT4JVg nfg#T4ZR#T8LB a ,gzSNuByS`3,SByS<#g<g0<fa$C4g SBBGNCQ ;f f`<?BGNC<BGNCBBCH0@3SajBySL Jg"k8<fJBgSBB1 pBGNCp NCpNC`|d RBB1 BGNC`<fB1 `3SBySabgB g/ a$_ ,f3S3S f#S$yS2<49S69S89SGa~JggJf< gQ`hf`aXBEGByS/ a $_H @JjB&<aTBA89Sg gRA`S20gR#U"L `R/,Ja $N,_L B@gySfa`,JySfADaٜ><NC,LRJySgf<,f, f ,gFJySfAD><NC`Jg<:g<g <;gfnSJySfaNuaJg4H@3T.`ByT.&9U<NuB69T.BNu (f" #fRa|g|f/&a~gڰ|g(&kgd@a0aSf`$*a,eg&kgȶdc&at/ 0//?*?<?NA Jk"_ IT`r&Jk|g~da00SCH3SaNBySLJk g| e0Q`"aJfBySpNua.|?dSBe"A%< d< QB3!SpNuH*<,.9UT"G*yU*,yU&tx& C dfAJkf XgX``gX0S@x2RQS&NX eBd> EAdf$&`&"Ce C$)` P#|#a#ad! !Jfgf&E"G~dP SGg>.f" p00 gR`$k$" 0g2S@H2Q`"9U$`$k$`el,yU&x$dXfAJkf XgX``gX0S@x2RQS&NXgJfg&Jfg. `#U"LU"e2Nu 9U&"yU" IYeNua4,LSO`\G (f faۘJjB$C4Ud./ v6a"_"0H SBQ0gR#U"`H ,faH faLpLNu?9SB@ByS|bd?a߆Jgkta0/R@JySf ,g`: ySf.|g |g&$"3SNua/ ,fa(Nua|f,B`<eg <Ef2|e< g<+g<-f < g<0e<9cJCgHS?/B J0< NF&(,_0<@2<L`XB@NuRaJ4<`Ran4<`a4<AJBf&JDgDL`XBNuSBBL`,_0<Nua&ga0SC<Ae <Zb Q`a&ga0SC<ae <zb Q`?<,NAT?vaf0>/ *H_0a:_0?ax:_0H@?af M*_`J?<*NAT?&< a0 >/ *H0a4/Oa"/OvBa``vB`T faa\/MafB@>Oa>g4azf.@?@Oa*g affH@@??<-NAXJ@k,_Nu,_`Lg< gNu fla؊a/MafF@>_ag8af2@@_ag$af@@@_??<+NAXJ@k,_Nu,_` faJk #SNuB&9SNu ySLgJHBp NEp NEpNEpNErpNEpNG<9UAD~0NCRF|fAD~NCLNuaaNuvafCD IpNEz`z&yUXv<9U f JEf a>` fa  I~NC|dRFXRC|fvafCD I~NCNuHa I$ )Щ$I!HJgB` g<gՒ``LNue"H0g'"SfJg"SfL Nug&SfJgSfNuH&9UU yU 2< gրQ yU!CLNu&yU.$K"yU@2<&!g$ JkB`÷g H0aHL QַU*g#U*a afNua yU&yU$yU**<<&gjڃa` BQ"yU#ENu yU"yU$P#U#U (B&@#U.&(#U*aaDaNuH|d29UAg3UaNAU<4J#UAe*&֩$)CRA$Q&J"&)a:Af`&$)&֩$Q&J"&)aSACAf yUCUH#UaLNuB69UJyU6g69U8RBNuBBJyU6g69URCNuB69SlBNu yU"yU*/JgnddX2UAk gQ" NuSd:KCU U*$yU&&J#U&& aNuaragH fXaZaf|f JyZfJ$LCgv"&BAHABYHa^La$I&a&I&a8`.av|g|fSyUgR&a"QH&a\|f JyZfܼ&@/&a*&ca^&aLag/ $&//a&a&I&$_a`SyUgJyZf@R&aH 9U.U*&)@caaL&)"Q$yUX0<$QH@&yU.$yU&&9U*#U&a#U*La` (fڠa$|g|fڎ&a`SyUgR&aB"Q&a& BNu&a` (fTaذ|g|fB&a`SyUgR&a"Q&a&BNu&a`춼dagڦ& Nuaa/ ,faa/ faa&C&$_eaNuaϲa/ fٞaϠa/ ,fٌaώ$ _eِg SfAgSAfNu (fZ?9SBySaϐa>/ fa#T CpNE C~NCNuB69TBNuad yTgӴa`\pNEa& yT0<B Qa yT0< Qa3T?/< NC3UaByYByYByS3T3TJySjf NNyNJyZgHB@>< NCJyZfp `p Ne0<BGNC0<NCNJyZfp `p Ne`< NC0<Ne0<BGNC0<NC0<Nh0Nea#T#T# T09THA=2B60#T60#T60#TByTSC3T3TByTByT09TrA=J$ySV"j p,2Q"jp 2Q##p3d>3>3 >3>3>3>3>3>3>3>3>3>3>3>3>a09>3T#a vavaZByT3Trtv8ACEG??JAjBAyTdJBjBByTdJEkgĺyTe:9TJFkgyTe<9TޚAegBge0_@gGgCE0_@yTlbyTlXJCj0BCD@@eHgF@JDj0BDD@@e6g2@0EyTe@g0FyTe@gpNuXpNua*Sd*? ,fa|fBH` fav|fB*,LCDD҃Ԅaf0AB000000 NuaSdɮAB2468:g<g. yT"Hp!NENupV`ʊ<g<g<gSpNuB@NupNuB@S@NuJg :g Nuakfrp0NENurp0NENup1NENuak fByT~(pNCNu3T~(pNCNuepNENup/NENuark(fBB`t?ag a"p`p4NEJ@fɊNueȬa.|g|fȚCB`DCp NEJ@f^Nuae kzfBB`t`t?a(g ah"p `p 4NEJ@f.Nu?<`BgaHf>/ ,f4aRJBg<|dȂaޤA"40< NEJ@fNuaJgk "p-NE&BNuaek,fBB`t`t?ag a"p`p 4NEJ@fȞNuBgafǮ/ ,fǤaJBgǬ|daA"40<NEJ@f\Nu (fna|fbJknTddTdZpNEB&NupNGtp NEp NENupNGtp NEp NENuaJk&"pNE6HBNuaJk"pNE6HBNuaJk"pNEyTdTd4Td*g$e geHx faz|g |f`H&a"CLDCTdִTd̶Td¸Tdøgòeîgèeä4C6D:<L _eÐeÊ|fp*NENuJyTg?pNE2"yT`"yTp*NE`aȰ|g|f4/vGa|Jg"$/&a C"yT"g Pbp+NENuad|g?af yTA}pBXQ2<`J<g<,f² yTA}af`&aaX C"yTA}C}p2Q2< yT"yTA}C}p2Q42p5NENuak fLp'NENueBaD/ ,f4aRaز"Ap(NEJ@fNuak frp.NENuea터|g |f$rd 9TS@dBp.NENuJyTgpNE#TNa@JyTg"yT#N yTBp!NEpNENuJyTgpNE#TNNuHps"<BNBLNuBy>3>3T>`akATBBB09TS@g jTACB`CBRA0H>1B@g0TR@Ac3T3>3>aN3>3>a<3>3>a*NuaJgb3TyT3 >3>aNuaҰ|g|f>TdF>"$`>9T yT0Td&Td yT03T1A3TJyTgpNE#TN#TNJyTgpNENu (fa<|fTdTd yT03T1B3TJyTgpNE#TN#TNB6BJyTg0<)NENu g4aİ|f6Td>Td43T3T fRaꎰ|fTdTd yT1yT&1yT(1B*3T1A,3T!yT!yT1yT$1|"1| JyTgpNE#TN#TN`a kflxv$9T"9T``eVaذ|fJTdRTdHH` f*a鬰|f0Td&TdLAdBd 3?3?3?3?3>3>3 >3>3T>aBNua4|f3>3>a43q>3>a"3>3>By>3T>3?a3l>By>3>3T>B3>A3>aNuBGf49T29T`*RHaL|fTdTd0HA?13T13TRGg<:g<gg`|g3>Nu<<at3>By>3T>`a|ffJgrdh3>3>aJkP3>3>By>3T>By?3?aNuBG?a>|fTdTd0HA?3T13T1RGag ;gf3>3>By>3T>`a|fd3>3>aJgx%dn3>3>a첼dR3h>3>aNuaDr09TS@gjTARA0H3>Jk f"?a2"CSAA>0Q`F"C4|e DU5(f Yf Yf0HSAA>t$I0QTQ3p>By>a Nu<<an3 >By>3T>`a|f`TdhTd^3>3T3?3T3?3g>3>3>3T>`<<<a3>|f3 >By>3T>`<<a3>`<<a3 >`a,|fTdTdH` f~a|frTdzTdpL3?3?3?3?3?3?3?3?3?3?3>3>By>3T>`03>` 3>ah|fںTd⸹Td3T3?3T3?B?B?Jk3?By?̴bb3>3>3 >3>3>3T>`a̰|f>TdFTd3>By>3>3T>`3>` 3>a<|fTdTdJkJkbb3T3?3T3?3?3?3>3>3 >3>3>3T>`Za⦰|fTd TdJkJk 3T3?3T3?3?3?3 >3>By>3>3T>`at2a"A)`.a|fd d?0r a<6r a2Kr a(NuaP|g@|fd6UUUr0a0r a0r aNudJg|d~02AU^AaNuaذ|g"|fD| dNA*AaN`^Jg6g, d">UBgjA*$6<`A*,6<` A*46<AaraCra(AU 0pgNua@/|gJ|fadA*^J00 A*<@@@H@@ @ aa`Jgtdj>UCgjA*L6<`A*R6<` A*X6<C*^ad0J01 @H@a*raFCraTAU 0pfa&f.Nu&H<da*`Nur a r aNuA?Bg?<NN\NuA???<NN\NuGajd fx/ax0"`a@dh2aBBNuaʰ|f<e0<e4BEBDJ*g^EB@*R@@|bH2@2J*f3| 3| JZpBAJgRAQAd8RC|eB3Z3Zg~!NCTDTEBB09ZHg*AZ&402B><(JyTgOGc4Dv29ZHA29TRA<9Z HF<9Z"A0R@H01@0S@Hhp~NCBpNCpNCBBBCazRCyZf~"NCBB6<,ySZJ9Szj"9SzgSzgaRLNJyZjB09Z ne6AZF0BAJPg(PeTRA| f`yZgaLN.gJyZ f `hByZ A0XeDXb>0.BAJg2PeheXRA`Ag JCkBBaJBf(6ta`JBgBBavv` .fJCkj09ZR@3ZRC3ZJySjgJJyZfgBk@f8S@HAZhJg(/0a,Zf*_MNĈONaLNup~NC~pNCva&IB69Za:|$I yT0<W Q0<W yT Qa6aByZ NuH0a4B@AZ&Kg000400@gh?JyZg4r~NC0S@A QBpBGNCA~NCpBGNC`pBGNC0r~NCASBQBA~NCLNuHBABCHPaA09ZS@ QBLB@HB~NCJBgA~NCLSB`LAgJg`~ANCLNu?~ NC3Z$0~NCNu09Z$~NCNuJfp`pBGNCB@~NCB@~NCJBgp`pBGNCNuJyZf@vaf&<aF&<rtaΖva I$@Ba3Zvaΰf4/ (f(Ga|g|fByZ3ZSe d"_/ apBQ fa"WTJBg pSBgQ"_apg0/ ,fa&"_|fTdTdNuSe d~"_ASeldbaj`/ BBabpBQ f a>"WAZJBg"p<f yTgSBgQ`0fB)Nu|Nu09T29TNuaZekfDByZByZByZByZJyZg ByZvaˎJyZg ByZNNuJyZg&JyZfJyZfaf09Zg3ZNuJyZg>vaȰf.3ZaN3Z"3Z ?a&3ZNuJyZg3ZZByZNuJyZgvafx/ ByZp r(3Z >9T|f3Z JGgIEZFGZ&p BZB[QGZFEZ&BBBCBEp J)g6BD 1@fzRBPCAdRD|gJ1@f46Q`46 yTfz3Z JyZg$f80<3Z yZ JyZgyZg3Z3ZXNpa09Z"~NC09Z ~NCpBNCp BNCAp'JyTgHR@ QBpBGNCJyZgpr~NCA~NCpBGNC&_BCAZ&JXgBBa.RC| eaJNuaJgd?va60`aJg춼da0SC Q`aSCed ~NC&Jg"CB6)CBNuaaJgl/ / fdaff JyZf\/agaȦax&/a2<$at&aǸ&I&$_a\aRNuaј|g"|g H~L` H|Lt29TRA g԰d찼dHAb2HAFEHL<<9THF<9Tbb~NCJ@g|b@C`NuaAS@`H?L~djd>0Q0A~NC`a8d:d ~NC`~ NCB6BNuaЊ|fJkJk0~NC`ZaJg̶d䶼d~ NC`2a@|f~ kJkNCJ@fNu~NCH@B6BNu~NCB6BNua\~% NC&BNuaL~&`aB~#`a8~$`BJyTgvNuvNuB yTfvNuvNu (f$a|f k$"k~NCJ@k@BBNuaTd3T ~NCNuaܶTd3T ~NCNuJyTg f(aHkfByT yTg p'NEap` 3T yTg A$rp(NEpBNCNua|g|fR k^JkX~NCNup `p `p`p `aټkvfp`p`p`p`p`p `az|f gd"eⲼPdشeδPd~'NCNuahfJySjfNe(aaN/Bv ,fRaTd.v ,ftRa|fXH` fLaΰ|f@(&LBACTd6Td,Tb"Tbegeg* _p2NENua|kfp`np`hafkfp`Xp`RaPkfp`Bp`JGg$yTHy/?*?<@NA Jk ߪ`N}BSBTByTNu9Sf9SfPAgΰ<:gư<g<f: .f2Ta|xdBySBySA a3T ;gByTalJySfF/ KJgk 09ThNj` / Ni(_`&C6f ` / K0<xSCgQS M*_` S`ByT9SfFg2<:g,<g&<,g <;gf   Ra\g `  SB.9Sf#S0<NuB@Nu M*_JyTgzBCEp QAC, E . g<.g<;g <EgRR`g<.g <EgR`HgP"<#g<-g&<+g&`f< `!<0e<9b`&F`&F<-g<+`LB .fRg<;g<#g <^g,`fJBg `0`а<0e<9bR`JBkf,g <Eg R`4<`4<gR< g`GDH <gzRB`t M*_JyTgBACpQACE g<~g`f `R`$>    v , 6        8  :$     .D "   t         (@   "\ |&|$2* @ ^$ > 24 6$6 "$,   >h (& &("    >, "(@"(d& 2,  (~       " 2J  $ d,   *8J<6$*"$TB:`  & &   L    p 4   > " P f&""L .. @4    "$. * B 4  > < . F0        "      &  (@ >R X    ,&\(  X<80    ,  2$  ,> 6 z   D x (& *  " ( &F(   $ Df F , L&  6 "2 *~"J,$,FDF L: " $VF0  Z          0"    &z (0 " |$  t   ,   "  26B   X Z( 2&"& ( ,  ,  l  &.2&""     &*H v0 $:~rj *" B<0  Z  D 2* pj :h&r . 6L, *@ 6  (.  j*h  . 2    "  &$   l< h $ J &*: 6~,rސ2 t 0"< . .  T D:<,LH    "      "   "     "       ((  "<  "       * Nh<,4 0 D 2h       "4  | 6   n  &"*&:B p .  &4   L  f>80J   "L $6   "@, 8  H     `"P`@2^ 6$20Vtf>Tb0.0000000 BAD FLOAT TRAP Hz?<&NN\A8NuA #NuHk C"qNJg@CL"qNCNsJgfpNspNspNs&<B(<4VxNs/<B/aXP//<HajP&(<4VxNs/<H/a2P//<BaDP&(<4VxNsv(<4VxNs//aP"<4VxNs//a4P"<4VxNs//aP"<4VxNsJg//aP"<4VxNsNsC/ rg < gQBB)aX"<4VxNs4Vxg/Cdf  _SNsH| ##JEf2JDk.|ex?//a>O JDf (.fB L>Ns<Ae?<`<1e?< `?<Hz/aO "@ -fR I 0g,g<.fJEfpdH<eNs4UBe0|p H?Hz/:aO A"z -f.E2jr`|erg <.gSAfBJDjAg <0g$H`"JE+0< e )B `0B zp L>NsJ@g BBvAb`BC4\?Hzq/:LahO Aa"z8 -fEg<.g<0g` Jp02jr`|er.EJAgg <0g$ISAfJDj"JJCfBE-0`>/a .XNs/a X"<4VxNs//a PgpNspNs//a Pf`//a Pm`//a Po`//a |Pn`//a nPl`/a#aF./9a jP"<4VxNs "<4VxNs/a*X"<4VxNs/a X"<4VxNsNVH..a LN^Nu//a P"<4VxNsNVH..,. a LN^Nu/a X"<4VxNsNVH..a LN^Nu/a X"<4VxNsNVH..a LN^Nu/a X"<4VxNsNVH..Np LN^Nu/a X"<4VxNsNVH..a LN^Nu/a.]B/a ,P"<4VxNs/a X"<4VxNsNV/..N .N^Nua "<4VxNs.//a P@//<Aa Pf//a P/aXNupNua//<Aa P"<4VxNs/a X"<4VxNsNV/..a .N^Nu/a# @.a./9a P/<B/a >P"<4VxNs/a X"<4VxNsNV/..aZ .N^NuNVH-n Jnnp` nop`0.R@8BGB/.N (Pl n -R /.NX-@B/.N (Po.`/<D/.N~P-@SG/<A/.N (Pm`/<D/.N FP-@RG/<D/.N (PlG|0H/N fX-@`/<D/.N FP-@RFDm/<B/.N FP//.N P-@/<D/.N (Pm -|ARGJGl4 n 0R n .R JDlD|` n 0R SFGnBF`j/.N X:0@0"n R Gf n .R 0H/N fX-@//.NP-@/<D/.N~P-@RFDm n BR .JLN^NuNVH KIBnBn`R n  g n  g n -gB@`p=@ n -g n +fR`$ n .fRn` nJngRnR nJg n eg n EfB n eg n EfDR n -gB@`p=@ n -g n +fR` nR nJfB.a-@.N=@Jng 0.D@n`0.ܐn=@/.?.a:T/N~P-@.N -@Jng .JL0N^NuNVJnl,-|A`/<D/.N FP-@RnJnm`*-|A`/<D/.N~P-@SnJnn .N^NuNV-|`D/<D/.N~P-@/. nH@H/N fX/N P-@R n 0m n 9o .N^NuNVHB/.N (PfB`B/.N (Pl/.NX-@z`BEBG`RG/<B/.N FP-@/<A/.N (Pl`SG/<B/.N~P-@/<@/.N (Pm/<Y/.N~P-@/.N X-@ .-@G@0@HJEg .JLN^NuNVH..,. N LN^NuNVH..,. NLN^NuNVH..,. N LN^NuNVHJl| .D-@`BFJfB`^~` .-@R .f` .-@S. g .-@@ JFg .JLN^NuNVH .<JgJFlB`V .:|oJEg <` <`0..F`RFJFm`SFJFnJEg D. JLN^NuNVH..,. N LN^NuNVH..N LN^NuNVH..,. N LN^NuJj Jjf NufNuJNuNuJg NugR kjklf`>k^g>k^g2k8<d,&B<ރeNuRid~S<Nu.NuJNu<oD&B<ރeNukgvgPk<<d&B꫞kBSbHGއ[kgNu~Nu<oD&.<`DgjD`JfJ<NuHFHG`k~Nug(gvEDiBHGHFFkTiHGDL&:ƞHGHF6BŞd&BރSE&HCBGHEk:څS>:.gNugRghEDvi^E]HE:BB8HD&HC؃HF&؃BDHDHGHFHEބj gNuSiex@ބއdRgNu~NujJ<NuNVH*nBGBF`RHH @ +fR` -fRRF` H@G 0m 9oJFg0D@>0JL N^NuNVHJl| .D-@`BFJfB`^~` .-@R .f` .-@S. g .-@@ JFg .JLN^NuNVH .<JgJFlB`V .:|oJEg <` <`0..F`RFJFm`SFJFnJEg D. JLN^NuNVH..,. NR LN^NuNVH..,. N$LN^NuNVH..,. NH LN^NuNVH..,. N LN^NuNVH..,. N@ LN^NuJj Jjf NufNuJNugR kjklf`>k^g>k^g2k8<d,&B<ރeNuRid~S<Nu.NuJNu<oD&B<ރeNukgvgPk<<d&B꫞kBSbHGއ[kgNu~Nu<oD&.<`DgjD`JfJ<NuHFHG`k~Nug(gvEDiBHGHFFkTiHGDL&:ƞHGHF6BŞd&BރSE&HCBGHEk:څS>:.gNugRghEDvi^E]HE:BB8HD&HC؃HF&؃BDHDHGHFHEބj gNuSiex@ބއdRgNu~NujJ<Nu/./.NP-@B/./.NP/NPl/.N`X.B/.NPlD/NX-@ .JLN^NuNVH..,. NTLN^NuNVHJl| .D-@`BFJfB`^~` .-@R .f` .-@S. g .-@@ JFg .JLN^NuNVH .<JgJFlB`V .:|oJEg <` <`0..F`RFJFm`SFJFnJEg D. JLN^NuNVH..,. N LN^NuH~,<AB'ebc FGNCD<c|`8|*< Art`ڄܐ(&䣞j.XRQN .Jg .<ANJgL~Nu/Npi /,.<AN,NgSh~L@Nu/Npi*/,.<AN,NgSh~,.NL@Nu/Jg0Ri0Npi2/,<AN/./N,NX,Nu.<`.<A`Jj Jjf NufNuJNuJj a<NuNJHNL8Np?<`$?<`?<`<bTJNuBgJk<8cH~$<cP<c <L~TNu,<>.NXDxB΄,<CN,.N$(< .BJkFD<c~䯾o$`D<c~DDl`z,k^g>k^g2k8<d,&B<ރeNuRid~S<Nu.NuJNu<oD&B<ރeNukgvgPk<<d&B꫞kBSbHGއ[kgNu~Nu<oD&.<`DgjD`JfJ<NuHFHG`k~Nug(gvEDiBHGHFFkTiHGDL&:ƞHGHF6BŞd&BރSE&HCBGHEk:څS>:.gNu<Jj~`~<L~Nu.<AOJNuH~?g$,<;ANi`D<o< l",k^g>k^g2k8<d,&B<ރeNuRid~S<Nu.NuJNu<oD&B<ރeNukgvgPk<<d&B꫞kBSbHGއ[kgNu~Nu<oD&.<`DgjD` p|T0@6D,6 :"P :   < *80 ( J X$ fBJ|, ((T *6 *8``n'@O v&'"& &'H D& &'H D(k (((>( (h)*~f\STOSPIC.PI1PIC.PI3SPRIT???.BINWINDO???.BINFLOAT???.BINMUSIC???.BINBASIC???.BIN*.EXB oAJgR#?<NNT#Hy?<&NN\M?<NNT3K m p, J"Kޓ~cRF|dbZz2F|de.EdHp $$$$&&&&QLQ` AaA)aGN#A6aGN#ACaf GNAPabGN#BGMn9AnAjaf(Aja(HGN#L@<N-`RG|eA]a/Aan,_?<%NNT y0<?BQ yg?</NAXNu/?< NA\NuafnNuHppa^a|f&9ֹ`d@an ya~a"y )Щ$I$ BJg` g<gՒ`` y йgR#LpNuLpNur$    & ~     " $ t, 6 >`=`Sprite 2.1"+"!!X6676646r6d3: --..6.J##01R1"00b,6,0#1@p:f2<2R."<=16 3b.T7H7P)T*"*7bDV YeyE Mgw+5Ckw)/u >1u=.1+yN' N)N! 1c u1>!a}' a' EqXhq uluiuuukG|qzvSpBuff mouse.spr@P##BHyn?<NA\BgHy?<NNAPJ@fZBgHy?<=NAP:kDHy=/9??<?NA JkA= f # .??<>NAXA="H#b#^p0:Hހ#f#j @ @2SABQ/aX _Nu6: A(BABHBBBHBNuxACBGRESEgJPfBQQNu<h dBi` hl3F<( hAd3h`hlDFh3F<h dBi` hl3F<( hCd3h`hlDFh3F<( i@3F"ii3FD<( iB3Ffii3F2RG`>ByVA:ANu?a2BJPg>8(:BdBDB<(>CdBFCBBAڴAgJPfRB Bf3VNuhbheܼhb־he`arBBJPg0(@2(HA2(A3VNuJy f>0:z2:x4:v6:tzaJJGg"ER0HCA2JQfJGfNuSGH>:$h&J(z~0(@0(i@0:fi"@0)Di"U@:@T@2)ifSA6:(<<E2:ڒ@A3 JEg2)̲hfS@2(@A3 3 Jiga L`:0:ZS@k>g0zf2zd2:bJEg^> fxp` 8*0+JGk80T\Qg8 8T0\QQNu0z2z4:JEg|> fxpr`8*0+2+JGk802T\T\Qg 8 802T\T\QQNuJEg2C> f xprtv`8*Q0246JGk280246T\T\T\T\Qg8 80246T\T\T\T\QQNu$yNJy f6"zx<:*>:$SG2:4:aFCSF04QQNuJy f:2:4:$za>:4:ږBCSB2:SA&z06QQNuzorzl4:zl`zo89 z|oNzvl6:pznl>zho::b3 3 3 3 <>B3 C3 By Nu3 NuH@<`(H@JgByVBy ,` HBy ,BBD3 A# (J@jLJPgtBPJy ga(4( 6( 8:hhaaJy ,fPaaaZ`0JAf Jhg 2(JBf Jhg4(JCfJhg8(:(`dJf Cd$z"`C$zJy g8:L 2@g"@Lr@ b1CKE0!IBDBEBG1G1G1A>(1Bhh6agRCJ@gn @xlfEm` BlX3 3 3 3 "3 &3 $1@ 1A1B 1C1D1EJPf0`hgJy g H aL0y "fy $f4:Bh m4( 0( h2:,z2@l8`86:h m6( 0( h2:z@l:`:a6쾾z(n(<(Gcaa4aa|`R4( 6( 8:hhaaaaaP4:6:8:zzaazaa,p`B@3VLNuBy ,B@`aJ@f 3VNu4HA62ABByV3 ,aJ@fhJy fFH y (C0:2:4:6:BDBGa y (Ca$zaaLB@By , zBP3VNup`ByV3 ,B@ABaX y (BPJ@fJy f"h$I0(H&J2(zVf4(zLf?(z6(fSB6Q`BxC::SEUASB<>MB0,Q>M 06,QQQ8hSL>(SG:z6j0 2QQ` y g6< zBA&J$KBDBB0 g RDff Q2QQ`Cg&I0 6QQ>8žDOdRSESF0:jS@k.g04QQ` $QQ` $$QQ`~0S@@LSESF0: S@k.g05#QǗQ`J %#QǗQ`6 %#%#QǗQ` f0Azef$Ha|&JL$Iap4:J(CSFxGgd:ESMgSM0:bg @gf K"Jg0H@B@::g& Gg>4QQ` >$QQ`>$$QQ3VNu$DU5(C44K:IABIa댖EKSDSE0:g* @g<2QQ` <"QQ`<""QQ Nu DU5(fLA:<Qi680::HKMJAjrUdJBjtVdJEkgUe:JFkgVe<AgkޜBgkDCADDB0HH:@0HKC߼LXAIBaߤK0\QQ`^&I(J>028AFDT\T\QQ`6&I(J>02468ABCFDT\T\T\T\QQpNupNuBy f3 # aBNupNu/?<&NN\Nu <,*`#-NuByVByBylBy 3X 9.# ޱfA#PBP yV# 730:RHA20SA3b20SA3d y# ,Nu yV 8 z 4Nu???/  f"z@d)Ag3@@((f`H0(HA2)(HBJ@lB@` zo0:JAlBA` zo2:23A"_420NuH?~HM҆,VNL~NsByVJAf 3XyXk@f<3Z3ٞh` ByVJAfByXyXd 0<a3VBNuByV3h3j3Z3V3ZBNu zҺ0z 2(zNu zҦ0(Nu 9N܂ga `ByVAݞC҆~|JQgkJPf|02)g1A4)g hg|1B6)gV$z2Jy gP8:.L 2@gB&@Lr@ b41CKE0!KBD1D1D1D1D` JhfBP|BQACRG GfZ0:gJFgaDpC2kAܲJPfQ3Z3VNuH@8(:(2(4(hh6aXgRC1@ 1A1B 1CB8C64aJy f24$z,a(J>:2$h&J0(@0::h 2:6h AH0:$:@UM2AK3 :(|EJEg2( hzfS@2:޲h g2(@I3 3 6:SCa8L`zCۨxBABBBCJQg f0atCRD f3V3ZNuByVNu zLJCf,BABB6<8< y gJy fKLSCSDByV3^3`AB3b3dK0L1D3VNuByV zܒzDzDd0z8z8d1B3VNu0< zBBQNu zJAg AdSAICdEd 0000BNu <Nu AdaHJPg4(6("z2<JQf PQBBNuQeigdieigdDAABNug& g 0m 9b><Nu ae >EB`:By NuDBJy f A^B`AFTB# 3 3 3 NuByAX0<;BXQA0<YBXQAh0<BXQNuByAgM͖SA4 BVI*zx(MBn-MBn 6<a (fOM >,K, InNupAgaaKH@aNuJUgr2- 0HH2-AANuJBfBVNu BfVNuVNuBCAf `rvan,LBya Q`vAf `rva@,MByaQ`Ag?a2a2BC` aarvaByJBf V`<Q`jAgxaByBft=BCfv=C=D<`03NuJyf(z`fNu3 3 Bf ?aa43 Nu(z::Fg~y fr34 By A^"yNC}x g> 0@w2Aw@g,vH@HAtJB@BA陰AgbR@`S@@Q0 UUQ3 >:Vg^Byl<SGAHE@0f6Q3l`6(f2(0fBA0BI5IRA AeBA1A`0:Tg(y f3F z@0:@20UHQ00:ήg0:Ϊk ByVa0:8g0:2gByAȞCNE~JPg ^,VG63G83BFGB[BBRFFgB:ôEg64`"HG&GK:GK:GK:K:G:<4|(K <`(KpB>9޹#,GREEgB>Ĵg4G> I:G*H>3ANu0<NuH0M .EFABa$I A=A2a٘&J24ABa$H A=A2av:9 09 H=@ :ESMM8EL<=A=A>=I=I 46.8. J"K2: H0g0 `0 2QLFe Qx`GSDjxSBg Qv` 0.n d0.n SnfBNuByV͝Jg PbE RI:r09 HI>42(A<9 N:9 8LSE$H&I 2H@6C H402g`6Qͽeg`3VNu  &fL&p@b&  $ (h0 "  @    8  Ɯ0    ?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~lll6666(>h<&|(fl0fF8l8tv00`00000 f<f<0 0`0 ~~0  0fff~fff<< xflxpxlf``````~|||ff|```|v|ff|ffffff>ff>|``lvfff 8``flxlfl|ffffff>xl```<`<|00<006ffff>ff$<ll8lfff>|~ 0~00p008  8` $$B~<``<Bffff>f;f<>f;p<>f;<~;<``<<pffff>Bfff>|B<@@<4Xfff4XbRJF<>f;< |)B*R$HH$H$ $H4X<~;4Xc~~~~Ɵ|~~c>  UUUU3333*@\z:Lft &lPZNYMXTYMXTXMULYMULXENCREc  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~fffllll>`<|fl0fF8l8pvp88pf< 80 0 ~~`0 0```nff>fff~fff<<f<flxpxlf``````~fv~~nfffffff<ff<f>``|fff|<```<>fff>ff>|``|ffff8<p``flxlf8<|fffffff>|f```>`<|~ffff>fff<|lf<|~ 0~0p p` 44b~f><>f>p<>f><~><```<<pffff>ffff>|f<``<:0|00~ff<<6f|ff|`0|000` <~> 8< 4X|fff4Xfvnf<>f><000| 6kÆ6n֟6ll6l66l4X<~>4Xc~~~~Ɵ|~~c>UUUU3333 )f )fc  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~ffffffffffff>~``|>~|ffl 06ff8|ll88ppv  `0880`ff<<<<80 8pp8~~~~p88p<~ff 8|~<<~fff~~ffff|~ff~|ffff~|<~ff````ff~<x|nffffffn|x~~``||````~~~~``||``````>~``nnffff~<ffff~~ffffff~~~~ff~<``````````~~fffvv~~nnfff<~ffffffff~<|~ffff~|````<~fffffffj|6>~``p8~|~~ffffffffff~<ffffffff<<Ƃfff<<<>~ff~>```|~fffff~|<|`````~>>~fffff~><~ff~``~>~~>~ffff~>~|```|~fffffff88<< |x88<<l<~fffffff<~fffff~<|~fffff~|``>~fffff~>|~f``````>~`p<~|~~fffffff~>fffff<<Ƃff<<<~|~~ 00~~880000880000b<$fB<~ff````ff~< 8fffffffff~> <~ff~``~>>~ff~>ff<>>~ff~>`0<>>~ff~>6<>>~ff~><|`````~> 8ff<~ff~``~>`0<~ff~``~>ff88<<~`0fffffff~>ffffffff~>~|ff<~ffffff~<ffffffffff~<<~f``f~<80000000ffff~<~>~ff~> 88<< <~fffff~< fffffff~>2zL<~fffffff2zLffv~~nfff<>>~ff~>~<~fffff~<~00ff~<~~```~~` #&,0n ` #&,2f2?6ll6l6lذ2zL<>>~ff~>2zL<~fffff~<=~ffnnvvff~=~fn~vf~~~~`0<~ff~~ffff2zL<~ff~~ffff2zL<~ffffff~<ff |zz |Ƃ||Ƃ|[_UQ???<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNOLHO?NNNNN.??>|>??| !!& d&!! d  #'ONNNNN0NNNNNNNNNNO&#NNNNN `00```00    00```00`8~ߧL<<<<~=2<<<<<<<:ApJ0gS0fQ3FGI4:gyDdydDzgB<:tf Q3H`,f2PAt2ItRAta`M|$zjJVgVg MQ`vKv6.:20kJn g@ gJ@`@BDgz D`eBDLA0@0@4J   g@RBA0HAR<=CTC=C0Jng(Jn f"Aj00@p@gHfp;@ mB@aJng4K mB4`B@a`Mf Jn g n g =n`BV`gE?420H JXC=CJfKH;|a8`0 f=|K ;|a` f=|a` fBA20=A =B`zgr020TC=CE Edn2VAJfBn `H f=| `2 f `$ f@?@ g@ gaf` f2KHBU` f2BnBm ` f2BnBU` f@A``KE|g-eKQ3: zpN-d0f0 @gZ24YmY9HghHtR@A`THBA4mjBA` 2c2g0P@A`$BA,mjBA` AcrAA-fP m-0ka`<gB@a`.B`(+HB@p20;AX@B-Nuan cifb#JX3BByDBAM0g =@=@=@=| <BnBnMRA Af#>3:NuBy:ByN3F3HBCp5BQCLpSBQp CBQI|8Gt Bf a` t QNu,?@NuAg&SA0:3FA6APAB(NuAgSA0:3FAB0NuBy!!!x8DDD>`x0 H H H{RRR8@@@w0 I I I;(((8 BBBp{9 =@@@ 8 Ç 9Äpp 8Ç  8  9pp 8`c98@@@pc8 `Ç98DDDp Ç 8aÇ$$$9DDD<p Ç$$$ 8|`9p!8?   @@@qϊ}p   q`|88((>>>><<$$||||AA~~BB@@??!!77#+WWCkzzx}n+n+.!5kUkUBVvmvm"DVUUZZW67"U*@@!D!D!D@@@1D1D1DjjjUWڮڮڮ}}׺]VUUUnvvvݪ[[[UUUڮMMMʮ]T]V]TFc Q@( Fc a@( ???m}EZ U@j(???+]??"jbVUT||Dppp????"$??"$bbD||D?0$${"J{"J  _<$<$<~<<?BB1\11\17)?!>?>>???pxpp`````?` `?` ?@@@ÀÀÀ???PPpP??? ???????<~<pp """"QQQQ""""8<88|||####QQQQ0x00""""????""""<``` """"!!!!"""" p @@@@####    xxxx aaaa""""aaaap p p p qqqqȈȈȈȈpppp >>>>""""((((    """" (((( """"((((     """"((((````pApApApAqqqqȜȜȜȜ    xxxxǜǜǜǜqqqq<<<<wDp @`pa7FUUTUUTUUUUTUUUUUUUUUUUUUU@UUTUUUUTUUUUUPUUUUUUUUUUUUUU@UUUUTUUUUUP; ;UUUUUUUUUUUUUUUUUUUUU@UUUUUUPUUUUUUUUUUUUUUUTUUUUUUUUUUUUUU@UUUUUUUU@UUUUUUUUT UUUUUUUUU@UUUUUUUUUUUUUU@UUUUUUUUTUUUUUUUUU@UUUUUUUUUTUUUUUUUUUUUUUU@UUUUUUUUUU@UUUUUUUUUT; ;UUUUUUUUUUUUUUUUUUUUUUUUU@UUUUUUUUUUPUUUUUUUUUUUUUUUUUUUUUUPUUUUUUUUUUUUUU@UUUUUUUUUUUUUUUUUUUUUUP ;UUUUUUUUUUUPUUUUUUUUUUUUUU@UUUUUUUUUUUU@UUUUUUUUUUUPUUUUUUUUUUUPUUUUUUUUUUUUUU@UUUUUUUUUUUUPUUUUUUUUUUUP; ;UUUUUUUUUUUPUUUUUUUUUUUUUU@UUUUUUUUUUUUUUUUUUUUUUUUP...UUUUUUUUUUUUPUUUUUUUUUUUUUU@UUUUUUUUUUUUUU@UUUUUUUUUUUUP UUUUUUUUUUUUPUUUUUUUUUUUUUU@UUUUUUUUUUUUUUPUUUUUUUUUUUUPUUUUUUUUUUUUPUUUUUUUUUUUUUU@UUUUUUUUUUUUUUPUUUUUUUUUUUUP UUUUUUUUUUUUPUUUUUUUUUUUUUU@UUUUUUUUUUUUUUTUUUUUUUUUUUUPUUUUUUUUUUUUPUUUUUUUUUUUUUU@UUUUUUUUUUUUUUUUUUUUUUUUUUUP ; UUUUUUUUUUUUPUUUUUUUUUUUUUU@UUUUUUUUUUUUUUUU@UUUUUUUUUUUUP..UUUUUUUUUUUUPUUUUUUUUUUUUUU@UUUUUUUUUUUUUUUU@UUUUUUUUUUUUP; ;UUUUUU@UUUPUUUUUUUUUUUUUU@UUUUUUUUUUUUUUUUPUUUUUU@UUUP..UUUUUUTUUPUUUU@UUUUUUUUUUUUUUUUTUUUUUUTUUP UUUUUUPUUPUUUU@UUUUUUUUUUUUUUUUTUUUUUUPUUPUUUUUU@UPUUUU@UUUUUUUUUUUUUUUUUUUU@UP ;; UUUUUU@UPUUUU@UUUUUU@UUUUUUUUUUUUU@UP.UUUUUTUUUUUTUUUUUPUUUUUT..UUUUUU@PUUUU@UUUUUPUUUUUPUUUUUU@P; ;UUUUUUU@UUUU@UUUUU@UUUUUPUUUUUUU@  UUUUUUUUU@UUUU@UUUUPUUUUTUUUUUUUUU@* **DDDDDDDDDDDDD@DDDD@DDDDDDDDDDDDDD* **UUUUUUUUU@UUUU@UUUUPUUUUUUUUUUUUUU@ *  *DDDDDDDDDDDDDD@DDDD@DDDDDDDDDDDDDDD* **UUUUUUUUPUUUU@UUUU@UUUUUUUUUUUUUP.UUUUUUUUTUUUU@UUUU@UUUUUUUUUUUUUT ;UUUUUUUTUUUU@UUUUPUUUUUUUUUUUUT.UUUUUU@UUUU@UUUUUUUUUTUUUUUU@???UUUUUU@UUUU@UUUUUUUUUPUUUUUU@ ; UUUUUU@UUUU@UUUUU@UUUUUPUUUUUU@ * UUUUU@UUUU@UUUUUUUUUUU@UUUUU@ PUUUUU@UUUU@UUUUUU@UUUUUU@PUUUUU@ * U@UUUUU@UUUU@UUUUUTUUUUUUU@UUUUU@ *  *UUUUUUUUUUUU@UUUUUUUUUUUUUUUUPUUUUUUUU  UUUU@UUUUUUUUUU@UUUUUUUUUUUUUUUU@UUUU@UUUUUU UUUUUUUUUUUUTUUUU@UUUUUUUUUUUUUUUU@UUUUUUUUUUUUT * UUUUUUUUUUUUTUUUU@UUUUUUUUUUUUUUUUUUUUUUUUUUUT UUUUUUUUUUUUPUUUU@UUUUUUUUUUUUUUTUUUUUUUUUUUUP  UUUUUUUUUUUUPUUUU@UUUUUUUUUUUUUUPUUUUUUUUUUUUP  UUUUUUUUUUUU@UUUU@UUUUUUUUUUUUUUPUUUUUUUUUUUU@ UUUUUUUUUUUUUUUU@UUUUUUUUUUUUUU@UUUUUUUUUUUU * UUUUUUUUUUUUUUUU@UUUUUUUUUUUUUUUUUUUUUUUUU  UUUUUUUUUUUTUUUU@UUUUUUUUUUUUPUUUUUUUUUUUT UUUUUUUUUUUPUUUU@UUUUUUUUUUUU@UUUUUUUUUUUP *UUUUUUUUUUU@UUUU@UUUUUUUUUUUUUUUUUUUUUU@  UUUUUUUUUUUUUU@UUUUUUUUUUPUUUUUUUUUU UUUUUUUUUTUUUU@UUUUUUUUUU@UUUUUUUUUT UUUUUUUU@UUUU@UUUUUUUUTUUUUUUUU@* *UUUUUUTUUUU@UUUUUUUU@UUUUUUT UUUUUU@UUUU@UUUUUUPUUUUUU@ UUUUTUUUU@UUUUTUUUUT UUPUUUU@UUTUUP?~??8?8??????????????????????|?????|??????????????????~???????<???????<???????<?? x???<??<???<?x??????????????0 `0 ??0 0  `   ??  S:ꪪꪮ 00ʪꮪ:ꪪꪮή` 0tDDDDDLGDLz:ꪪꪮά111:꾿꺬4DDOgD|~ż|GtL:k޳ζ뚾ꪼ11s370=8zꃪ޳Ϋꪸt||MEăDDsG~LDGDx?zîξ:Ϋ몸?u}}_UU]U}W5U\UWUx?yoof͙6flٰ͛?ws̏ww珈w~8wpguflٽgg6pݰml~o}=p ]\5}\UxW}WW5p;{ϻû;\5]\uWUU]WWp?? x{ׁ? W???U>| U<<wp??????? ??????``O 6  6  c  c ? ` ? `  1 ~ 1  l ? l | 80 ? 80 ````````````````aY``aa``aaY``aa`xp`aa``aa`x8`aa``a`a`0``aa8``a`a`0``aaxy`x`y 88`8`8T*`"`unpackpack>RPICTURE COMPACTOR extensionExtension COMPACTEUR D'IMAGESPA"CNu#XACEGNu L/JkJgH yX hNLNuH yX hNLNuH yX hNLNup `p`p yX hN#nE\x9L2IAt40v4t404BZBZ444 @g @ fE\~a>4Qa4aV"Ca*ab CHE\0* @bhHGr234*jAbH4jsb6:g08g*642g <>a &BLx/9nNu#nByvE\4 yX hP%h5|5| @gb @gF @g$ @g$ @faP5CaHK5Ca>4`a65Ca.K5C3vaaT%Caa2 C"j2*4*6HJyvfHp yX hNLavJyvf? yX hN0J@f`#x#|c3G3B3C3D 3E 3A3FpE}G&6Q(HKFM}/SE3:0)HA>0<0003|03SESD0D0)0)rBB&L89$K6"J4gRQrRBQ"J4"J)gRQrRBQQQTy|f"yxR #@(_G/ rBBgRQrRBcR #@(_ܹc RNu cf// JCj6(?gH`Hy?<NN\L](IE0(H>2<2:2823|JAj2(JBj4(0( @Gb0( BDb&I0(?@><(0( S@3~0( 3IF*H,HprgSA$K?y"J:9~ I8SDk gQpgQrR` I8SDk"gCQpgQrR`QofTy|f|\2"_ _A&C}$Ip2Qg / ?<NN\pNupNu 8*V r.  H $TvT ( pw listlistbank`fload"*.bas"`fsave"*.bas"`run`dir`dir$= dir$ + "\previous`off`full`multi 2`multi 3`multi 4`mode 0`mode 1`accnew:accload"*"`default`env`key list``0&`2Window+<+"!J%r%8%.0)'P!~*p'(t .h&(&@* 2!!!!*x(PPP(PP)>)0##@#|$j&l&#$,$ $`%%%$$% $r$$%'%&l.'%*"%*.CRa/<n?<NA\BGBMf0@9@BgHyNAX Gex3 NNu/<@?<#?<NMPNu3By yN# yV#j!|>Nu yV!yjNuH~OK ,up(yJupg8aHpNELNa,/JygJyfp)`pNE L~NsNL~Nspap@aBC:,2JEg2,RCl6mp a.p a(JEg2,3IBJAgF Ab>SAICJg,"Q)I09@29A9B@9B89CB9C:9D49DgHAA9A2JAg*l8l:l4gel6geHADybEybBl0ajHF0a(69:C E}dx3E0&)JH#By09ARA aZa taFa By0,2ga8a Xa<09.9#3`Ha /a Nu2,2g@f09@2?,?,?,0Bl03a (BlPE0,2S@Ha22,4SAa&QaR@86,6SC:<B@2a <a0,B@BAa?,?,a>,? 2?,0Bl0BlP$H:,<<,>BCBBJyg 8B`(HD fDf a`Gga>aDRBEeRCFeBy9_08a02aRNu/9~,9A0`4l<yb 6l>yb4,8l@6,:lB9@@B9@89ABC9A:aXaB@NuH9DJygLL:LE`:LDE0a t0a 4LNu309`By@.9gP#3IB$lH&J4,<>•yIB6<.9g>Hf6)JH8,<>LSD4Q0,2,a)HL)ID`RC CfA290B02<J0g0l0QJyf aa09ְyf$3AB@ gR@ @mByB@Nu @fAB@ gR@ @mB@`^0<`20<`*0<`"0<`0<`0<` 0<`(yNu09Nu9Xp"R@ @m9|Bl Bl.0,9@,@9@*9|Nu0,9@,U@9@*Nu0,9@,HR@9@*Nu3Nu3ByNu3Nu yfXJyfNJyfDH(yJlg.lf$9l0, R@ @mB@9@ 4"aLNu3H2,*"lD.9N<,,l*SF:9SE6KGR8,SD0yJkXaJl.g2$I4 0*NfxTJTMQBfSJQQ9|.`8Jl.g02$I4 0xTJQBfSJQQBl.LByNu<>JyfJl2gRFRG9tp8tp:><NVF"yNuMRJyg* yg@H@`@H@`@H0, gNuaJ,l8, g,l HB80İyg0 2DgSDgSDLSD:lSM29SASC<9>,4SG4 :&Ig0$NTJTKQSKJDk0$N6QQg0$NTJTKQQQ`H0HS@Jyg" yg<HF<.`,.`,.""QLNuSCSB8,<Jyg"0,@@ :$H4QQ` ,@ :$H$QQNuH?4,4B@va~a2aBaLNuH4,46,6B@BAaValBAaRAl6fa aLNu?0,4S@atJyg2,A02Nu2,HABA 2Nul4dl6d a B@Nu0<Nu9@9Aa)HL)IDNu0,H@0,Nul4dPl8HNul6d,4SGSEJyg8$H4 QQ`8$H$ QQNuH Ag(:B@BAa:4,<<69>aLaDGDCaX`0,29R@t4g 2,`a~`F0,g 2,S@`p0,4S@9@`0,2,gSA`PJl0f\2,6SA`>092,RAt6g 0,`"Jl0gSA`0,BA` B@2,`a`BlJyk3/<a Nu9|JlgBy9| yg/0,a Nu0, 9@Nu0, 9@Nu0, 9@0,a)N 0, a)NNu0, 9@`0, 9@Nu0, 9@Nu9@>JygGOOl` lGla)N Nu9@ >JygGOOl?`lOGlaJ)NNuB@` p`p9@PNu9|0NuBl0Nu0,2,`l4l@l6l8aB@Jyg8D d< Nu(HD d< Nu0,SG6y8lSL yfl$I: FJf.UVhQQ gZAbBG` fUhQ`UVhQ` yf$I4 : vFJfF]^hTJQYMYNRHSEjQ gAbBG`SJBfUJ` f]hTJQ"`]^hTJQ `$I4 : vFJfF]^hTJQQMQNRHSEjQ gNAbBG`SJBf]J` fUhTJQ`UVhTJQ`(y0,29R@t4gn9@ yfB0,ѬDL`DJyf L` L29SAI ,D4,SBgAR@Q)@DLNua a`H`hB ( `f#Nu30X` p lLJyg 2,B0Nu2,HABA NuHJgS@@ yXd yg*H?,?,a:aaa20abLTABh0,l@2,lBJyfJl2gR@RAHE4, 6,8, gC1B1C g,Gt)6QGG tSXQAJg H L/9N#N #NLNu>< y"yN""""""""""""""""""""""""""""""""QNu  (&  $ "   @$4 8 HL B:   6, Xf B    f6 d 8 8d"N8 dJ ":z<$0L  ( `8>FL @ &N ,LionpoubnkIW < ~ ~ t:Carmina ChampionBaroque Carmina2HoodWoodChopinedChopped2LudwigedHaHaHa! HoHoHo! Wither ci.0dd( #### #### #### # # #### #### #### # # &&&&#&&&&#&&&&#&#&#&&&&#&&&&#&&&&(+                             ##########################$& &&&&&&&!#ci,0d   " """"%%"'%%%"'%%%"'%*     $$$$''$)'%%%%)))),,).,****....11.3111.3111.316 ,,,,00003305311115555885:86666::::==:?===:?===:?=Bci.0Ld       "  "  "$$$$$$ $'$ $'$ $%''''''#'*'#'*'#'*,,,,,,,,,,,,,,,, ,,,,),),.,),.,),.000000,030,030,01333333/363/363/368888888888888888 ''''$'$')'$')'$'),,,,,,',0,',0,',,//////*/3/*/3/*/33333333333333333ci00|d( :,,,,.,*)*,,,,.,*),,,,.,*)*,,,,.1 ))))*)'%'))))*)'%))))*)'%'))))*, %%%%'%$""%%%%'%$ %%%%'%$""%%%%')ci+`j`x'@O v&'"& &'H D& &'H D(k (((>( (h)*~f\STOSPIC.PI1PIC.PI3SPRIT???.BINWINDO???.BINFLOAT???.BINMUSIC???.BINBASIC???.BIN*.EXY70Tos 1.6Y7DTos 1.6B oAJgR#?<NNT#Hz ?<&NN\MX?<NNT3KD m p, J"Kޓ~cRF|dbXz2F|de.EdHp $$$$&&&&QLQ` AFa|AaGN#AalGN#AabfGNAaFGN#BGMD^9A^Aaf$AaHGLN#L@<N-`RG|eA yfAaA]a/AaP,_?<%NNT z0<?BQ yg?</NAXNu/?< NA\NuafNuHppafaf&:ֺ`d\ax zaa"z )Щ$I$ BJg` g<gՒ`` z кvgR#LpNuLpNu|(P8 & " <<~LionpoulosM$M$* -----------------------------------$ STOS BASIC WELCOME PAGE$ Part of the Stos Basic( By F. Lionet & C. Sotiropoulos$ (c) 1988 Jawx / Mandarin* ----------------------------------- 2ͦ&a ------------------------------ b Datas initialisations&c ------------------------------dNTi"NT(),"XT(,d),"YT(,d),"IT(,d),T$(,d),"ST(,d),"BT(,d),"CT(,d),"ZT(@)Pn7,PAGE:P(PAGE):"NT(PAGE):7#T"NT(PAGE):"XT(PAGE,T),"YT(PAGE,T),"IT(PAGE,T),T$(PAGE,T),"ST(PAGE,T),"BT(PAGE,T),"CT(PAGE,T):T:PAGEx"MN()F}b:7X:"MN(X):X,$ ----------------------------- Main menu$ -----------------------------:,:򠛦:,:STOS:,:Environment setup program:q,,w::q:::,w:$͊ ----------------------------- Ί---> Set editor parameters$ϊ -----------------------------<Р()()(),: |AD()ڇ |AD,߇ |AD,0 |AD,: |AD,w~::X |X: |A$::O |Y( |A$): |AD  |X( |Y,(( |A$, |Y,)): |Y: |X4:f$9zstos\editor.env,>C: f>" IT(,):" IT(,):( |AD)" IT(,):" IT(,)" IT(,):" IT(,):( |AD)"IT(,):"IT(,) |A$(( |AD),)$: |X: |A$: |Y( |AD  |X( |Y) |A$ |A$(( |AD  |X( |Y)): |Y:=D( |A$)# |A$ |A$(#( |A$))2 T$(, |X) |A$: |X<ŝ@  |X : |A$: |Yʢ( |AD* |X  |Y)A$A$((AD*X Y)):Y:DϢ( |A$) |A$ |A$( ( |A$))2 T$(,8 |X) |A$: |X Ê---> First page ĢN ɢ" IT(,),,B ΢,( |AD):,( |AD)"  }FPAGE:U't ؟A:\(x ݧ |^CHOICEA (, Z, , , , , , , , , , , , , , " ℸ '---> Normal/inverse (, - Z, _ ---> Paper color setting.  |RDX: } Pen color setting. DX:T: .  |RDX: } Back to main menu : " ---> Second page"  }FPAGE:U't G\:\(* § |^CHOICEGV , ,  DŽ : ---> Save on disk ::,,,(,, :::Please insert a disk including::the STOS folder.: !AD()> &AD,:"IT(,)AD,J +AD,:"IT(,)AD,x 0C(T$(, ))(T$(, ))(T$(, )):AD,Cx 5C(T$(,))(T$(,))(T$(,)):AD,CJ :AD,:"IT(,!)AD, ?X:Y':AD X(Y,:Y:A$T$(,X)~ DY(A$):(A$,Y,) A$(A$,Y):Y~ I(A$)Y(A$):AD X(Y,((A$,Y,)):Y NX SX :Y(T$(,8X)):(T$(,8X),Y,) T$(,8X)(T$(,8X),Y):Y XXL ]X :(T$(,8X)) g bYX :(T$(,8Y))T$(,8X),T$(,8Y)Y: l gX lX :Y :AD*X Y,:Y:A$T$(,8X)~ q(A$)Y(A$):AD)X Y,((A$,Y,)):Y" vX:AD,R {::$Press to save configuration,::or to abort.( ::A$:A$" A$()  8 {stos\editor.env,()() * :::6 :: Disk error!::Press any key. :w  * :::$' -----------------------------' Subroutines$' -----------------------------'---> Formatted input' |4XX: |,YYr' |$R$ |A$: |M( |A$):( |$R$) |:L |$R$ |$R$(., |:L( |$R$))*' |X: |ESC::B' |4XX, |,YY: |$R$;: |4XX |X, |,YY:Q:N'$ |B$: |S: |MK: |B$ |MKQ'$T') |B$( ) |MK |$R$( |$R$, |M)::RP::'. |B$() |MK |MKR$A$::ESC: ::MOUSKEY:::'3 |SKXX:'B'8 |SMXMX:''= |B$() |M |X |M |XR$(R$,X)(R$,X).:M:'|'B |B$() |M |X |$R$( |$R$, |X).: |M:Qp''G |B$() |X |$R$( |$R$, |X)( |$R$, |X).: |X: |M:Qp''L |X |:L |B$ |B$() |X: |M:( |$R$, |X)( |$R$, |X): |$R$( |$R$, |:L):( |$R$, |X) |B$: |M( |:L, |M):Qp''QQ'$'s---> Draw menu pageh't::V3 |X@:" }NZT( |X): |X::,,,B'yV } Print one menu liner'" XT( }FPAGE, } Draw square' |X1(" XT( }FPAGE, } Menu loop (_6(\: |K: ||Z(): |K ||ZN( |K ||Z* },,,0,,,4,@,,,0,,,46<,,,+,,, 4@>,,,+,,, 4J@,,,+,,, 4T<,,,-,,, 4^>,,,-,,, 4h@,,,-,,,8r7,,, QUIT ,,,>|C,,, NEXT PAGE ,,,DĆ,,,Default language:,,,<Đ(,,, ENGLISH ,,!,:Ě<,,, FRENCH ,, ,$5 -----------------------------6 Set parameters page 2$7 -----------------------------8FZB,,,' Stos Basic editor parameters - Page 2 ,,,BL,,, Function keys ,,,6V,,,f1 :,,,6`(,,,f2 :,,,6j,,,f3 :,,,6t(,,,f4 :,,,6~,,,f5 :,,,6Lj(,,,f6 :,,,6ǒ, ,,f7 :,,,6ǜ(, ,,f8 :,,,6Ǧ, ,,f9 :,,,6ǰ(, ,,f10:,,,6Ǻ, ,,f11:,,,6Ġ(, ,,f12:,,,6Π, ,,f13:,,,6ؠ(, ,,f14:,,,6⠦, ,,f15:,,,6젦(, ,,f16:,,,6,,,f17:,,,6(,,,f18:,,,6 ,,,f19:,,,6(,,,f20:,,,V,,,# Last direct command ,,,V(,,,,# ,,,V2,,,# ,,,V<,,,,# ,,,VF,,,# ,,,VP,,,,# ,,,VZ, ,,# ,,,Vd,, ,,# ,,,Vn, ,,# ,,,Vx,, ,,# ,,,VȂ, ,,# ,,,VȌ,, ,,# ,,,VȖ, ,,# ,,,VȠ,, ,,# ,,,VȪ, ,,# ,,,Vȴ,, ,,# ,,,VȾ,,,# ,,,VȠ,,,,# ,,,VҠ,,,# ,,,Vܠ,,,,# ,,,H栦,,, Loaded accessories ,,,6,,,#1 :,,,6,,,#2 :,,,6(,,,#3 :,,,6<,,,#4 :,,,6,,,#5 :,,,6",,,#6 :,,,6,(,,,#7 :,,,66<,,,#8 :,,,6@,,,#9 :,,,6J,,,#10:,,,6T(,,,#11:,,,6^<,,,#12:,,,>h,,, ,,p,>r,,, ,,p,>|,,,, ,,p,>Ɇ@,,, ,,p,>ɐ,,, ,,p,>ɚ,,, ,,p,>ɤ,,,, ,,p,>ɮ@,,, ,,p,>ɸ,,, ,,p,> ,,, ,,p,>̠,,,, ,,p,>֠@,,, ,,p,Bࠦ$,,, PREVIOUS PAGE ,,,8ꠦ4,,, QUIT ,,,@@,,, SAVE ON DISK ,,,$Պ -----------------------------֊ Default function keys$׊ -----------------------------ؠ ⠦list젦 listbank`:fload(")*.bas(")`:fsave(")*.bas(")` run`dir`. dir$= dir$ + (")\`(previous2off`<full`Fmulti 2`Pmulti 3`Zmulti 4`dmode 0`nmode 1`>xaccnew:accload(")*(")`ׂdefault`׌env`ז key list`.  t..  tZOLTAR BASt ,PHASE1 ZOLt PHASE2 ZOLt PHASE3 ZOLt PHASE4 ZOLt $PHASE5 ZOLt (LionpoulosRށ: &------------------------------- ZOLTAR" Part of the STOS Basic By F. Lionet" Graphics by D. McLachlan" (c) 1988 Jawx / Mandarin& -----------9/8/1988------------z :,: I only work on a colour monitor!:,:Press any key.::w::21 ' ---> Number of alien sprites in the bank2ALIENS ,dq:::ͦ:::iA$( ),"XX(),!A( ),!T( ),!S( ),!I( ),MAGEDON$(),(MAGXFIRE(),(MAGYFIRE(),(PALTITLE()Ƞ : *CODE4Vx:BANKMAXҙ#d)h,, : *TTLE$( ,,@,_):( )::o *X:( *PALTITLE( *X)( *X): *Xb1, ,,d: +|MAGEDON$()( ,,d,d])6 ,,,,c: ,,d,,d_ ,,: +|MAGEDON$()( ,,,]); ,,,,c: ,,d,,d_ ,,: +|MAGEDON$()( ,,,])@ ,,,,c: , ,d,,d_ ,,: +|MAGEDON$()( ,,,])bE98: *X:( +RMAGXFIRE( *X),( +(MAGYFIRE( *X): *X" --------------------------- First menu / title" ---------------------------'BV *RCRD , : *A$ High score( *RCRD):>(nH1 *X: *X,( *PALTITLE( *X): *XN *X:(?),(),() : *Xf:,7,,2::(,,) *TTLE$:(,,) *TTLE$  *M:2*$ *`Z>L,,$ $:&I ------------------------------J Play game&K ------------------------------8L *ZWAVE: *PLIVES: *FSCRE<V *(n:: *N62: *ZWAVE: *FSCRE *FSCRE )BONV4 *FSCRE *RCRD *RCRD *FSCREۊ ---> Disk errorܙ'B:'> , :A$Please insert disk:(n `&͊ ------------------------------Ί Create a phase&ϊ ------------------------------ЏJՠ: *M: *rT$Please select one option:2*6ڧ *`Z:,4, ,,,pߘ1 ----------------------2 LOAD A PHASE3 ---------------------- 4:'B:N'Z9::: *( *(n@Mz * Error traitement ę'B:'B ɩ , :A$---> DISK ERROR! <---:(n: Ω ,:A$ Press any key:(n Ӡw ؎ ---------------------- SET ALIEN ATTACK ----------------------D  *M: *rT$---> ALIEN ATTACK <---:2*$  *`Z, ,  ˜   ---> Draw attack curve 'B:N'0 !,:DRAW ALIEN ATTACK CURVE &,:Use the mouse to draw.:, :Press mouse key to finish.:, :Don't move too fast! +,:Place the mouse at the,:beginning of the curve,:,:press mouse key, and draw... 0 )6AP( )8P 58':::N': ).OLDX: )$OLDY: )IK :> ?: )IK : )IK( )IK)r D *X: *xY: ).OLDX, )$OLDY *X, *xY: ).OLDX *X: )$OLDY *xY8 I )6AP, *X: )6AP: )6AP, *xY: )6AP0 N )6AP( ) *BANKMAX X S X )6AP, ]@   ---> Release aliens 'B:N'( ,:RELEASE ALIENS ,:Press mouse key to release:, :one enemy space ship.:, :You can wait for as long as:, :you want between each ship.d ,:Press mouse key to begin.:,:You have 9 ships to release. 8'j : : :N':,:Press mouse key for ship #1: )DSKYx  )NALIEN:: )K: )CPT:i *N:! ,T( *N): *N 't: (MEG(( )4):( )4,:( :( )4, (MEG:ɦ:% *X:( ) *X,: *X 8  )K .  )K:  L $  )NALIEN   )K:! ,T( )NALIEN):( ) )NALIEN, )CPT: )NALIEN: )NALIEN D *A$Press mouse key for ship #( )NALIEN) *A$! Press right button to end  : *A$: ˙z':r(< Р::: բ , : )CPT: )NALIEN  ߘ@  ---------------------- CHOOSE ALIEN SHIPS ----------------------J *M: *rT$---> Choose alien ships <---:2** *`Z(,,,h ---> Choose aliens4( )4,:'B:N'& ,: CHOOSE ALIENSt,:Choose and click the:,:9 ennemy ships::,: Chosen ships: *xYP: *X ,ALIENS:( *X):" ,pXX( *X)(( *X))" ,pXX( *X)(( *X)) *X," ,pXX( *X), *xY, *X: *X," ,pXX( *X) , *xY" ,pXX( *X) , *xY *X:." *jOLDZ: )NALIEN:8R' *`Z(): *`Z *jOLDZ: (A: *jOLDZ *`Z , *`Z4T1 (A *`Z,(( *`Z),5)(( *`Z),5)(( *`Z),5)l:: (A64T; *`Z, (1,5,0)e170: (XX< )NALIEN:( *`Z) (XX* *`Z, (1,-4,0)e( (XX)( *`Z) (XX *`Z,(1,4,0)e( (XX):$@:Ӹ( *`Z):: *`ZEZ, (1,-5,0)e80:(Z)"XX(Z)Z, (1,-4,0)e("XX(Z))(Z)"XX(Z)Z,(1,4,0)e("XX(Z))J:Ӹ( *`Z):^O( ) )NALIEN, *`Z: )NALIEN: )NALIEN <YTYg ---> Set fire ratedh'B:N': (AL$aliens:(( )4) (AL$magedon4m,:( (AL$) FIRE RATINGr, : Please input (AL$ fire rating:, :from 0 (no fire):,:to 100 (constant fire).:,:Default value is 50.Jw,:: )RATE: )RATERATE22| )RATE )RATEdh ( )2, )RATE,(( )4)'B:N',,:MAGEDON RESISTANCE, :Please input number of hits:, :MAGEDON will resist to:,:before exploding.:,:Default value is 5.P,:: )|HITGOT: )|HITGOTHITGOT6 )|HITGOT )|HITGOTd"( )6, )|HITGOTˊ ---> Choose magedon(̆( )4,:hh ---> Try gameP *ZWAVE: *PLIVES: *FSCRE::(:mn ---> Save gameoHp *M: *rT$---> SAVE ATTACK WAVE <---:2*$u *`Z ,,8zpӊ ---> Add a wave to diskԙ'B:':A$ Please wait.:, :(nޏ N:NDA$(phase((N) ).zol,)A$8R$(PHASE(N) ).ZOLL , :A$Saving attack wave #(N):(n,{R$,( )( )( )7 ---> Replace a wave 8:'B:'X=:::R$( phase??.ZOL, REPLACE A WAVE,)LB(R$,)PHASE(R$,).ZOLRG'B:':A$ Please wait.:, :(n,L{R$,( )( )( )Q&$' ----------------------------'' SUB ROUTINES' $' ----------------------------N' *X:(?),(),() : *X''?"'@---> Clear and reset screen'A4'B:::::::::::ɧ'G:::::h'L,",3,D,U,w,,G,p,P,,,,,p,w$'Qv, ::'V'q'r---> Set screen for game's*'t:::::::::ɦ'y''---> Wait for mouse key''C:'R:''Պ'֊---> Move sky'׊'ؐ ,, )YSKY,@,,,: ,,,@, )YSKY,, )YSKY: ,,,@,Ȁ,,V' )YSKY )YSKY )DSKY: )YSKY )YSKY )YSKY6' )YSKY )YSKY )YSKY'(&( ---> Initialise aliens sprites( ( :(( )4) )|HITGOT(( )6):! ,T(): )MAGEDON:! ,8A()( )8:J( *N:! +S( *N)(( ) *N)>( *N,@,d,! +S( *N)( *A$((! +S( *N)),1)((! +S( *N)),1)((! +S( *N)),1)((! +S( *N)),1)l: *N, *A$: *ND(! ,8A( *N)( )8:! +I( *N): *N&(# )MAGEDON: )ALOUT:(9 (: ---> Animation of aliens(; (<  *N`(A! ,T( *N)! ,T( *N):! ,T( *N)! +I( *N)(F! ,T( *N) *X(! ,8A( *N)): *Xb *N, *X,(! ,8A( *N)):! ,8A( *N)! ,8A( *N) *N: *N:! ,T( *N): * NOUT:! +I( *N): )ALOUT (K *N(P(k(l ---> Print rainbow(mv(n *X( *A$):( *X) :( *A$, *X,);: *X:(s(( ---> One game(n('B::N': , : *A$ Attack wave #( *ZWAVE):>(n:"( : :N'B(,: *A$Lives: Score::>(n( *4XLIVE : **XSCRE: *4XLIVE,: *A$( *PLIVES):>(n: **XSCRE,: *A$( *FSCRE):>(n('tn( * NOUT: *STATUS: * CPTEND: )THEEND: )NGOT: )MSKEXPx(B *N:! ,T( *N)(( ) *N):! ,T( *N) * NOUTT( *N: )RATE(( )2): * NOUT CPTEND2(ș( ,(ɠ:,: )BOM2(͠,?,:,,,T( )DSKY(())(()): )MAGEDON$*0 (ן".(ܢ * CPTEND,,,(() * CPTEND )CPTSOUND: )TIR:,,,:, (1,-20,12)::, (2,1)(3,1)l:: )BOM,:,(r(<:z'&((d) )RATE (L( *X:(  *X) *X:(( *xY():! +I( *xY)  *X,( *xY),( *xY),:  *X, (1,20,12):  *X:  *X, (4,1)(5,1)l: )BOM  *X:,:,L( )C(,,) )MSKEXP: )C! )L( *X:( *X, )C) *X) *X,%(21,1)(22,1)(23,1)(24,1)(25,1)(100,1): *X:! ,T( *X): * NOUT:! +I( *X):::: *X, )MSKEXP: )BOM :,:,x)  )NGOT: *FSCRE *FSCRE(d): : **XSCRE,: *A$( *FSCRE):>(n:X) )C(,,): )C * CPTEND" )) )BOM2:,N :,:,7(13,1)(14,1)(15,1)(16,1)(17,1)(18,1)(19,1)(20,1)(100,1):: * CPTEND: *STATUSP) * CPTEND * CPTEND: * CPTEND )THEEND) )BOM )BOM:) * NOUT  * CPTEND : * NOUT)"))"::::)' )THEENDB), )ALOUT *STATUS *STATUS)1)e)f ---> Initialise bank)g$)h : ,BANKMAX,)m( )( )( ),)r( ), *CODE )w$* *N8)|( ) *N, *N ) *N)( )2,24)( )4,:( )6,)( )4,)*-*.---> MAGEDON phase*/D*0 )pBOUM: )fMAGESP:,,,::-.*5 * CPTEND,,,*:() * CPTEND )CPTSOUND: )TIR:,,,:, (1,-20,12)::, (2,1)(3,1)l:: )BOM,:,^*?z': )ZDY: )pBOUM )pBOUM: )ZDY(())0*D! ,T()!T()*I! ,T() *X(! ,8A()): *X* *STATUS: )THEEND )RXMAGEDON *X: )DYMAGEDON(! ,8A()) )ZDY:(,( )RXMAGEDON@), )DYMAGEDON) +|MAGEDON$((( )RXMAGEDON@))):! ,8A()! ,8A(): )fMAGESP: )fMAGESP., )RXMAGEDON, )DYMAGEDON )fMAGESP<*N(d) )RATE! ,T()**]L*S( *X:(  *X) *X:**]*X *xY():  *X, )RXMAGEDON( +RMAGXFIRE( *xY), )DYMAGEDON( +(MAGYFIRE( *xY),:  *X, (1,20,12):  *X:  *X, (4,1)(5,1)l: )BOM  *X:,:,*]()() )RXMAGEDON() )RXMAGEDON() )DYMAGEDON() )DYMAGEDON )pBOUM ::, )RXMAGEDON, )DYMAGEDON,:,(21,1)(22,1)(23,1)(24,1)(25,1):: )fMAGESP: )NGOT: *FSCRE *FSCRE(d): : **XSCRE,: *A$( *FSCRE):>(n:: )BOM :,:,*b )C(,,):( )C(()() )) * CPTEND,N :,:,7(13,1)(14,1)(15,1)(16,1)(17,1)(18,1)(19,1)(20,1)(100,1):: * CPTEND: *STATUSX*d )NGOT )|HITGOT * CPTENDCPTEND :STATUSP*g * CPTEND * CPTEND: * CPTEND )THEEND*h )BOM )BOM*l-*l*q::::*v )THEEND*{ *STATUSr*XMXMAGEDON:YMYMAGEDON:CPTEND:::::,:0*Y:X:YX,XM@ X(),YM Y(),:YX,(P(100,1)(100,1)(100,1)(100,1)(100,1)(6,1)(7,1)(8,1)(9,1)(10,1)(11,1)(12,1)(100,1),()):NX():NY():YX,(1,2,(NX))(1,-2,(NX))l:YX,(1,2,(NY))(1,-2,(NY))l*X:Y::*:,,,V*':DX(()):DY(())*CPTENDXMAGEDONXMDX:YMAGEDONYMDY:(,(XMAGEDON@),YMAGEDON)MAGEDON$(((XMAGEDON@)))*Ƣ*$*˵CPTEND:::::*ЄCPTEND *ՠ:**---> Menu generator**'B:N'8*P *Md: *M: *A$H+3 *A$: *M: ,A$( *M) *A$: *A$:"+ *YM *M+ 3 *X *M:, *YM( *X)::s ,,:: ,A$( *X): *X,,()$,(): *X+ *xY( *M,): *rT$( *rT$), *xY: *A$ *rT$:>(n: *rT$(+: *jOLDZ::+*5: *`Z()$+/ *`Z *jOLDZ5+>t+4 *jOLDZ:, *YM( *jOLDZ): ,A$( *jOLDZ): *jOLDZl+9 *`Z:, *YM( *`Z): ,A$( *`Z): *jOLDZ *`Z+> +C:,P PLAY ,U CREATE A PHASE ,Z QUIT _,ô RETURN TO MAIN MENU ,ù LOAD AN ATTACK WAVE ,þ SET ALIEN ATTACK ,à CHOOSE ALIEN SHIPS ,Ƞ TRY GAME ,͠ SAVE ATTACK WAVE Ҡ, RETURN TO PREVIOUS MENU , DRAW THE CURVE ," RELEASE ALIENS ',| RETURN TO PREVIOUS MENU ,ā CHOOSE SHIPS ,Ć CHOOSE MAGEDON ,ċ SET FIRE RATE Đ,ࠦ RETURN TO PREVIOUS MENU ,堦 ADD A WAVE TO DISK ,ꠦ REPLACE A WAVE  7 Positions of magedon fireD83,@,,1,,+,,1,3,@9f9f7l  p  t   t   t  t 4 T!#t$$%T%&'4'(t))*T*+,4,-t../T/01412t334T456467t88PALTw3DUwGpPw_/P1?@ @ `(?? 0||  7 @7 @w @@ P5H$????@@@@????@@@@?  `@  `??@OpOpOp@7  7p$HOpOpOp$Hp~~~~~~p` p` pp` 0` ppp`` @@@@@@`` pppp`` @@@@   @@@@`` pp_/@?@@ `?? 0||# , @0@`j@@P5H$@?@@@?? 0|| >?//@ @@?@??@7?@?pH$?@@?? ||  =?~/@?@@kX@dw<?@?@@?? || ;?}\o@8<@\~b@jX@lwJ<?@??@??LL;?{=?lnn~Xv@0<@H|"@h~b@luN<?{132?+a?A??O67qqyyCiv@4@0@8@8|@}<>t~t~phrs0020??pO???03y{`p:@?@@@@xxppx|zzz0prp`p 88??` ? 8?008? P p? ? 8?048?P"x? ==5w`.g@(,`>t6H4 ,b*c-o8@>`?||ppx` ||<<~|~|<0~~8`||0<<pp@ @d@a~@Hannp@qbbpp@a@a~va!{ad {  H!NP ^@n@aqqbcpFpFa~v! !!  `p@!^F^Ff@qbcFFv& !O   O 77 [x{x"xv{0+7 `_oK&K& `[o0/7"Xv{ {X{x 57?! ! !!? `llB^D, `Vo / `o/JVD,xV{,<=l='C'  0/?==X`&gJ[K/ `o& `VoD+BOlflf@@ ` `?` p@d&((+I7 "` w $;0A@ ` pAd&((+I7 " 7(  uc?A 0d&((+I7 " 0 @1cg  0  `@D"g!!{1G0fG0FC ! 'O  0  `@D"g!!3G1Gl'H 3w    Pp p  ` 8D"g!1Gd'D# 0 0  ?AIao@@Ia@YaH9`HIl6 Ot BG? 0 0?@Bic@O@Ia@9`@m6L4Io!G"G?? 09@@`@ o@O@a@Yg@oIo#G!C #?pp@@xp 0@ `D"wAQI(?$?0 0@?1 #?88 .\.\ >|>|@8x @sAQI(?$?0 0@?1 #?@ `@@sAQI(?$?0 0@-0 3 6><88 s sq bs88à<! >!$&  p P-0 3 684æ;;ad;88à!88!88%84E" @ r 1   @s!11!JR1c!{P X2 @` 0h@pP0 @   @ 1 I|_O? *f8 /(0 '?0 @p94$Ą@_  @ @ ~   `2 I| :Oy)x"b`G߻1SXٹ ` pCFCAwd.LTDv,(Ș2e=„><80dbd`}d108fg.>Y `x_D @ @(,lXP@(HDysgv    8^#7.LTDhX< @ @@@@@@@$ $ '"'"+@p=<5kp<=?;46D@ A!!&3vim!'%!.t$B-Td<3#Ą3y),i ,."-md,$-.#27x z{)-m=)+#1ѱmO\0`?؀?? o'_/ ????|p?;?@@Ap=?9?x蘰 p?c? ?ƀ~?|~>@@? @`8?{soa~0< <y|@0?7i?80 8<0 ~8x8?  8>0y|@f2 =%?>R0rpq8xp` 8 0`@^\8w+;Ň08?pxp``}yw|??ܼ0?Ã<8 8? ܘ??Ϗ@  !)A>=<={qA# ?~?``` 9'?8??=:|~>?{u9?w' ǧ'?~62n<>3#wo7?><<'@>xp8?{sp0 y|@0?80 8<0 ~ |? y|`?x=?gsqx`x<|8?LJ08?p`8 8'? 8080?>?}9?w' ??<>3#7?><30|>pbeʀ<@߀kvaRށ@9~bo@. zРap͏|w`?}>ײ65ަ?(@a Np220`Z_18 @ BNC:B(  (zˁ隷cXCZ`r8x~r`oʀ 0@ ƀzV@9@` @.: X4x|? |~ p? C2685ަ` !B_`%~  x_18 @ -, Xc@ˁ隷cP@bp p~zx6 pb ~y?c9s9s9s9s9sxc9s9cp`9q?9sy`s9s9s9s9s9s????9qp8m?c9s)`Ns89q==>>,>R>l>>>>??,?:?\?DDDDDDDDDDDDDDDDDDDZ8NY8A$9\XAFFFLAGSC1fC0c "3DUwGpPwp~<||x?|| |93<@d:/LpxG?8@ pÆc<^0|9Cp„ p8|y [00` k> X 7`㜠98x<G8 3 a4 ٬ 0qTrl@x  H >~|@4܇á0`! @W.` 8! p  @a0|8 `@0 >~}9 0   ">"@@  C~@A  ? <`xP~`@@ p{@`M\NwdƑ 6dscbӼ[@@O_` H䈃gEd%voCϘ3ANDMI"%O@@_` O2ժBQg1{p0616 W_` UUVkQOĚr:jh`@, FխTT*_`pX8&&PX4ɇ~>p84P LPXe5>"&P z vf9:8880<x?? 0?` ?O89Ǿ8q83?ώ=~}|x<x|=~|+y=y0а x<@ ?}p |p~? p1@  <@Ѐ !@xp@ x@ 0@  <=<@x @88 ?`` 7`0  ` `@0` ` ` 0` ./`@ ,hp88@p~?88@~8 @88 8` @o` 0`s ``8â80 @;}||~|88?>?>?>????>???x~=???qο/_ `??@??o?`o <}oྫn ߿y{陘ʠ  xπ y?g;ۿɿʇގ혎Ȍhʠ  ɀ X  @ H^oֆ܈ݨ}    g ;? ý 㸀 waa??o???Zv,Tf&@0jZ NY A$0X AFFFLAGSC1fC04Vx B?<:9630-)&#   ) 4 = A D H N S X \ a h n u ~ $)-14677|7x6s4l2f/a+[(U&N"F @:40+"'&#, 29AHOUZ]`!c$e%e&e'e)d+b-^0Z3U7P;J>EBBEAGAJDMGNLPPQTSYU]Xa\e`eddfbh`i]lXnSrNuJxG|GGJMRX_fmt{~yskd^}X{VyVvWt[r_penlkshyd{`|]z[wZsWnUjSfQcPbNbKbHbEbBe@h94/+'#$,5@JU^flq"s%t(s+p.j0c1[1R1I0A.:,2)+%%! ! % ,4>GPYdmv} zrjaYTRRVZ _"e#m$u&(,1579;v;j;^;RC>E>I?M?T?]@jAyEINQSUUoU\UIU8T,T%T UUUUUV!V%W,X5YC[T_gc}ipvz}vfUF:/'~"~~~~!}&},}3~<~FQ\ht~ukbWOJJJNxSqZj_bdYgQhIhAf8b1]*V$NG@:2*"  #' ) *+,%,/-<.I/X0g0v1357:=AFJOTY_ejqx~yrjaYQI@7/'!~!~%~)~-0234455555556666667789<@DIOXdszoaSF<52u0Z0B..+&   #-9EQ_my #+3;CMXrdcnTuH{<1( 4Vx!,6 !$&(+ ,----,,!*$()&+$-"0 1358<BHOSVZ]_ a%d)h,p-x-},(%!~~~!$(.39@EHJLM|MsLkKgJeHeFeDhClBtB|DFHLPSVX[^bxgoljqiwk|pw~{wtrqru|yyyxsi^XWX\{`vcpcj`dYbQbGf=k7n6p:rBqJoSjXdY^XWRQJL>K3M(Q!S V!X)X1W;SDNJIIECA9?-?!@DGK P UZ^dj r#z#  UAV2>/>+>'>$>"><81)$$'%.'/*/3-=,I,U,`,j,t,|,,/6?HQYaqx~~~og]VNG>82,'}&|'z-z5{=~EIIJMSY_dhjkpv}ztmgb[TMF>4+!~tg ]$Y*Y0[3Z3T3N1K.J'J HA60.".+.3,3'21-(" 3GU_iu*4;>??<:99;AJTVUTQOOORW^``````abccdillljiimqssmgginr~s}q}i|f|gykupqtnvmtmllbk\i\i]hafldx`\\\\\x\i[WWJTJTJTJTLSUPfLxFCCCCCx?k:]6[5[5[5[5\4c/t*%###"{reaaaaen~YgQhIhAf8b1]*V$NG@:2*"  #' ) *+,%,/-<.I/X0g0v1357:=AFJOTY_ejqx~yrjaYQI@7/'!~!~%~)~-0234455555556666667789<@DIOXdszoaSF<52u0Z0B..+&   #-9EQ_my #+3;CMXrdcnTuH{<1( 4Vx  } {{{{ywvutrnkhea_][XTOJFB=83.+)"'(%/#8!BM\iv!$'*-04:@EKRY`fkort{unv`vSuJuCs=r6p1o,n)l'i%e"a \WPJE?":'6,330:.C,L+X*d*o+x,.036;?DJOUY]bgjk|msnin_nUmNkIjBi>g9e6c3a1_/[,X*U*R*N+I,D/@3=9:@8G7P6X5a5h6p7u9{;=?@BEKOSVY\_}bvdmeceYePdJbE`C`A_A_A_A^@\?Z=X=V=T=R=O?MAKCIFGJEPDXCbCiCpEvF{HKLNPRT|UxVuWrXmXiXeX`X[XUWQWPVPUOSOROQPOSNWM\LbLfLhMjMkNlOmOnOnOnPoPpPrOtOuNuLvKvJuJrInIjIgIeHcH_H\HYHWHUISJQKOLMNLPIRHSGUFWFXFYHZL\O^S^W_[`_`d`h`l`o_t^x]{[~ZXWUSQNKHEC@~>yM@HBCE>G:K7N5Q5T5X5\8^9^<_>aBcHfOiVj\jbjgjljrhygec`[VRNKFB=:642|1u0m0g0a0[1Q3G6=94<,?%B!D GJO T"Z%_)c/f4h8j?lFmOoZodopoxnlkhea\VRMGB=951/-,*)w)p)i)a)Z*R+I.=114(9!=CHNTZ`glruvx| r6n.i'd"^YSLFA=9$5*2109/B.L-W-c-n.w037=BHNSY_cfimpsvy{}{o{_{PyBv6r.n(j#fa[UOHC>;#8+664@3K2W2d2q3}47:?DJPUY]aehkll~lujkh`eVaL]AX8R3M2J6Gv8v2w.w*w&w!wvvuts q oligd`\XURNLIGD@=9631.-+)'%$"  $(.4<DKQX_fl r w { "&)*,.035789;WB]G`LaQaT^WYZR^KaBf9k/p'u"z !$*06=BIPX\_|`x`t_p[lShJd@a7^-[%WROKHD?:"6&3./9+E(P$Z ^``^\XSMD;1( #)- 1'3/475>8E:K

TAWDZH\M]Q]V\[Z`WeUkSoStSyU}VZ_gpx|xtqmjeay^p[hYbV^R[NYKYIZG^Db?h:n5s/x)#}vmd\VS$Q,R2X7`;i?qCyFKOSVY\_adeeydsan\jXgSeNeHeBc;^6T3J1>0808348.>)E$K"P"V'[1_;aGaR`][gUnMsFtAr051*4!8<@D JOU\ckqw| #+5@JUboz|xtoje`]ZWTQNJGDB@>v;n8f5_4Z4S4J5A69728-:'J6L.O(S$W![_cios v%y,{2~8@JXbiqz}wpkfb`][|XtWkVbVYVPVGX>[7_1c.f-j-n/r2t7u;w@xGxMxUw]vdskqpnqkqiqhqfmdhbaaY`Q`GbAc=elAnDoHoLoQoVm\jbghao\uV{PJD?93.)% {ung`Y S L D < 2)!!&+059=&A.D6G?JHMSP]ShTrT}SQOLIFB<6/)$!xuuuuuuuuup j$e(`+[-U0P3I6D:?>:B5G/M)T$Z afjo s!v$w'x+y/z0|0~0/+'" 4@3K2W2d2q3}47:?DJPUY]aehkll~lujkh`eVaL]AX8R3M2J6Gv8v2w.w*w&w!wvvuts q oligd`\XURNLIGD@=9631.-+)'%$"  $(.4<DKQX_fl r w { "&)*,.035789;_?[@W@TAPAKBHBDCADcAcDcGcLcPcTcWcYcYcYcYcYbY_Y\ZXZUZQZNZIZEZBZ>Z=ZADFHJLNQSUXZ\^`cgknqtw{|}}}}}}}}{}w}s}m}g}c}^}Z}U}P|L|I|E|B|?|;|7{3{.{*{'{%{#{!{zzzzyvromjfb_\YUQNKHFCA>;8521/-+(&#! $).39?DJNTZ_dhl q v z }          }zwuqnjfa]XTPK F A = 7 3 . )$ a{b{dzeyfxgwitjqlommmkngobp]qXrTrOsItDu>v8v2w.w*w&w!wvvuts q oligd`\XURNLIGD@=9631.-+)'%$"  $(.4<DKQX_fl r w { "&)*,.035789;~&/~??~ ;~`@ y c~ x~ ~8Lrx:552?8??{|x?_\\?L/__ ?????7!8a@ Cp p`,```@ `` ```0 00``@?>@@  @?  <# @7+7``/Q!p1z~717~?~?#?8 ???_<?d ?  ??p@ 4693 7 `~??||@.,.|0>?">?|.>?x||????;803!??@?`8@G!  <# @7+7``/Q!p1z~717~?| ?#???????80Gyz??88w0'?:` @?G??`#A``́7G577Cw!q 8}}8}}??`h@ >>???ooo?ßP?  ??  <# @7+7``/Q!p1z~717x0??#???? ???`gC oC g ` >?><O~W(h||_| ?(` 0< ?? ????+k`p #`1C@``98;``` ```000?`8@G?9?  <# @7+7``/Q!p1z~717~?| ?#???????80Gyz??88w0'?:` @?G??`#A``́7G577Cwc@?>   @!  <# @7+7``/Q!p1z~717~?~?#?8 ????<@_ /7  ??pX 4>12 ' `~|??|@.,.|0>?">?|.>?x||?``p `8}}>> x0 p` ~~ ???ooo0y1* .@`9>  =} @`  4: )6 +6?vkv&*6Jw(*6Ufm(+7/4= J/HKHh{2zׄ82zxHJH  J  ?@y (  T \ t8r|   {5hp (0*6,0* 6np* 6Np, 4\b LTh{>W8 > x " ^      GG? yAP@@ 0  p  ,'<?;@{j00  \b,TlYf(Tl(Tl(Xh)f̀4at4= a o؟ # ^h{ > ׄ8~>x   ?@??'?gD ? ??p``px7p 7 ?v??>? r#Gz3; p ?ap?8@``<C`ß```3xT(,U|@P(c @@  80``~~ h  >> ~ ~    ppp ?@??'8'? ??Op``px7p 7 ?v??>? r#Gz39 py@~0~__~o/c ~a";`@X@0p @|`|sU|hz|rp<z:|p|@@@ 00?8;;?10?60?62? ?@??' ` '?A ??p``px7p 7 ?v??>? rG| >p8?P_ ?/x`?0i9? ??66?>n~f>z~@X??@??@@??????????8||>8|| p ,@q!@q!@@?~@?@@<G؀>?p?@@`/ ??څ?{p pp||88  ????x@@??`??   w b   88  `?@??' ` '?8ppOp``px7p 7 ?v??>? rG| >p8?P_ ?/x`?0i9? ??66?>n~f>z~@X???????@ ?@??'8'? @ ?p``px7p 7 ?v??>? r#Gz39 py@~0~__~o/c ~a";`@X@0p @|`|sU|hz|rp<z:|p|@@@??  ?? ??>>>8||~~p <~~`  @a!` @@,G??8?c!aa@<<x77G7|}Ч}``G13x!? +? ?q?_,/??????9??9?? 8xx??<<@'?O?@" X?@$K_€???@?*?@? >??>?? N   ppp,Gp|???? þ<<x77G7|}Ч}``G13x!? +? ?q?_,/??????9??A!??  ??SP??V ?? _Ү@zP/ `@8|88|8{|??~<>~~||g@G:<<<<||<<<xAx~~~``nnn@?@@??'?C ?p??`hx npv^=b#r3z3 p}x?pp<   @0P0 @???????? 8<<?,0@x ??`qr @; 0|L WHt47/@N>o Q|@||?}`H08??txpx   @  |$<zb?R~f>t^T*d?eƃ>=|8y0@;̀<q<8p80>xxpx|}0~<{|03GC??@|||444LionpoulosEE Font editor STOS basic accessory& By F. Lionet & C. Sotiropoulos (c) JAWX - MANDARIN"1 ---> Default set: system!2ENCREf7MULX:MULY:MXCX:MXCY:~n<BAUR:CC:OLDCC:GRXCAR :GRYCARp:C$()LA#CAR( ),T$(,(),!X( ),!Y( )F*:XoX:Y:X_:A$:T$(X,Y)A$:YY:A$:Xc ---> Menus*dL'd:LFiXX:A$:(X)A$:XpnYX:N:YYN:A$,Z:(X,Y)A$<sZ(X,Y)(X,Y)xY:X}(,):(, ):(, ):(,):(,):(,):BPS:BITPLANl~(,):(, ):(, ):BPS:BITPLAN8BPSP:BITPLAN&(,):,,,p,X,@#:$T觠:"() \&"()  "()  [ϊ---> Fenetre d'edition!Р:|"() [XX(()):YY(()):XXCXXXYYCYYY\8 XX,YYC$;:ENCRE:GRXCARXX,GRYCARYY:CXXX,#CAR(YY)~ ;::GRXCARXX,GRYCARYY:CXXX,#CAR(YY)\8 ---> Select a character< :MK:MK() |:CC(())CY(())CX:CCCCCCOLDCCCCOLDCC$TT MK::() CCCCC:$T: ǢMKCXYCY:ADY,#CAR(Y):Y:$T: ̢MKCXYCY:ADY,#CAR(Y):Y:$T:h ѢCXYCY:#CAR(Y)(ADY):Yn ֢CXYCY:#CAR(Y)(ADY):Y0 ۙ$:CCCCC: ---> changement de bordureL :BAURBAUR:BAURBAUR& () :* |:BAUR:  ---> Informations!8:,MULX,,(, :,:FONT GENERATOR:,:By F. Lionet & C. Sotiropoulos:,:(c) Jawx / Mandarin:&:%:---> File6:c,K,P,,,---> Load from disk~R$(*.mbk,T$(,),):%:R$츕(R$,.MBK):FJR$,:(())cT1 :f((())MXCX)(())MXCYT1 :*NOMFILE$R$:#:4~::T2 :&H,#:~:#:8F:T1 :T2 :&H:#J---> Save char setNKNOMFILE$PR$NOMFILE$:UO---> Save as...~PR$(*.mbk,T$(,),):%:R$츕(R$,.MBK):UZR$,_::T1 :T2:&H::(f%:R::---> quit and grabN,MULX,,(,, ::T$(, ),::T$(,):%:"R:$:@'::BGRAB(),5:erase(),5`:o--->Character setNp:,,,8,,,,d,,,u"ӊ--->Copy system set #1,#2,#3"SSYS:"SSYS:SSYS(%:R.蠨:~SSYS:#:7---> Grab from a programL8,MULX,,(,, :T$(,):h=Z:X:Y:X񸈚V*B(X,Y)V.G((X,Y))cVLTTX((X,Y)):TTY((X,Y)):TTYMXCYTTXMXCXVQ:Z; ;::-;T$(,);X;, ;T$(,);Y;:;TTX; X;TTY:!X(Z)X:!Y(Z)Y:ZZVY:XX[Z,:T$(,):::jT`,:T$(,);:X:!X(X)je:},(!X(X),!Y(X)):(!X(X),!Y(X)),(!X(X),!Y(X))(!X(X),!Y(X))():,::#:j:%:---> erase character set(%:R #(:#:---> 8X8(%:R*:},F (),c:(),:(),8#(:,d::#:c---> 16X8(d%:R*i:},Fn(),c:(),:(),8s#(:,d::#:NJ---> 8X16(ș%:R*͠:},F҈(),c:(),:(),8י#(:,d::#:+---> 16X16(,%:R01:},F6(),c:(),:(),8;#(:,d::#:W---> Character editX::2], ,,,,Lb---> EraseXXCY:#CAR(X):X:$:---> Inversef XCY:#CAR(X)(#CAR(X)):X:$:---> RenverserzXCY:#CAR(X),#CAR(CYX):X:$:---> MiroirYCY:XCX:A(X,#CAR(Y)):B(CXX,#CAR(Y))xACXX,#CAR(Y)CXX,#CAR(Y)PBX,#CAR(Y)X,#CAR(Y)$X:Y:$:0L::X1:Y1.QX2:Y2:DVX2X1X2X1~D[Y2Y1Y2Y1>`$:X1X2:Y1Y2:Qn~CXYCY:,#CAR(Y):Y:[ZYCY:,#CAR(Y):Y:[nCXYCY:,#CAR(Y):Y:[ZYCY:,#CAR(Y):Y:[X#CAR():YCY:#CAR(Y)#CAR(Y):Y:#CAR(CY)X:`X#CAR(CY):YCY:#CAR(Y)#CAR(Y):Y:#CAR()X:`<@:|:NP:TX:TY&Tzr,, &, &6^ :$:%:[h---> Draw liner} lz|:IXGRXCAR:IYGRYCAR:IXTX,IYTYIXBX,IYBY:---> Draw Box} lz :IXGRXCAR:IYGRYCAR:IXTX,IYTYIXBX,IYBY: ---> Fill &|:x 0K:() KXX(()):YY(()) 0v 5XXYYXXCXYYCY(TXXXTYYY) 0X :KXXXXYYYY 0X DIXGRXCAR:IYGRYCAR::IXXX,IYYY NK X$ b---> Get dimensions of object lTX:BX:TY:BY:NP:K:KNPx vK:() K>XX(()):YY(())~ vv XXYYXXCXYYCY(TXXXTYYY)~ v KNPXX,YY:():NPNP:NP&TXXX:TYYYBXXX:BYYY K : ---> Read char from screen@ PS(IX)BITPLANIYBPS( ƝICYX ТCX"#CAR(I)(PS)#CAR(I)(PS) PSPSBPS ڂI: ,#'---> efface tout le jeu de caracteres<#(CX(()):CY(())H#-X:()X,:XH#2X:()(X,X:Xh#7X()()CXCY:X,:XX#<XXX?CXCY:X,:XR#AXXXCXCY:X,:X#F$# affiche l'ecran de l'editeur#@#CX(()):CY(()):#,,,CX,CY,,,,,CX,CY,,f#:: ,(),()(CX),(CY)@#,,,,,,#(CY)CX,(,,,,,,,,,,,#CYCX,(,,,,,,,,,,,P#:: ,(),()(),( )CY`# ,(),()CY(),( )CY4#,,,",,::>##:CC:OLDCC :$Tb#;YCY:#CAR(Y)(ADY):Y:$#.#ܠ:~SSYS:#:#---> Write all char set@#|::X :(X);:X:$S---> Inverse chosen charP$T|::OLDCC,OLDCC:(OLDCC );P$Y:OLDCCCC:CC,CC:(CC );$^Z$cX(()(CC):AD()XCYCXj$h|:,:T$(,);(CC ); / Ascii:;CC ; $m($---> Affichage ZOOME du caractereb$|:,:T$(,);(CC ); / Ascii:;CC ;b$|:,:T$(,);(CC ); / Ascii:;CC ;$|::ZYCY:RXCX:(X,#CAR(Y))C$;:ENCRE ;:P$’GRXCARCXX,GRYCARY:X:Yh$à:GRXCAR,GRYCARGRXCARCX,GRYCARCY$Nj,%---> reaffiche le caractere en petit!%YCY:XCX:(X,#CAR(Y))ENCREP%!GRXCARCXX,GRYCARY:X:Yh%":GRXCAR,GRYCARGRXCARCX,GRYCARCY%&%---> Sure? (Y/N)D%, MULX, ,,,::6%T$(,):::T$(,)@%,(),()( ),()H%,( ),()(),()8%s:(()()):%R:()R\%:%:,,,:,,,:&G ---> Dialog box!z&H,MULX, ,(,,:T$(,T1)::T2T$(,T2)&M::T$(,),&R:::$:' ---> English menuH' STOS , FILE , SYSTEM , TOOLS , DRAW &', About FONTS,', Load char set,, Save char set,, Save as ...,, -------------,,Quit,, Quit and grab,' ,Copy system set #1,,Copy system set #2,,Copy system set #3,,Grab from program,, Erase set,~' --------------------,,Edit 8X8,, Edit 16X8,, Edit 8X16,, Edit 16X16,'$,Clear,,Inverse,,Flip,,Mirror,, ------------,,Scroll ,R'),Line,,Box,,--------,,Fill,'s ---> Menus francaisP't STOS , DISQUE , SYSTEME , OUTILS , DESSINER ,'y,A propos de FONTS,'~,Charger un jeu,, Sauver le jeu,,Sauver comme ...,,----------------,,Quitter,,Quitter / GRAB,' ,Copie jeu systme #1,,Copie jeu systme #2,,Copie jeu systme #3,,Copier d'un pgm,,Effacer le jeu,'-------------------,, Edition 8X8,, Edition 16X8,, Edition 8X16,, Edition 16X16,',Effacer,,Inverser,, Renverser,,Miroir,, ---------,,Scroller,Z',Ligne,,Boite,,--------,,Remplir,*---> Messages* Character: ,Sure ?, NO | | YES ,!--->CHARACTER SET IN PROGRAMS<---, Program #,Bank #,Type a number: ,Press mouse key...*Press mouse key to go on..., Disk error!,!This bank is not a character set!,Character too large !, Loading default character set...+#CAUTION! Character set is copied in,memory bank number 5!,Memory banks present on disk:,Enter chosen name :,? LOAD CHARACTER SET File name must end with .MBK!,? SAVE CHARACTER SET File name must end with .MBK!,+\ Caractre: , Certain ?, NON | | OUI ,"->JEUX DE CARACTERES DISPONIBLES<-, Programme #,Banque #,Entrez un chiffre, Pressez une touche de la souris.+a Pressez une touche de la souris.,Erreur diquette.,Ce n'est pas jeu de caractres!,Caractres trop grands !,Je charge le jeu par defaut...&+f%ATTENTION! Les caractres sont copis,dans la banque numro 5!, Banques prsentes sur le disque:,Entrez le nom choisi ,? CHARGER UN JEU DE CARACTERES Le nom doit se finir par .MBK!,? SAUVER LE JEU DE CARACTERES Le nom doit se finir par .MBK!,LionpoulosMpMp ICONS EDITOR" Stos Basic accessory& By F.Lionet & C. Sotiropoulos( ---------------------------------T T$(2),!I(),!C(),!M(),!U()2O^<,A7COL:HCAR:NLINE:NCOL:BITPLAN:BPS:CL:F<COL:HCAR:NLINE(:NCOL:BITPLAN:BPS:CL:PFzACOL:HCAR:NLINE(:NCOL:BITPLAN:BPSP:CLJFNPAGENLINENCOL:PARAM:C$()c---> Initialise menusd^PdFiQX:A$:(X)A$:XnRRX:N:RJYN:A$,Z:(X,Y)A$:Z(X,Y)sY:X&x(,)}:&p,X,@,#(NJ---> Initialise textȜ8dTX:S":T$(X):X:T$(X) +---> Reserves memory bank*,:,S1*6,:2;ADW()T ~'BB:(B,)V,((B,))( `f,(),,(, ,:::,:T$():K:|:::*:L(((B,)))T:(B,),(B,)L():,:THEIGHT(()):(),:+\:'tAD():X:!M(X)(ADX):!C(X)(ADX):X:(<---> Main loop)h폘򠁧:@() V, ,,,,|V ϊ---> Mouse in ICON windowР:|<ՙ':XXYYVکXX,YY:KC$;:XX,!C(YY) :XX,!C(YY)ߘW< ---> Mouse in MASK window :| ::< ':XXYY ©XX,YY:KC$;:XX,!M(YY) ;:XX,!M(YY) ј ---> Previous page6:|:,::T$();T() |::,:T$();:"PAGE8PAGEPAGE:'t:ъ---> Next page6Ҡ:|:,::T$();Tע() |::,:T$();:ܢ0PAGE0PAGE0PAGE8PAGEPAGE:'t:---> Chose / Put iconb:|::T$( )(PAGENPAGENUM):NNNUM|:()I:NNN:):):NUMPAGEPAGENNUM:I:):|K:XX(()):YY(()):XXNLINEYYNCOLNYYNLINEXX:(KNNN)PAGENPAGENN,NN:I:):NNN:I:):|:::T$( )(PAGENPAGEN).KX>AD()T(PAGENPAGEN) :KX:!U(X)!C(X):!M(X)(ADX):!C(X)(ADX):X:(<:)h:NUMN:NUMPAGEPAGEKX:ADX,!M(X):ADX,!C(X):X:I:):HEIGHT(HEIGHT,PAGENPAGEN){---> UNDO|:|B()::X:T!U(X):!C(X)!U(X):!U(X)T::(<:)h:NUMN:NUMPAGEPAGEo---> STOS*p:b,u,8,uV ӊ---> About icons generatorԠ,(),,(,, ::, ,:(),()(%),( )HCAR|٩,:T$():,:T$():,:T$():, :T$()&ޞc:::c:7---> Quit,8*0:R:=::---> Quit and grab,*0:R:X::(),()():LHEIGHTTTT:,L:,L():(),HEIGHT::bgrab(),2:erase(),2`W---> File<X:e,, ,],,],]V---> Load a banklR$(*.MBK,T$( ),):R$츕(R$,.MBK):ZƠ#,R$:X()::XT@T:pˠ,:*:zR$,():(())( `T:РjNOMFILE$R$:HEIGHT(()):(),:+\:'tAD():X:!M(X)(ADX):!C(X)(ADX):X:(<:T:.:::*::,---> Save bankNNOMFILE$ R$NOMFILE$:%---> Save as...l R$(*.MBK,T$( ),):R$츕(R$,.MBK):%MX*::(),()():LHEIGHTTTd/:,L:,L():(),HEIGHT:R$,V4:,S:,()():,: 9Ȁ:>8M4::T:*:>---> Grab from program,*0:R:R,(),,, ,:T$()::NZ:lzB:B񸈚lv*(B,)lv,((B,))( `PB,Z:T$();B;T$();(B,) B>Z:T:V*:V,:T$();:B:BB,(B,Z):|:::*:L(((B,)))T:(B,),(B,)L():,::R$:: ---> Erase icons bank,*0:R:6*:'t:(:(<? ---> tools6@:n, , l, ,E,!4EV ---> Clear,*0:R: 6(:~(<:  ---> InverseR oY:!C(Y)(!C(Y)):Y ~(<: k ---> FlipP lp'Y:!C(Y),!C(Y):Y q~(<: ϊ ---> Mirror НpY:Z:pX:(X,!C(Y))X,Z, ՂX:!C(Y)Z:Y ڙ~(<:!3 ---> scrolls0!4q6::X1:Y1.!9X2:Y2:D!>X2X1X2X1 rZ!fs!pD!CY2Y1Y2Y1 s!ztX!J!H~(<:)h:X1X2:Y1Y2:qZ!9@!frY:,!C(Y):YX!hrX:(X,!C(Y))X,Z !jX!kq!C@!psGY:,!C(Y):YX!rsX:(X,!C(Y))X,Z !tX!uq!C!zZ!C():t%Y:!C(Y)!C(Y):Y:!C()Z!r!H!Z!C():tY:!C(Y)!C(Y):Y:!C()Z!r!H#'---> Draw Menu<#(:|:NP:TX:TY`#-WTX():WTY():WBX():WBY(),#2u#,$T,$,%,%*#7}&:~(<:V#---> Draw line#{%#:|:IX():IY():MXIX:MY():IXTX,IYTYIXBX,IYBY::MXTX,MYTYMXBX,MYBY:$S---> Draw ellipse$T{%X$^|:IX():IY():MXIX:MY()$hDX(BXTX):DY(BYTY):XCDX(TX,BX):YCDY(TY,BY):R1DX:R2DY$r:IXXC,IYYC,R1,R2,,::MXXC,MYYC,R1,R2,,:$---> Draw Box${%X$ |:IX():IY():MXIX:MY()$֠:IXTX,IYTYIXBX,IYBY::MXTX,MYTYMXBX,MYBY:%---> Fill%|:{vD%&() () '؛%&X%0KXXXXYYYY%&%5|:IX():IY():MXIX:MY()::IXXX,IYYY::MXXX,MYYY%:K%D$%---> Get dimensions of object%TX:BX:TY:BY:NP:K:}KNPD%() () '؛%P%XXYY(TXXXTYYY)|4%%KNPXX,YY:():NPNP:NP&TXXX:TYYYBXXX:BYYY%K%: &---> Read icon from screen@&PS(IX)BITPLANIYBPS&| &~fI:&!C(I)(PS):PSPSBPS&ʂI:''---> Displays screen'':~','$',,,,,:,,,, ,:,,,(,,:,,,(,,:,, ,,,,:')',,,,,:,3,,, ,:,,,(,,:,,,P,,:,1, ,,,,:0')'$,, ,,,,:,3,,, ,:,,,(,,:,,,P,,:,*, ,,,,v'):UNDO;:|::: ,(),()(),():T$()'.|::'3|::: ,(),()(),()HCAR: ,(),()('),()HCAR'8)T'=|:::,(),(),V'>|:::,(),()(),()*'Bd't:6(:~(<'G's---> Displays icons't)*'y|:::',''~Y:X:X,Y:ZPAGE(YX:Z(Z);"'X:Y:''*Y:"X':X,Y:ZPAGEPY(X:Z(Z);"'X:Y:''Y:X':X,Y:ZPAGEY(X:Z(Z);'X:YP'NUMPAGEPAGENNUM:I:)'4'׊---> Calculate X and Y coordinates in windowsH'XX(()):XXXXH'YY(()):YYYY:'K:KXXYY''(;---> Display new icon(<|:z(AY: X:(X,!C(Y))C$;: ;(FX:Y(K(---> New iconV(X:!C(X):!M(X):X:)---> displays icon #N()NNN)|:X(NNLINE):YNNLINE:F) X,YX,Y)Ib)XPAGENPAGEN:XX(X);)&)g---> displays icon in background)hX:ADWX,!M(X):ADWX,!C(X):XP)m|:::,:();::,:();:)n:I:LX():LY(I):MX(()())LX:MY(I):LX,LYMX,MY:I:)ˊ---> Previous/page/nextR)̠|::,:T$();:,:T$();P)A$T$():(A$,)(PAGE):A$:*/---> Confirm`*0:,(), ,,, ::::T$( )*5,(),()@,()HCAR:,@,()(),()HCAR0*::(()())>*?()RRX*D:,,,:,,,:B::*---> Alert~*,(),,(,, :::,:T$(T):,:T$( ) *::::**---> Erases bankZ*(),( `:(),:()()(),*X()()TT:X,:X XJ,:XN+NUM:PAGE:NUMPAGE:HEIGHT:$+[---> Erases bank up to the endL+\()HEIGHTT()T,+aX()HEIGHTT()TT:X,:X XJ,:X+fO ---> English menus:P STOS , FILE , TOOLS , DRAW jU, ICONS !,,---------------,, Quit,, Quit and grab,Z, Load icon bank,, Save icon bank,, Save as...,,-------------------,, Grab from program ,,-------------------,, Erase bank,_, Clear,, Inverse,, Flip,, Mirror,,----------------,, Scroll,fd,Line,,Ellipse,,Box,,--------,,Fill,ó ---> Menu Francais<ô STOS , BANQUE , ICONE , DRAW vù, ICONES !,,--------------------,, Quitter,, Quitter/rcuprer,þ, Charger une banque,, Sauver la banque,, Sauver comme ...,,--------------------,, Copier d'un prg,,--------------------,, Effacer la banque,Ƞ, Effacer,, Inverser,, Renverser,, Miroir,, -----------,, Scroller,nҠ,Ligne,,Ellipse,,Boite,,--------,,Remplir,7---> English messages`8 ICONS EDITOR, By F. Lionet,& C. Sotiropoulos,(c) Jawx/Database 1988= icon , mask , previous , next , Page: 1 ,Icon #, ABANDON :: CONFIRM B? LOAD ICON BANK File name must end with .MBK!,? SAVE ICON BANK File name must end with .MBK!,Press mouse key to go on.,This bank is not an icon bank!, DISK ERROR!GIcons present in memory:, Program #, , length:,No icons present in memory!, Input program number: ,Grabbing bank from program #1.,Ǜ---> Messages FranaisfǜEDITEUR D'ICONES, Par F. Lionet,& C. Sotiropoulos,(c) Jawx/Database 1988ǡ icne , masque , prcdente, suivante , Page: 1 ,Icne , ANNULER :: CONFIRMER Ǧ? CHARGER DES ICONES Le nom doit se finir par .MBK!,? SAUVER DES ICONES Le nom doit se finir par .MBK!, Pressez une touche de la souris.,%Cette banque ne contient pas d'icne!,ERREUR DISQUE!ǫIcnes en mmoire:, Programme #, , longueur:,Pas d'icne en mmoire!, Entrez le numro du prg:,#Je copie la banque du programme #1.,Lionpoulos``#< ----------------------------------------------------0 Music Editor, By Francois Lionet* Part of the Stos basic, (c) Jawx / Mandarin 1988< -------------------15/8/1988------------------------ ͦ:,f,,T:C1:C2:C3C1:C2:C3HT$(d),%TNOTE(,),#ADN(),$TENV(2,,),$WENV(2),$BENV(,),"NN(),$DEBN(),$PAGE(),"CN(),!V(),$NTET(),$NTED( ),$NTEL( ),$NTEP( ),$OCTY(),$NTEY( )bBANKMAX:SPEED2:XGR :YGR:TGRBBANKMAX::Not enough memory!c---> Initialise menusdPdTi`X:A$:(X)A$,,C3:Xn::`X:N:`YN:A$,Z:(X,Y)A$:Z(X,Y)sY:X&x(,)$}:C3::,,p,X,@,#(NJ---> Initialise textȜ#,8dTX:a:T$(X):X:T$(X)+---> default screen,::C3:^-,:s,,: (T$($)),:T$($);^.,:s,,: (T$(%)),:T$(%);h/,:s,,: (T$(&)),:T$(&);:C11,, ,,,::T$(')() : ,(),()(),( )6,, ,,,::T$(')() : ,(),()(),( );,6, ,,,::T$(')() : ,(),()(),( )@XSTAVE:XST16(XSTAVE):YSTAVE:DST::CRSE N ---> Reserves memory banks$:,BANKMAX't<VBLOC:DBLOC:FBLOCfVOIX:"NN(VOIX):$PAGE(VOIX):"CN(VOIX):|VOIX::C1::X:CNOTE :):VOIX:VOIX:X:':(,d:"---> Read default enveloppes$^W---> Read stave datasX;<]gX:$NTET(X):X<bhX :$NTED(X):X<ghMX :$NTEL(X):X<lhX :$NTEP(X):X<qhX:$OCTY(X):X<viX :$NTEY(X):XNCNOTE :VBLOC:DBLOC:FBLOCjTB:(B,)((B,))IW`N:,,,(,,:::::T$(/):2:N:LBANK(((B,))):LBANKBANKMAX't:@(B,),(B,)LBANK()---> Main loopVBLOCDBLOCFBLOC(,):(,):(,):(,)(,):(,):(,):(,)L|:VBLOC,:();:lA$ T$(+)(VBLOC)T$(,)(DBLOC)T$(-)(FBLOC) : (A$),:A$;NOM$,:():A$- NOM$ -: (A$),:A$>"CN(VOIX)"NN(VOIX)(|:,:();:LABELA$T$(CNOTE) (COCT) T$( CLONG):oFH A$T$(LABEL):LABEL\ PPARAM1:LABEL LABEL PPbA$A$(P):LABEL A$A$,(PARAM2). (A$),:A$;j|VOIX:X"CN(VOIX):CRS:)::S$::A$:SP$Z():Z :'B: )A$oH.(A$)(A$)'B:}.63(A$) 'B:qp8(A$)S$S$(S$,(S$)):: ;::o:=A$(A$):(A$) $B(S$)6GS$S$A$:A$;:o--->Analyse lineNOM$ H,:X:|:,:();:A$- NOM$ -: (A$),:A$;:|X2S$LABEL<Vs4X :(S$,T$(X)) XpLABEL:sX :(S$,T$( X))ɂX:t@CLONGX:S$S$T$( X)XӝtbX :(S$,T$(X))tx؂X::CNOTEX:S$S$T$(X)PuX:(S$,(0X))uX:u\@COCTX:CNOTE COCTCNOTE %TNOTE(VOIX,"CN(VOIX))CLONGCOCT CNOTE%TNOTE(VOIX,"CN(VOIX))CLONG:COCTX"CN(VOIX):"CN(VOIX):"NN(VOIX):):"CN(VOIX)"NN(VOIX)"NN(VOIX):w\%TNOTE(VOIX,"CN(VOIX)):"NN(VOIX)"CN(VOIX):"NN(VOIX)::`:"CN(VOIX)$PAGE(VOIX) $PAGE(VOIX):Pm\ ---> Analyse labels@LABELX:S$S$T$(X)JPARAM1:PARAM2:LABEL"NN(VOIX)"CN(VOIX):%TNOTE(VOIX,"NN(VOIX)):VBLOCVOIXVBLOC:DBLOC:FBLOC*(<:(:6LABELLABEL<<PARAM1(S$):PARAM1F<LABELPARAM1F<#LABELPARAM1F`(LABEL LABEL PARAM1PARAM1Ff-LABEL LABEL PARAM1PARAM1PARAM12LABEL LABEL $TENV(PARAM1,,)$TENV(PARAM1,,)dF7LABEL X(S$,,):XFPARAM2((S$,X)):PARAM2PARAM2PARAM1F<b<%TNOTE(VOIX,"CN(VOIX))(PARAM2PARAM1LABEL)A0F::LABEL:ۊ---> Function keysܠ&SP&SH|@&SMr&SK&SR&SS2S:~J:,D,N,X:m ---> Curdown2"CN(VOIX)"NN(VOIX)BX"CN(VOIX):"CN(VOIX):)B"CN(VOIX)$PAGE(VOIX) ".:$PAGE(VOIX)::P"(:?---> Curup&@"CN(VOIX)BEX"CN(VOIX):"CN(VOIX):)BJ"CN(VOIX)$PAGE(VOIX)TT.O:$PAGE(VOIX)::PxT(:q---> Cur rightVrX"CN(VOIX):"CN(VOIX):):"CN(VOIX)BwXVOIX:XX,|':(n:(:---> Cur leftVX"CN(VOIX):"CN(VOIX):):"CN(VOIX)BXVOIX:XX,':(n:(:Պ---> Insert2֢"CN(VOIX)"NN(VOIX)*ۢ"NN(VOIX):X"NN(VOIX)"CN(VOIX):%TNOTE(VOIX,X)%TNOTE(VOIX,X):X"NN(VOIX):VBLOCVBLOCVOIX4DBLOC"CN(VOIX)DBLOC4FBLOC"CN(VOIX)FBLOC,(A:(::---> Delete2"CN(VOIX)"NN(VOIX) X"CN(VOIX)"NN(VOIX):%TNOTE(VOIX,X)%TNOTE(VOIX,X):X"NN(VOIX):VBLOCVBLOCVOIX&4DBLOC"CN(VOIX)DBLOC4!FBLOC"CN(VOIX)FBLOC,&(<:(::9---> F1: Page up(:$PAGE(VOIX)|<$PAGE(VOIX) $PAGE(VOIX)$PAGE(VOIX) $PAGE(VOIX)f?"CN(VOIX)($PAGE(VOIX) ,"NN(VOIX)):(<:(:C---> Page down<D"NN(VOIX)$PAGE(VOIX) F$PAGE(VOIX) "NN(VOIX)$PAGE(VOIX)"NN(VOIX) $PAGE(VOIX)$PAGE(VOIX) JI"CN(VOIX)$PAGE(VOIX):(<:(:M---> TopVN$PAGE(VOIX)$PAGE(VOIX):IW---> Bottom~X"NN(VOIX)$PAGE(VOIX) $PAGE(VOIX)"NN(VOIX) :?ϊ---> Click into lines*ТZ VOIXYY(())():YYYY $PAGE(VOIX)YY"NN(VOIX)XVOIX::`X"CN(VOIX):"CN(VOIX)$PAGE(VOIX)YY:)"ߙ(::VX"CN(VOIX):"CN(VOIX):):"CN(VOIX)PXZ :':(n:(::---> STOS8:'B:X,,P,---> About MUSIC!N:, ,,<,, ::, ,::(),()(9),( )|,:T$(5):,:T$(6):, :T$(7):, :T$(8)::N:O---> Quit(Pf)h:RU::---> Quit and grab()h:R>:::(),()LBANKr:,LBANK:,LBANK():(),LBANK:Ȁ:à:BGRAB(),3:ERASE(),3` :o---> BankNp:'B::,,8,u,,u,uzӊ---> Load memory bankԏ٪::N:R$(*.MBK,T$(V),):N:::R$츕(R$,.MBK):hޙ-:#,R$:X()::XTW:d㠩,:zR$,():(())IWTW:>蠨:ADB():NOMFILE$R$$LBANK(ADB):N:TX:4::N::-P:---> Save memory bankNNOMFILE$8R$NOMFILE$:=7---> Save as8::N:R$(*.MBK,T$(Y),):N:::R$츕(R$,.MBK):=[FB::-:(),()LBANK~G:,LBANK:,LBANK():(),LBANK:R$,L:,BANKMAX:QQLBANK:'t:LBANKQQ:,LBANK():,: QȀ:V:N:8[L::TX:-P:``---> Grab from program()h:RVN:,,,(, ,::::T$(Z)::NZ:B:B񸈚*(B,),((B,))IWXB,Z: ;T$([);B;T$(\);(B,) BJZ:N:T]:-P:ĩ,: ;T$(^);:B:BB츜(B,Z):::N:vɠ:N:LBANK(((B,))):LBANKBANKMAX't:BΠ(B,),(B,)LBANK():---> Erase bank()h:R&'t:NOMFILE$ W---> MusichX:'B:,,], ,,,,],x,F,],]b---> New music()h:RX:':VOIX:':VOIX:VOIX:X:':SPEED2ƙ,ˋ---> Put music6 ,$:RRR:R.!,:LB%"X:((NOM$,X,))(ADB(R)X)X:$8#)h:RRR:"$RRR:N%L:X2:$WENV(X):XD*Y:"NN(Y)M/X"NN(Y):Z%TNOTE(Y,X):LL:ZH84AZ:A H<9B(Z):LL >A HbC$WENV(B)$WENV(B):LL$$HX:LL4MY:L:RR:RLL :LBANKLBANKMAX:N:,,,(,, ::::,:T$(I):,:T$(J):w::N:RR:W-.\,:R kaAD,ADBLBANKADL:XR :Y(ADB(X)):YADB(X),YL fX^kLBANKLBANKL:ADB(R),ADADB~pX:ADB(R)X,((NOM$,X,)):XuAD,ci:AD,SPEED:APAD :X2:$WENV(X)z$WENV(X)APAD:Y:AP,$TENV(X,Y,):AP:AP,$TENV(X,Y,):AP:AP,$TENV(X,Y,):APAP:Y XhY:ADY,:"NN(Y)ADY,APAD:X"NN(Y):#ADN(X)AP:Z%TNOTE(Y,X):ZAP,Z:<AZ:B(Z)VA AP,((A))B:~A AP,((A ))$WENV(B):APAP:>A AP,:APAPAPAP:X:AP,:APAP:X"NN(Y):#ADN(X):X`X"NN(Y):%TNOTE(Y,X)\Z%TNOTE(Y,X):AZ:A B(Z):C((Z)):C#ADN(C)#ADN(X),B(#ADN(C)AD) X Y:N:Ί---> Append music(ϢNOM$,(ԙ,$:R4ٙ,:LB::XޝX:$DEBN(X)"NN(X):X:---> Get music(,$:R4,:LB::$X:$DEBN(X):X:Y:"NN(Y):"CN(Y):$PAGE(Y):Y:NOM$:X:NOM$NOM$((ADB(R)X)):X-X2:$TENV(X,,)$TENV(X,,)d$WENV(X)$WENV(X)*X:SPEED(AD)bY:AP(ADY):AP`  X$DEBN(Y):#ADN(X):X:APAPAD:X$DEBN(Y):#ADN(X)AP:A(AP):APAP:(,A)%TNOTE(Y,X)A:8 A=( ,A)%TNOTE(Y,X)((A)((A))):8B(AP):APAP:AA:A%TNOTE(Y,X)(B(A) ):8AA:AEADB:D:$BENV(D,)(AE):AE:$BENV(D,)(AE):AE:C(AE):AEAE:(,C)CCf$$BENV(D,)C:D:AZZZZP)ZZZZZ:$WENV(Z).+D:E:$BENV(D,E)$TENV(Z,D,E)E:D:%TNOTE(Y,X)((Z)A ):8f.Z:ZZZZZ:$WENV(Z)Z:~3D:E:$TENV(Z,D,E)$BENV(D,E):E:D:$WENV(Z):%TNOTE(Y,X)((Z)A ) 8X8="NN(Y)X:X`JBX"NN(Y):#ADN(X):XlGX$DEBN(Y)"NN(Y):%TNOTE(Y,X)[\LZ%TNOTE(Y,X):AZ:A [xQB((Z)):C(#ADN(),BAD):CCPV%TNOTE(Y,X)((Z)((C))) [X `Ye:N:VBLOC:DBLOC:FBLOC:X:':"CN():$PAGE()$DEBN():(<:"CN()$PAGE():X:':"CN():$PAGE()$DEBN():(<:"CN()$PAGE():X:':"CN():$PAGE()$DEBN():(<:"CN()$DEBN():*}---> Too many enveloppes or tremolosV~:N::N:, ,,<, ,::|,:T$(K):,:T$(L):,:T$(M):,:T$(J) :w::NO~:X:':Y:"NN(Y):$PAGE(Y):"CN(Y):|Y:::X:):Y:X:':("NOM$:---> Erase music8,$:OLDRR:R()h:R:ROLDR:,:LBNAF,ADBLBANKAD:LBANKLBANKLB,ADB(R),ĝXR :Y(ADB(X)):YADB(X),YLB ɂX`ΝX:ADB(R)X, :XӋ--> Rename music,:E---> PUT AND PLAY(F :RR"KRRR:}w---> Play music6xR:,$:R4},:LB::A$T$(N):X:A$A$((ADB(R)X)):X:A$A$ NN:,,,L,,:::A$:^,:T$(O):,:T$(P):,:T$(Q)6, , ,<, ,:::vX:X,:s,,:!V(X):X.PA:TRANS:R,: T$(R)(SPEED) / T$(S)(TRANS) / T$(TPA) HX:(X)!V(X)!V(X)(X):(X),:!V(X) ;:A(AD!V(X)):BA:BC(B) :B(B) B :C^~~~~ ;T$(B);C; ;~~~;T$(A );X:K$:>K$():::N:\âK$sK$SR:uTRANS:PA:ȢK$+SPEEDdSPEED:AD,SPEED:PASPEED:͢K$-SPEEDSPEED:AD,SPEED:PASPEED:XҢK$/TRANS_TRANS:uTRANS:XעK$*TRANS_TRANS:uTRANS:PܢPAK$ PA::.PAK$BK$ PA:SPEED:Y:d:X:YY(X):!V(X)(X)X:Y: 󡠑(NOM$::&VXVOIX:;dN:,, ,(,, ::::,:T$(_):ณ(*,N):*;(L);*:*;(");NOM$;(");*:*;(L);*:ณ(*,N):X:A$(K):ZZ:VOIX:X"NN(VOIX)"ZZ:(:B$(X):B$((B$))B$ ::LABELB$B$T$(CNOTE)((T$(CNOTE)))(COCT) T$(CLONG ):b B$B$T$(LABEL):LABELLABEL\PPARAM1:LABEL LABEL PPBB$B$(P):LABEL &B$B$(PARAM2)0(A$,VOIX)B$,"VOIX:ZZ,&'A$:X,:N1VOIXVX:@;:N::T`:-P:1?---> BlockP@:'B:, , l,E, ,!4,E,!E---> Start block$VBLOCVOIXVBLOCVXVOIX:VOIXVBLOC:CN"CN(VOIX):"CN(VOIX):VBLOC:DBLOC:FBLOC:|VOIX:(<:"CN(VOIX)CN:VOIXVX:|VOIX8"CN(VOIX)"NN(VOIX)DBLOC"CN(VOIX):VBLOCVOIX:FBLOCFBLOCDBLOCFBLOC"NN(VOIX) (<:(: ---> End block& VBLOCVOIXVBLOCVXVOIX:VOIXVBLOC:CN"CN(VOIX):"CN(VOIX):VBLOC:DBLOC:FBLOC:|VOIX:(<:"CN(VOIX)CN::VOIXVX:|VOIX8 "CN(VOIX)"NN(VOIX)~ FBLOC"CN(VOIX):VBLOCVOIX:DBLOCDBLOCFBLOCDBLOC  k---> Erase block4 lVBLOCVOIXVBLOCVXVOIX:VOIXVBLOC:CN"CN(VOIX):"CN(VOIX):VBLOC:DBLOC:FBLOC:|VOIX:(<:"CN(VOIX)CN::VOIXVX:|VOIX:(:H qVBLOC:DBLOC:FBLOC: ϊ---> Copy blockF ТVBLOCDBLOCFBLOC:f բVOIXVBLOC("CN(VOIX)DBLOC"CN(VOIX)FBLOC):Z DFBLOCDBLOC:"NN(VOIX)D: ߝX"NN(VOIX)"CN(VOIX):%TNOTE(VOIX,XD)%TNOTE(VOIX,X):X "NN(VOIX)"NN(VOIX)D:VOIXVBLOCDBLOC"CN(VOIX)DBLOCDBLOCD:FBLOCFBLOCD XD:%TNOTE(VOIX,"CN(VOIX)X)%TNOTE(VBLOC,DBLOCX):X (<:(:!3---> Delete blocF!4VBLOCDBLOCFBLOC:$!9VOIXVBLOC:!>DFBLOCDBLOC:"CN(VOIX)FBLOC"CN(VOIX)"CN(VOIX)D"CN(VOIX)DBLOC"CN(VOIX)DBLOC!CXDBLOC"NN(VOIX)D:%TNOTE(VOIX,X)%TNOTE(VOIX,XD):X!H"NN(VOIX)"NN(VOIX)D:$PAGE(VOIX)(,DBLOC):"CN(VOIX)("NN(VOIX),DBLOC)V!MVBLOC:DBLOC:FBLOC:(<:(:!---> Transpose bloc!F!VBLOCDBLOCFBLOC: Tools2#(:'B:#,#,$T#-#---> Make tremolo(#CENVDTREM:##---> Make enveloppe#CENVDENV<#N:,,,P,,:#,(YGR): 0;:,(YGRTGR): 8;:,(YGRTGR):15;#(XGR),(YGR):A0 1 2 3 4 5 ;:T$(;);"# , :T$(=)#YY: , YY:YY;:XX:XX, YY:\;:XX:YYV#X:,X:T$(@X):X*#):+:*0#:S$::+\::XX, YY: ;:XX, YY#A$:S #A$##A$(A$)|#ȢA$():N:CENVDENVCENV:DTREMCENV:f#͢A$ CENV*:#*:#"#ҢA$( )$~#עA$()(S$): ;::S$(S$,(S$)):##d#ܢA$()(S$)S$S$A$:A$;:#`#SH:+\:YYYY:###SP:+\:YY$TENV(CENV,YY,)$TENV(CENV,YY,)YY:##p#SK:+\:XX:XX#XX:#p#SM:+\:XX:XX#XX:#V#S;CENVCENVCENV:#V#S<CENVCENV1CENV:###d$A(S$):A(S$)A(S$)A$'T$ XXAAd::#T$XXAA::#T$XXAA::#2$YY::#P$$TENV(CENV,YY,XX)A::+\:*0$"+:#2$'XX::$6V$,(S$,)(T$(>),,)A:$V$1(S$,)(T$(?),,)A:$$6::$*$S---> Default enveloppes and tremolos($T)h:R$YZZ:YY:XX:$TENV(ZZ,YY,XX):XX:YY:ZZ|$^62 :<CENV:0N:X,Y,Z:XH$m$c$TENV(CENV,N,)X:$TENV(CENV,N,)Y:$TENV(CENV,N,)Z:XeN$hCENV$m94p$rrCENV1:fN:X,Y,Z:X~$$w$TENV(CENV,N,)X:$TENV(CENV,N,)Y:$TENV(CENV,N,)Z:XeN$|CENV*$DENV:DTREM:'---> Activate voice XP'|VOIX:::T$(')(VOIX) b'VOIXX:|VOIX:::T$(')(VOIX) :':,"CN(VOIX)$PAGE(VOIX):'A---> Stop cursors'B::CRS:'s---> Erase bank>'t()()(),:(),IWZ'yADB():ADB ADB , 0'~LBANK  ''׊---> Erases voicez'%TNOTE(VOIX,):"NN(VOIX):$PAGE(VOIX):"CN(VOIX)X'ݢVBLOCVOIXVBLOC:DBLOC:FBLOC '(<:(:(;---> Displays page6(<O~:|VOIX:'B::|(AX$PAGE(VOIX)($PAGE(VOIX) ,"NN(VOIX)):(:):X(F(n'B:X$PAGE(VOIX)($PAGE(VOIX) ,"NN(VOIX)):(:):X(s($PAGE(VOIX) ,"NN(VOIX))"NN(VOIX)X"NN(VOIX)$PAGE(VOIX) :OL:X(x((---> Find note name caracteristics (X"CN(VOIX)H(Y%TNOTE(VOIX,X):Y((CNOTEY:CNOTERCOCT(CNOTE) :CNOTE(CNOTE) CNOTE :COCT4(CLONGY:LABEL:(YY:LABELY:YY:PARAM1Y:YY:PARAM2Y:&)---> Print note number and nameR)VOIXVBLOCXDBLOCXFBLOC)X"CN(VOIX)X"NN(VOIX),X$PAGE(VOIX):####: ;X;:,X$PAGE(VOIX):"OL:O:) ,X$PAGE(VOIX):LABEL####: ;X;~~~~ ;T$(CNOTE);COCT; ;T$(CLONG );();:"OL:N:)OL:OG:####: ;X;T$(LABEL);:LABELLABEL();:\)PPARAM1:LABEL LABEL PP<)(P);:LABEL ();:*),;PARAM2;();:)g---> Confirn)hN:,, ,(,,:::,:C1:T$(.):::C3:s,,:,:s,,)m,(),()(),():,(),()('),())rOZ:p:Z():ZZZOZZ,:s,,:(Z),:s,,:OZZD)w:()RR:,)|:&N:::0)ˊ---> Draw Enveloppe/tremolo editor screen)̠::CENVT$(9)(CENV) T$(:)(CENV) Z)ѝYY:XX:+\:XX:YY$)XX:YY:*/---> Draw ENV/TREM curvef*0,,::XGR,YGRTGRXGR,YGR*5,,,::XGR,YGRXGR,YGRTGR:XGR,YGRXGR,YGR*:XGR,YGR:N:Y:CV:D$TENV(CENV,N,):CN$TENV(CENV,N,):V$TENV(CENV,N,):VdX*?X:CVCVV:CV*bV*DCVCVd:YYD:YY(*IYY *NCN*b**SCN:CN*b(*XN:N *g*]D$TENV(CENV,N,):CN$TENV(CENV,N,):V$TENV(CENV,N,):Vd*g>*bXGRX,YGRYTGR:X:6*gXGRX,YGRYTGR:*---> Plays enveloppe*A$:::::2,:Y:N:CV:D$TENV(CENV,N,):CN$TENV(CENV,N,):V$TENV(CENV,N,):Vd*8*CVCVV:CV*V*CVCVd:YYD:YY(*YY**Y:CN***CN:CN*(*N:N **D$TENV(CENV,N,):CN$TENV(CENV,N,):V$TENV(CENV,N,):CV:V*ƛVN:*<*:A$:S:A$*"*Ơ:,::*---> Plays tremolo*A$:: :::()8:Y:Y1Y:Y2Y:X:(X)Y1:(X)Y2:X:N:CV:D$TENV(CENV,N,):CN$TENV(CENV,N,):V$TENV(CENV,N,):Vd+*8*CVCVV:CV+^+CVCVd:YYD:YY(+YY+ Y1Y:Y2Y:X:(X)Y1:(X)Y2:X:CN+*+CN:CN+(+N:N +*+D$TENV(CENV,N,):CN$TENV(CENV,N,):V$TENV(CENV,N,):CV:V*ƛVN:+<+:A$:S:A$*"+*:,::&+[---> Displays SPEED/STEP/NUMBER+\XX, YY:X$TENV(CENV,YY,XX):XXXXT$(>);:T$(?);:*+aX;(%XX);:$+---> Cleans env/tremolo arrayn+X1XX:Y1YY:ZZ::YY:ZZ+l+Ţ$TENV(CENV,YY,)$TENV(CENV,YY,):+\+ʢ$TENV(CENV,YY,)dZZ:XX:$TENV(CENV,YY,XX):+\:XX+Ϙ++ԝXX:$TENV(CENV,YY,XX)$TENV(CENV,YY,XX):+\+قXX0+ނYY:XXX1:YYY1:,#---> Select musicsd,$N:,,,(,,::C3::::T$(D)f,)X:Y:,V:Y:X:X ,.\,3X1:XM:XM()XM()X1F,8XM()XM()X1\,=Y1(())():Y1Y1Y12,BXX1YY1,GF,C:,V:XX1:YY1::,V,G~,LXY(XY)RRXY,,Q:C1::N:F,VXY(XY),[NXY:(ADBN)A$:Z:A$A$((ADBNZ)):ZA$ Z,`X,Y: ## : ;N;A$; ;:.,---> Find start and end address of musicL,X(ADB(R)):X,f,ADADBX:X AFADBLBANK:,,XR :Y(ADB(X)):YAFADBY:,*,X:AFADBLBANK ,LBAFAD:,XR :Y(ADB(X)):YADADBY:,*,X:ADADBLBANK&,AFAD:LB:,---> Input music name8,N:, , ,<,,*,::,:T$(F)|,,:T$(G);::NOM$:(NOM$)NOM$NOM$((NOM$))~,NOM$(NOM$,): X:(NOM$,X,) X:: ,-:&N:-O---> Alarm!>-PN:, , ,<,,::B-U,:T$(T):,:T$(J)"-Z:w::N:`-N:,, ,,, ::::,:T$(H)-N---> Erase / draw stave`N ,,XSTAVE,,:,,XSTAVE,,N%C3:YYSTAVEYSTAVE :XSTAVE,Y,Y:XSTAVE,Y0,Y0:YnN*,XSTAVE,YSTAVE0,:::,XSTAVE,YSTAVE,::N/N--> Stave -> string~NSTAVE$(,XSTAVE,,)::C1::|:|:|:|VOIX:N--> String -> stavefN(,XSTAVE,)STAVE$:(,XSTAVE,)STAVE$::C1:NXN(X$PAGE(VOIX)) XSTAVE0:YN$OCTY(COCT)$NTEY(CNOTE):CNOTE O3:NSN$NTET(COCT)$NTEL(CLONG)NYN,XN,YSTAVEDST,:::YN,XN,YSTAVEDST,::TNYN ,XN,YSTAVE DST,::NYNY((YN)):,XN,YSTAVEYDST,:::YPO,XN,YSTAVEYNDST,SN::jO$NTED(CNOTE),XN,YSTAVEYNDST,::jO $NTEP(CLONG),XN,YSTAVEYNDST,::,OCOCTCOCTOCOCTYYSTAVEDST:COCT S:O.S:O.8OYYSTAVE DST:S6O.,XN,Y,S:::\O3,XN,YSTAVEDST,$NTEL(CLONG)::\O8,XN,YSTAVEDST,$NTEL(CLONG)::O=$NTEP(CLONG),XN,YSTAVEDST,:::,XN,YSTAVEDST,::OB:rOG,(X$PAGE(VOIX)) XSTAVE0,YSTAVEDST,:::OLXN(X$PAGE(VOIX)) XSTAVE0:,`,,,,XN,:,`,,,,XN,:O~XXSTAVE0X :,`,,,,X,:,`,,,,X,:XOOCRS~XN(X$PAGE(VOIX)) XSTAVE0:,XN,YSTAVE DST,:OP---> Scroll lefthP,XST160 ,,,YSTAVEDST,XST160,PP}Pw---> Scroll rightPx,XST160,,@,,XST160 ,:,`,,,,XSTAVE0,PP},XST160,,,,XST160,PO---> English menus.HP STOS , BANK , MUSIC , BLOCK , TOOLS pU, About MUSIC! ,, ,, Quit,, Quit and grab,Z, Load music bank,, Save music bank,, Save as ...,, ,, Grab from program,, ,, Erase music bank,$_ , NEW music,, RENAME music ,, ,, PUT music,, GET music,, APPEND music,, ERASE music ,, ,, PLAY music,, PUT and PLAY,, ,, PRINT music,d, Start block,, End block,, Cancel block,, ,, Copy block,, Erase block,, ,, Transpose block,`i, Fix envelopes,, Fix tremolos,, Default env/trem ,ó---> Menu FrancaisLô STOS , BANQUE , MUSIQUE , BLOC , OUTILS ~ù, A propos de MUSIC,, ,, Quitter,, Quitter/rcuprer,þ, Charger une banque,, Sauver la banque,, Sauver comme ...,, ,, Copier d'un pgm,, ,, Effacer la banque,Fà , NOUVELLE musique ,, RENOMER musique,, ,, STOCKER musique,, PRENDRE musique,, AJOUTER musique,, EFFACER musique,, ,, JOUER musique,, STOCKER et JOUER,, ,, IMPRIMER musique,Ƞ, Debut bloc,, Fin bloc,, Annuler bloc,, ,, Copier bloc,, Effacer bloc,, ,, Transposer bloc ,f͠, Fixer enveloppes ,, Fixer trmolos ,, Effacer env/trem ,7 ---> English messages~8C,C#,D,D#,E,F,F#,G,G#,A,A#,B,PA,TN,SN,EN,EN.,QN,QN.,HN,HN.,WN,WN.,END,MUSIC, NOISE ONLY, NOISE OFF,NOISE, NTREMOLO OFF, ENVEL OFF, TREMOLO OFF,VOLUME,NTREMOLO,ENVEL,TREMOLO,REPEATF=> Current music <, > Block <,> Under cursor <B Voice, , , ,Voice,,, to,ABANDON CONFIRM,Grabbing bank from program #1 , SET TEMPO, Old tempo:\G New tempo ,TRANSPOSE BLOCK,&Input number of HALF TONES (-12 to 12)xL MUSIC EDITOR , Part of the Stos basic , By Francois Lionet , Copyright 1988 JAWX/MANDARIN XQ EDITING ENVELOPE NUMBER, EDITING TREMOLO NUMBER,seconds,SzV@PHASE \ SPEED (1-100) \ STEP (-16 to 16) \ NUMBER (0-255), END , LOOP [=F1: previous - - F2: next - - quit - - to hear,8 to select phase - - to valid parameter,7Type 'END' or 'LOOP' in speed column to end definition.,-A 'NUMBER' of zero stands for infinite phase.`Please click a music:,&Input number (1-64, to quit) ,CURRENT NUSIC NAME,Enter name (8 letters max) NeA moment please.,The memory bank is FULL!, Press any keyjTOO MANY ENVELOPES OR TREMOLOS!,!To get this music, you must first,)erase some of the enveloppes or tremolos.o Playing: ,A to quit / <+> & <-> set tempo / & <*> set transposition,/ restarts music / : step by step mode,;Once in step by step mode, any other key returns to normal.,Tempo:,Transposition:,Normal, Step by stept? LOAD MUSIC BANK File name must end with .MBK!,This bank is not a MUSIC bank!, DISK ERROR!,? SAVE MUSIC BANK File name must end with .MBK!,Music banks present in memory:,Program , , length:,No music banks in memory!,Enter program number ,Press any key to end...,Printer is not ready!, Current music : ,ǜDO,DO#,RE,RE#,MI,FA,FA#,SOL,SOL#,LA,LA#,SI,PA,TC,DC,SC,SC.,NR,NR.,BL,BL.,RD,RD.,FIN,MUSIQUE, BRUIT SEUL, STOP BRUIT,BRUIT, STOP TREM B, STOP ENVEL, STOP TREMOLO,VOLUME,TREM B,ENVEL,TREMOLO,REPETERJǡ> Musique actuelle <,> Bloc <,> Sous le curseur <Ǧ Voix, , , ,Voix,,, ->, ANNULER CONFIRMER,$ Je copie la banque du programme #1 , FIXER TEMPO, Ancien tempo:^ǫ Nouveau ,TRANSPOSER LE BLOC,(Entrez le nombre de DEMI TONS (-12 a 12)ǰ EDITEUR MUSICAL , Accessoire du Stos basic , Par Francois Lionet , Copyright 1988 JAWX/MANDARIN Tǵ EDITION DE L'ENVELOPPE, EDITION DU TREMOLO,secondes,S|Ǻ@PHASE \ VITESSE (1-100) \ PAS (-16 a 16) \ NOMBRE (0-255), FIN , BOUCLE ǿDF1: prcdent - - F2: suivant - - quitter - - couter,E pour selectionner la phase - - valide le paramtre,=Taper 'FIN' ou 'BOUCLE' dans la colonne vitesse pour terminer,2Un 'NOMBRE' gal zro signifie une phase infinienĠCliquez une musique SVP:, ,NOM DE LA MUSIQUE EDITEE:,Entrez le nom (8 lettres) dɠQuelques instants SVP.,La banque mmoire est pleine!,Appuyez sur une toucheΠ!TROP D'ENVELOPPES OU DE TREMOLOS!,+Pour pouvoir prendre cette musique, effacez,(quelques uns des tremolos ou enveloppes!(Ӡ En train d'tre jou: ,CESC pour sortir, + et - rglent tempo, / et * rglent transposition,5S redmare la musique, ESPACE passe en mode pas pas, CHARGER UNE BANQUE DE MUSIQUE Le nom doit finir par .MBK!,-Cette banque n'est pas une banque de musique!,Erreur de disque!,> SAUVER LA BANQUE DE MUSIQUE Le nom doit finir par .MBK!,Banques de musique en mmoire:, Programme:, , longueur:,1La mmoire ne contient pas de banque de musique !,Entrez le numro du programme ,Presser une touche pour arreter,L'imprimante n'est pas prete!, Musique editee : ,---> Default tremolosf d,,, ,,,,,, ,,,,,h%d,,,2,,, ,,,2,,,,,h*d,,,d,,,,,,2,,,,,@/d,,,d,,,,,@4d,,,d,,,,,9d,,,d,,,d,,,d,,,d,,,d,,,,,@>d,,,d,,,,,fCd,,,2,,, ,,,,,,,,H,,Rd,,,d,,,d,,,,,R 2,,,2,,,2,,,,,Rd,,,d,, ,d,,,,,Rd,,,d,,,d,,,,,Rd,,,d,,,d,,,,,,!2,,,,,@&d,,,d,,,,,R+2,,,2,,,2,,,,,0,,Պ֊---> Data staves׊8ؠ,,, ,, , , P٠,,,,,,,,,,,Dݠ,,,,,,,,,D⠦,,,,,,,,,<砦,,,, ,,,P젦,,,,,,,,,,,6 rPALTfpp 0PU33ss77w ` @`8X0 P b t     . F L(?9xￏ}   88pp==Ƈ@p@p@p@p pppp??||8888gk0H$L$~g0H$ ~0~~<<~<<~~?=:6,6-3~?=>><:6-3~?=>>>>>=93~????????????~<<????????????~<<~~?0q 0?0 0?0` 0???? ?$'wppppvfvfffff83028̀̀ffffff?p8?8pffff???`000`00D7&!0% % X% % %  @% % h% % % $  P  $    0  T      0 HP0?FFCCa??      888pp==ƇƇ@p@p@p@p@0  ppppAAAAAAAA||88x<p 11?????????? 00880011??????????!!00888888880011?????????????????????????????????????????????????????????????????????????????qaas???80`0`8????????11 ??????????11008800 ??????????11008888888800!!?????????????????????????????????????????????????????????????????????saaq???80`0`8pp??00qq 00??``pp 00``@??  00`` 00``0 <<xx88<<pppp88 ???? ??$$``eUUTUUT `00` ` 00 `UU@??????????`p000000``0000Op0000%&'()+-/1TYCARTYMAX(TXMAXNBPLANPALET>f>f>f>f>f>f>f>f>f>f>f>f>f>f>f>f>f>f>f>f>f>fCURINKENCREZMY2ZMXSPRYSPRXTY(TXMULYMULXTRANSPTYCARTYMAX(TXMAXNBPLANPALETZMY2ZMXSPRYSPRXTYTXMULYMULXTRANSPTYCARTYMAX(TXMAXNBPLANPALETDJDJDJCURINKENCREZMY2ZMXSPRYSPRXTYTXMULYMULXTRANSPTYCARTYMAX(TXMAXNBPLANPALETEEEEEEEEEEEEEEEEEEEECURINKENCREZMY2ZMXSPRYSPRXTYTXMULYMULXTRANSPTYCARTYMAX(TXMAXNBPLANPALETwrwrwrwrwrwrwrwrwrwrwrwrwrwrwrwrwrwrwrwrwrwrwrCURINKENCREZMYdZMXSPRY,SPRXTYTXMULYMULXTRANSPTYCARTYMAXPTXMAXNBPLANPALETxrxrxrxrxrxrxrxrxrxrxrxrCURINKENCREZMYdZMXSPRY,SPRXTYTXMULYMULXTRANSPTYCARTYMAXPTXMAXNBPLANPALETrrrrrrCURINKENCREZMYdZMXSPRY,SPRXTYPTXMULYMULXTRANSPTYCARTYMAXPTXMAXNBPLANPALETrrrrrrrrrrrrrrrrrrrrrCURINKENCREZMYdZMXSPRY,SPRXTYTXMULYMULXTRANSPTYCARTYMAXPTXMAXNBPLANPALET%%%&&&H&H(ROUTINESTLx@l4 ` ( $XPAL&OLDINK&CURINKSPRMAXNBLionpoulos}8( ********************************( * *( * SPRITES DESIGNER *( * *( * By Francois Lionet *( * (c) Jawx/Mandarin 1988 *( * *( ***********29/3/1989************ VERSION$1.02SPRMAXNBH&CURINK(),&OLDINK(),$XPAL(),(ROUTINES(),&LEFTAD( ,),#RGB(),$RGBY(),#PAL(),T$( ),S$(SPRMAXNB),"HX(SPRMAXNB),"HY(SPRMAXNB),"TX(SPRMAXNB),"TY(SPRMAXNB),%ANIX1( ),%ANIY1( ),%ANIX2( ),%ANIY2( ),$ANIS(),$ANIV(),%ANISP(,),&ANISUP(),&ANICUR(),&ANIVIT(,),%ANIVV(),!P(),&ANIXSP(),&ANIYSP()::::,:I only work on a color monitor.:::&Use the other sprite editor in Hi res.:,:Sorry! Press any key.:w::j#,f,,::`uX:#PAL(X)(X):X:q:(ͦ:- SPRMAXBANKV: SPRMAXBANK:, :Not enough memory to work!:,:Press any key.:q,,f:w::2()()r::, :I lost my own sprites bank!:,:Press any key.:q,,f:w::J7()():r: Initialise variablesjd TXMAX@: TYMAX@: TX : TY : OLDTX: OLDTYXi XSPR: YSPR: ADSPR XSPR YSPRn XZOOM : |YZOOM: rTXZOOM: fTYZOOM: ZADZOOM XZOOM |YZOOMjs$ XPAL():$ XPAL(): NYPALT: DTXPAL : :TYPAL ^x 0XOP: (YOP: OPXT: OPYT>} XPAINT: YPAINT: TYPAINT RGBXP: RGBTX:$ RGBY():$ RGBY():$ RGBY(): RGBXT: RGBYT< BLOCSP : BLOCMX@: BLOCMY(F ADBLOC(())( BLOCSP)LP:f X:( :ROUTINES( X): Xt@8:g: Y :g1 X:& LEFTAD( Y, X): X: YL SELXT : SELYT: vSELY: lSELTY5: bSCRCODE$(D)(U)(5)(() TCODEPALPALT HANIHY vSELY::h X :% hANIX1( X), >Y1,% ANIX2( X), 6Y2:% &ANIY1( X) >Y1 HANIHY:% ANIY2( X) 6Y2 HANIHY: X .ANIXST: "ANIYST: ANIXTV!: ANIYTV:i Y:i] X:& ANIVIT( Y, X): X:% ANIVV( Y):& *ANIXSP( Y):& ANIYSP( Y)2: Yȴ::p(<+ > Initialise zones,0 Left boxes: 52-60j1js Y:4 Y,, Y,( Y): Y5 Rigth boxes: 62-796kR Y:kI X:> Y X, X, Y X, Y: X: Y: Palettes: 80/81j;P,$ XPAL(), NYPAL$ XPAL() DTXPAL, NYPAL :TYPALj@Q,$ XPAL(), NYPAL$ XPAL() DTXPAL, NYPAL :TYPAL4D Sprite arrows: left 82/right 83/up 84/down 85FER,,,@:S,0,?,@vJT,,0, YSPR:U,, YSPR TYMAX0, YSPR TYMAXLN Storage arrows TOP: 86/87 - middle 88/89 - bottom 90/91 - storage 92FOV,,,:W,,,FPX,,,:Y,,,FQZ,,,:[,,,&R\,,,S Zoom: 50VT2, XZOOM, |YZOOM XZOOM rTXZOOM, |YZOOM fTYZOOMX Sprite: 51LY3, XSPR, YSPR XSPR TXMAX, YSPR TYMAX:& CURINK():& CURINK() OP TYPEFILL8 OLDZ: NOJUMP: MENNB< BLOCON: BLOCOP: HOTNB: SPRNB: SPRCUR: TMEN0 ~FILEPAL: rFILENAME$H dFLGDEB:y*b: dFLGDEB: OLDGET > Scrollings6,,\,,,4,,\,,,6,,\,,,4,,\,,, > AUTO GRAB yF%NP:LB(NP,):LBX*AB(NP,):FBABLB:(AB)</*:T$()GRABBING:*4LB SPRMAXBANK:*:T$() Not enough:T$()memory:T$()to grab!:*::9NS(AB):NSSPRMAXNB:*:T$()Too many:T$()sprites!:*::>DMIDHI(AB )(AB):NSMID(AB):NSHI(AB):AOTHER(AB)AB:ABABCADAB:NSOPXT,OPYT:Out of;NS:NNS:OPXT,OPYT:Number;N;:IX(AB):IY(AB):"TX(N)IX:"TY(N)IY:"HX(N)(AB):"HY(N)(AB):S$(N)SCRCODE$ (IXIY):(S$(N)),IX:(S$(N)),IY:AAD(AB)IXIY:A,AIXIY(S$(N)):ABAB:N:SPRNBNSH(AB)CODEPALABAB:X:#PAL(X)(AB):ABAB:XMAOTHERFB(NSMIDNSHI)OTHER$(FBAOTHER):AOTHER,FB(OTHER$)^RX:X,#PAL(X):X:,$:,o > Title2 MENNB: OP:x*04:, XSPR, YSPR,::::() ADSPR:() ZADZOOM:()( ):():():()@:()@::()::,, XSPR, YSPR XSPR@, YSPR@D,::::Version ; VERSION$;,:-: DRIVGRABI: DRIVGRAB: DRIVPIC: DRIVSAVE: DRIVBACK: |PATHBACK$ A$: nPATHGRAB$ A$: `PATHGRABI$ A$: PPATHPIC$ A$: BPATHSAVE$ A${::{:< OLDTX:q (n:_': (ފ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ߊ MAIN SCREEN( ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ > PlotB *REDO: OP:r2(: SPMOUSED6:|:e.'t: KM:Z26&CURINK(KM)::,,:XZOOMIZOOMXS,YZOOMIZOOMYSXZOOMIZOOM(XS),YZOOMIZOOM(YS):XSPRXS,YSPRYS:XZOOMIZOOMXS,YZOOMIZOOMYSXZOOMIZOOM(XS),YZOOMIZOOM(YS):XSPRXS,YSPRYSVOLDXSXS:OLDYSYS:OLDKMKM:UNDOFLGK > DrawHLOP:(:LINEDRAW:SPMOUSEQ(<:REDO.V:'t:KM:REDO~[X1XS:Y1YS:UNDOFLG:UNDO$(,XSPR,YSPRXSPR@,YSPR@) `Xb ,,,dTX,dTY:( ,,d)SP$re,,,:FIL1,FIL2,::&CURINK(): :LINEDRAWg: ,,d,TX,dTY,XSPR,YSPR: ,,d,TX,dTY,XSPR,YSPRjj':'t:OLDXSXS:OLDYSYS:OLDKMKM:KM6oDXX1XS:DYY1YS tXy ,,,dTX,dTY:( ,,d)SP$x~,,,:FIL1,FIL2,::&CURINK(): :LINEDRAW: ,,d,TX,dTY,XSPR,YSPR: ,,d,TX,dTY,XSPR,YSPRd':'t:OLDXSXS:OLDYSYS:OLDKMKM:KMHKM(n:':::Q2(<:UNDOFLG:t@X1,dY1XS,dYS:PXSDX,dYSDYXS,dYS:  > BoxTOP:(:LINEDRAW:SPMOUSE:QBX1,dY1XS,dYS:RXSDX,dYSDYXS,dYS: > CercleTOP:(:LINEDRAW:SPMOUSE:QVR(XSX1):X1,dY1,R,,:JXSDX,dYSDY,R,,:w > EllipseTxOP:(:LINEDRAW}:SPMOUSE:Qz}RX(XSX1):RY(YSY1):X1,dY1,RX,RY,,:RXSDX,dYSDY,RX,RY,,:ۊ > Clear spriteܙ*:T$()CLEAR :T$()Confirm!:*:+\: , :*5R,,XSPR,YSPRXSPRTX,YSPRTY:,,XSPR,YSPRXSPRTX,YSPRTY:'"(ROUTINES(OP)? > PaintB@REDO:OP:(:SPMOUSE>E:'t:KM:Z2ElJB:UNDOFLG:UNDO$(,XSPR,YSPRXSPR@,YSPR@)lK(XSPRXS,YSPRYS)BB&CURINK(KM)B:KxL,,,:B:::XSPR,YSPRXSPRTX,YSPRTYO&CURINK(KM):FIL1,FIL2,:XSPRXS,YSPRYS:'::XSPR,YSPRXSPRTX,YSPRTYdT:':,XSPR,YSPR,XSPR@,YSPR@,XSPR,YSPRYE > Set paint upDTYPEFILL:TYPEFILLTYPEFILL$  > Set Paint downDTYPEFILL:TYPEFILL$TYPEFILL"  X: Y:: ,FIL1: "FIL2 TYPEFILL: TYPEFILLFIL1:FIL2TYPEFILLZ ,FIL1, "FIL2,: XPAINT, YPAINT?, YPAINT TYPAINT:k > Filled boxTlOP :(:LINEDRAWq:SPMOUSE :QBqX1,dY1XS,dYS:RvXSDX,dYSDYXS,dYS:ϊ > Filled circleTOP :(:LINEDRAW:SPMOUSE :QHR(XSX1):X1,dY1,R:<ڠXSDX,dYSDY,R:3 > Filled ellipseT4OP :(:LINEDRAW9:SPMOUSE :Qn9RX(XSX1):RY(YSY1):X1,dY1,RX,RY:F>XSDX,dYSDY,RX,RY: > UNDO6MENNBMENNB8OPSAVEOLDOP:OP :("REDO(nfUNDOFLGUNUNDO$(,XSPR,YSPRXSPR@,YSPR@)B,,XSPR,YSPRXSPR@,YSPR@UNDOFLG(,XSPR,YSPR)UNDO$:SP$UNDO$(,XSPR,YSPR)UNUNDO$:SP$UNUNDO$OLDTX:OLDTY:':,XSPR,YSPR,XSPR@,YSPR@,XSPR,YSPRLUNDOFLGUNDOFLG::OPOPSAVE:(:: > REDUCE`OP :(:SPMOUSE:REDO:(<:FLINK, UNDOFLG::'t Z2  (n:FLINK:::XSPR,YSPRYSXSPRTX,YSPRYS:XSPRXS,YSPRXSPRXS,YSPRTY:':FLINK(FLINK) KM:*  :( ,,)SP$ X@TX:YTY: ,,,(,XXS),(,YYS):,,: :::XXS,F,2:,YYSF,2:  ,,,TX,TY,XSPR,YSPR: ,,,TX,TY,XSPR,YSPR:':(< $  _ > ZOOMN `OP:(:SPMOUSE:REDO:(<R eUNDOFLG::'t:KM:KM e j:: o't> tKM(n:': e yZ2 o ~ :( ,,)SP$: ,,,TX,TY ,@,@,@TXXS,@TYYS ,@,@,@TX,@TY,XSPR,YSPR: ,@,@,@TX,@TY,XSPR,YSPR:' KM( (<::: e Ê > Flip8 OPSAVEOLDOP:OP:( ɼ()ADSPR:()( )dP:()TX:()TY:(): Θ 28 (OPSAVEOLDOP:OP:( -YTY:,XSPR,YSPRY,XSPRTX,YSPRY ,,dTYY:Y 2 ,,d,TX,dTY,XSPR,YSPR: ,,d,TX,dTY,XSPR,YSPR:' 7(<::( <OPOPSAVE:(: > Rotate^ OPSAVEOLDOP:OP:(:TXTY: 7 ()ADSPR:()( )dP:()TX:()TY:(): ,,d,(TX,@),dTY,XSPR,YSPR: ,,d,(TX,@),dTY,XSPR,YSPR:' 7 > Left palette Z:  > Right palette Z\ X(XM$XPAL(Z))TXPAL:Y(YMYPAL)TYPALD  X X Y Yd & CURINK( FZ) Y X:& CURINK( FZ)& OLDINK( FZ) h ,,,:: @I& OLDINK( FZ): :J& OLDINK( FZ) ::$ XPAL( FZ) @I DTXPAL, NYPAL :J :TYPAL$ XPAL( FZ)( @I) DTXPAL, NYPAL( :J) :TYPAL :$ XPAL( FZ) X DTXPAL, NYPAL Y :TYPAL$ XPAL( FZ)( X) DTXPAL, NYPAL( Y) :TYPAL::,, NYPAL,@, NYPAL :TYPAL,, NYPAL:h & OLDINK( FZ)& CURINK( FZ): MENNB 4FLG::   > Left sprite arrowR ,XSPR,YSPR,XSPRTX,YSPRTY ,,dX ,XSPR,YSPR,XSPR,YSPRTY ,TX,d ::V ǐ ,,d,TX,dTY,XSPR,YSPR:'J ̐ ,,d,TX,dTY,XSPR,YSPR љ(<:  > Right sprite arrowR ,XSPR,YSPR,XSPRTX,YSPRTY ,,d` !,XSPRTX,YSPR,XSPRTX,YSPRTY ,,d& & ::: , @BY16XMXM  > Up sprite arrowR ,XSPR,YSPR,XSPRTX,YSPRTY ,,dX ,XSPR,YSPR,XSPRTX,YSPR ,,dTY& :::  > Down sprite arrowR ,XSPR,YSPR,XSPRTX,YSPRTY ,,d` ,XSPR,YSPRTY,XSPRTX,YSPRTY ,,\& :::  G > Fix X/Y size HM:):MENNB:)h:*:T$()Fix size:*:OPXT,OPYT: X :;TX:OPXT,OPYT: Y :;TY;:NOJUMP. M):REDO:(<. R't:KM v WZ3 R \X(,(XMXSPR)):YYMYSPR:X@YY@(XTXYTY) R aTXX:TYY:OLDXSXM:OLDYSYM:,,XSPR,YSPRXSPR@,YSPR@:(,XSPR,YSPR)SP$^ fTX@,,XSPRTX,YSPRXSPR@,YSPR@^ kTY@,,XSPR,YSPRTYXSPR@,YSPR@ p,XSPR,YSPR,XSPR@,YSPR@,XSPR,YSPR::OLDTX:':# uOPXT,OPYT: X :;TX; ;:OPXT,OPYT: Y :;TY; ;:OPXT,OPYT: SMALL=FAST;: R0 vM:TMEN:)2 zMENNB:*0:NOJUMP ):(<> OLDOP(ROUTINES(OLDOP)  > REDUCEP M:TMEN:CXTX:CYTY:) CX:XXSPRXSPRTX:(X,YSPR)X: :CX:CX CY:YYSPRYSPRTY:(XSPR,Y)Y: :CY:CY0 M:TMEN:) M > Set RVB M:):MENNB:)h:*:T$() Set RGB :*:NOJUMP:REDO` ,,,,Ȁ,,: ,,,,Ȁ,, ::RGBXT,RGBYT:R:;:RGBXT,RGBYT:G:;:RGBXT,RGBYT:B:;* OLDC:OLDCP. OLDC&CURINK() b ::::OLDC&CURINK():,,:OLDC:: Š,,:,, RGB(OLDC):#RGB()(RGB):#RGB()(RGBp):#RGB()RGBn ϝY:RGBXT,RGBYTY:(#RGB(Y)) :Yz ԝX:X,RGBXRGBTX#RGB(X),$RGBY(X), :X:. ٙ't:KM h ڢZ2CPOINT(XSPRXS,YSPRYS)CPOINTOLDC ܢCPOINTOLDCPOLDCPCPOINT:Z:XCPOINT:YCPOINT:FLG: :FLG:&CURINK()OLDCT ݢKMZ2&CURINK()CPOINT: KM F X(,,):X Z C:(C,X)C: V X(XMRGBX)RGBTX:XX  C,XM,$RGBY(C), :#RGB(C)X:RGBXT,RGBYTC:(#RGB(C)) ;:C#RGB()#RGB()#RGB():#PAL(OLDC)C:OLDC,C ::  End of set RGBZ M:TMEN:):X:X:X, : ,,,,Ȁ,,: ,,,,Ȁ,,:,$:,o z RGB undo M:TMEN:)::M:TMEN:):OLDC,RGB:OLDC: ( ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ STORAGE ARROWS( ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~0DX:S:.DX:S:0 DX: S:(. DX: S:(0 DX: S:(" DX: SV S DX SPRCUR:,$:,o:Z S DX SPRCUR SPRNB:,$:,o:D SPRCUR DX SPRCUR DX SPRNB^ SPRCUR SPRCUR DX:,$: S,o::$DX,,SELY,,SELYSELTY ,P,: ,,SELY,`,SELYSELTY ,,:X1P:X2:ST)DX,,SELY,,SELYSELTY ,,: ,P,SELY,,SELYSELTY ,,:X1:X2P:ST8.:XXX1X2ST:3 ,XX,,XX,SELTY,,SELY::,,SELY,,SELYSELTY,,SELY8XX:=( ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ BLOCS( ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ZM:):REDO:NOJUMP:REDO:)ъ > Return to main menuRM:)::REDO(n:'ט z Set bloc center > Draw with bloc$BLOCONh$:REDO (<4:'t:KM Z2"X ,,,dTX,dTY:( ,,d)SP$: : BLOCOP,,::XSBLOCHX,dYSBLOCHYXSBLOCHXBLOCX2BLOCX1,dYSBLOCHYBLOCY2BLOCY1l:,XS,dYS, ::::::,XM,YM,: ,,d,TX,dTY,XSPR,YSPR: ,,d,TX,dTY,XSPR,YSPR:'L"OLDXSXS:OLDYSYS:OLDKMKM:KM' g > GET BLOC.hBLOCON:$:)m(<:REDO>r:'t:KM:KMFwX1XS:Y1YS:BLOCINK:REDO4|:XSX1X2XS,YSY1Y2YSX ,,,dTX,dTY:( ,,d)SP$v,,,::BLOCINK: :X1,dY1X2,dY2: ,,d,TX,dTY,XSPR,YSPR: ,,d,TX,dTY,XSPR,YSPR<':BLOCINK(BLOCINK)"'t:KM(nR,XSPR,YSPR,XSPRTX,YSPRTY ,,d6 : :::,,V,_X1,:X2,_,V,_,dY1:,dY2,h()ADBLOC,:()ADBLOC,:,d, ::vBLOCX1X1:BLOCX2X2:BLOCY1Y1:BLOCY2Y2:BLOCENT:=0BLOCON:BLOCOF񸣚fÐ,XSPR,YSPR,XSPRTX,YSPRTY ,,d: : :rĠ,,:&CURINK():X1,dY1X2,dY2::Ő ,,d,TX,dTY,XSPR,YSPR: ,,d,TX,dTY,XSPR,YSPR:'ƘǠˊ > Transparent/Opaque BLOCOP(BLOCOP)љ$֢BLOCONۘh&/ > Take away origin zone On/Off 0BLOCOF(BLOCOF)5$:BLOCON?h > Centre bloc2BLOCENT:=:5 > Bloc 12BLOCENT:=:5[ > Bloc 22\BLOCENT:=:5 > Bloc 32BLOCENT:=:5# Redraw left menu barf$ , : , ,, ,,,:MENNB %::&BLOCONMM@)):BLOCOPM:)2.BLOCOFM:).3MBLOCENT:)48:,,, ,,,:< Set bloc centerH=BLOCENTXBLOCX2:YBLOCY2H>BLOCENTXBLOCX1:YBLOCY1HBBLOCENTXBLOCX2:YBLOCY1HGBLOCENTXBLOCX1:YBLOCY2L()ADBLOC,X:()ADBLOC,Y:BLOCHXXBLOCX1:BLOCHYYBLOCY1:( ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~  GRAB FROM PROGRAM( ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~,M:):(<JS$:T$()GRAB PRG:*:*$MENNB:)h(:'t:KMxM:):S$:( ) :IMAGELD:FLAGBACK>X1:X:X: z > Select file nameFLGxM:TMEN:):-::DRIVGRAB:PATHGRAB$: #:\j:FILTER$.*:T$ GRAB FROM A PROGRAM:T:+ F$RFILEGRAB$F$:DRIVGRAB:-:PATHGRAB$A$NDGRAB:TXGRAB:TYGRAB:PFGRABLM:TMEN:):FLGP,_ ##::FILEGRAB$:PATHGRAB$:*:T$() Disc error:*::O > Grab from program@PM:TMEN:):FLG(UFILEGRAB$_:T$()Not:T$()enough:T$()memory!:*:*::Vd:: :IMAGELD:XGRAB0:YGRAB:-PLef:-:DRIVGRAB:PATHGRAB$:i fgg:::::,,,(,,:,: Change disk and press mouse key.:::::::@h-::DRIVGRAB:PATHGRAB$i:#,FILEGRAB$:()PFGRAB:S$((),):(S$,)(#,((),>))Zj()()(S$,>)(#,(>,()()))Zk()()(S$,})(#,(>,()()))m"sBON: TxXM:YM:KM:,XM,YM,::Z() }KM KMx.ZZxfZ,,,J,O,c,|,,,,,,,x > Loading error p:S$::*b:T$() Disk error:*:: > Save NEORFILTER$.NEO:T$ Save a NEO picture: > Save DEGASHFILTER$.PI1:T$ Save a DEGAS pictureL-::DRIVPIC:PATHPIC$: :::::,,,(,,:,: Change disk and press mouse key.:::::::J:DRIVPIC:-:PATHPIC$: ÎĿ\$Ǐ::::::hF$(*FILTER$,T$,):-:PATHPIC$A$:DRIVPIC ͢F$BҢ(F$,.)F$F$FILTER$2ע(F$,FILTER$).BON: :F$,LᏘ:DRIVGRAB:-:PATHGRAB$: 䤦:::::,,,(,,::,: Change disk and press mouse key.:::::::>变:DRIVGRAB:-:PATHGRAB$4揘::BON: :: > QUITS$:LMENNB:OLDTX:q::::*b":I > Reduce / increase TX"JDX:TODXlTTXGRABDXTXGRABDXTXGRABTXGRABDX: Yb > FULL&cTXGRAB: :{ > Up one/10 lines2|DTXGRAB :,DTXGRAB:,DTXGRAB:2DTXGRAB : D: D: D: D: DZDGRABDPFGRABDGRABDDGRAB: :PFGRAB(S$),(S$)}(S$)>:(S$)(S$)>,:PFGRABPFGRAB>:PFGRAB()rv:()PFGRAB:(S$,)(#,(>,()())):4DGRABDGRABD: :`̢DDGRABPFGRAB>DGRABDDGRAB: :0ѢPFGRAB()}֠(S$)>,(S$)(S$):(S$)}(S$),:PFGRABPFGRAB>:PFGRAB()ۏvl()PFGRAB}:(S$,})(#,(()(),>)):4DGRABDGRABD: :u > Load errorv:B::BON: : :::F:KM:KM:KM:srX1:Y1:X2X1:Y2Y1:,,,:::FLINKF:KM:XM:YM:KMs>XMX1X2(X1?,XM)>YMY1Y2(Y1?,YM)Ơ:FLINK:X1,Y1X2,Y2:: ,X1,Y1,X2,Y2,X1,Y1: ,X1,Y1,X2,Y2,X1,Y1lFLINK(FLINK):KM:IXX2X1:IYY2Y1VП:XM:YM:KM:KM::BX1XMIX:X1X1BY1YMIY:Y1Y1 ߠ:FLINK:X1,Y1X1IX,Y1IY:: ,X1,Y1,X1IX,Y1IY,X1,Y1: ,X1,Y1,X1IX,Y1IY,X1,Y1bFLINK(FLINK):KM:TXIX:TYIY`S$:,X1,Y1,X1TX,Y1TY ,,d(TX),,::: ::TX,d?,::TX(TX)NSP$( ,,dTX,dTY):#6MENNB:OLDTX:*b:$ > Draw screen and command box :()(S$)DGRABPFGRAB:():():()TXGRAB:()TYGRAB:v::TXGRAB:,,,:TXGRAB,TXGRAB,"BON%& ,,XGRAB,YGRAB ::XGRAB,YGRAB:FILEGRAB$:XGRAB,YGRAB:P:;DGRAB;:XGRAB ,YGRAB:W:;TXGRAB;%:::(m ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ n GRAB FROM PICTURE(o ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ pM:)Lu:REDO:NOJUMP:REDO:)(z:'t:KM,M:): zӊ > GRABRM:TMEN:):IMAGELD$ٙ(<:::::dޢIMAGEPAL( )::X:#PAL(X)(X):X\X:X,#PAL(X):X: : :<:KM:KM:KM88XM:BY16XMXMxX1XM:Y1:X2X1:Y2Y1:,,,:::FLINKF:KM:XM:YM:KM8>BY16XM((XM))>XMX1X2(X1?,XM)>YMY1Y2(Y1?,YM)FLINK:X1,Y1X2,Y2:: ,X1,Y1,X2,Y2,X1,Y1: ,X1,Y1,X2,Y2,X1,Y1l FLINK(FLINK):KM:IXX2X1:IYY2Y1F:XM:YM:KM:KM8>BY16XM((XM))BX1XMIX:X1X1BY1YMIY:Y1Y1FLINK:X1,Y1X1IX,Y1IY:: ,X1,Y1,X1IX,Y1IY,X1,Y1: ,X1,Y1,X1IX,Y1IY,X1,Y1b$FLINK(FLINK):KM:TXIX:TYIYP),X1,Y1,X1TX,Y1TY ,,d.(TX),,::: ::TX,d?,::TX(TX)N3SP$( ,,dTX,dTY):#V8MENNB:OLDTX:*b:INSOTAU%=u > Load NEOrM:):FILTER$.NEO:T$ ---> Load a NEO picture <---: > Load DEGASdM:):FILTER$.PI1:T$ ---> Load a DEGAS picture <---P-:: DRIVGRABI:PATHGRABI$: \ 2 T:+ F$u2L-:PATHGRABI$A$: DRIVGRABI:F$, 6IMAGELD:FLAGBACK: 27b7::*:T$() Disk error:*::uc > Change/not palette2dIMAGEPAL(IMAGEPAL):uNJ > 16*16*BY16(BY16):u+ > Auto insertion0,INSOTAU(INSOTAU):u<:KM:KM:KM8 Left grab menutMENNB: , : ,MENNB ,,MENNB ,,,<::IMAGEPALM:)0BY16M:)2INSOTAUM:)8:*:T$()Grab :T$()from :T$()pictures:*(U ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~V ANIMATIONS(W ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~XM:):(<:SPRNB:T$()No:T$()sprites!:*:*:2: z]@:T$()Not:T$()enough:T$()memory!:*:*:d: z"bFRWD:4g,(@,(,))lXSPRNB:()X,:()X,"TX(X):()X,"TY(X):()X,"HX(X):()X,"HY(X):Xq(),()():(),SPRNB::NANINB::: > MAINpM:):::::(),:(),::0X:X:X0MENNB:*b: z > Anim loopRZ():XM:YM:KM:KM KMVƢZVZ[:ZV::ˢZ4Z<&LEFTAD(MENNB,Z4)::&LEFTAD(MENNB,Z4)::NZ4::::2ТZ\:բZZ ZR, ,",%,W,,,,,,:2ڢZ 9:2ߢZ : > Plus one sprite<SSPRCUR:XM8S,XM@HS,SSSPRNBANISUPANICURXANISUPANICUR:$ANIS(X)$ANIS(X):$ANIV(X)$ANIV(X):Xn$ANIS(ANICUR)S:$ANIV(ANICUR)ANIV:ANISUPANISUPHANICURANISUPANICURANICUR4:L:~::: > Delete"ANISUP:ANISUPANICURXANICURANISUP:$ANIS(X)$ANIS(X):$ANIV(X)$ANIV(X):X:ANISUPANISUP:ANICUR:::Y:ANIXST,ANIYSTY:(");:Y::L:~ > Delete all inputs6ANISUP:ANICUR: > Set speed down/up  D:* "D:*%D<*ANIVDANIVD1/:ANIVANIVD:":ANICURANISUPXANICUR:$ANIV(X)ANIV:6:~4458 > Select animation9X(XM(ANIXST))@((YM(ANIYST))):XANISUPXH>X,ANICUR:6:XANICUR:6:Q > Set speed RD:\WD\ANISUPa:XANISUP:$ANIV(X)D$ANIV(X)D2X:XANISUP:$ANIV(X)$ANIV(X)D:Xf:~kkp > Select animNMANINB:):MN:)(ANISUP&ANISUP(N):ANICUR&ANICUR(N):ANIV%ANIVV(N):X:$ANIS(X)%ANISP(N,X):$ANIV(X)&ANIVIT(N,X):X:ANINBN:FRWDM:FRWD::::Y:ANIXST,ANIYSTY:(");:Y::L:~ > Stores current animp&ANISUP(ANINB)ANISUP:&ANICUR(ANINB)ANICUR:%ANIVV(ANINB)ANIVX:&ANIVIT(ANINB,X)$ANIV(X):%ANISP(ANINB,X)$ANIS(X):X > Place spritev&ANIXSP(ANINB)XM:&ANIYSP(ANINB)YM:ANISUP,XM,YM > BackwardfFRWDM::M::FRWD:~ > ForwardlFRWDM::M::FRWD:~ > Step by step"ANISUP:$M::ɦx$OLDCANICUR:OLDAOLDC:ANICUR:FRWDANICURANISUP):XOLDA:6:XANICUR:6:OLDAANICUR:,&ANIXSP(ANINB),&ANIYSP(ANINB),$ANIS(ANICUR)::::KM:KM:Z() .KMG.3Z4Z:G&8Z&:ZT>FRWDANICUR:ANICURANISUPANICUR`@FRWDANICUR:ANICURANICURANISUPBZGANICUROLDC:XOLDA:6:XANICUR:6:M::ɧ:::"K > Poke pseudo sprites bank(L:::ANISUP*QAB()SPRNB,VXANISUPz[XeYX:$ANIS(X)$ANIS(Y)o `Y eL(((S$($ANIS(X))))):ABL()():()$ANIS(X),()SPRNB:()$ANIS(X),(()SPRNB):oj()$ANIS(X),AB():()(S$($ANIS(X))):()AB:()::ABABLoX:} > Start animation~ANISUP|FRWD,&ANIXSP(ANINB),&ANIYSP(ANINB),$ANIS():,AN$L::A$:XANISUP:A$A$(AN$,X,):X:,&ANIXSP(ANINB),&ANIYSP(ANINB),$ANIS(ANISUP):,A$L:: > Load NEOfFILTER$.NEO:T$ ---> Load a NEO picture <---:M : > Load DEGASZFILTER$.PI1:T$ ---> Load a DEGAS picture <---:M Z:-::DRIVBACK:PATHBACK$: Ďɿ\RΠ::::T:+:F$|ӏ:-:PATHBACK$A$:DRIVBACK:F$, :FLAGBACK:IMAGELD0؏::~::⠋: > Display backgroundHM ::FLAGBACK<FLAGBACKM ::F : :( ):::FRWD:~*#::::,,::h(q:::::::,$:,o:~::,-q,#PAL(),#PAL(),#PAL(),#PAL(),#PAL(),#PAL(),#PAL(),#PAL(),#PAL(),#PAL( ),#PAL( ),#PAL( ),#PAL( ),#PAL( ),#PAL(),#PAL()2ۊ > Draw animation screen6ܤ::,, ,@,ANIHYr , :MENNB: ,MENNB ,,MENNB ,,,^, ,,: ,,,`,ANIHY,,ANIHY$:M:X :X,%ANIX1(X),%ANIY1(X)%ANIX2(X),%ANIY2(X):X::ANIXST ,ANIYST:Animation string;: ,(ANIXST),(ANIYST)(ANIXST ),(ANIYST): , ,?,(ANIYST).MANINB:): > Set to white::,,::%ANIX1(M),%ANIY1(M)%ANIX2(M),%ANIY2(M)::& > Print and creates anim string:::TAN$():XANISUP:6:X6"ANIXTV,ANIYTV:##;ANIV;:*5 > Print and creates ONE anim phase6XANISUP(AN$,X) :(AN$,X)((($ANIS(X)) ),(($ANIV(X)) ))67:::XANICUR8XANIXSTX,ANIYST:XANISUP(###,;$ANIS(X);##);$ANIV(X);::<9XANIXST(X),ANIYST:XANISUP(###,;$ANIS(X);##);$ANIV(X);::<:X ANIXST(X),ANIYST:XANISUP(###,;$ANIS(X);##);$ANIV(X);::<;ANIXST(X ),ANIYST:XANISUP(###,;$ANIS(X);##);$ANIV(X);::(<X ; =:> FILE(? ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ @ M:v)tE MENNB: , : , MENNB ,, MENNB ,,, J:2O ~FILEPAL M:v)2T:,,, ,,,Y *REDO: NOJUMP:|F*: T$()FILE: T$() Bank size:: T$()(( BANKSIZE) ) :|*(^-I:e.'t: KM,rM:): z > Get palette ON/OFF4FILEPALFILEPAL:E  > LOAD  M:v)" A$(*.*,)` FILTER$.MBK: T$ LOAD a sprites bank: T :+ F$+E  F$, rFILENAME$:,:,$:,o:|F*: T$()Loading :|*: vFLGMERGEH -: BPATHSAVE$ A$: DRIVSAVE:7 S.  hPAL$:#, rFILENAME$: () SPRMAXBANK::EZ  A$(#,):( A$, ) Lionpoubnk::EN  A$(#,):(( A$))::E  vFLGMERGE DMIDHI(( A$) )(( A$)): ^NSMID(( A$)): TNSHI(( A$))  JNS(( A$)): JNSA((A$)):A()PAL$(#,A()): * *6  OPXT, OPYT:Out of; JNS;@  SPRNB JNS SPRMAXNB::+E BMAP$(#, JNS): 8A(( BMAP$)): 8A() hPAL$(#, 8A()) "5 2N JNS: OPXT, OPYT:Number; 2N;: ,IX(( BMAP$) 2N): $IY(( BMAP$) 2N) $ A$(#, ,IX $IY): A$(#, ,IX $IY): S$( SPRNB 2N) bSCRCODE$(( ,IX))(( ,IX))()( $IY) A$ &" TX( SPRNB 2N) ,IX:" TY( SPRNB 2N) $IY:" HX( SPRNB 2N)(( BMAP$) 2N):" HY( SPRNB 2N)(( BMAP$) 2N), ( 2N: A$: BMAP$ * vFLGMERGE()()( ^NSMID TNSHI)OTHER$(#,()())6 ,:: SPRNB SPRNB JNS . ~FILEPAL hPAL$(( hPAL$)) TCODEPAL77 X:# 0PAL( X)(( hPAL$) X): X,# 0PAL( X): X: 0 ST$:,$:,o:,0 5 vFLGMERGE F$, rFILENAME$& : vFLGMERGE:+E S X XXSPRNBSPRMAXNB:S$(X):"TX(X):"TY(X):"HX(X):"HY(X):X:F$,FILENAME$d ]:::*:T$() Disc error:*::E k > APPEND l M:v)n q:: FILTER$.MBK: T$ APPEND a sprite bank: T :+ v F$El { SPRCUR SPRNB:,$:,o:|F*: T$()Adding :|*<  vFLGMERGE: F$, rFILENAME$:/P  ϊ > SAVED M:):FILENAME$!9 љ-L ҏ :DRIVSAVE:PATHSAVE$:: ӎ  ԏ:!9: ՙ|F*: T$()Saving:|* ڙ, ߏ! #, rFILENAME$| A$ Lionpoubnk():( A$) ,:( A$), BANKSIZE:#, A$; A$():( A$),:( A$),:( A$), SPRSIZE:( A$) , SPRSIZE DMIDHIt ( A$), SPRNB:( A$), ^NSMID:( A$), TNSHI:#, A$;  SPRNB AD SPRNB$: A$( SPRNB)::? 2N SPRNB:( A$) 2N, AD:( A$) 2N," TX( 2N):( A$) 2N," TY( 2N):( A$) 2N," HX( 2N):( A$) 2N," HY( 2N): AD AD((( S$( 2N)))): 2N:#, A$; A$($):( A$), TCODEPAL:? X:( A$) X,# 0PAL( X): X:#, A$;H  SPRNB OPXT, OPYT:Out of; SPRNB;:@ 2N SPRNB: OPXT, OPYT:Number; 2N;: A$(((( S$( 2N))))):()( S$( 2N)):()( A$):()::#, A$;: 2N.!( OTHER$)#,OTHER$;`!() LBANKA$(LBANK()):#,A$;! :+E ! ]!3 > SAVE AS !4 M:v)l!9-: FILTER$.MBK: T$ SAVE a sprite bank: T:+ !> F$E!C.!H( F$,)!WX!M|F*: T$()Please: T$()confirm :|*.!R}+\: RE*!W rFILENAME$ F$:;N ! > QUITp! M:v):|F*: T$()QUIT: T$()Confirm!:|*.!}+\: RE !:! > QUIT & GRAB!M:TMEN:):*:T$()QUIT:T$()& GRAB:T$()Confirm!:*."+\:RE$":E"BANKSIZEBANKSIZE:T$()Bank too:T$()big!:T$() Use save.:*:*:,:E" *:T$()Grabbing:*:::: : : ::r::,BANKSIZE:A()"A,:A,:A,SPRSIZE:A ,SPRSIZEDMIDHI:A,SPRNB:A,NSMID:A,NSHI:AAN"SPRNBADSPRNB$:NSPRNB:A,AD:A,"TX(N):A,"TY(N):A,"HX(N):A,"HY(N):ADAD(((S$(N)))):AA:N"A,CODEPAL:AA:X:A,#PAL(X):AA:X6"SPRNBOPXT,OPYT:Out of;SPRNB;:NSPRNB:OPXT,OPYT:Number;N;:()(S$(N)):()A:()::AA(((S$(N)))):N~"$(OTHER$)(NSMIDNSHI)(OTHER$),(OTHER$)(OTHER$)A@") default:bgrab(),1:erase(),1`".q:::(#% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~#& HOT POINT(#' ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ #(M:)t#-$:*:T$()HOT SPOT:*:REDO:(<:FLINK #2.#7't:KM#Zr#AFLINK::XSPRHOTX,YSPRHOTY:':FLINK(FLINK)#FKMN#KHOTXXS:HOTYYS:(n:':#2^#ZM:):M:):(n:': z# > Menu options0#HOTNB:#:#-0#HOTNB:#:#-0#HOTNB:#:#-0#HOTNB:#:#-0#HOTNB:#:#-0#HOTNB:#:#-0#HOTNB:#:#-# > Set hot point@#HOTNBHOTNBHOTX`#HOTNBHOTNBHOTNBHOTXTXH#HOTNBHOTNBHOTXTXR#HOTNBHOTNBHOTNBHOTY<$HOTNBHOTYTYZ$ HOTNBHOTNBHOTNBHOTYTY$$ Hot spot menut$MENNB: , : ,MENNB ,,MENNB ,,,@$::MHOTNB:):8(% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~% STORAGE(% ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ %M:)$%!MENNB :)h%&*:T$()STORAGE :T$() Bank size::T$()((BANKSIZE) ) :*(%+:'t:KM,%NM:): z% > Delete sprite8%M:):%:%!:%SPRCURSPRNBSPRNB:%XSPRCURSPRNB:S$(X)S$(X):"TX(X)"TX(X):"TY(X)"TY(X):"HX(X)"HX(X):"HY(X)"HY(X):X%S$(SPRNB):"TX(SPRNB):"TY(SPRNB):"HX(SPRNB):"HY(SPRNB):SPRNBV%,$:,o:,:.|:::OLDGET:% > Insert spriteH%M:TMEN:):%:%!b%(<:SPRNBSPRMAXNBSPRSIZE(SP$) SPRMAXBANK:<%SPRCURSPRNBNOSC:&%XSPRNBSPRCUR:S$(X)S$(X):"TX(X)"TX(X):"TY(X)"TY(X):"HX(X)"HX(X):"HY(X)"HY(X):X%S$(SPRCUR)SP$:"TX(SPRCUR)TX:"TY(SPRCUR)TY:"HX(SPRCUR)HOTX:"HY(SPRCUR)HOTYL%SPRNB:,$:,o:,:.|:::&G > Get spriteH&HM:TMEN:):&M:%!<&MOLDGET:SPRCURSPRNB:&RSP$S$(SPRCUR):TX"TX(SPRCUR):TY"TY(SPRCUR):HOTX"HX(SPRCUR):HOTY"HY(SPRCUR)&W,,XSPR,YSPRXSPR@,YSPR@:,,XSPR,YSPRXSPR@,YSPR@:(n:OLDTX:' &\OLDGETSPRCUR:& > Put spriteV&M:TMEN:):NOSC:&:%!T&(<:SPRCURSPRNBSPRNBSPRMAXNB:R&SPRSIZE(S$(SPRCUR))(SP$) SPRMAXBANK:&S$(SPRCUR)SP$:"TX(SPRCUR)TX:"TY(SPRCUR)TY:"HX(SPRCUR)HOTX:"HY(SPRCUR)HOTY&SPRCURSPRNBNOSCSPRNB:,$:,o:::,$:,o&,&Ş::NOSC:&݊ > Erase bank &M:)\&*:T$() Erase bank:T$()CONFIRM!:*.&+\:R%!N&,:,$:,o:,:.|:%!"' ---------------------------' SUB ROUTINES"' ---------------------------' > ZOOM' TX OLDTX TY OLDTY()::, XZOOM, |YZOOM, XZOOM TX 4IZOOM, |YZOOM TY 4IZOOM, XZOOM, |YZOOM:V',, XZOOM, |YZOOM XZOOM rTXZOOM, |YZOOM fTYZOOMR'`n X: TX X rTXZOOM XR'` Y: TY Y fTYZOOM Y$' 4IZOOM( X, Y)0'$:,,,::') TX 4IZOOM rTXZOOM XZOOM TX 4IZOOM, |YZOOM XZOOM TX 4IZOOM, |YZOOM fTYZOOM'. TY 4IZOOM fTYZOOM XZOOM, |YZOOM TY 4IZOOM XZOOM rTXZOOM, |YZOOM TY 4IZOOMX'3 TX@ XSPR TX, YSPR XSPR TX, YSPR@X'8 TY@ XSPR, YSPR TY XSPR@, YSPR TYV'=:, XSPR, YSPR, XSPR@, YSPR@, XSPR, YSPRr'B2, XZOOM, |YZOOM XZOOM TX 4IZOOM, |YZOOM TY 4IZOOM'G() ADSPR:() ZADZOOM:()( ):():() 4IZOOM:() TX:() TY:'L()::, XZOOM, |YZOOM, XZOOM rTXZOOM, |YZOOM fTYZOOM, XZOOM, |YZOOM.'Q OLDTX TX: OLDTY TY'V's > Mouse in zone <\'t XM: YM: KM: OLDZ FZ: FZ(): K$: SC 'u K$hD'~H'v:MENNBSCa:'t6'wMENNB MENNB'~'x:::SCK(x:.:'tSCM(x:.:'tx'ySCOLDSC(SCHSCPSCSSCR)OLDSCSC:'~'zOLDSC:SCH(x:&M:'tSCP(x:NOSC:&:'tSCS(x:%:'tSCR(x:%:'tp'~ FZ2 MENNB(, XM, YM, SPMOUSE, XM, YM,$': FZ2j>'T' X( XM XZOOM) 4IZOOM: Y( YM |YZOOM) 4IZOOM' X( X TX) Y Y TY( X OLDXS Y OLDYS KM OLDKM)e.'t' XS X: YS Y:,::::X:##; X;:#,:Y:##; Y;:D' OLDZ2 *REDO(n:'' OLDZ2:: ,FIL1, "FIL2,: XPAINT, YPAINT?, YPAINT TYPAINT: OLDZ FZ: MENNB' KM ' FZe.'t ' KMe.'t*' OLDXS: OLDYS' Return to set RGB,' MENNB FZ\' Storage arrowsj' FZV FZ[ MENNB:: FZV:e.'t' Fix size,' FZ3 MENNB' Jump in palettes2' FZP :'t2' FZQ :'t6' MENNB MENNBn'' Jump to fix paint8'Ģ FZ>:'t8'ɢ FZ>:'t"'ʊ Jump to Flip/Upside/Rotated'ˢ FZ> FZ>(ROUTINES(Z>):'t'Ί Jump to UNDO8'Ӣ FZ >:'t'؊ Jumps to sprite arrowsj'ݢ FZR FZU MENNB (ZR)d:'t 'ފ Jump to left menu options'ߢ FZ4 FZ<& LEFTAD( MENNB, FZ4)o:::& LEFTAD( MENNB, FZ4) ' Jump to drawing routines' NOJUMPe.'t')R'Z>Z>:(ROUTINES(Z>)''t(; > Save sprite <N(< SP$(, XSPR, YSPR XSPR TX, YSPR TY):(m > Restore sprite <h(n,, XSPR, YSPR XSPR TX, YSPR TY:(, XSPR, YSPR) SP$T(s, XSPR, YSPR, XSPR@, YSPR@, XSPR, YSPR:.(xREDO(n:'(}"( > Display selected option <( OP XOLDOP (,,, ( XOLDOPXOLDOP:YOLDOP:,,XOPX,YOPYXOP(X),YOP(Y):(,XOPX,YOPY)OP$ ( OP(( X OP: Y OP: NOP$(, 0XOP X, (YOP Y 0XOP( X), (YOP( Y))(::: 0XOP X, (YOP Y 0XOP X, (YOP Y:H(, 0XOP, (YOP,@,, 0XOP, (YOP( XOLDOP OP:() > Set to white left menu command`) UNDO$(, XSPR, YSPR XSPR@, YSPR@): UNDOFLG) )g > Unpack left menu <)h , P)m , MENNB ,, MENNB ,,,P)r , MENNB ,, MENNB ,,,)w*)ˊ > Set to white left menu command M)̠)Ѡ:,,:: >Y1 M: 6Y2 M( TMEN): M TMEN Y2Y2$)֠, >Y1, 6Y2 )۠: TMEN:*/ > Restore Left menu/,*0u)h: MENNB8*5 ,,,@,À, 0XOP, (YOP8*: ,,,@,À, 0XOP, (YOP$*? XOLDOP:r2(*D NOJUMP: *a > Restore SCREEN smooth!0*bq::::x*0,*cq,# 0PAL(),# 0PAL(),# 0PAL(),# 0PAL(),# 0PAL(),# 0PAL(),# 0PAL(),# 0PAL(),# 0PAL(),# 0PAL( ),# 0PAL( ),# 0PAL( ),# 0PAL( ),# 0PAL( ),# 0PAL(),# 0PAL()*g FZ: X& CURINK( FZ): Y& CURINK( FZ):& OLDINK( FZ)(& CURINK( FZ)):| *l FZ: X& CURINK( FZ): Y& CURINK( FZ):& OLDINK( FZ)(& CURINK( FZ)):| *q H*v dFLGDEBOLDTX:(n:',*{ur):,$:,o:"* > Print in right menu zone*::J* 0XOP, (YOP>, (YOP* NOJUMP:"* > Print in right menu zone*: *} Yn+ T$( Y) OPXT( T$( Y)), OPYT Y: T$( Y);6+ T$( Y): Y: NOJUMP:+[> BIG confirmd+\p(<: UNTX TX: UNTY TY: OLDTX: TX@: TY0V+a,, XSPR, YSPR XSPR@, YSPR@:_'::+f::,,: XSPR, YSPR XSPR0, YSPR: XSPR, YSPR XSPR0, YSPR+:::!,:NO:!,:OK+k:_'+p,, XSPR, YSPR XSPR@, YSPR@:,, XSPR, YSPR XSPR@, YSPR@+q(:"+uI:,,,::B+z R:W<t R+,, XSPR, YSPR XSPR@, YSPR@:,, XSPR, YSPR XSPR@, YSPR@: TX UNTX: TY UNTY: OLDTX:q (n:_'++ > File selector++,+Ő :::::8+ F$(* FILTER$, T$, T)+Ϡ: : +ԏ0+٢ F$ FILTER$.*D+ޢ( F$,.)F$F$FILTER$::+㢸( F$, FILTER$)F$++F$:+",# > Draw sprite selector zoneJ,$,, vSELY,, vSELY lSELTY ,, vSELY,) YY vSELY: ,,, YY0, YY lSELTY: ,,@, YY, YY lSELTY: ,,, YY, YY lSELTY$,*:: : ,. A$ :( A$,)( SPRCUR): Y: SELXT, SELYT Y:( A$, Y,);: Y,/ A$ : SPRCUR SPRNB> A$ :( A$,)( SPRCUR) A$ ENDp,0 Y: SELXT , SELYT Y:( A$, Y,);: Y,1:,8 SPRCUR( ," TX( SPRCUR), YY" TY( SPRCUR)) S$( SPRCUR),= SPRNB SPRCUR( ,`" TX( SPRCUR), YY" TY( SPRCUR)) S$( SPRCUR),B SPRCUR SPRNB( ," TX( SPRCUR), YY" TY( SPRCUR)) S$( SPRCUR),G,o ,, vSELY,, vSELY lSELTY,, vSELY: ,, vSELY,, vSELY lSELTY,, vSELY:, > Erases sprite bank,7 X SPRMAXNB: S$( X):" TX( X):" TY( X):" HX( X):" HY( X): Xr, SPRNB: SPRCUR: OTHER$: DMIDHI: NBMID: NBHI:, > Calculate BANK size,, SPRSIZE SPRNB$, SPRNB X SPRNB: SPRSIZE SPRSIZE((( S$( X)))): XJ, BANKSIZE( SPRSIZE( OTHER$)):-O > Set GRABBER zonesJ-P,XGRAB,YGRABXGRAB,YGRAB?-U,XGRAB,YGRABXGRAB%,YGRAB+:,XGRAB%,YGRABXGRABH,YGRAB+:,XGRAB,YGRAB+XGRABH,YGRAB?:,XGRABH,YGRABXGRABm,YGRAB+:,XGRABm,YGRABXGRAB,YGRAB+:,XGRABH,YGRAB+XGRAB,YGRAB?-Z,XGRAB,YGRABXGRAB,YGRAB :,XGRAB,YGRAB XGRAB,YGRAB-_ ,XGRAB,YGRAB)XGRAB,YGRAB3: ,XGRAB,YGRAB3XGRAB,YGRAB?-d ,XGRAB,YGRABXGRAB,YGRAB): ,XGRAB,YGRABXGRAB,YGRAB)-i ,XGRAB,YGRABXGRAB,YGRAB):,XGRAB,YGRABXGRAB,YGRAB)-n- > Get dir$R- A$(*.*,): A$: A$ A$\-. > Auto PUT".DDX:.".DDX&."SPRCURSPRNB:(.'OLDGETSPRCUR: .,NOSC:&f.1SPRCURSPRNBDDXS:DXDDX:.6&M:.{ > Delete all animationsv.|N:&ANISUP(N):&ANICUR(N):$ANIV(N):N:"F ---------------------------G DATAS"H ---------------------------O > Routine lines,P,L,,,x,,U@,,,l,,4,Z,, `, , (, .7 > Left menus MAIN SCREEN lines address>8,X,p,,@,#(, , H,%(Ǜ > Left menus BLOCS lines address>ǜ,,h,,0,,,\,& > Left menus ANIM lines address>,,,,,,,,0c > Left menus IMAGE GRABBER lines address>d,,,,,,,,,d2NJ > Left menus PROGRAM GRABBER lines address>Ƞ,P,P,P,P,P,P,,&+ > Left menus FILE lines address>,r,, , l, ,!4,!,!,!*ɏ > Left menus HOT SPOT lines address>ɐ#Z,#,#,#,#,#,#,#,#Z.W > Left menus RGB SELECTOR lines address>X , , , , , , , , .ʻ > Left menus SET XY SIZE lines address>ʼ v, v, v, v, v, v, v, , * > Left menus STORAGE lines address> %N,&,%,%,%,&,&,&H,&H$ > Animation menu coordinates ,,, ,,, ,,, ,,., /,,?, ,,,& ,,,&  ,,>,& !,(,,5 &,(,,5 + ,(,>,54`A$:S:A$Se`NN4tT4t<@??<@PALTfpp 0PU33ss77w?~耘@@ omkDdppp?~yzs@oE?"}]*pp????????@@@@}|~||}|@@@@??@?=xA]t]t~||]t]tA?=x@ `?-h]t]t~\t]t]t?-h ` `ml~\tml ` ||?8<? @?.^h} %2)tDB0??@?=xAAA~||AAA?=x@ `?!AA~||AA?! ` `a ~||a  `?@?x??x??x??8????UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUPPPPPPPPPPPPPPPP PPPPPPPPPPPPPPPP PPPPPPPPPPPPPPPP PPPPPPPPPPPPPPPP PPPPPPPPPPPPPPPP PPPPPPPPPPPPPPPP PPPPPPPPPPPPPPPP PPPPPPPPPPPPPPPP ၇̥2g2332gÇ??` ?3&g9'8'90gÌ??8#?ɓ2dɟs2d 3d<0afwwwÇ7B^O{_xF7C{8ٳu׻8?ٻ{?{8nɌuW]mAuh~x3Z͘0̀3͘<x`;`llϘ 9Ƚ8,P *@!)@!ȼq@&L(NE (DyQT&D (_Tqm "6s/x*D"hD"/"Dc[wpwU33ss77w?c?ƛ??.(? ;u? 0?s]??_s!A2s!2s!>2sA!2!2!2˫ yeY9a9 yy܏Kˈوy;ۻh``````````````ZNYA$X AFFFLAGSC1fC0cwpwU33ss77w??@ ` =} <`pxY|`x 2> ||~߁񀁀6bND`|y2s#< 0ؘ }|<~|xrjfb eyY`8 x ;ؘ= @ p`ܘ ??>>o`3'3? 31#-  M`o6?>p̈ @΁xˀ 98ٸ`fߙ}2Pp"<JVtBht&```````````````````ZNYA$X AFFFLAGSC1fC0c( <wpwU33ss77wff? ?ffǏ0a!!q!5? <%#3>p<  /(p$L8p$0 I 5?  /(` I 5?  /(`` I 5?  /( I 5?y  /(`p@_ I Aa5?  /( I AA5?? ?   /(fv~n@p0 I =-!yxo׷`wto999y"."&"9yY9yp AAAy=??88\<ayF_NF_NȈȈ PBp<66@0pp0|AaaAD؞^\\--F߇\٘߃Ҋ>Àܬ޼ټꫀfff--f "&???????? || \N}߼߼߼??ʹ<<ϼϼ&&&"؀ЀЀ߀Ѐǀǀƀ`p!`!``&`?o`` ` ` F` ` ߇` \` `@` `@` @` ` ` ` `L`````( P<_6Q6]VsVs_K_KSSϖPPoo               LLx8H?2H8rH2H~rKrKr3?2c1ys9s{ssJVtBht&```````````````````Z2NY2A$X AFFFLAGSC1fC0c(@rwppwU33ss77ww0 !a? 0 1a! 0?0 1 A}AyA}<"<(&q"qo(A!aa!IٹyyI`ذ`@`lذ`@π8߀π8        ``0`````````````````````````0`~z`~f~boooo      1c1c1c19s 9s9 c1c1cǾss9s9s9kZֵkZ{.PZhNYhA$PX AFFFLAGSC1fC0`.`2`Z$cxHA pNNu>3Lp2I@SA3JSG3H#<#@SB3DSC3F#8 Kx"Htv0r<eJQ2tvQQ`JQ2tvQQ CgJ2RD DfNu"y<$y@29D>9H<9J,y83NgH`49F I&J06xLK@:8(K8IQPQ6xLK@:8(K8IQPQ\QCLQLTTyNfNuH`49F? I&J06xLK@:8(K8IQPQQ6xLK@JCg 8(KBEIQPQ8(KBIQP\QCL4Q|LTTyNf^NuISA0SB&I(J0vx:MVQ8QIQCEQNuISASB0v&I(J0xz>< g8QGIXQGQCSCjEvQNuX>O SGH&Jp2468ABCDF@46666Q$KNuSS&J0QEQNu bZH:HtMMMMMMMMMMMMMMMMMMMZRNYRA$B:X AFFFLAGSC1fC0Lionpoulos 2d ******************************************2n * STOSCOPY Version 2.0 by Richard Vanner *2x * (c) 1988 Mandarin/Jawx *2 ******************************************$FOLD$STOS:$:STOSCOPY Version 2.0,:(c) Mandarin / Jawx 1988::V:Insert a disc containing the ;FOLD$; folder, and press a key.w@%FILES(@),FILES$(@),&FSIZES(@)ȿ\FOLD$ SOURCE$\*.*2A$(SOURCE$,):A$A !HFILE$:FILE$A:!%FILES(A):FILES$(A)(FILE$, ):&FSIZES(A)((FILE$, ,)):AAAAT"%FILES(A)A:!":NUMFILESA6, **********************************************06 * Create a new folder onto the new disc *6@ **********************************************VJ:EInsert a newly formatted disc into the current drive and press a key.:wT(0^FOLD$:::New ;FOLD$; folder created.::.Now re-insert the source disc and press a key.:w6h ***********************************************6r * Copy 15 files or less into the memory banks *6| ***********************************************(FSTART:FMAXnNFFSTART:NUMBANKS:%FILES(NF)NUMBANKSFMAXF&:NUMBANKS,&FSIZES(NF): Loading : ;FILES$(NF); - into bank ;NUMBANKS:z\FOLD$\FILES$(NF),NUMBANKS NF:NUMBANKS:, *************************************(Š * Save banks out to new folder *,̊ *************************************<֡:,Insert the destination disc, and press a key:wNF Saving : ;FILES$(FSTART); - from bank ;NF:{\STOS\FILES$(FSTART),(NF)(NF)&FSIZES(FSTART)JFSTART:NF:FSTARTNUMFILES*NFFMAXA:A:A::-Insert the STOS source disc, and press a key.:w:FMAX::Copy complete.0&FMAXNUMBANKS:D0:3I can't open the new folder. Please check the disc!:.  t..  tORBIT BASt LEVEL1 ORBt IpLEVEL2 ORBt J{LEVEL3 ORBt KLEVEL4 ORBt LLEVEL5 ORBt MLionpoulosՀ$( ********************************( * *( * ORBIT *( * *( * By F. Lionet *( * Graphics by D. McLachlan *( * *( * STOS / (c) Jawx / Mandarin *( ***********31/7/1988************. q::ͦ:::: j;NXBLOCS :;NYBLOCS :;MBLOCS;NXBLOCS;NYBLOCS:;SPEEDMAX%XBLOC(;MBLOCS),%YBLOC(;MBLOCS),$WAVE(;MBLOCS),(WAVEHITS(;MBLOCS),$BLOC(;MBLOCS),B$(),MX$(;SPEEDMAX, ),MY$(;SPEEDMAX, ),%REBAT(,0),&REWALL(, ),&REBLOC(, ),%NHITS(;MBLOCS),&EFFECT((),TURN$(;SPEEDMAX,),"DX(),"FX(),"LB()INS$(,),a ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~$b Variables initialisation,c ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~8d%XBAT:%YBAT:% SPBATRi%SPBLOC:$NBBLOC:$DXBLOCS :$DYBLOCSn$Y;NYBLOCS:ӿ$X;NXBLOCS:%: XBLOC($Y;NXBLOCS$X)$DXBLOCS$X:%8@YBLOC($Y;NXBLOCS$X)$DYBLOCS$Y:$X:$Ys;HP:\$X;SPEEDMAX:S$Y :0MX$($X,$Y),/`MY$($X,$Y):$Y:$Xt}H"`:$Y:$X/:%,BREBAT($Y,$X):$X:$YtK:D$Y:;$X :&*REWALL($Y,$X):$X:$YtM(:ո$Y:կ$X :&)REBLOC($Y,$X):$X:$YJOrH:$X(:&'2EFFECT($X):$X׾$Y;SPEEDMAX:6$X:&TURN$($Y,)&TURN$($Y,)(($X),((,$Y))):&TURN$($Y,)(($X),((,$Y)))&TURN$($Y,):$X:&TURN$($Y,)&TURN$($Y,)l:&TURN$($Y,)&TURN$($Y,)l:$Y "&DX():"&FX():"&DX()"&DX():"&FX()"&FX():"&DX()"&DX():"&FX()"&FX():"&LB() :"&LB()0:"&LB()R$XSCRE':$YSCRE:$XHISCRE':$YHISCRE ,Ŋ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*Ɗ Convert sprites into screen blocs,NJ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ȴ:,͝B$X$NBBLOCbҤ,,,%SPBLOC$X::2TB$($X)(,,, )ׂ$X:,) ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"* Creates title sprite,+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~,,1$TXBIG@:,,,?,&,,,$TXBIG,d:$BIG$(,,$TXBIG,d), ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ TITLE PAGE, ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~$:::,:()::P,,,:,(1,4,50)(1,-2,37)(2,-1,25):ָ()R::(,()$TXBIG,()d)$BIG$::: :::::B::,:May the STOS be with you!X:,:Program by F. Lionet::Graphics by D. McLachland:,:s,,::,:Press mouse key to play,$!:space to edit levels,&":Help for instructions.&Ȁ::4+,(4,1,2)(4,-1,4)(4,1,2)l: 0߄$Ndp5:,,,@,t:(,()$TXBIG,()d)$BIG$::::`?$~A$:$vKM:$~A$()$~A$ $vKMb߮N D$N"Iq::*Nq::::::2S$vKM:2X$~A$ N :,ZbP0: ]:, ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ One game, ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~l$nWAVE:$dNBATS:$ZSCRE:$PWAVEIN:$DWAVELD:$8WINn'":,,$DXBLOCS,$DYBLOCS$DXBLOCS;NXBLOCS,$DYBLOCS;NYBLOCS:,,$DXBLOCS,$DYBLOCS$DXBLOCS;NXBLOCS,$DYBLOCS;NYBLOCS: ,:::Level;$nWAVE;:*$DWAVELD$PWAVEIN,$$F$( LEVEL???.ORB,)$$F$$$F$($$F$, ):$X($$F$,.):$~A$($$F$,$X):$W(($~A$,,)):$W$DWAVELDJ F$::WAVELD:WAVE$=:#,$$F$`g$X;MBLOCS:#,$6vWAVE($X),(4WAVEHITS($X):$X4::$PWAVEIN$DWAVELD|$X;MBLOCS:$2BLOC($X)$6vWAVE($X):%'NHITS($X)(4WAVEHITS($X):$X$2$*):$8WIN@.WINWAVE:WAVELD:$3NBATS)88SCREHISCREHISCRESCRE9=:: B,I ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~J One wave,K ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~$SPEED:$ SPEEDCPT:#REVERSE:#DESTROY:#GLUE:#BOMB:#YMOVE:#BON$:#QUIT:::#YMOVE:#BAT:#LBAT"&LB(#BAT):#DXMOUSE"&DX(#BAT):#FXMOUSE"&FX(#BAT):#DYMOUSE%YBAT:#~FYMOUSE%YBAT:#DXMOUSE,#DYMOUSE#FXMOUSE,#~FYMOUSE'($8WIN't4Ċ anim 2,"(9,5)(10,5)(11,5)(10,5)l" : anim on 24$8WIN:#^DXBALL:, ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ Game loop, ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~:6(,#LBAT,)Z:GLUE:iDXBALL()()::iD#&Z():#&Z# OLDZ#&Zip#$ SPEEDCPT:$ SPEEDCPTSPEEDCPT(:SPEEDSPEEDMAXSPEED(#&Z;MBLOCSBALLDEP&REWALL(ZMBLOCS,BALLDEP):,MX$(SPEED,BALLDEP):,MY$(SPEED,BALLDEP)::,TURN$(SPEED,())::i-#dB$2BLOC(#&Z):#DESTROYDESTROY:%NHITS(Z)%NHITS(Z):_v2:$X(#&Z);NXBLOCS:$Y(#&Z);NXBLOCS:#DXd:"DYd7#OLDX%: XBLOC(#&Z)XD1:DX%XBLOC(Z)OLDX$BLOC(Z)D1:DX%XBLOC(Z)OLDX<#OLDX%: XBLOC(#&Z)XNXBLOCSD1:DXOLDX%XBLOC(Z)$BLOC(Z)D1:DXOLDX%XBLOC(Z)A# OLDY%8@YBLOC(#&Z)YD2:DY%YBLOC(Z)OLDY$BLOC(ZNXBLOCS)D2:DY%YBLOC(Z)OLDYF# OLDY%8@YBLOC(#&Z)$Y;NYBLOCS"D2:"DY# OLDY%8@YBLOC(#&Z)$BLOC(ZNXBLOCS)D2:DYOLDY%YBLOC(Z)TK#DX"DY(#DXd"DYd)D:UBP#DX"DYDD1#8D"D2U#2BALLDEP&)REBLOC(#8D,#2BALLDEP):#8DBALLDEP((BALLDEP))()Z,0MX$($SPEED,#2BALLDEP):,/`MY$($SPEED,#2BALLDEP)::,&TURN$($SPEED,())::6z_%'NHITS(#&Z):%'NHITS(#&Z) &EFFECT(B),,%: XBLOC(#&Z),%8@YBLOC(#&Z)%: XBLOC(#&Z),%8@YBLOC(#&Z):,,%: XBLOC(#&Z),%8@YBLOC(#&Z)%: XBLOC(#&Z),%8@YBLOC(#&Z):$2BLOC(#&Z):#&Z:#rCPTBLOCS:&'2EFFECT(#dB):#&Z:Ri# OLDZ#&Z:#&Z#OLDX():# OLDY()`n#BOMBBOMB:(,LBAT,) ZVo #QUIT:,d,::x.s:#rCPTBLOCS()w ~~~~> End of playdx$Y():::::$YȚWIN:N}#BAT,%(10,3)(9,3)(8,3)(7,3)(6,3)(5,3)(4,10)f#BAT,=(14,3)(13,3)(12,3)(11,3)(10,3)(9,3)(8,3)(7,3)(6,3)(5,3)(4,10)>#BAT,(7,3)(6,3)(5,3)(4,10)6$N(:6::$N.,(1,1,1)(1,-1,1)l:B$N:6::$N::&#QUIT$8WIN,Ɗ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~NJ Block effects,Ȋ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~"ϊ ~~~~> Start of game / GLUEbР::M:6::,()#^DXBALL,(),:$vKM:$vKM ڢ$vKMtߢKMDXBALL:DXBALLLBATDXBALLLBATT#8D()():#2BALLDEP%,BREBAT(#BAT,#8D),0MX$($SPEED,#2BALLDEP):,/`MY$($SPEED,#2BALLDEP)::,&TURN$($SPEED,()):B.(,#LBAT,):6::#RXM:#JYM:#REVERSEXMFXMOUSEXMDXMOUSE:YMFYMOUSEYMDYMOUSEP#BFREZZFREZZ:FREZZXFREZZ:YFREZZ:,#RXM,#JYM:3 ~~~~> Normal blockb4%'NHITS(#&Z)$ZSCRE$ZSCREd(2):!(<::9DESTROY:> ' ~~~~> Bomb (%NHITS(Z) -BOMB 2BOMBd:,%XBLOC(Z),%YBLOC(Z),:,(1,1,10)(1,-1,20)(1,1,10)l:, (1,2,100): 7d Z anim 2,"(12,2)(13,2)(14,2)(13,2)(12,2)(11,2)(10,2)(9,2)(8,2)(9,2)(10,2)(11,2)l" : anim on 2 _:,(),(),::,6(19,3)(20,3)(19,3)(20,3)(21,4)(20,3)(21,4)(22,3)(24,1):,(1,1,2)(1,-1,2)l:,(1,1,3)(1,-1,3)l::* d2:,d,,: ~~~~> Super ball: %NHITS(Z)DESTROY  $ ~~~~> Reverse action of mouse %NHITS(Z)* REVERSEREVERSE:8 REVERSE():():V FXMOUSE()DXMOUSE:FYMOUSE()DYMOUSE: S ~~~~> Hyperspace& T%NHITS(Z) YN ^X( ) :Y(d) :,X,Y:::V:::V:N:()N ^ c ~~~~> Explosion& %NHITS(Z): ::,(),(), ¤,%XBLOC(Z),%YBLOC(Z),:,6(19,3)(20,3)(19,2)(20,2)(21,2)(20,2)(21,2)(22,2)(24,1):,(1,1,2)(1,-1,2)l:,(1,1,3)(1,-1,3)l::: N:XX(X,)(X,NXBLOCS):YY(Y,)(Y,NYBLOCS):BXXYYNXBLOCS:$BLOC(B) $BLOC(B):B:,,%XBLOC(B),%YBLOC(B)%XBLOC(B),%YBLOC(B):,,%XBLOC(B),%YBLOC(B)%XBLOC(B),%YBLOC(B)4 Ѣ%NHITS(B)CPTBLOCS0 ֙::N:YY:XX2 ۞N:::N:" द::   ~~~~> Indestructible :(  ~~~~> Allow Up and Down movements0 NHITSYMOVE :XM:YM:DYMOUSEYBAT@:FYMOUSEYBAT:DXMOUSE,DYMOUSEFXMOUSE,FYMOUSE:XM:YM:YMOVE:FREZZ , ~~~~> Loose one ball (indestructible)J 䠼:,%XBLOC(Z),%YBLOC(Z)8 頋:N2:::N ,d,: G Freeze bat for 1 secondV H%NHITS(Z)FREZZ2:XFREZZ:YFREZZ: M ~~~~> Move bat at random %NHITS(Z)r :(FXMOUSEDXMOUSE)DXMOUSE:(FYMOUSEDYMOUSE)DYMOUSE  ~~~~> Speeds up&%NHITS(Z):SPEEDSPEEDMAXSPEED:,MX$(SPEED,BALLDEP):,MY$(SPEED,BALLDEP):,TURN$(SPEED,())::SPEEDCPT(:s ~~~~> Glue t%NHITS(Z)$y:GLUEGLUE: ׊ ~~~~> Extend / shrink bat آ%NHITS(Z):ݠ::,(),(),`BATBAT,(5,4)(6,4)(7,4)(8,4)(9,4):dBATBAT:,(10,4)(11,4)(12,4)(13,4)(14,4):XBATBAT,(14,4)(13,4)(12,4)(11,4)(10,4)砽:DXMOUSE"DX(BAT):FXMOUSE"FX(BAT):LBAT"LB(BAT):XM:YM:DXMOUSEXMDXMOUSE<XMFXMOUSEXMFXMOUSET젳DXMOUSE,DYMOUSEFXMOUSE,FYMOUSE:XM:YM6N:::N^if BAT=1 then anim 2,"(9,4)(10,4)(11,4)(10,4)l" else anim 2,"(12,6)(13,6)(14,6)(13,6)l"::; ~~~~> Slow&<%NHITS(Z)A:SPEEDSPEED:,MX$(SPEED,BALLDEP):,MY$(SPEED,BALLDEP):,TURN$(SPEED,())::FSPEEDCPT: ~~~~> Extra bat&%NHITS(Z)NBATS:::,(),(), NBATS,XBAT,YBAT NBATS,: NBATS,<(4,4)(5,4)(6,4)(7,4)(8,4)(9,4)(10,4)(11,4)(12,4)(11,4)(10,1): NBATS6N2:::N&::NBATS:  ~~~~> Exit to next level %NHITS(Z) ,BMBLOCS:$BLOC(B)$BLOC(B):B:,,%XBLOC(B),%YBLOC(B)%XBLOC(B),%YBLOC(B):,,%XBLOC(B),%YBLOC(B)%XBLOC(B),%YBLOC(B)::BCPTBLOCS:0g ~~~~> Resets all bricks (indestructable) h%NHITS(Z)m:::rXMBLOCS:$WAVE(X)$BLOC(X)$BLOC(X)$BLOC(X)$WAVE(X)(tX:'::ˊ ~~~~> Small small bat0̢%NHITS(Z)BAT:Ѡ::,(),(),֢BAT,2(14,4)(13,4)(12,4)(11,4)(10,4)(9,4)(8,4)(7,4)(6,4),(10,4)(9,4)(8,4)(7,4)(6,4)۠:BAT:LBAT"LB(BAT):DXMOUSE"DX(BAT):FXMOUSE"FX(BAT):XM:YMT࠳DXMOUSE,DYMOUSEFXMOUSE,FYMOUSE:XM:YM6N#:::N anim 2,"(5,1)(6,1)l"$:::/ ~~~~> Bonus B 0%NHITS(Z)5BON$B:: ~~~~> Bonus O %NHITS(Z)F:BON$BBON$OBON$ ~~~~> Bonus N %NHITS(Z)F:BON$OBON$NBON$[ ~~~~> Bonus U \%NHITS(Z)Fa:BON$NBON$UBON$f ~~~~> Bonus S %NHITS(Z)FŠ:BON$UBON$SBON$ʢBON$S:Ϡ::,(),(),vԠ,b(000,1)(100,1)(200,1)(300,1)(400,1)(500,1)(600,1)(700,1)(600,1)(500,1)(400,1)(300,1)(200,1)(100,1)&BWAVE()ޝSCRESCRESCREBB:(<:SCRE:SCRESCREB:(<:ަ:,:::BON$&,' ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ' Other routines,' ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~' ' ~~~~> Draw main screen''::,::::$XSCRE,$YSCRE:00000000;:!(<:$~A$($0HISCRE) :$XHISCRE($~A$),$YHISCRE:$~A$;:<':,(,,:, ,,|'$dNBATS$X$dNBATS: $X,%XBAT,%YBAT$X , :$X'::q:'.'3;MBLOCS,,,:;MBLOCS,, , :;MBLOCS,,, :;MBLOCS,, , :;MBLOCS,,, '=:'q 'r ~~~~> Arrival of one bat's 't,,,:D'y::,,:,',:' ,%XBAT,%YBAT:$dNBATS#$X$dNBATS: $X, (18,0,1)(($X) ,0,1)(1,2,5):$X' ,"(1,0,1)(1,-2,10)(1,-2,60)(1,-1,16):,(1,-2,10)(1,1,20): ,(9,5)(10,5)(11,5)(10,5)l: ':ʸ( )::':,( ),( ), : :'$dNBATS$X$dNBATS: $X,( $X),( $X):$X: $dNBATS:'():()'$dNBATS:'Պ,'֊ ~~~~> Draw all the blocks / set zones'׊'ش,,$DXBLOCS,$DYBLOCS$DXBLOCS;NXBLOCS,$DYBLOCS;NYBLOCS:#rCPTBLOCSf'ݝ!$X;MBLOCS:$X:#dB$2BLOC($X):#dB! ''(,%: XBLOC($X),%8@YBLOC($X))2TB$(#dB):$X,%: XBLOC($X),%8@YBLOC($X)%: XBLOC($X),%8@YBLOC($X) X'#dB #dB #rCPTBLOCS%'NHITS($X)'$X:,$DXBLOCS,$DYBLOCS,$DXBLOCS;NXBLOCS,$DYBLOCS;NYBLOCS,$DXBLOCS,$DYBLOCS'(9(: ~~~~> Print score(;T(<$~A$($ZSCRE) :$XSCRE($~A$),$YSCRE:$~A$;:NN,N ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ N SCREEN DESIGNER,N ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~NNN q::VN%XBLMENU:YBLMENUx:TXBLMENU:TYBLMENU NCURB:NBHITS:XMBLOCS:$WAVE(X):(WAVEHITS(X)NBHITS:XNS4:RlNN ~~~~> Main loopN N4NXM:YM:KM:Z()NN:ZxX(XMDXBLOCS):Y(YMDYBLOCS):BXYNXBLOCS:BBMBLOCSN(WAVEHITS(B)NZcO,P,Px,P,Q@,QOX(XMDXBLOCS):Y(YMDYBLOCS):BXYNXBLOCS:BBMBLOCSNOKM$WAVE(B)CURB:(WAVEHITS(B)NBHITS$WAVE(B):(WAVEHITS(B)O ,,%XBLOC(B),%YBLOC(B)%XBLOC(B),%YBLOC(B):$WAVE(B)(,%XBLOC(B),%YBLOC(B))B$(CURB)O,%XBLOC(B),%YBLOC(B),%XBLOC(B),%YBLOC(B),%XBLOC(B),%YBLOC(B):ONO ~~~~> LoadpO::F$( LEVEL???.ORB, Load a game pattern,):q::S4POF$(F$,)LEVEL:Rl:N@O(F$,.)F$F$.ORBDO(F$,.ORB):Rl:NOďOBOɩ ,:::Loading:#,F$`OΝXMBLOCS:#,$WAVE(X),(WAVEHITS(X):XOӠ#O؏OݙRl:N O:bPXMBLOCS:$WAVE(X):(WAVEHITS(X):X POP ~~~~> Save patternP::F$( LEVEL???.ORB,= Save a game pattern Name must be LEVEL###.ORB ,):q::S4PPF$(F$,)LEVEL:Rl:N@P(F$,.)F$F$.ORBDP#(F$,.ORB):Rl:NP(P_BP- ,:::Saving:#,F$fP2XMBLOCS:#,$WAVE(X):#,(WAVEHITS(X):XP7#P<PARl:NP_::P<Pw ~~~~> PlayPxq::P}NBATS:WAVE:WAVEIN:XMBLOCS:$BLOC(X)$WAVE(X):%NHITS(X)(WAVEHITS(X):X:NBATS:':WIN::Pq::S4:Rl:NPۊ ~~~~> Quit Pܠq::::Q? ~~~~> Dec nbhits6Q@NBHITSNBHITS:R4QEKM::QJNQ ~~~~> Inc nbhits6QNBHITScNBHITS:R4QKM::QNR ~~~~> Select one brick R,,,R OLDBX(OLDB) :Y(OLDB) ::XBLMENUXTXBLMENU,YBLMENUYTYBLMENUXBLMENUXTXBLMENU,YBLMENUYTYBLMENURCURBX(CURB) :Y(CURB) ::XBLMENUXTXBLMENU,YBLMENUYTYBLMENUXBLMENUXTXBLMENU,YBLMENUYTYBLMENU$ROLDBCURB:::rRl:,,DXBLOCS,DYBLOCSDXBLOCSNXBLOCS,DYBLOCSNYBLOCS@RqXMBLOCS:B$WAVE(X)PRvB(,%XBLOC(X),%YBLOC(X))B$(B)R{X:,DXBLOCS,DYBLOCS,DXBLOCSNXBLOCS,DYBLOCSNYBLOCS,DXBLOCS,DYBLOCS R:@RЪ::,:Hit: ##;NBHITS;8RբN (##);N ;Rڋ(S4::,::q2S9::BNBBLOC S>XB :YB :XXXBLMENUXTXBLMENU:YYYBLMENUYTYBLMENU:,XX,YY,SPBLOCB:::B,XX,YYXXTXBLMENU,YYTYBLMENUTSCB::,,:,,,::SM:,P,::,P,:d,,P,:,: LOAD;SR:P,,::P,,:e,P,,: ,: SAVE;SW:,,::,,:f,,,:,: PLAY;S\:,?,::,?,:g,,?,: ,: QUIT;S]:P,,::P,l,:h,P,l,: ,:-;(S^:l,,`S_:,,:i,,,:,:+;"SaOLDB:RSkRnSpx,DXBLOCS,DYBLOCSDXBLOCSNXBLOCS,DYBLOCSNYBLOCSSuSzCDE,F ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~$G Ball movement definition,H ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~MN ~~~~> SlowO$P(2,1,1)l, (1,-1,1)l$Q(1,1,1)l, (1,-1,1)l$R(1,1,1)l, (2,-1,1)l$S(1,1,1)l,(2,1,1)l$T(1,1,1)l,(1,1,1)l$U(2,1,1)l,(1,1,1)l&V (2,-1,1)l,(1,1,1)l&W (1,-1,1)l,(1,1,1)l&X (1,-1,1)l,(2,1,1)l&Y (1,-1,1)l, (2,-1,1)l&Z (1,-1,1)l, (1,-1,1)l&[ (2,-1,1)l, (1,-1,1)l$À ~~~~> Slow but not that muchÁ,Â(1,1,1)l,(1,-2,1)(1,-1,1)l4Ã(1,2,1)(1,1,1)l,(1,-1,1)(1,-2,1)l,Ä(1,2,1)(1,1,1)l, (1,-1,1)l,Å(1,2,1)(1,1,1)l,(1,1,1)l2Æ(1,2,1)(1,1,1)l,(1,1,1)(1,2,1)l*Ç(1,1,1)l,(1,2,1)(1,1,1)l,È (1,-1,1)l,(1,2,1)(1,1,1)l4É(1,-1,1)(1,-2,1)l,(1,2,1)(1,1,1)l.Ê(1,-2,1)(1,-1,1)l,(1,1,1)l.Ë(1,-2,1)(1,-1,1)l, (1,-1,1)l6Ì(1,-2,1)(1,-1,1)l,(1,-1,1)(1,-2,1)l.Í (1,-1,1)l,(1,-2,1)(1,-1,1)lñò ~~~~> Medium speedó$ô(1,1,1)l, (1,-2,1)l$õ(1,2,1)l, (1,-2,1)l$ö(1,2,1)l, (1,-1,1)l$÷(1,2,1)l,(1,1,1)l$ø(1,2,1)l,(1,2,1)l$ù(1,1,1)l,(1,2,1)l&ú (1,-1,1)l,(1,2,1)l&û (1,-2,1)l,(1,2,1)l&ü (1,-2,1)l,(1,1,1)l&ý (1,-2,1)l, (1,-1,1)l&þ (1,-2,1)l, (1,-2,1)l&ÿ (1,-1,1)l, (1,-2,1)l ~~~~> Medium well speed,栦(1,2,1)l,(1,-2,1)(1,-3,1)l4砦(1,2,1)(1,3,1)l,(1,-2,1)(1,-3,1)l,蠦(1,2,1)(1,3,1)l, (1,-2,1)l,頦(1,2,1)(1,3,1)l,(1,2,1)l2ꠦ(1,2,1)(1,3,1)l,(1,2,1)(1,3,1)l*렦(1,2,1)l,(1,2,1)(1,3,1)l,젦 (1,-2,1)l,(1,2,1)(1,3,1)l4(1,-2,1)(1,-3,1)l,(1,2,1)(1,3,1)l.(1,-2,1)(1,-3,1)l,(1,2,1)l.(1,-2,1)(1,-3,1)l, (1,-2,1)l6(1,-2,1)(1,-3,1)l,(1,-2,1)(1,-3,1)l. (1,-2,1)l,(1,-2,1)(1,-3,1)l ~~~~> Hi speed$(1,2,1)l, (1,-3,1)l$(1,3,1)l, (1,-3,1)l$"(1,3,1)l, (1,-2,1)l$'(1,3,1)l,(1,2,1)l$,(1,3,1)l,(1,3,1)l$1(1,2,1)l,(1,3,1)l&6 (1,-2,1)l,(1,3,1)l&; (1,-3,1)l,(1,3,1)l&@ (1,-3,1)l,(1,2,1)l&E (1,-3,1)l, (1,-2,1)l&J (1,-3,1)l, (1,-3,1)l&O (1,-2,1)l, (1,-3,1)lyz ~~~~> Unplayable speed{$|(1,2,1)l, (1,-4,1)l$ā(1,4,1)l, (1,-4,1)l$Ć(1,4,1)l, (1,-2,1)l$ċ(1,4,1)l,(1,2,1)l$Đ(1,4,1)l,(1,4,1)l$ĕ(1,2,1)l,(1,4,1)l&Ě (1,-2,1)l,(1,4,1)l&ğ (1,-4,1)l,(1,4,1)l&Ĥ (1,-4,1)l,(1,2,1)l&ĩ (1,-4,1)l, (1,-2,1)l&Į (1,-4,1)l, (1,-4,1)l&ij (1,-2,1)l, (1,-4,1)lSTU,V ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ W Rebounds tables,X ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~]^ ~~~~> On the bats_ Normal` , , , , , , , , , , , , , , , , , , , , , , , e,,,,,,,,,,,,,,,,,,,,,,, i Bigj , , , , , , , , , , , , , , , , , , , , , , , o,,,,,,,,,,,,,,,,,,,,,,, s Smallt , , , , , , , , , , , , , , , , , , , , , , , y,,,,,,,,,,,,,,,,,,,,,,,Š ~~~~> On the wallsÊPĠ,,,,,,,,,,,Pɠ,,,,,,,,,,,PΠ,,,,,,,, , ,,PӠ ,,, ,,,,, ,,, Pؠ , , , ,,,,, , , , %& ~~~~> On the blocs'P(,,,,,, , , , , , P-,,,,,,,,,,,P2,,,,,,,, , ,,P7 , , , ,,,,, , , , P<,, , , , ,,,,,,E2F ~~~~> Effects of blocs (adresses of lines)GDH4,4,4,4,4, (, , , T, DM , , , H, ,,t,,<,DR,h,,0,,,\,,4,4DW4,4,4,4,4,4,4,4,4,4(0 ****** Orbit instructions *******1:::: 2:::.3: ,:s,,h4Vv:Qn"LOOP:%(INS$(,"LOOP),%(INS$(,"LOOP):,9,:Orbit Instructions\D,:CThe object of this game is to clear all the bricks from the screen.NvThis can be achieved by bouncing the ball against them. Some bricks are special which cause different effects.pb:bIf the ball gets stuck between bricks you can dislodge it by pressing one of the mouse buttons.2c:#Click on the arrows to view bricks.`d:x,n,x,x,:,n,x,Xe,,,,:,,,0f"BRICK:U$:,"g,,,"BRICKmq::n vU#&Z"BRICK4BRICK:,,,BRICK::::$#&Z"BRICKBRICK:,,,BRICK::::$$~A$0:::#&Z():::::::f$:,,,@,:,:%(INS$(,"BRICK):.,:%(INS$(,"BRICK):8\ RED BRICK,?Normal brick. It can take up to 99 hits before being destroyed.^" YELLOW BRICK,?Normal brick. It can take up to 99 hits before being destroyed.\, BLUE BRICK,?Normal brick. It can take up to 99 hits before being destroyed.\6 GREY BRICK,?Normal brick. It can take up to 99 hits before being destroyed.^@ WHITE BRICK,?Normal brick. It can take up to 99 hits before being destroyed.RJBOMB,;This brick releases a bomb when hit, so get out of the way.hT SUPERBALL,J When this brick is hit, the ball destroys anything in its path.B^REVERSE,'This brick makes your controls reverse.th HYPERSPACE,WHitting this brick will cause the ball to hyperspace to another part of the screen.frDYNAMITE,JWhen this brick is struck it explodes, wiping out any surrounding bricks.D|INDESTRUCTIBLE,# This brick cannot be destroyed.b THRUSTERS,DHitting this brick gives you the abilityto move you bat up and down.J BLACK HOLE,-If your ball hits this, then you lose a life.HSTUN,1 This brick paralyses your bat for a second.HRANDOM,.This randomly places your bat somewhere else.<CATAPULT, This speeds your ball up.JGLUE,3Hitting this brick makes your ball stickto the bat.J EXPAND,1When this brick is hit then your bat expands.T̠SLOW,.`  B  B FP"h: R$j <# # 4T    ~ n ^N>.`  B  B FP"h: R$j <  !!T!!"&"l"PALT"3UpP07bDw@@@@p00~44Y~449>߿߿߿???>ɀ@@U U ~00c c ??????????????????& @0@@~@ ~@@@@  @@@  @@ ~~?(( ??p8?@<<@b}@]c _?p ;p ? w1? ;??/// `0 O`@??@????????@?p?8@<<@b}@]c _?p; p  ?w1?; ????w'@@w??/// `0O `@p?x1> .1t@/p?8@<<@b}@]c _?p@8y c@~~@??????@@???@@??? ??p{ss ۀۀ`j?nn  OO}8 >44GGēff((~mmPPgg&&``}}8EExddЌ#A@@>/spp>ss A܆  P{{?DDppxx  ll?<<33"y"y,SS<<66{{zz>D D 8xۂۂ > aa~<<>>>66 zz  8zzxۂۂ>DD aa!!@ 0??0D@D@88__p  }jj'' WWBB$5$53إإ?$$!!|M|M3LL x;;p``8zz!! &&8GdGdbqbqaazYzY@@? ? ?``XXAA__ ??  h80@?#o;x| 8x>p @111Q}} p$?C|;C  0 0Lp> x<@_@ @ >@ >I7S/R$/232$$dd$$$$   p`NN|||rpx<< |||B>|~sfLdd?fs?>@<<2<O O w"P(*.P8:g2ox<<>pppx<<>|<:o||~wynyyb0??~0O0*EFO0< ocpO?/pOoO?8" P:!*P:||y<%N&%%%&&&H&H(ROUTINESTLx@l4 ` ( $XPAL&OLDINK&CURINKSPRMAXNBVERSION$IW@.ChinklesHoodWood ci0\d<  :535101.1015130., hA?A=<=:=<=A=?<:8 MKMIHIFIHIMIKHFDci+xdd(d " 011115:851,,,,.1.1T,)),)),)),)&&H&H(ROUTINESTLx@l4 ` ( $XPAL&OLDINK&CURINKSPRMAXNBc(B) "3UpP07bDw`?~<= =8 @<p<xp<8?? 8~<@ !"%+&, `Ȑ!C 0d̘0pР@ B:tҤI 3gΝ:tiR$I'N:4)$ 'N;svlY2dH @ 3f A@Č09C 3 !C 9fΝ:x1 'yK֌ 4`3F ٲd!J9r6m!Cdɒ$H'O `ФI&A1pФH @@'N2.?-!  ?>xq FLJ8x~@0p`@=ݝ= %=M%=%' `_ `X, x ?y | @BC@A!MM͍=ݝ=ρIJ.JN?;%!?Ux ~~@@8(חBRn h (7?( '< '>`0 ``=MM͍= =ML   &=&&}Ɔ@g`> @ DxP@@@aaa aaa=}}= %=}}=``  89N&~&0@@@@? $GĂ#AY9?`?ꪨ?? @+L= @ @‚@ !(8$"B@ :a @ ?O??Ϗ??99ùù?ù?ù`c`~>? # Ύ=ù:ù_ù|ùùoù~ùߟp0p`tp@`||w?̀;{~}{wx~~@``ac``~~3}|???~}{wop~>?`>g_9p|@p|8=????ǁ?>?CQ9`@ @ XАXP(h(ùù?ù?ù@H@B ! <((hXАXP ! Fù@:ù@M@ù~3707050ùù  >>;+ùa/(o`p~,ù?ǘۇ>O@K@P~fbg |h((hpG0Gp?? < ss |f413046764ccXؘX(XؘX``  yagcy @(@?# `0412$ $ # # # 04  Uc@ g_9p|@p|8 @ @ @ @ @ 8` 4` @ @ @  @ @ѹ?>???χXАXP(h(ùù?ù?ù@H@B ! <((hXАXP 01 6vx@``@ù@:ù@M@ù~3707050ùù  >>;+ùa/(o`p~,ù?ǘۇ?O@K@Аfg |h((hpG0Gp?? < ss |f413046764ccXؘX(XؘX``  yagcy @(@?# `0412$ $ # # # 04  Uc@ @?>3bL2#:vPx8o`gg g<gg`w03`p& zŀZZy[}~[Zx[[~Zy[z `+@~|<`л6ͳUB?;?3 .v@ƀƀ@ƀƀ@F|_?~<0P8c2<F B ?u(((q(u(U(08`:ty|> ͤ}~y^L@@\:xT PD@>@|@9@PA`@N͓ LNOOOO PeLp$N ~ :~~~~~~:;~~~:~~:z~F p?cp 0p4cND4G4_xPUU U)UWلP4`%`AǀAC_Cy)C@xC~Cx)BCQӆX`t t 0<G8j@vͷs6?;?;6&36 ~ :~~~~~~:;~~~:~~:z~?|0??<| <04cND4G4_xPUU U)UWلP4`%`AAC_Cy)C@xC~Cx)BC_QÆX`t t 0<G8j@vͷs6?;?;6&36s9s9s9o9s { w s}S)s9Ns90 {0  0sc1c1c1    sc1c1c1    s8Vv(BP\zHnz,fffffffffffffffffffZNYA$ XAFFFLAGSC1fC0 0 0 0 0 0 0 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 0 0 0 0 1 1 2 1 2 1 2 1 2 1 2 1 1 1 0 0 0 0 0 0 1 1 2 1 2 1 6 1 3 1 6 1 2 1 2 1 1 1 0 0 0 0 1 1 2 1 3 1 5 1 5 1 5 1 3 1 2 1 1 1 0 0 1 1 2 1 3 1 5 1 5 1 0 0 5 1 5 1 3 1 2 1 1 1 1 1 2 1 3 1 5 1 0 0 0 0 0 0 5 1 3 1 2 1 1 1 1 1 2 1 3 1 5 1 0 0 0 0 0 0 5 1 3 1 2 1 1 1 1 1 2 1 3 1 5 1 0 0 0 0 0 0 5 1 3 1 2 1 1 1 1 1 2 1 3 1 5 1 0 0 0 0 0 0 5 1 3 1 2 1 1 1 4 2 4 2 4 2 4 1 0 0 0 0 0 0 4 1 4 2 4 2 4 2 0 0 0 0 0 0 3 3 3 3 3 3 3 3 3 3 0 0 0 0 0 0 0 0 0 0 0 0 3 3 10 1 10 1 10 1 3 3 0 0 0 0 0 0 0 0 0 0 0 0 3 3 10 1 20 1 10 1 3 3 0 0 0 0 0 0 0 0 0 0 0 0 0 0 3 3 3 3 3 3 0 0 0 0 0 0 0 0 0 0 0 0 0 0 4 1 0 0 4 1 0 0 4 1 0 0 0 0 0 0 0 0 0 0 5 1 0 0 5 1 0 0 5 1 0 0 5 1 0 0 0 0 0 0 1 2 0 0 1 2 0 0 1 2 0 0 1 2 0 0 1 2 0 0 2 1 0 0 2 1 0 0 2 1 0 0 2 1 0 0 2 1 0 0 2 1 0 0 24 1 0 0 25 1 0 0 26 1 0 0 27 1 0 0 28 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 9 1 3 1 3 1 3 1 3 1 9 1 3 1 3 1 3 1 3 1 9 1 3 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 3 1 3 1 11 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 11 1 3 1 3 1 11 1 0 0 11 1 11 1 11 1 11 1 11 1 11 1 11 1 19 1 9 1 11 1 0 0 24 1 25 1 26 1 27 1 28 1 10 1 11 1 19 1 9 1 11 1 0 0 1 1 2 2 4 3 5 4 1 2 10 1 11 1 19 1 3 1 11 1 0 0 11 1 11 1 11 1 11 1 11 1 11 1 11 1 19 1 3 1 11 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 11 1 3 1 3 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 3 1 9 1 3 1 3 1 3 1 3 1 9 1 3 1 3 1 3 1 3 1 9 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 0 0 0 0 0 0 2 1 11 1 2 1 0 0 0 0 0 0 11 1 11 1 0 0 15 1 0 0 2 1 11 1 2 1 0 0 20 1 0 0 11 1 11 1 0 0 11 1 0 0 2 1 11 1 2 1 0 0 11 1 0 0 11 1 11 1 0 0 11 1 0 0 2 1 11 1 2 1 0 0 11 1 0 0 11 1 11 1 0 0 11 1 0 0 2 1 11 1 2 1 0 0 11 1 0 0 11 1 11 1 0 0 11 1 0 0 2 1 11 1 2 1 0 0 11 1 0 0 11 1 11 1 0 0 11 1 0 0 2 1 11 1 2 1 0 0 11 1 0 0 11 1 11 1 0 0 11 1 0 0 19 1 11 1 19 1 0 0 11 1 0 0 11 1 11 1 12 1 11 1 11 1 11 1 11 1 11 1 11 1 11 1 17 1 11 1 0 0 11 1 2 3 2 3 11 1 0 0 11 1 2 3 2 3 11 1 0 0 11 1 0 0 0 0 0 0 0 0 11 1 0 0 0 0 0 0 0 0 11 1 11 1 0 0 0 0 0 0 0 0 11 1 0 0 0 0 0 0 0 0 11 1 11 1 0 0 1 2 1 2 0 0 11 1 0 0 1 2 1 2 0 0 11 1 11 1 0 0 5 2 5 2 0 0 11 1 0 0 5 2 5 2 0 0 11 1 11 1 0 0 3 2 3 2 0 0 11 1 0 0 3 2 3 2 0 0 11 1 11 1 0 0 0 0 0 0 0 0 11 1 0 0 0 0 0 0 0 0 11 1 11 1 0 0 0 0 0 0 0 0 11 1 0 0 0 0 0 0 0 0 11 1 0 0 11 1 11 1 11 1 11 1 0 0 11 1 11 1 11 1 11 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 Lionpoulosxx& ------------------------------ Sprite editor V1.0  STOS basic accessory$ ---> ALL SCREEN MODES <---$ By F.Lionet & C.Sotiropoulos (c) Jawx - Mandarin& ------------------------------c---> adapt to resolutiondXn,s~iPALET:NBPLAN:TXMAX:TYMAX(:TYCAR:TRANSP:x~nPALET:NBPLAN:TXMAX:TYMAX(:TYCAR:TRANSP:ZfxrsPALET:NBPLAN:TXMAX:TYMAXP:TYCAR:TRANSPxMULX:MULY:TXTXMAX:TYTYMAX:SPRX:SPRY,:ZMX:ZMYd:ENCRE:CURINKENCRE}T$(,2),&TZOOMX(,),&TZOOMY(,),$TEMP(P),F$( ),A$(d),!C() :\TY:\KX:&TZOOMX(Y,X),&TZOOMY(Y,X):X:YBANKMAX0\X?:X:XNJ---> Creates menuȜPd@͝]X:A$:(X)A$:ҝ]X:N:]YN:A$,Z:(X,Y)A$:Z(X,Y)ׂY:Xnܝ^+XPALET:(,X)(),X,X:X8ᢸ(,):(,)0BANKMAX(,)(, )栁:2맠 ,,,p,X,@+---> Messages,81_X:Y:_:A$:T$(X,Y)A$:YY:A$:X ---> Initialise work bank,$.---> Grab sprite bank from first programL'*B:a*(B,)J((B,))(B,)BANKMAX(B,),(B,)(B,)():LBANK(B,):,::+\68:|::':nr :'t---> Main loop觠::"()bV"()j> "() (aϊ---> DrawР:,,ՠ|::T$(,);CURINK; : ;:CURINK: ;::b::FLGPAINTT$(,);ڟc:*ߢ():aXX(ZMX)TZX:YY(ZMY)TZY:XXYYXXTXYYTYc"RAXXX:AYYY:OLDMK:c"0CURINKvYYAYXXAX4:AXXX:AYYY:OLDMK:<OLDMKߛOLDMK FLGPAINTZMXXXTZX,ZMYYYTZYZMX(XX)TZX,ZMY(YY)TZY:SPRXXX,SPRYYY:xCURINK:)6:SPRXXX,SPRYYY:':ENCRE:':3---> DRAW A LINE4DX(XXAX):DY(YYAY):DDX(XXAX):DDY(YYAY):XAX:YAY:DYDXH9CPTDX::XXDDX:CPTCPTDY:CPTCPTCPTDX:YYDDY>ZMXXTZX,ZMYYTZYZMX(X)TZX,ZMY(Y)TZY:SPRXX,SPRYY:XXXCHCPTDY::YYDDY:CPTCPTDX:CPTCPTCPTDY:XXDDXMZMXXTZX,ZMYYTZYZMX(X)TZX,ZMY(Y)TZY:SPRXX,SPRYY:YYYR Ê---> Fix RVB Ġ:|:T$(,);CURINK; : ;:CURINK: ;::,:T$(,)^ RVB$((@CURINK)w,)$:,:RVB$;* ΢():a Ӣ C()(0):X((RVB$,C,)):XX:XX^ (RVB$,C)(X) :CURINK,($RVB$):  :  (" -|:T$(,)4 2()|::B 7X:XOLDMK: 2 <X Z$ AOLDMK 2X ZPEINTUREPEINTURE:PEINTURE$PEINTURE0 _):OLDMK: 2 ---> STOS* :n ,, ,  |::a ™nr :': ---> About sprites^ :,,:ENCRE:(),(),6 &,:: SPRITES GENERATOR :X +,: By Francois Lionet :,: & C. Sotiropoulos , 0, : (c) JAWX-MANDARIN  5o::)h: ---> quit, (:R: :: ---> Quit and grab, (:R:H 頰:::XPALET:X,():Xn (),()LBANK::,LBANK:,LBANK()@ 󠱧::bgrab(),1:erase(),1` :--->FILE*:,O,,h|:--->load sprite bankRR$(*.mbk,T$(,#),):+:'<R$츕(R$,.MBK):68#,R$:()BANKMAX:LBANK()::zR$,():(),()LBANK():,:R"(()),$+\:NOMFILE$R$'46|::T$(,))::w:'N---> Save sprite bank&ONOMFILE$h(TR$NOMFILE$:mg---> Save as ...^h+:R$(*.mbk,T$(,$),):+:'<mR$츕(R$,.MBK):>r(),()LBANK()wA$ Lionpoubnk:X :()X,((A$,X,)):X:() ,:(),LBANK|<{R$,()()LBANKH(),()LBANK()4|::T$(,))::w:---> BANK0:,,P,,|::---> Grab from program((:R&:T$(,%)::NZ:X:X񸈚 *(X,) ,((X,)) XX,Z:T$(,&);X;T$(,');(X,)  XXZ,:T$(,):::#Z, :T$(,();:X:XX#R(X,Z)(X,)BANKMAX:#(X,),(X,)(X,)():LBANK(X,):,::+\ #)h:':o---> SPRITESfp:,,8,,,,,,,d,i,2,,,*u|::':---> INSERT8|:T$(,)::)R:8RNBSPRӊ---> Put sprite8Ԡ|:T$(, )::)٢R:`ޙ+\:RNBSPR:RNBSPR(---> sprite at the end of the bankjTSTXTY(NBPLAN):TSLBANKBANKMAX:ADCURBANKNBSPR:AD,ADBANKLBANKAD:AD,TX:AD,TY:AD,:AD,NBSPRXNBSPR:DP(CURBANKX):CURBANKX,DP:XDP:X:DPDP(CURBANKX)(CURBANKX)(NBPLAN)ZCURBANKDP,ADBANKLBANKCURBANKDPTSAD,DP:X:XADBANKX,(ADBANKX)TStX:LBANKLBANKTS:NBSPR:ADBANK ,NBSPR:)---> insert spriteADCURBANK(R):A(AD)CURBANK:TSTXTY(NBPLAN):LBANKTSBANKMAX: A,ADBANKLBANKATS:LBANKLBANKTS:AD,ADBANKLBANKAD:LBANKLBANKAD,ACURBANK:AD,TX:AD,TY:AD,:NBSPR:ADBANK ,NBSPRvX:XADBANKX,(ADBANKX)TS,X:NBSPR)RXR:ACURBANKX:A,(A):X|$XRNBSPR:ACURBANKX:A,(A)TS:Xd)SPRX,SPRY,R,TRANSP:AD,XHOT:AD,YHOT.7---> Get sprite88|:T$(, )::)8=RRNBSPR:B:,,:SPRX,SPRY,:ZMX,ZMY,GADCURBANK(R):TX(AD):TY(AD):XHOT(AD):YHOT(AD):'tHLXSPRX:YSPRY:NR:*:---> Erase sprite8|:T$(,)::)8RRNBSPR::͊---> sub pgm eraseADCURBANK(R):A(AD)CURBANK:TS(AD)(AD)(NBPLAN)ӠATS,ADBANKLBANKA:LBANKLBANKTS:AD,ADBANKLBANKAD:LBANKLBANKJNBSPRNBSPR:ADBANK ,NBSPRvݝX:XADBANKX,(ADBANKX)TS,X:NBSPRRXR:ADCURBANKX:AD,(AD):XRNBSPRXRNBSPR:ADCURBANKX:AD,(AD)TS:X---> Move sprite around8|:T$(,)::)8RRNBSPR:6 R:|::T$(,):::1---> Fix MASK PARAMETERSp2|:T$(,); (;(TRANSP) ;) ;:TRANSP:::c---> Get from picture:dR$*.PI(() ):niR$*.NEOhn+:R$(R$,T$(,),):+:R$:ls|:T$(,)::):RRNBSPR:|x|::,:T$(,):,:T$(,):, :T$(,).}w::R$:RL:K:K:K,,R,TRANSP K*':)h:B:4|::T$(,))::w:NJ---> cinema!TȝX:!C(X):X:CINEMA:P͠|::T$(,):CINEMA;::):ҢRRNBSPRP!C(CINEMA)R:CINEMA:CINEMAbSPEED(:XCINEMA:!C(X)X:: old cinema$CINEMAl|::T$(,)::,: :XX():YY()h,:T$(, ):,:T$(,!):FRAME:'0,XX,YY,!C(FRAME)|X2SPEED:A$:A$-SPEEDSPEED:'JA$+SPEED2SPEED:'*A$ :" A$( )T:X:FRAME:FRAMECINEMAFRAME:)h:>',:T$(,):SPEED; :+---> Fix hot point8,|:T$(,"):,,1:XENCREENCRE:X:ZMXXHOTTZX,ZMYYHOTTZYZMX(XHOT)TZX,ZMY(YHOT)TZY: :X6(SPRXXHOT,SPRYYHOT):ZMXXHOTTZX,ZMYYHOTTZYZMX(XHOT)TZX,ZMY(YHOT)TZY:,;()::@XX(ZMX)TZX:YY(ZMY)TZY:XXYYXXTXYYTYu6EXHOTXX:YHOTYY:1---> Fix X and Y size,RNBSPR:&|::T$(,)8(<:R ,,,::,,:SPRX,SPRYZMX,:NNBSPR:XSPRX:YSPRY:*SPRXTX,SPRYZMX,:SPRX,SPRYTYZMX,:ENCRE:':XHOT:YHOT:RNBSPR::L TYTYMAX!TYTY:!HTY!TYTY:!LTXTXMAX!TXTX:!0TXTXTXj!'t::T$(,)X:(TX) Y:(TY):W---> TOOLS<X:,], ,,,],L]---> Erase((:R't:---> Flip :YTY:,SPRX,SPRYY,SPRXTX,SPRYY,SPRX,SPRYTYY:Y%:'::---> Mirror<::YSPRYSPRYTYXTX:Z(SPRXTXX,Y):SPRXTXX,Y,(SPRXX,Y):SPRXX,Y,Z:X:YȀ::'::---> Scrolling&|::T$(,)8(<:R,,,$:':  Downn:,SPRX,SPRYTY,SPRXTX,SPRYTY,SPRX,SPRYYTY:,SPRX,SPRYY,SPRXTX,SPRYY,SPRX,SPRYY:Y::  Upl:,SPRX,SPRY,SPRXTX,SPRY,SPRX,SPRYTY YTY:,SPRX,SPRYY,SPRXTX,SPRYY,SPRX,SPRYY:Y::  Rightz::YTY:$TEMP(Y)(SPRXTX,SPRYY):Yh,SPRX,SPRY,SPRXTX,SPRYTY,SPRX,SPRY:YTY:$TEMP(Y):SPRX,SPRYY:Y::::: # Leftf$::YTY:$TEMP(Y)(SPRX,SPRYY):Yh),SPRX,SPRY,SPRXTX,SPRYTY,SPRX,SPRY~.:YTY:$TEMP(Y):SPRXTX,SPRYY:Y:3:::K---> PaintZLFLGPAINTFLGPAINT:(,)T$(,+):@QFLGPAINT:(,)T$(,*):?---> Palette,@:CURINK:'---> Editor screen'',,,P,,:::,(),()(M((MULX)),()TYCARr',,,,,:::T$(,)T$(,)b',(),()( (MULX)),()TYCARD'$,, ,,,:::(nb'),(),()( (MULX)),()TYCAR8'.,,,,,::'3,(),()( (MULX)),()TYCAR:PEINTURE:)*'8ENCBISENCRE:'tf'=,, ,,,,,,,8,,>'B,(),(),() 'G:&'s---> draw sprite and zoom border'tZTXF'yTZX&TZOOMX(,Z):TZY&TZOOMY(,Z)H'~TYTZY(ZZ:'y':,,:SPRX,SPRYZMX,:ZMX,ZMY,.'ENCBIS:,,,l',ZMX,ZMYZMXTXTZX,ZMYTYTZY'ZMX,ZMYZMXTXTZX,ZMYZMXTXTZX,ZMYTYTZYZMX,ZMYTYTZYZMX,ZMY',,,:ENCRE:SPRX,SPRYSPRXTX,SPRYSPRXTX,SPRYTYSPRX,SPRYTYSPRX,SPRY'$'׊---> Draw work sprite and zoom&'ؠ|::T$(, )'ݠSPRX,SPRY,SPRXTX,SPRYTYZMX,ZMY,ZMXTXTZX,ZMYTYTZY '⠜:(;---> Test arrowsH(<:():()R:.(A()R:B(F()R()($):(K(A(m---> draw arrowsj(n|:ENCRE:,,,:,()TYCAR,()8(s<,()<,()TYCARR(xh,()TYCARX,()TYCARR(}|,()TYCAR,()TYCAR((---> Confirm.(|:::T$(,): (G:()4(R:@R (:)---> Draw paint zone()ENCRE:l)6:|0)XXFD) (),()X,()TYCAR:)5---> set paint patternd)6PEINTURE,PEINTURE,,PEINTURE,);&)g---> Dialog window disappearance)h|:)m,,::ZMX,ZMY,:ENCREBISENCRE:^':)ˊ---> Put / Get screen)̠,,:ENCRE:(),(),():,,,:NSPAGE :S:AR)ѝX :X,,,:X:M(())()~)֠ ,(),()M,(): ,M,(),()F)۠,,,:R :*0)SS:R,XX,YYXXTXMAX,YYTYMAX:NSSNBSPR))NNSS:ACURBANK(N):XXXTXMAX(A):YYYTYMAX(A):* )R*):ENCRE::*bz):R():K:(R R )(AR AR ):*bX)(AR AR )(R R ):*b)R RQQ:Q :X:Q,QQ:Q,QQ:Q,QQ:Q,QQ:QQ,,,:*0:Qz*ARR:K:R PAGEPAGEPAGE:)̛)l*R NSSNBSPRPAGEPAGE:)̛)Z* R RRRPAGE RX*:)h:X :X,,,:X* */---> draw border of choice*0I(R):J(R):XX(MULX)(TXMAX)I:YY()(TYMAX)J*5XX,YYXXTXMAX,YYXXTXMAX,YYTYMAXXX,YYTYMAXXX,YY*:*a--->print command line**b:,:T$(, )X*g,:,: T$(, )(PAGE) *l:0*---> draw sprite N at X Y without HOTSPOTd*ADCURBANK(N):DX(AD):DY(AD)H*,XDX,YDY,N::::+[---> set bank parameters~+\ADBANK():CURBANKADBANK(ADBANK):NBSPR(ADBANK ):+---> stores sprite.+RNBSPR::+---> puts back spritej+NNBSPR:XSPRX:YSPRY:*:RNBSPR:F+)h:(n:):ENCRE:': ,#---> Initialise work bank,$D,),BANKMAX:()()(),,.(),L,3(),:(),:() ,0,8LBANK:,:,=+\:O---> Datas english menusVPSTOS , FILE , BANK , SPRITE , TOOLS , PALETTE nU, SPRITES !,,~~~~~~~~~~~~~~~~~~~,,Quit,, Quit and grab,zZ,Load sprite bank,,Save sprite bank,,~~~~~~~~~~~~~~~~,, Save as ...,,_,Grab from program,d, PUT sprite,, INSERT sprite,, GET sprite,, ERASE sprite,,~~~~~~~~~~~~~~~~,je Move sprite,,Cinema,,Previous cinema,,~~~~~~~~~~~~~~~~,fGet from DEGAS,, Get from NEO,,Fix mask,, Set hot point,,Fix x and Y size,i,Erase,,~~~~~~~,,Flip,,Mirror,,Scroll,,~~~~~~~,,Paint,XôSTOS ,DISQUE ,BANQUE ,SPRITE ,OUTILS ,PALETTErù, SPRITES !,,~~~~~~~~~~~~~~~~~~~,,Sortir,,Sortir/recuperer,þ,Charger une banque,,Sauver la banque,,~~~~~~~~~~~~~~~~~~~,,Sauver comme ...,*à,Grabber d'un pgm,Ƞ,STOCKER sprite,,INSERER sprite,,PRENDRE sprite,,EFFACER sprite,,~~~~~~~~~~~~~~~~~~~~~,nɠ Bouger sprite,,Cinema,, Ancien cinema,,~~~~~~~~~~~~~~~~~~~~,ʠPrendre dans DEGAS,,Prendre dans NEO,,Fixer le masque,,Fixer le point chaud,,Fixer la taille X/Y,͠,Effacer,, ~~~~~~~~~,, Renverser,,Miroir,,Scroller,, ~~~~~~~~~,,Peindre,7---> Messages8 RED |GREEN |BLUE ,Rd|Gr|Bl, Current ink,"Click in arrows (outside: quit)...,X and Y size --> ,( ABANDON | CONFIRM Z=R/G/B:,Click to fix paint pattern, --> Paint ON, ...ZOOMING...B!PUT SPRITE: click outside to quit,PREVIOUS : : NEXT,P,"GET SPRITE: click outside to quickGERASE! click outside to quit,INSERT: click outside to quit,MOVE: click outside to quit, Click to end.LFIX MASK! Type parameter, GET FROM PICTURE: select sprite!,GET FROM PICTURE: select file!,Drives connected:, Enter drive:QDisk empty! Press a key.,Enter file name:,Left button: get sprite,Right button: QUIT, Press any key,Files on disk:VCINEMA! Select picture #,SPEED:,CINEMA!,+ faster / - slower,SPACE freeze/RETURN stop, FIX HOT POINT[? LOAD SPRITE BANK File name must end with .MBK!,? SAVE SPRITES BANK File name must end with .MBK!`SPRITES BANKS LOADED:, - Program #,, size:,Input program number,DISK ERROR! Press any key.,Paint,Draw ,ǜ RGE | VERT |BLEU ,Rg|Vr|Bl, Encre,Clicker dans les flches...,Taille en X et en Y --> ,' ABANDONNER | CONFIRMER bǡR/V/B:,Clicker pour choisir le motif, --> Peindre ON,...JE ZOOME...xǦ STOCKAGE! click dehors -> sortir, AVANT : : APRES ,PAGE,PRENDRE: click dehors -> sortirǫEFFACER! click dehors -> sortir,INSERER: click dehors -> sortir, BOUGER: clicker dehors-> quitter,Clicker pour finir.bǰMASQUE! Entrer le parametre,Choisissez le sprite...,Choisissez l'image...ǵDrives connectes:,Entrez le drive , Disque vide!,Entrez le nom ,Bouton gauche: prend,Bouton droit: stop,Pressez une toucheǺFichiers presents:,CINEMA! Clickez l'image #,VITESSE:,CINEMA!,+/- change la vitesse,ESPACE / RETURN , POINT CHAUDǿ? CHARGER UNE BANQUE DE SPRITES Le nom doit se finir par .MBK!,? SAUVER UNE BANQUE DE SPRITES Le nom doit se finir par .MBK!ĠSPRITES EN MEMOIRE:,- Prg#, , taille:,Quel programme ,"ERREUR DISQUE! Presser une touche.,Peindre,Dessiner,---> Size of zoomsh , ,,,,,,,,,,,,,Lionpoulos ASCII table STOS Basic accessory& By F. Lionet & C. Sotiropoulos  (c) 1988 Jawx / Mandarin> ,(),,$,,$:: ASCII codes::2:" 0 1 2 3 4 5 6 7 8 9 A B C D E F; (dBY*2:(Y)$; ;: <d6XXFZYX:Z  ; ;(Z); PX ZYdwn :Lionpoubnk -c(!*"3DUfwBQPp$[_ޜ}ߟ}xd}|~?߯ϣ3w?G_ &'####?N??TTTTTTTTTTTTTTTT@TTTTTTTTTT߿TTTTTT߿߿Ͽ'wswsr{sw0dĀMuÇ73)as1诮 8x~|9;=~~<={GFD$DTL$dDČdT>^Lߟ?xə+HN .L lL.JH.=>~=H,\t־ \EH$@t`@;3saCY\~9ϼ4:87.;(k}[:$FΎ?O'?Meab% d"e &`e"dBez:ظ~bc"$ '"*/2$#&"!#11&*TdHTDdDČlDDdDܸO .Ln.n *L N, M,  N o^]0x0غ*\Eqp20$ޅjPԴ + ]T[:@LH X $k{V #+-+ a% d"e!f`d!fD!"% ab$e405Pr509z9*#& '*#"'&"!#16!("3"&";3 4$dDTDD>?,),,|fvpؠDq`@ǃ?q9gc?† ?0oLՔ)3RZxɉ`08??߿߿><Z:*1aBCTV>sKݚ*Rb߿s70>|r  # g߿:@|?3s <0O0roHB002@h??`Z&|H0XX0 P@\@Ƹ y -[nr@d-.+)-\ڟ?ie5jUqc ?YhoskW}4544?d6XG\ӯTR`x1N%,)$/!6z΀ p942 sT(J%ؙ:4,(0 \o7?c8  00x4L.  {8qqs3u9x: -) 21ufldlDLTHLHIXP0`?   ;:ZP2elC|sr19<8#329@^&0&+.-  ( ($()  2 38`~wspEӒ"/e@0p%{9;G{|T@|8Ϸ{g/ml]x0`<;yu[g((!yvo-X/%:yhq{|~o/9yq9=^>x٩Y rA%Eɹŭ0ɥ@  @@@A@@`3Ç?0Nc Ύ?_-@@@|{NGFhh`HxXXx0313ɡŹɫ<@C#φxťc<рa7@Ȉ̌  88xXX ?qc`"2pGN\yɡ`D;O_8|q9gc3Ȉ#!1qx>?g'?ߟ 48!cgGO?E)>?p8 ?0qy|?x!0>  `{vlX0bČ!f80a`dfbxprclϟ#3x xA 3@g80`hq,8> VSߏ0?|:"} 91x<NL\X;7/.;?_o7?w?gL?( 9l8qLJ???_qqãCÇ??? >xÅϿߟ?8><|x80@?<Ɉqa10{<A`4y 9I#߯o7O8 0 pTР?^(? 8?Ɔ ! }~p.m0??~>NDE$Rpϟ=_~Ox`|$ b `@``h h  @@  @@  @@  @@  @@  @@  @@  @@   @0 F@@   @0P0p00@8Px080XA  @A@@`        @0Xp808@0Pp08H( (808 0x(8X8X8       w 0X80v܀d?}x?Ls7>|~̇ : ȈȈE)?0?g't?@xr |qcG?gϞ'fd  p`>?VR  =90Xy3ˋ?c8 x~?? >?㳑i? ??gD@D@LDA@OGC@GD@A??s|!q9HJK ˋ KK <>~@Ί `s0a8<>ϯg 1' <@@??G@AECGO_O_1?8?8p|χ>k=܀8<~{1?0spx8`?̀`90?p??'|<a??/?/?023#!qpXHȈ np800 0@   y 1  LĄ0 ~<0 p8p8gca!8  @> 8p@`1qQPp`@` p`@1qpp00@ ` ` TFB`@` }=)+*kcbB`@`@@ ` `c?>< w? 8vܻq`ǃ}    10xmHIHx~3x? &0 g## 1p0p0p`@ }< ? ?p <@` \0 '/.' |@P`p6`@0VSߏ|<|~ >ۻ>|?m? 8<8<08>?08?@d18LaގAx<?a0p0p0p0aÃ@ `  @0~?8?|χ0H<܀ <8<~{1?``,8?p<>6|<xxx~wxTXXUx x~wxx?? π ~o|o?=sߍ 0? 30;S i`90 Ӹ ( 50( ? a?y0c?3ӟ@e/ÃÃ/_@A@A@@ug????e}?]9M7OK(WP=PϨP|v@@@@@@@@@@@@@@@(P|vPϨP=W_./.z_UU<Y/#ހ?ހ?L`l݀Pp߀III }@5{ù/pz'^_ހ`` ?>?>?>? Y5K I I I Initialise menusd{PdFiZaX:A$:(X)A$:Xn[X:N:[YN:A$,Z:(X,Y)A$:Z(X,Y)sY:X&x(,) , ,8:::,C0:,C1:NJ---> Initialise text,Ȝ8d:T$(2)TX:\:T$(X):X:T$(X) +---> Reserves memory bank,:1,p---> Check extension:\,X(,):]4.T :N:' ---> Reads data packingD$HAUT( ),!L(),!H():$ <]X:$HAUT(X):XJ]X:!L(X),!H(X):X菘:,C0:,C1:>򠛦:,:s(,,:::T$():^͊Ί---> STOSϊ*Р:^4,,,՘]3 About Compactor04, ,,6,,:^9, ,::(),()(3),( )|>,:T$():,:T$():,:T$():, :T$()"C, :T$( )H`M:M`\:R:  Quit(y&'t:R,OLDM,(): : Quit and grab.T:N:'( 't:RN :,LPACK:(),()LPACK() : Bgrab() ,5 : Erase(),5`   ---> DISK < : , , , H, , ,   Load NEO picturel ::R$(*.NEO,T$(),):::R$:0 !((R$,)).NEO:" &AFF: Wl ::R$(*.PI1,T$( ),):::R$:0 ((R$,)).PI1:" AFF: Wl ::R$(*.PI2,T$( ),):::R$:0 颸((R$,)).PI2:" AFF: Wl H::R$(*.PI3,T$( ),):::R$:0 M((R$,)).PI3: RAFF W zp \(,):(,):,, ,(,,::,:T$()0 aR$,::(,)\ fAFF::():::::::(,): kAFF:,C0:::():::::,C0:::(,):0 pT:N:':@ z::T :N:':   Save BINARY fileN R$(*.PAC,T$( ),):R$:J (R$,.)R$(R$,).PAC zN ,, ,(,,::,:T$(). {R$,()()LPACK Š: Save MEMORY BANKNR$(*.MBK,T$(),):R$:.(R$,.MBK):N,, ,(,,::,:T$()B.$:::,LPACKB)(),()LPACK():R$,*.:::Ȁ:3:FB.::T :N:': ---> PICTURE0:,h,,0, Pack whole picture6, ,,<,,:::0 ,:T$():,<C:Z:XY(,,AFF,FLAGS,$HAUT(X),,,!L(AFF),!H(AFF)$HAUT(X)) ;T$();X;T$();Y;T$():YZZY:CXX:d"C:T:N:':(,):(,):(,):'::,:T$()(Z)T$()::,:((ZO4Vx)d) % T$(),LPACK(,,AFF,FLAGS,$HAUT(C),,,!L(AFF),!H(AFF)$HAUT(C))01, :T$( ):'D6(,):(,):(,):; g Pack part of the picture.hT:N:'0mAFF:,C0:$r:::():|wNC():DX:DY:FX:FY:,,,|C::C:DX,DYFX,FY:C:CNCC:MK:K$::MKK$: K$fX(()):Y(()):MK*XFXDXX0YFYDYY|*XDXFXX0YDYFYY|H,C0:,C1:AFF6, ,,<,,:::0,:T$():,<C:Z:X^DFYDY:D$HAUT(X)̛Y(,,AFF,FLAGS,$HAUT(X),DX,DY,(FXDX),D$HAUT(X)): ;T$();X;T$();Y;T$():YZZY:CX̂X:d֢C:T:N:':(,):(,):(,):۠::,:T$()(Z)T$()::,:((ZO4Vx)d) % T$()LPACK(,,AFF,FLAGS,$HAUT(C),DX,DY,(FXDX),D$HAUT(C))0, :T$( ):'Dꠀ(,):(,):(,):/ Erase picture ON/OFFx0,FLAGS:(,FLAGS)(,)T$()(,)T$()5 Change palette ON/OFFx,FLAGS:(,FLAGS)(,)T$()(,)T$()' '---> Alarm box'6', ,,<, ,:::"',:T$( )^'XN:,X:T$(TX):X':'$:')'.'q'r---> Confirn's't,, ,,,::::,:T$():,(),()(),()'y,(, ,,,::::,:T$():,(),()(),()0'~za:(()())@'()RR:('::::O ---> English menus.P STOS , DISK , PICTURE zU, About COMPACT.ACB ,,-------------------,, Quit,, Quit and grab,Z, Load PICTURE.NEO,, Load PICTURE.PI1,, Load PICTURE.PI2,, Load PICTURE.PI3,,------------------,, Save BINARY FILE,, Save MEMORY BANK,_, Pack whole picture,, Pack portion...,,--------------------,, Erase screen,,*Change palette,ó ---> Menu Francais.ô STOS , DISQUE , IMAGE xù, COMPACTER !,,--------------------,, Quitter,, Quitter/rcuprer,þ, Charger IMAGE.NEO,, Charger IMAGE.PI1,, Charger IMAGE.PI2,, Charger IMAGE.PI3,,--------------------,, Sauver F. BINAIRE,, Sauver B. MEMOIRE,à, Compacter image,, Compacter partie,,--------------------,, Effacer l'cran,,*Changer palette,7---> English messagesj8PICTURE COMPACTOR,Stos basic extension, By F. Lionet,(c) Jawx / Mandarin 1988Z= Erase screen, *Erase screen, Change palette,*Change paletteB LOAD NEO PICTURE, LOAD DEGAS PICTURE,= SAVE BINARY FILE (default extension: .PAC)VG'The COMPACT.EX extension is not loaded!,Press mouse key to go on...L Disk error!,Select an option...,CONFIRM,ABORT,QUIT and GRAB: WARNING!,#packed picture is copied in bank 5!QA moment please...,This picture can't be displayed,with your monitor...,9 SAVE MEMORY BANK Bank number is 5!V Trying best way to pack picture:, - Try, ,size:,"This picture is not worth packing!, Final size:, bytes.,of the initial size.z[3PACK PART OF THE PICTURE: use LEFT and RIGHT button,+to fix corners, then press to pack.,Ǜ---> Messages FranaisrǜCOMPACTEUR D'IMAGES,Extension au Stos basic, Par F. Lionet,(c) Jawx / Mandarin 1988`ǡ Effacer l'cran,*Effacer l'cran, Changer palette,*Changer paletteǦ CHARGER UNE IMAGE NEO, CHARGER UNE IMAGE DEGAS,= SAUVER L'IMAGE COMPACTEE (Extension par defaut: .PAC)nǫ*L'extension COMPACT.EXA n'est pas charge!,1Pressez une touche de la souris pour continuer...ǰErreur disquette!,Selectionnez une option..., CONFIRMER,ANNULER,QUITTER / RECUPERER: ATTENTION!,2L'image compacte est recupre dans la banque #5!ǵUn moment S.V.P...,!Cette image ne peut-etre affiche,avec votre moniteur...,< SAUVER LA BANQUE DE MEMOIRE La banque sauve est la 5!Ǻ"Je cherche la meilleure mthode..., - Essai, ,taille:, Cette image est trop complique!,Taille finale:, octets.,de la taille initiale.~ǿ1COMPACTER UNE PARTIE: Utilisez les boutons GAUCHE,2 et DROIT pour fixer le carre, et pressez .,---> Datas packing8 ,,,, ,,,(,%,,(,,(,Lionpoubnkjii848 8T88!t8(8.85$8;8BD8H8Od8U8\8c8PALT"3DUfwGBQPp?q@`@  ? /Lj? a??<<8?=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+op wXo` @_ p@X0o xp vc~ >X ?q> |~?i aJ |.d i|.Ѐ q j| yߎx  `9$:w8|||||8=@{00Pf `lPe` |np  a? ^|~@0?(<@c|9~q~q~r|*4~x,0GD`&@ 0?q@`@  ?0p?l@?=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+op wXo` @_ p@X0o xp vc~ >X ?q> |~?i aJ |.d i|.Ѐ q j| yߎx  `9$:{9@pxp>~>>>?<>IsJs,a@Iq `0 ˼@=>??@ 9> 88 py00p8?G@@?߆I91  !?=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+op wXo` w_ p @X0o @xp @Yy&8@`| 'р |'}y||$0M.r(|x|d ;F|$@|H|q~ |6y|x, 8h`T9 {Py `"<8|>>||>>||>>8`E`y@| |st~y0}р /Bp{``bz68@??<  ?G@@߂???_/DFx>`~?=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+op wXo` w_ p @X0o @xp @Yy&8@`| 'р |'}y||$0M.r(|x|d ;F|$@|H|q~ |6y|x, 8h`T9 P}  "=ppppppA] ` @:<08p  ` @`Axcp|`y?  8cC?>=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+op wXo` w_ p wX0o@Lp@ ?w@1N@(0Op,007`\P.Hws!^7p>n0,Pql~ Xypx  `9H@?7?/?/_o@@ 0sǝ8px pȤ8Dx ,p \^"~~~>~8?Pp 0>@@`?  ????O Ghs??=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+op wXo` w_ p wX0o@Lp@ ?w@1N@(0Op,007`\P.Hws!^7p>n0,Pql~ Xypx  `9H@o/@@o;wwwwww00@8??dt >?>3? 2<(?&?$ ?@?  n~08__=;Hx pA-~bA-~:A?~2+oq Xoa_ qX0ogvLj8 g+Wsc(VQaX``o4]'8=Bo}!"`Xq~ @y xP @`9@wq syqq`8;P$8g??@p4??@>?,00` ppxp0  `0? 3g? 08` ?8|=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+oq Xoa_ qX0ogvLj8 g+Wsc(VQaX``o4]'8=Bo}!"`Xq~ @y xP @`9@qpA.y <q H6>8/@v`~xD58|0?f~3<p`|yp  ? 3g8?@?@8qs>7=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+oq Xoa_ qX0ogvLj8 g+Wsc(VQaX``o4]'8=Bo}!"`Xq~ @y xP @`9@qp||||||>z1-̀b@@@/ ex&<>>?@'``p p7 pG E8 >@@? 3f G3;=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+oq Xoa_ qX0ogvLj8 g+Wsc(VQaX``o4]'8=Bo}!"`Xq~ @y xP @`9@appxr0 h18`88<?< _?`<Ѓ|p`4 `p ?   ? ??=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+oq Xo` w_ p wX0ogLgp ?w@1N@(0Op,007`\P.Ows!^7p>n0,Pql~ Xypx  `9H@ p0xp ?  0@@ˀ    0?  ??? ??=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+op wXo` w_ p wX0o@Lp@ ?w@1N@(0Op,007`\P.Hws!^7p>n0,Pql~ Xypx  `9H@;D 7@;?;?;?;/~ b qh=?}7 !!0>?Fx ?G@@??>? ?8?09?=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+op wXo` w_ p @X0o @xp @Yy&8@`| 'р |'}y||$0M.r(|x|$ ;F|$@|H|q~ |6y|x, 8h`T9 P 7?@  3:=__y~? y@3B8?C@0x@>?1>?G@@???0p`A?<=: ^_?!&P>__=;Hx pA-~bA-~:A?~2+op wXo` w_ p @X0o @xp @Yy&8@`| 'р |'}y||$0M.r(|x|d ;F|$@|H|q~ |6y|x, 8h`T9 P? @@@o~`???`p@8y v.?x߇@pxߘ86  > ? <(?@>?@@`p[ <@?q@`@  ????BCC ??=: ^_?!&P>__=;Hx pA-~bA-~:A?~6'op;Xo`@_ p%@X0o xp vc~ >X ?q> |~?i aJ |.d i|.Ѐ q j| yߎx  `9$:syq}<|@=  <#<p><28_@ P[Ø?<0`808& @@@@``?q@`@  ?.FF B00??? 0yǏ=: ^_?!&P>__=;Hx pA-~bA-~:A?~6'op{Xo`@_ p@X0o xp vc~ >X ?q> |~?i aJ |.d i|.Ѐ q j| yߎx  `9$:{ypQ"9 )< '8HMP00?D,?{| Æ `08`Lionpoulosxx Memory monitor STOS basic accessory& By F. Lionet & C. Sotiropoulos (c) JAWX - MANDARIN ͦ:S$()l\(() Stos :(,) Set address :(,) -------------:(,):(,) Help:(,) Quit T2\X:(X) Program(X) d<\Y:A$(Y):(A$)A$A$ &FX񸈚[ dP(X,Y)(X,Y) BankA$ empty :(X,Y):\ xnZ(X,Y) BankA$ at ((X,Y),) :xd(Y)(X,Y) BankA$ empty :(X,Y):\ xfn(X,Y) BankA$ at ((Y),) :\ xxY:XAD:kR>---> Main loopNADADPYY:\,,,,4K$:K:K$\l"ȢK$( )6Ң(K$)(K$)$ܢ(K$) 2XXN::d(S$(YY),XX)K$:XX,YY:K$;:XX:TKKXX XX:XX,YY:TKMXXNXX:XX,YY:lKRADPADADP:>:PKGADADP:>: "KHJ@,YYYY:XX,YY:46ADP::@ADPADP:ADADP::,YY::A$;:X:S$(X)S$(X):X:S$()A$:XX,YY: JKPh@TYYYY:XX,YY:^ADPADP:ADADP:::,YY:A$;:X:S$(X)S$(X):X:S$()A$:XX,YY:hKXX XX:XX,YY: ;:XX,YY:(S$(YY),XX) :xrKa:,YY:A$:S$(YY)A$:XX,YY:2|Kb:---> RETURN XX?X:Y($(S$(YY), X,)):YYY2ADX,Y:X:pX:Y((S$(YY),@X,)):Y†ADX,Y ̂XD֩,YY::S$(YY)A$:A$;<XX?XX XX?T&e,,:,\d---> Set address2 ,, ,(,,::J:$:,:Enter start address (hexa):;A$0&AD(A$): :>:0---> Help2: ,,,(, ,::2D,:Move cursor with arrows,8N,: displays previous page4X,: displays next page,<b,:" erases all changes on line,,l,: fix address,<v,:#Press to validate changes.8,:DON'T CHANGE SYSTEM ADDRESS!!!*, :Press any key...:h: ---> Quit :Ɗ---> Bank address X: X: X:X\Y:X񸈚AD(Y)AD(X,Y)>: ---> Print lineA$(AD,)$: :jlX:A$A$(((ADX),)$) :X A$A$ :kX:Y(ADX):Y A$A$()A$A$(Y)&*X:ADAD:4---> Print pagen>ADPAD:::kZ:i:S$(Z)A$:A$:Z:HXX :YY:XX,YY::R---> Error correction0\::AD:>:Lionpoubnk c  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~fffllll>`<|fl0fF8l8pvp88pf<d80 0 ~~`0 0`+&nw>C#|7"`c>n3&xk33n<_<0x7 cg:2V<$mn, 0lH0:W8.gn8X03a~t**V;]62zW8.gnv:n|?L <vfn~r2fd80FԨ\#w\fcvnl4p"@`0 xx8l`0(f, 8t*j<2ffL< |6``"d8<049Y24rdx0uij7#Ub26f:xzD"\0p p` 44b~f><>f>p<>f><~><```<<pffff>ffff>|f<``<:0|00~ff<<6f|ff|`0|000` <~> 8< 4X|fff4Xfvnf<>f><000| 6kÆ6n֟6ll6l66l4X<~>4Xc~~~~Ɵ|~~c>UUUU3333*@\z:Lft &lPZNYMXTYMXTXMULYMULXENCRELionpoubnk c  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~fffllll>`<|fl0fF8l8pvp88pf<||&  || 80q3xx 2"# 1x3c??#1x 3b 3| 0 )S 293|>093"2&2|ǎ0 3|& %I#&9"!' <@`0 xx8l`0 2"# 1x3c??#1x 3b 3| 0 )S 293|>093"2&2|ǎ0 3|& %I#&9"!' <0p p` 44b~f><>f>p<>f><~><```<<pffff>ffff>|f<``<:0|00~ff<<6f|ff|`0|000` <~> 8< 4X|fff4Xfvnf<>f><000| 6kÆ6n֟6ll6l66l4X<~>4Xc~~~~Ɵ|~~c>UUUU3333e la souris.+a Pressez une touche de la souris.,Erreur diquette.,Ce n'est pas jeu de caractres!,Caractres trop grands !,Je charge le jeu par defaut...&+f%MXTYMXTXMULYMULXENCRELionpoulos  PROTECT ACCESSORY( Jawx / Mandarin2< byFP Francois LionetZ_dͦ:n ,*x: PROTECT ACCESSORY! :N,:5Please insert the disk to protect, and press s"":Loading BASIC.BIN...JA$(stos\basic???.bin,):A$:BL((A$,,)):L:(zstos\basic???.bin,( )":Bugging key words...6B(( )( )L,step)8E(( )( )L,Jinstr),ܢBE:.根(B)(E),D:6Press to save, any other key will prevent it!":{stos\basic205.bin,( )( )L":Protection complete.",,K$:K$s, 6K$( ): @: pffff>Bfff>|B<@@<4Xfff4XbRJF<>f;< |)B*R$HH$H$ $H4X<~;4Xc~~~~Ɵ|~~c>  Lionpoubnk32L2LO<|\< |   \   < F P Z :zZ:zZ:zZ:z  !Z!"#:#$z%%&Z&'(:()z**+Z+,-:-.z//0Z01PALTfDp 0PU33ss77w?````@````??@ 8p@???????!3Laa@@@!!!@@a@a3L!88@88888888D8|??!C @?@@???? !D@`@c<B<??3cÀ????? ?@?@`` @`@c<B ????80@~a@a@a!??>|@@ ????? ?!aa@@q<C 'Xc@a@?@?????!aa@aa@  @````````?````````@`````````LJH p8$88@80<>A@! ??Ϗǟ@ ` 0@ 0` |LJLJLJLJLJLJ 8p@80H88@80H8p?8p80H88@80H8pD 7<8xppppx>0 LJǃǃLJ`8@8x88D888<8<8<8888D8x8pD`烇8@ 8888?888880DH8@ 8888?88888D7σ<8xppp0Hp0x0>0 ǃ88DD88888888?8888888888DD8D8888888888D?@!<Bǿ?Ǐ8 DP8@89:?;988p80DH烇8D88888888880DHÇGGǏ>88@D8@<./'#! x 8 P??@<xxp8Dp8   p8p8Dxx<@LJLJLJ 8p@80H88@80H8p? 88888D???@<xxp8Dp8   p8p8Dxx<@LJLJLJ? 8p@80H88@80H8p? ;988p88D@< ~?`0p `p~? @  $0H8x? @|8D(888888888& ?|8D(8  @@@@gGOO?p 0 0   ( ``??>x< @@x x< @@???<0x@@<x  00@````0@0 ??`0@0 $$ 00@`?````@?????? ??`a@a1Ha8E?????pppq q@qqqq@q F ????1Hq`@`p@?@?8?@cccc$?????1J@qa`p@?@?? @88888888|?0???>Acc~ @C@@@?@???????? ppqw@u yqqqqq P Ppppppppp  @8D??ppsqrt|~wsq@ppppppppppp C#ccccc!w{ s@sssss ???????? w{qqqqqq???? 3@aa@a@a3@ ?????yq@qqqq@q rp? gccc?@( w{p ppppp???p????@>@A@@p@~ @@!@  0@ppppppp2H ?????????qqqqqq{}1?0@@8  GO>p11 0" ``?p@8  P?p@8  Bl P|? <x p`Lionpoubnk"( `d??<D"83dBi&fi&df38&I6H3II 8;sg`pp88;sgDDDDD 99 `00 `q?P?P?000 9~???>~?~??UUUU?? $ ??Rx@*?$  ?@ ?sw; @ @ @ @ @x>>p|>?x~   )Q!A:{?/AA 0@g`0`>`7`3`3`3`3`6`>`<z}Bz}Bz}Bz}bfC x8x=xn???`0b0 `p`0???)TUVcccc=?xg_^|||<|>>|g~|~x3g ``````````` ???? 7777777s@>?x?~~<<@;w?___AAaa*?7CpGG''p4jTTP @ @?~~~~H$>N|>pp88pÆ``</OD"8   ?????? ? ???????  ??????? ? @  y?ax??ag??a?x<<??OOggsyy? a` ww88;޻޻@ bT$2Tfx8~ >N^LionpoulosZZ$ ****************************$ * *$ * BANK INPUT *$ * *$ * Part of the STOS basic *$ * By Franois Lionet *$ * (c) 1988 Jawx/Mandarin *$ * *$ **********15/8/88*********** ͦ:&!D(),#UNP()0]X:X:X2d,:>>> MEMORY BANK INPUT <<<(i, :Please enter :2n, :- Bank number :;BN2s,:- Bank length :;BLDxBNBNBL:dn,:$When the end of the bank is reached,:::$the program saves it (fortunately!).::::%Enter the numbers as they are listed.:::6You can omit the zero at the beginning of the numbers,:::7but YOU MUST ENTER THE ASTERISK when you encounter one!::8The asterisk means that the following data is compacted::::?It reduces considerably the amount of data you have to enter...(:::Don't loose courage!>,:... Press any key to begin ...::wȴ\ͬ:O-------------------------------------------------------------------------------ZҡO| Address | DATAS | Checksum |ZסO-------------------------------------------------------------------------------hة,:O-------------------------------------------------------------------------------,ܠ,,,P,, c"Xj,X:O| | | |; XBN,BL:AP(BN):ADEND(BN)BL jYY:,YY:O| | | |;:4Press RETURN to accept address (or type new address):,YY:(AP(BN),)$;,A$:A$d|"A$( )eA$:,YY: ;:,YY:A$:A($A$):AP(BN)A:,YY: | |;:,YY:(AP(BN),)$;DAPADEND::A$:<(7):CHK:h*N, N,YY:D$;(D$,)*#UNP(N):!D(N)($D$):CHKCHK!D(N):N,YY: ;(!D(N),)$; ;:h&(D$,)*D$D$*:#UNP(N):!D(N)($D$):CHKCHK!D(N):N,YY:*;(!D(N),)$; ; NvE,YY:D$;:C($D$):E,YY: ;(C,)$; ;$CCHKCHK::::1--- Checksum error! Please re-enter the line. ---::0)AAP:jN^.#UNP(N)A,!D(N):AA:j=3D!D(N):NB!D(N):(NB)((,NB))C:$H8jXNB:A,D:A:X=N:APA&B:LINE:AADENDL:Q, : HURRAH ! You've reached the end!:V,: Press any key to save your bank. [:wH`F$(*.MBK, Enter the name of your bank,)(eF$:`@j(F$,.)F$F$.MBK8o(F$,.MBK):`8t:, :... SAVING ...:myF$,BN~n:,:To load it in your program,:::+use the following statement in direct mode:D:::LOAD (")F$(") .,:... Press any key ...0X:X:X:w::4::, : DISK ERROR!:2 ,:, :Check your drive!ĘVLionpoulosr^  Mapper V1.3. A room definer written by Stephen Hill : Select file\ B3This program only works on a COLOUR Monitor. SORRY!: >$>,:()-j=\:SF$(D$*.mbk, Load Sprites,):SF$:::(SF$,).MBK:,:This is NOT a sprite FILE!:,:Press any key to try again::w:' Load file(SF$,:(()):,:This is NOT a sprite BANK!:,:Press any key to try again::w:, Load palette2 S: : NSܚ:,:!Too many sprites! Maximum is 220 :,:Press any key to try again::w:< ڢSZ(@ SW)( ھSH): ڢSZ:,:&Sprites too small! Minimum size = 16x8:,:Press any key to try again::w:VA#PAL(): NI:# VPAL( NI)( NI): NIBFq::?':>:<:P S: :" : NI:# TRFM$Map Truncated at ((TRF) ):M1$Due to lack of space:M2$ Press any key:TF: :NROOMTRFj::q::,<: FHD:/P: FHD::X:ϊ Save rooms to disc,Й" : RESULTՙH֠: :CU$(,,CTY@,CBY):ڙ\:MF$(D$*.map, Save Maps,):(MF$,).MAPMF$:"ۢMF$ߏ >::#,MF$:#,a:#,NROOM&,: Saving roomsL:INROOM:LL(ROOM$(I)):I:LM$Not enough space:TF: :#:pINROOM:#,ROOM$(I):CNI::I:#Fq::::HD::HD: ::(06)츊A:M$ Disc error::M1$Please hit a key:TF: ::#:d:M$Error ():M1$Please hit a key:TF: :::X:S: %:d3 Save ascii program,4" : RESULTh> >NL: 6LSZ::: CU$(,, ,CTY@, CBY):+:H=\: AF$( D$*.asc,Save room as data statements,):( AF$,).ASC AF$:H"M AF$R:: M$Data saved at 50000-: &T$Yes!: F$Abort?: TF: FHD:. : FHD::: RESULTW TL:4 NI NROOM: TL TL( ROOM$( NI)): NI: TLM$Not enough space:TF: :$X,: Saving data.[ Open file and output redraw subroutinev\:F[:#, AF$: xN:W NI xN: C$:#, C$: NI,e Output number of rooms and their sizeVf#, 50005 data (( >NL) ),(( NROOM) )o Save data$p= `R NROOM"u pCN `R:>,y Write size of room and the grid sizez hRM$ ROOM$( `R): LRM( hRM$): D$(( 6LS) )data ( hRM$,,),( hRM$,,),: LRM( LRM): LM: LF(~ Output each individual data lineB TL( LRM): LL?( LRM LL): D$ D$((( hRM$, LM,))!) ,: LM: LRM: LL:H( D$,), D$( D$,( D$)).( D$) #, D$. LRM 6LS: LFj D$(( 6LS) )data : TL: 6LS 6LS >NL LF: `R:#: FHD:/P: FHD: S, SO: S:% %: S SO:! :  Quit," : RESULT~ TF: M$ Really Quit?: &T$YES!: F$NO: : RESULT񸣚 : : Set Grid," : RESULT~  `:SH1SHSW1SWM$ Same size!:TF: : : ROW@SW1:COLSH1:ROWCOLM$Sprite too small!:TF: : : SZROWCOL:MXSZ(SZ,MXSZ):M$Warning!:M1$This option erases:M2$ your current room!:TF: $M$ New size = ((SW1) ) by ((SH1) ):TF:F$Abort!:T$Ok: :RESULT : L:SHSH1:SWSW1:HSH1:ROOM$(ROOM):: : _ Get sprite parameters ` CSP SP( S): SW1( CSP): SH1( CSP): ڶHOTX( CSP): ڬHOTY( CSP):  SPB(): SP SPB( SPB): NS( SPB ): CSP SP( S): SW( CSP): ھSH( CSP): ڶHOTX( CSP): ڬHOTY( CSP):T ( .R$( `R) : .R$(0, TL( .R$)) .R$: Switch out control panel :,,, ,CTY@, CBY:,,, ,CTY@, CBY:(,, ,CTY) CU$:(,, ,CTY) CU$: Create a dialogue boxV :: CU$(,, ,CTY@, CBY):::F :::::,: M$:,:: TF: TT ( &T$): xFT ( F$):( TT) &T$( TT);: ,:( xFT) F$( xFT);::::p, WTYp, WTY(X ¢ TF,:M1$:,:M2$:TFD à: TF,:M1$:TF Ţ TF ^ . Ƣ ƛ  XM: YM: YM" ZN(,) YM" ZN(,)" RESULT( XMq) ^ ̠|: TF FHD,,, ,CTY?, CBY:,,, ,CTY?, CBY:(,, ,CTY) CU$:(,, ,CTY) CU$:  Invert button ::" ZN( ZX,)," ZN( ZX,)" ZN( ZX,)," ZN( ZX,)::0  Test button to see if it has been pressedP  ZT(): MK: ZT ZX RESULT:  MK" : : MK! : RESULT: RESULT: Select a sprite 䠰:"SL(,),"SL(,)"SL(,)@,"SL(,)0:DX(ZX):DX " SNS:: I:SISI:S,SI: `:S,SI: :,"SL(I,)(@SW1),"SL(I,)(2SH1)(SH1@),SI:::I:,d,,:SS:::: `:H(SH,SH1): S:: % S NI:)$ :' NI: &SI S NI: S, &SI: `: S, &SI:)$ :," ,|,,X Data for slots,Z,,S,,,^[,K50000 restore 50005:read nl,nroom:if room>nroom or room<=0 then boom:return\50001 restore 50010+(room-1)*nl:read gridw,gridh: cls physic:cls back:for I=0 to 319/gridw : for j=0 to 199/gridh:read s : if s>0 then sprite 1,i*gridw+1,j*gridh,s:update : put sprite 1D]750002 next j:next i:wait vbl:sprite 1,100,-100,1:return ^ ^L,l L, l  PALT0Pp0Pp3Uw???????| < px~|8x|<<|p><<~ǃ;x|>v<8|xpx988~σ0~߃{y.pQjuj__xxں=|ڃSF$HjD$HPcxNgw0PpppuwW'w ?>#U13UA?x03#13s3?00x3#3U3UA?003>#13X?0030#33U3UA?0030#331?000#1U1UA?0x0 ?9~Ù~|~|)~ 9~|9~|9 @``cpf`xf`pg`A``f @gDDgfcfwf{fgwgfAffcDDa€`fbfc`fafbc€!n`l1fa?yf`f1a?q=19x~`~ǀ1l`0a!f`0a`f|`|0`f`0f`l`0fax~0cǀٰ1߽ڽ{ٰ1ss`{a````w````{a`x`{a`````w```{a`x`xa`~`~`~`n`~```xa`x`xa```~```}``xa`x`xa``|`|``|`|`|`xa ;{{{{{{{(JZONYbA$JX AFFFLAGSC1wC0 The STOS Map and Room designer This accessory program has been supplied so that you may construct rooms of background data which can be used in platform and ladder type games. It enables you to build up a variety of locations which can be displayed and used from within your own program. Games such as Gauntlet, Time Bandit and Bratacas have various background displays. Each display is made up from a set of sprites. This is where a map designer can speed up the development of a map-type game. Each location can be designed with the mouse, then the relevant data and controlling program can be saved out to disc and then merged into your program. You can even use the sprite editor to grab background sprites from many commercial games, modify them to suit your needs, then use them in the map definer to create your own displays. Terminology The first thing to understand about the map editor is the terminology used. When the word "ROOM" is used it refers to a single screen of sprite images. These images or building blocks are used to construct a room. You must of course design some sprites before using the map editor using one of the sprite accessories. We have supplied a demo file of sprites called MAP.MBK - the sprites in this file are 16x16 in size and depict walls, floors, treasure and potions. Using these sprites you can design screens similar to those found in Gauntlet. Another word to become familiar with is "MAP". This refers to a list of rooms. By moving an animated character in a game you could allow him to travel from room to room. This grid of rooms is similar to a grid on a local area map - hence the name map. Using the map designer When you first enter the map designer, the first thing you encounter is a file selector. From this you must load up a sprite file to use for designing rooms. This file will be analysed by the designer to work out how many sprites can be plotted on the screen. The very first sprite is used to calculate how many sprites fit across and down the screen, dictated by its X and Y sizes. It's a good idea then to position map sprites at the start of the sprite bank. Once the sprites have been loaded you are presented with the design screen. From this screen all the editing, loading/saving and manipulating of rooms takes place. Editing a room At the base of the design screen is the control window. This is used for many purposes and provides an easy-to-use environment. When your pointer is over the window you can select the various options from within it, but when you move it into the blank area it can be used for plotting sprites onto the screen. Because the room is a full screen in size, the window can be moved up and down. If you wish to view and edit the whole screen you can do so by pressing the Spacebar. The sprite used for plotting is the middle sprite out of the three displayed in the window. You can select other sprites using the arrow icons. < (Select previous sprite) << (Select first sprite in the sprite bank) > (Select next sprite) >> (Select last sprite) To plot a sprite onto the screen you must move the mouse pointer around the room display area and press the left mouse button. You can delete a sprite by pressing on the right button. The window will get in the way at times, so to move it about we have supplied various ways to do so. TOP (Position the window at the top of the screen) BASE (Position the window at the base of the screen) MOVE (Move the window up or down using the mouse button) As we said above you can also remove the window by pressing the Spacebar, but you will also need to return to the window to select other sprites and functions and this can be achieved by pressing the Spacebar again. Creating a map When you have designed your first room you can go on to create more rooms. The menu titled ROOM has 7 selections which you can press on. The one we are interested in at the moment is 'ADD'. Press on the ADD area and the TOTAL number of rooms will increase by 1 and you will now be editing ROOM 2. Don't worry about room 1 - it's still in memory and can be called up by pressing on the < button in the ROOM menu. Here is a description of the selections in the ROOM menu. < (Go back to the previous room) > (Go forward to the next room) << (Go to room 1) >> (Go to the end room) ADD (Add a new room to the end of the list and edit it) INSERT (Insert a new room infront of the current room) DELETE (Delete the current room) Storing and programming maps When you have completed a map you can save it out as a .MAP file. This can then be loaded back in at a later date using the LOAD function in the FILE menu. These files are only for loading and saving from within the map designer. To use the designs in your games you must use the S.ASC option which will save out an Ascii file. To merge in the file, load in your game and type the following line: LOAD "filename.ASC" The word filename must be replaced by the name you saved the file under. The program lines will now merge into the current program in memory at line 50000. You will need to ensure that your program does not contain conflicting line numbers, otherwise they will be overwritten. Now you can call the routine with these small couple of lines: 10 mode 0:ROOM=1 20 gosub 50000 The variable ROOM signifies which room will be displayed to the screen. Another little trick is to copy the colour palette out of the sprite bank. This can be achieved with the following Basic commands which is also included in the map definer program: 99 rem *** Find palette address in memory *** 100 X=hunt(start(1) to start(1)+length(1),"PALT") 109 rem *** Add 4 to pass by the string PALT *** 110 X=X+4 119 rem *** Copy the palette into the current palette *** 120 for a=0 to 15 130 colour a,deek(X) : X=X+2 140 next a Here is a description of the file menu. LOAD (Load a map for editing) SAVE (Save a map to disc) S.ASC (Save an Ascii Basic program) QUIT (Exit from the map designer) GRID (Change the grid size of the current room) The GRID command is used to re-calculate the X and Y axis. This is dictated by the current sprite. So if you find that a larger set of sprites are to be used in certain rooms you can re-size the coordinates, and not be restricted by the default size set by the first sprite in the bank. To see how this works, load MAP.MBK into the sprite editor, make one of the sprites twice the size using the Set X/Y menu, then save out the file as MAP2.MBK. Load the map definer, select the large sprite and click on GRID. Now the large sprite will fit in amoung the other sprites on the screen. Points to remember When you design your sprites remember these following points: * Always keep the hot spot in the top left hand corner. * Try to keep all sprites the same size. * Sprites less than 16 across and 8 down will not be allowed by the sprite editor. 403118433 3 1616""""""""""""!"(",,,,,,,,"!",",""""",,"!",",",,,",,"!",",",",",,"!",",",","","!",",",",,","!",",","",","!",",,,(",","!","""""",","!",,,,,,,,","!",""","""","!","'",",,,,"!","'',,,,","!","''""""","!","'',,,,","!",",,,",,","!","""""""","!",,,,,,,,,,"!""""""""""""! 1616333333333333!333333333333!333333333333!655555555543!333333333333!333333333373!333337333383!333338333383!333338333383!333338::::83!333338::::83!333338::::83!655558::::83!333338::::83!333338::::83!333338::::83!333338333383!333338333383!333339333393!333333333333! 161633333333333%!333333%3333%!333333%3333%!%%%%%%%,,,)%!%,,,,,%,%,)%!%,%,,,%,%,*%!%,%%%,%,%,,%!%,%,,,%,%,,%!%,%,,,%,%,,%!%,%,,,%,%,,%!%,%,,,%,%,,%!%,,,,,%,%,,%!%,,,::%,%,,%!%,,,::%,%,,%!%%%%%%%,%,,%!%,,,,,%,%,,%!%,,,,,%,%,,%!%,,,,,,,%''%!%%%%%%%,%''%!%%,,,,,,%%%%! Lionpoubnk,l L,l   L   ,  l LPALT3Uw0Pp0Pp          ? `|>@@@|>? L3H#@;\&l%gޙ-_`/0 /0 ????@@@ /=_?y_?{_???'?;Ày}}=C@? @O LH$d,Jb= |   >? h|@ T@D F{}""  !TBTI ~BB~$$~BBB~@{?HHKJQz_ǰ@@z_K>HHKJQz_ǰws/w֏:/gwc֜9k1wUsUx20//0//0//0//0// ?0p0//0//1))))=1%)%)%)%)={{{{{# 11 #8;\<<|>n|>?o?wbFqs ?bFqs?w|>?o<<|>n8;\Lionpoulos n n( ********************************( * *( * MOUSE ACCESSORY *( * *( * By F. Lionet *( * Part of the Stos Basic *( * (c) 1988 Jawx/Mandarin *( * *( ********************************2!C()07 =YH: =YD: =COTdͦ:: =DM:]k =X:! =C( =X)( =X): =Xin_s, ,,<,,::,:LOAD A DEGAS PI1 PICTURE:,(),()(9),()x, ,,<,,::,:LOAD A DEGAS PI2 PICTURE:,(),()(9),()}, , ,<,,::,:LOAD A NEOCHROME PICTURE:,(),()(9),(), , ,<,,::,:LOAD A DEGAS PI3 PICTURE:,(),()(9),(), ,,<,,::,:QUIT:,(),()(9),() =OLDZ:a| =Z()$Ң =Z =OLDZax*ע =OLDZ| =OLDZ:$ܢ =Z| =Z: =OLDZ =Z =Z* =OLDZ| =OLDZ:, =Z:@1ZFILTER$.PI1:M@6ZFILTER$.PI2:M@;ZFILTER$.NEO:M@@ZFILTER$.PI3:MNEF$(*FILTER$, Please select picture, )(JF$::O(F$,FILTER$): ^MMc:F$:BmYGH(YH):YGD(YD):TY>rH$(,,YGH,YGHTY)>wD$(,,YGD,YGDTY):|COMAX:COMAX*CO:OLDXM:Z:XM:YM:KM:KMXMOLDXMYMOLDYM<YYHYYDOLDYY,,,YGH,YGHTY:,,,YGD,YGDTY:(,,YGH)H$:(,,YGD)D$::,Y:():OLDYYN:CO:,Y: X:() Y:() bKM::CO(CO)COMAX:XMLOLDXMXM:OLDYMYM::KM BX:X,!C(X):XdLionpoubnkIWB(Cuomo Tremolos ciD0Ld   :=BDFGF ::=BDFGFDFDC?ACDFGHC<:9FA=<:86653568:8:<8%,*('%*('%#%'('*('(%,*('%*('%#%'('*('(('%'('%,-*(*'%113431/1.//.,./,.,./0113431/1./.,)*,* V*,.16865653.0.,.,+(+))%.)+)''%013565683 ../1/.,.*,,*)*,)*)*,-../1/.,.*,*)%')%  %"')+,+)+)(+($%'%$  %,*('%%% %$#%% "%$%"" #%ci"TtBd   :=BDFGFddd ^0:=BDFGFDFDC?ACDFGHC<:9FA=<:86653568:8:<8%,*('%*('%#%'('*('(%,*('%*('%#%'('*('(('%'('%,-*(*'%113431/1.//.,./,.,./0113431/1./.,)*,* ~0*,.16865653.0.,.,+(+))%.)+)''%013565683 ../1/.,.*,,*)*,)*)*,-../1/.,.*,*)%')% L0%"')+,+)+)(+($%'%$  %,*('%%% %$#%% "%$%"" #%%&&&H&H(ROUTINESTLx@l4 ` ( $XPAL&OLDINK&CURINKSPRMAXNBLionpoulos $ ****************************$ * *$ * DATA GENERATOR *$ * *$ * Part of the STOS basic *$ * By Franois Lionet *$ * (c) 1988 Jawx/Mandarin *$ * *$ **********15/8/1988********* ͦ:0qX:X:Xc ~~~> Loads bank^dF$(*.MBK,3 Enter the name of the bank to be listed,) iF$::@n(F$,.)F$F$.MBK8s(F$,.MBK):d8x:, :... LOADING ...:s,}F$s<::, : DISK ERROR !:K:dNJ ~~~> Screen or printerȴNͩ, :(S)creen or (P)rinter ?;A$:A$(A$)<PRT:A$SPRT*עA$PPRT"ܢPRT栢+ ~~~> ListingB,tBN:(BN)BN@1A$ ---> Bank number :(BN):zB6A$ ---> Bank length :((BN)):z ;A$:zbA$A-----------------------------------------------------------------:zbA$A| Adrs | Datas | Check |:zbA$A-----------------------------------------------------------------:z<AD(BN):ADEND(BN)(BN) zrTA$A| | | |4B$(AD(BN),)$ (A$,)B$jCHK:zXN:ADADENDB$ 0000:yjD(AD):x`X:D(ADX)X:xvB$ ((AD),)$:CHKCHK(AD):ADAD:yX:y:X:(ADX)DXADXADEND:XX:CHKCHKDX:ADADX:B$*((D,)$)((X,)$)Z(A$, N)B$:(A$,;)(CHK,)$ւN:zۄADADENDbA$A-----------------------------------------------------------------:z0X:X:X :A$8PRT{RL:A$:w6L::$Printer error! : clearkey : wait key Q:LionpoulosBB  SCANASCII.ACB( STOS basic accessory&2 By F. Lionet & C. Sotiropoulos< (c) JAWX - MANDARINF`P ,,,,, ,,,,,.Z::,: Press a key..dd:d:A$:A$:Jn: Letter: ;:(A$)A$ Fx Ascii : ###;(A$); / ;((A$),)HX: Scancode: ###;X; / ;(X,)A$( ) ::Lionpoubnk$ ^<0PALTwp3DUfU33s&77f???{?????n'w>8?>?n97?7???????????????????????@@@@@H@H@p@XA G @HA2@F@H@@@@@@@@@@@@@@@@@@@@@@@?? ? @??77?77oooo@ ??xxC (?3/`3 #? <}?8@?@@??~||?|?|?|~~~?????|~>|~|>?>~@?x??pwW[7UUQUUTUUQUUT@h@h@h @hpD@h@h R@h2@hH@h@h@j@@@h@h@h@h@h@h@h@h@j@@@O/'A?@@UT/UU?gg0000~?UW_@??~?????~ ??@?|???.@,Bx|x|x|xx x xx< < | <<  < @ *К!TbA#R@}HC @@@aUUꪫUW(ȦQ0##    #ꪫUWUU<????~ 0'&@LL?@?=?~??p_/_/+ PU_*UTJUP???????>~??????>>??????ALET@`F| bn4x@dCOUL@@ @@HE@C 1XTRANSPTYCARTYMAX(TXMAXNBPLANPALET&OLDINK&CURINKSPRMAXNBVERSION$          CURINKENCREZMY2ZMXSPRYSPRXTYTXMULYMULXTRANSPTYCARTYMAX(TXMAXNBPLANPALET,h%,, , ,,,,,,,,,,,,h*,, , ,,,,,,,,,,,,Lionpoubnk IW|4 FunkyBitStilHereWaiting Ready? Movin' ChinklesCascade CascZap StrgTrio ci"Td2d ^0668665668653033533133531"ci,xDd2 d222 "%%"%%"%"%%"%%"%"%%"%%"%"%%"%%"%"%%"%%"%"%%"%%"%"%%"%%"% '' '' ' '' '' ' '' '' '"%%"%%"%"%%"%%"%0TX:<= A:<=A?=?A ::<= ?:<=?=<=? :0:<= A:<=A?=?A ::<= ?:<=?=<=? :ci%d2d< d08?;:8D?;:; ΧTx ,/'ci(Tpd2d ^=8=?A?=80  " %$ "     ci2Td2d<  ^  01/1141/,/0,*,,/,*(*ci0\d<  :535101.1015130., hA?A=<=:=<=A=?<:8 MKMIHIFIHIMIKHFDcid0Zd<  :KIFDB?=:8631.,* dKIFDB?=:8631.,* KIFDB?=:8631.,*cid0nd KIFDB?=:8631.,*'%"   xKIFDB?=:8631.,*'%"  KIFDB?=:8631.,*'%" ci0xnd< d22 0T36?;:8658=:86536;865325:60T65656531313131/./././.,1:8653568;=;:8658DFDBA?=;:;:8:865323568:? T#%#"  "#%#"  "#%#"  "#" '%'SPRMAXNBLionpoulos  TYPE.ACB STOS basic accessory& By F. Lionet & C. Sotiropoulos (c) JAWX - MANDARIN2hPdhdFicX:A$:(X)A$:XndrX:N:djYN:A$,Z:(X,Y)A$:Z(X,Y)vsY:X:ECR$,IMP$,ERR1$,ERR2$,T1$,T2$,T3$,T4$:e6x y,,,::T4$eNJ---> File ȧeZ,,͘eN$(*.*): :+---> Output,6,;1Z6OUT:(,)ECR$<---:(,)IMP$:Z;OUT:(,)ECR$:(,)IMP$<---:---> Start printing@::=====> ;N$::T1$::T2$:w:#,N$pg:A$(#,):(A$) (A$) (A$) A$.,OUTA$;A$;*K$:()K$()"K$( )hw:f. ::::T3$::e---> Errors:::: :ERR2$:::ERR1$::8蠦 File , Output , Start printing T, Choose file ,, -------------,, Quit,8, Screen ,, Printer ,*, Start printing , Screen , Printer , Disk error !!!,Printer is not ready!,; stops and restart listing, ends listing.,Press any key to start...<Printing finished...,Choose one option...BL Fichier , Affichage , Debut impression \Q, Choisir fichier,,-----------------,, Sortir,:V, Ecran ,, Imprimante ,,[, Debut impression ,` Ecran, Imprimante , Erreur de disque !!!,L'imprimante n'est pas prete!,G arrete et redemmare le listing, arrete definitivement.,'Appuyer sur une touche pour demmarer...BeImpression terminee...,Choisissez une option...xdd(dT" " 011115:851,,,,.1.111115:851,,,,.1 ,)),)),)),),)),)),))ciTdd  0&&&&)((&&&&))))-++))))20.--)20.--)&&&&)((&&&&ci0d<  ,-,*((*(&%'),*)',0.,4433130.,1-,*((*('%1 !! %$#"!  (%$%%! $#% $%',--+,,+'%$,%'%%($(ci0~d<  $$$)()+,)0.,+),+++,.010..,.+)+())))  "   $$$#"")%$$%$ci&0rdd 10/.-,+*10/.-,+*3210/.-,+*)(' 0/.-,+*)0/.-,+*)210/.-,+*)('& >=<;:987>=<;:987@?>=<;:987654ciTzd2P 0 0 0('&%$#"! ci(0^d2 10/.-,+*85:85885:85 0/.-,+*)74974774974 =<;:9876DAFDADDAFDAPALET