@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr 23,ACBIANTICDELAAGFNCOLUDEDATEDATGFTIME} @ (AY)886-C:+hhh hhBhEhDhIhH V}HԽI`,*yy6-C:lh B VEԩ:թBԝDE J V/H/ԭ0ԭ1ՠ0ȩCԠAȥԑȥՑh}/`,+x!6-C:h*hh*`,86-F:A@,&@DAVAR@x@@D:}A2,_.6-?:<@<@<$AV<A$,9@J6-?:<@,S6-?:,_AV-AY@4 B }dO (}-@=( SISTEMA BASIC TURBO OAAE/-@@+A%AF }/ 1-@@1( INGRESE HORA : HHMMSS0-@@#(>:AS,0@yҠ }Πy #B`"y--@")Ad%- 'y6-A6-%@$,y6-?:A,1y'A }A('A@6y%%6-F:A`,%AV$F:Aa,;y-%@%@(@yA0 Jyi%@ }A)BBA6(>:A%,EAF:,TA F:,fA @i$OyAY@4 BUTy''}72,138,72,174,156,6,189,176,6,141Yy((10,212,141,24,208,189,200,6,141,23^yJJ208,238,156,6,104,170,104,64,14,104,169,7,160,}168,162,6,32,92,228,96ay169,1,141,156,6,76,98,228byVERDE 21,ROJO 50,AZUL 146cy6621,3,21,0,0,0,0,0,0,0,0,0,0,00,0,0,}0,0,0,0,0,0,0dyTONALIDADEShy??8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8,8 D:AUTORUN.BAS,0,00,0,0,s{X I;@$@,)67@,. :67A$,. I67@,.6-?:A6!?K?b@}=h> U:dSPIELEREIEN MIT DEMn MOVE BEFEHL IN TURBO BASICs------------xVON }WOLFGANG CZERNYTPPEPPPPPPPPFTO&&};A,;A,;A,467@,.%67A,.467@,.467@,.%67A,.46}7@,.467@,.%67A,.467@,.QBTOP%%9U:@,%A8@C:,A}%%9C:,U:@,%A8@A$$Y@ DIES IST EIN##YA TEXTFENSTER  MA}%%9C:,U:@,%A8@A  MA*P4Q>TO-@@P -Av}6@@119C:,%&@@U:@,%Av&@@   MAPQTpOP - }A8@6@@119C:,%&@@U:@,%Av&@@ PPQTXOlPv !}-AvA8@6@@119C:,%&@@U:@,%Av&@@ PPQT@OTP^"}-A8@@@h))9C:,%U:@,%A8%@@r | MAPQT(#O<#PF##}-A8@Av@@P#))9C:,%U:@,&A8@%@@Z# d# MAn#Px#Q'T'O$'P.'$}-A8'??9U:@,%$@@U:@,%$@@%@ @ B' L' MAV'P`'Qs'Tt'O%}'P'-A'??9U:@,%$@@%@ U:@,%$@@@ ' ' MA'P'&}Q'T*O+9C:,U:@,Av +Q.T.O.9U:@,C:,Av.Q2O2AdAU'}2<2'A@@'A A2AAHM@2'AA'A AH3A(}@@M@3'AAH'A @@3AAM@"3=F:Ad,AU,3Q63T)}:O:*6-@6-@p'6-*: +@16-@ :-@A@:)6-%@*}!@P)6-@:6-'@6-:6-$E:,6-$G:,:%!AQBQ@: ,%%:$$6-+%,'+}@$E:%%@,;$$6-+%,'@$G:%%@,; /%%; $;Q D:TURDEM.TUR%%:$$6-+%,'h:TURBOPRUEWER-----------------------Turbo-I/O V1.0-}von Julian F. Reschke(c) Happy Computer 1985-----------------------;@9,$6-.-@.}@98"67<,.>:,B 6-%L VA5(Fehler!`JJ104,104,104,10,10,10,10,170,104,104,157,6/}6,3,104,157,69,3,104,157,68jDD3,104,157,73,3,104,157,72,3,32,86,228,132,212,169,0,133,213,96t~Zur Demonstration:0}1 +@$'0@1@-A@#,#/A&A 1}-A@#,#/AA& Bild abspeichern++Anfangsadresse: PEEK(2}88)+256*PEEK(89)Laenge: 192*40=7680Befehl: Schreiben=11++@@ D:TEST.PIC EE6-?:C:,<3}@<@}hGͩα Τ+ eUSG Τʩ`,<<,$""***************************?}*""* Data-Zeilen fuer *""* Adventure - Text *""****************************iiDu stehst am Ein@}gang einer gewaltigen Hoehle. Links neben dir fuehrt ein Pfad nach Westen; er siehtll, ziemlich verwildert aus und wird vA}on gewaltigen Grashalmen verdeckt. Er scheint ins verwunschene Taljj, zu fuehren. Richtung Osten erhebt sich ein gewaltigB}er Huegel der an die Hoehle angrenzt. Ausserdemdd, dringen aus der Hoehle ploetzlich merkwuerdige Laute; sie werden immerC} lauter und es hat den<<, Anschein als haetten sie Dich entdeckt.... Was nun?D:WORDPROZ.BAS Anschein als haetteD}n sie Dich ees hat den<<, Anschein als haetten sie Dich entdeckt.... Was nun?D:WORDPROZ.BAS Anschein als haette TSZEILSPALTD LOESCHEN VON BILDTEILEF}NDER AUFRUF ERFOLGT MIT##X=USR(1536,SC,ZEILEN,SPALTEN)(** VON WOLFGANGANG CZERNYZ +d AG}n%%6-F:@,%AV$F:@,x6-@6-@}6-$@@%..6-?:A6<&@%<@<@ H}, A@UNTERPROGRAMM NACH 15366-#A--A6Au"!)6-%- $AI}Uh!( DATEN-FEHLER!$&B$L==104,104,133,177,104,133,176,104,104,170,104,104,133,178V==164,178,169,0,145,176,136,J}208,251,24,165,176,105,40,133`..176,165,177,105,0,133,177,202,208,231,96 D:BLOESCH.BAS=164,178,169,0,145,176,136,aSCCTIMSIZXYA`@@@xAHA`@6-@ 6-A` L}6-@ 6-@K +@$'0@@A0@K@ ,% - M}@6@(-A`@2:"@6-%$E:,06-&+$G:,$G:,,: @`7$6-&+ N}$G:,$G:,,$6-%$E:,< /  Z/6-%@"@%,%/ @0d"6-@ %H:@,$@0S6 O}-%@%+H:@,$+A&+$@,,,6-%@%+H:@,$+A&+$@,,, A6-@ @% P}) )-@?P6-$E:,6-$G:,< ,%%/&%!,%&+/&&/ 9@ Q}<$ D:SPHEREDE.MO@?P6-$E:,6-$G:,< ,%%/&%!,%&+/&&/ 9@ 2595jTURBO BASIC COMMAND LISTCompilado y Traducido porJohn Drake de la Pirata SoftEstas instrucciones son de la P$S}irata Soft Sudamericana y los Atari Users Group pueden reproducirla libremente siempre y cuando nos den el credito que merece$T}mos.En caso de que acabes de llegar de Marte, o si aun no te has enterado, TURBO BASIC es el mas fantastico nuevo Public D$U}omain Basic Interpreter que hemos recibido del Atari Users Group de Holanda. Trabaja en los modelos XL o XE de los Atari comp$V}uters. Es casi demasiado bueno para ser cierto y debe ser lo ultimo para todos los usuarios de Ataris XE o XL.Turbo BASIC, $W}ademas de ofrecer 42 comandos mas y 22 funciones mas que el BASIC de Atari, le da al usuario 1603 bytes mas de espacio para $X}el programa debido a que "esconde" parte de el mismo bajo el sistema operativo del XL/XE. Ademas corre 3 veces mas rapido qu$Y}e el BASIC atari, incluye la mayoria de lo comandos del DOS, tiene graficos avansados y funciones de programacion, y no le im$Z}porta si los caracteres estan en minusculas o mayusculas o en inversa para la mayoria de los comandos.Nombre Sintaxis $[} Descripcionho30Nombre Sintaxis DescripcionTURBO BASIC COMMANDS: $\} 35Disk I/Oo30BLOAD BLOAD "D:name" Binary loads file name (DOS option L with /N).o30BRUN BRUN$]} "D:name" Binary load and run file name (DOS option L).o30DELETE DELETE "D:name" Deletes the file name (DO$^}S option D).o30DIR DIR Disk directory (DOS option A).o30 DIR "Dn:*.*" Directory of $_}drive n, note that wildcard extenders may be used.o30LOCK LOCK "D:name" Locks the file name (DOS option F).$`}o30RENAME RENAME "D:old,new" Renames the file name (DOS option E).o30UNLOCK UNLOCK "D:name" Unlocks the file $a}name (DOS option G).Graphicso30CIRCLE CIRCLE x,y,r Plots a circle with center at x,y and radius r.o30 $b} CIRCLE x,y,r,r2 R2 is an optional "vertical radius" for true circles or ellipses.o30CLS CLS $c} Clears the screen.o30 CLS #6 Clear screen opened in channel 6.o30FCOLOR FCOLOR n D$d}etermines fill color.o30FILLTO FILLTO x,y A fill command analagous to the BASIC commands "POSITION x,y: XIO 18,$e}#6,0,0,"S:"o30PAINT PAINT x,y Another type of fill command, this one is a recursive routine that will fill an$f}y closed object as long as x,y are inside it.o30TEXT TEXT x,y,a$ bit-blocks text in a$ at x,y.Memoryo3$g}0DPOKE DPOKE m,v Pokes location m,m+1 with 2-byte integer v (0 <= v <= 65535).o30MOVE MOVE m,m1,m2 $h} Block transfer; moves m2 (number of bytes) from starting position m to new starting position m1.o30-MOVE -MOVE m,m1,m$i}2 Same as MOVE but copies starting with the last byte of the block.o30BPUT BPUT #n,adr,len Block Put; same a$j}s FOR I=0 TO len-1:PUT #n,PEEK (adr+I):NEXT Io30BGET BGET #n,adr,len Block Get; same as FOR I=0 TO len-1:GET #N,A:$k} POKE adr+I):NEXT Io30%PUT %PUT #n,a Until now, there was no convenient way to put numeric values onto disk $l}or cassette files other than by using PRINT, which converted them to strings first, a slow and cumbersome process. %PUT puts$m} the number to the device "as is," in 6-byte FP format.o30%GET %GET #n,A Get a number stored with %PUT from $n}the device and store it in variable A. Again, this is much faster than using "INPUT #n, A".Structured Programming$o}o30REPEAT REPEAT Start a REPEAT-UNTIL loop.o30UNTIL UNTIL Terminate when condition m$p}et.o30WHILE WHILE Start a WHILE-WEND loop to end when condition met.o30WEND WEND $q} Terminate a WHILE-END loop.o30ELSE ELSE Optional extension for IF. The IF condition must not be foll$r}owed by a "THEN", but terminated by end-of-line or colon.o30ENDIF ENDIF Ends an IF-ELSE-ENDIF or IF-ELSE $s}condition. Note that this allows an IF condition to span more than one BASIC line, provided the "IF" statement is structured$t} as shown in Note 4.o30DO DO Starts an "infinite" DO loop.o30LOOP LOOP Cycle $u}back to the start of a DO loop.o30EXIT EXIT Exit a DO-LOOP loop.o30PROC PROC name Star$v}t definition of procedure.o30ENDPROC ENDPROC End definition of procedure.o30EXEC EXEC name E$w}xecute procedure name.General Programmingo30PAUSE PAUSE n Pause processing for n/50 seconds.o30RE$x}NUM RENUM n,i,j Renumber the program starting at line n,first number is i, increment is j. This function w$y}ill handle GOTOs, TRAPs, and all other line references except those which involve variables or computed values.o30DEL $z} DEL n,i Delete lines n-i.o30DUMP DUMP Display all variables and values. For numeric array${}s, the numbers are the DIMed values plus one. For strings, the first number is the current LENgth of it and the second numbe$|}r is the DIMed size of it. DUMP also lists procedure names and labels with their line values.o30 DUMP name $}} DUMP to device name, such as "P:" or "D:DUMP.DAT".o30TRACE TRACE Trace program during execution.o$~}30 TRACE - Turns trace mode off (Default).o30DSOUND DSOUND n,f,d,v Form of SOUND which activat$}es channel-pairing for increased frequency range.o30 DSOUND Turns off all sounds.o30GO TO GO TO$} n Alternate form of GOTO.o30*L *L Turn line-indent on (Default).o30 *L - $} Turns line-indent off.o30*F *F (or *F +) Special mode for FOR..NEXT loops which corrects a bug i$}n Atari BASIC. Seems that in Atari BASIC, an "illegal" reverse loop like "FOR X=2 TO 1:PRINT X:NEXT X" will execute once eve$}n though the condition is met initially (X is already greater than 1). Turbo BASIC fixes this bug, but leaves it available f$}or Atari BASIC programs which may take advantage of it.o30 *F - Turns off the special FOR..NEXT mod$}e to make Turbo BASIC act like Atari BASIC.o30*B *B (or *B +) Command which allows the break key to be trappe$}d via the "TRAP" command within a program.o30 *B - Turns off the special BREAK key mode.o30-- $} -- Special form of REM which puts 30 dashes in a program listing.Line Labelso30# # name $} Assigns the current line number to the label name. This is a convenient way to get around the problem of renu$}mbering when using variables as line numbers. Labels can be thought of as a special form of variable, as they occupy the var$}iable name table along with the "regular" variables. We also believe that the number of variables allowed has been increased$} from 128 to 256 to allow for the addition of these labels.o30GO# GO# name Analagous to the GOTO command.$}Modificationso30CLOSE CLOSE Close channels 1-7.o30DIM DIM a(n) Will automatically$} assign a value of zero to all elements of the numeric array being dimensioned, and null characters to all elements of a stri$}ng (The LEN is still variable, however, and initially zero).o30GET GET name Wait for a key press, assign t$}he value to name. Same as "OPEN #7,4,0,"K:":GET #7,name:CLOSE #7".o30INPUT INPUT "text";a,b... Prints text as a pr$}ompt before asking for variable(s), same as Microsoft-BASIC.o30LIST LIST n, List program from line n to $}end.o30ON ON a EXEC n1,n2,... Variation of ON...GOSUB for procedures. N1, n2 and so on are names of procedures to b$}e run.o30 ON a GO# n1,n2,... Similar to ON...GOTO except that line labels are used instead of line numbers.o30P$}OP POP This command now pops the runtime stack for all four types of loops.o30PUT PUT n $} Same as "PRINT CHR$(n)";o30RESTORE RESTORE #name Restores the data line indicated by the label name.o30R$}ND RND Parentheses are no longer needed at the end of this command, but it will still work if they are $}there.o30SOUND SOUND Turn off all sounds.o30TRAP TRAP #name TRAPs to the line referenced $}by the label name.TURBO BASIC FUNCTIONS:Arithmetic/Logico30HEX$ HEX$(n) Convert n to hex strin$}g.o30DEC DEC(a$) Convert hex string A$ to decimal.o30DIV n DIV i Integer quotient of $}n/i.o30MOD n MOD i Integer remainder of n/i.o30FRAC FRAC(a) Fractional part of a.o30$}TRUNC TRUNC(a) Truncates fractional part of a.o30RAND RAND(n) Generates random number 0-n.$}o30$ $nnnn Allows input of hexidecimal numbers, but they are converted to decimal. Ex: "FOR I=$0600 $}to $067F" => "FOR I=1536 to 1663".o30& n & i 8-bit boolean AND.o30! n ! i 8-b$}it boolean OR.o30EXOR n EXOR i 8-bit Exclusive-OR.Memoryo30DPEEK DPEEK(m) Double-PEE$}K of m,m+1.o30TIME TIME Time of day(numeric).o30TIME$ TIME$ Time of day string, HHM$}MSS. Unfortunately, the time commands don't work properly because they were written for European Ataris which operate at 50 $}Hz, instead of 60 Hz like American ones, the net result being that they gain 12 minutes each hour.o30INKEY$ INKEY$ $} Returns last character typed.o30INSTR INSTR(x$,a$) Returns relative location of start of string A$ withi$}n X$ (returns 0 if not found). The match must be exact; strings with the same letters but differences in case or type (norma$}l or inverse) will not be found.o30 INSTR(x$,a$,i) i specifies the starting point of the search.o30UINSTR$} UINSTR(x$,a$) Same as INSTR, does not distinguish between case or inverse characters. Ex: UINSTR("HeLlO","hello") r$}eturns 1.o30 UINSTR(x$,a$,i) Specifies optional starting point.o30ERR ERR Value of las$}t error number.o30ERL ERL Line last error occurred at.Constants%0%1%2%3These four constan$}ts simply stand for the numbers 0-3, respectively. The difference with using these in a program is that "X=1" requires 10 by$}tes, whereas "X=%1" only needs 4 (numbers require 7 bytes, 6 for the number plus an identifier preceeding it. It is always a$} good practice to make variables for numbers that are used more than three times in a program).NOTES:1. Variable, Proc$}edure and Label names may contain the underscore (_) character.2. To print a double-quote (") in a text string, use two of $}them together, instead of the Atari BASIC method of using CHR$(34). Ex: "TEST";CHR$(34);"TEXT" becomes "TEST""TEXT" in Turb$}o-BASIC, both of which produce the output => TEST"TEXT.3. Upon initial boot-up, TURBO-BASIC looks for a BASIC file named AU$}TORUN.BAS. If it finds an AUTORUN.BAS file, it will automatically load and run this file.4. Turbo-BASIC also prints out Eng$}lish descriptions of all errors, including several new ones for errors involving the new commands:Error - 22 ?NEST = Loops n$}ot properly nested.Error - 23 ?WHILE = WEND with no corresponding WHILE.Error - 24 ?REPEAT = UNTIL with no corresponding RE$}PEAT.Error - 25 ?DO = LOOP with no corresponding DO.Error - 26 ?EXIT = EXIT is outside a loop.Error - 27 ?XPROC = Error ex$}ecuting PROC.Error - 28 ?EXEC = ENDPROC with no corresponding EXEC.Error - 29 ?PROC = Procedure does not exist.Error - 30 $}?# = Label does not exist.Also, Error 15 has been expanded to include an UNTIL which relates to a REPEAT which has been dele$}ted.4. A multiline IF is constructed like this:10 IF X > 1020 PRINT X-1030 GO# TOO_BIG40 ELSE50 PRINT X60 $}066755j THE TURBO COMPILER Documentation and Operating Instructi(}ons by John Drake Original Program by John Drake This documentation is provided b(}y the Western New York Atari Users Group and may be reprinted freely provided this credit is included. I know everyone (}is still rubbing their hands in glee over TURBO-BASIC, the new public domain Basic interpreter imported from Holland and Germ(}any. This month we are proud to present a new treat from our international friends overseas, the TURBO COMPILER. The TU(}RBO COMPILER will increase the speed of your TURBO BASIC programs 3-5 times and regular Atari BASIC programs can be speeded u(}p to 10-15 times faster. Unfortunately, like TURBO BASIC, the TURBO COMPILER will only run on the XL/XE series of computers.(} In addition, the finished compiled programs will also only run on the XL/XE series. The TURBO COMPILER is v(}ery easy to operate. It can be used with more than one disk drive, even Drive 8, the 130XE ramdisk. On the TURBO COMPILER di(}sk, you will find several files. The important ones for the operation of the TURBO COMPILER are COMPILER.COM and RUNTIME.COM.(} Before you begin, you should prepare two disks. The first one should be a blank formatted disk with DOS.SYS and DUP.SYS writ(}ten on it. Your second disk should contain your BASIC program (TURBO or ATARI BASIC). To begin, insert the TURBO COMPIL(}ER disk into your drive and turn your computer on. When it has finished loading you will be in TURBO BASIC. Type DOS to get t(}o the DOS 2.5 menu. Choose DOS Option 'L', Load Binary File and load the file COMPILER.COM. After a short while, you will see(} a screen full of German. If you do not read German, do not worry, that is what this article is for! At any time that you are(} on this screen, you may reboot your system by hitting Control-R or you may return to DOS by hitting Control-D. You will be a(}sked if you really want to do this. If you do, don't forget to 'J' for Ja and not 'Y' for Yes!! To compile your program(}s, remove the TURBO COMPILER disk from the drive and insert the disk with the program you want to compile. (If you have two d(}rives, insert your disk with the program to compile in Drive 2 and the blank DOS disk in Drive 1.) Press the number 1 key (Nu(}mber 2 if you have two drives). A complete listing of all the files on that drive will appear on the screen with one highligh(}ted in inverse video. Using the arrow keys, highlight the file you want to compile and hit Return. That's all there is to it!(} At the top of the screen, you will see the line numbers fly by as the program is compiled. When it is finished, you wi(}ll be prompted for a file name to save your compiled program under. It has to have an extender of CTB (for Compiled Turbo Bas(}ic). The program will not let you use any other extender. At this time, if you have one drive, you should remove your disk w(}ith your original program on it and replace it with your blank DOS disk. If you want your compiled program to be an AUTORUN f(}ile, you should name it AUTORUN.CTB. Then the file will automatically load and run at bootup time. There is one more st(}ep that you must do to get a completely runnable compiled program. Go back to DOS and copy the file RUNTIME.COM from the TURB(}O COMPILER disk to the disk with your compiled program on it. Rename the RUNTIME.COM file to the name AUTORUN.SYS. Your disk (}is now ready to go. The TURBO COMPILER does not compile to runnable code, you must run the RUNTIME.COM file to run your compi(}led program. One technical note on the TURBO COMPILER: If you're not familiar with other compilers for the ATARI comput(}ers, you should know that many have trouble compiling certain types of statements or insist that you organize your program st(}ructure in a certain way. So far none of these problems have occured on any programs we have tested with the TURBO COMPILER. (}The only statement that wouldn't compile so far is the END statement. The only program structure that we have had trouble wit(}h is a FOR-NEXT loop that has two or more NEXTs for one FOR. For example: 10 FOR X=1 TO 5 20 IF X=3 THEN NEXT X 30 NEXT (}X Other than those two examples, we have had no problems compiling any type of program, either TURBO or ATARI BASIC. (}Please let us know of any problems you run into compiling any types of statements or programs. Whether you program in T(}URBO BASIC or just want to turbocharge your old Atari BASIC programs to super speed, I'm sure you will find the TURBO COMPILE(}R will fit all your speed needs. -rge your old Atari BASIC programs to super speed, I'm sure you will find the TURBO COMPILE(#®%%'& 쩱%     . .Ȣ w UV   ꩷% ,} 2L#% à%   2L# wɠ% Lz# w  w  w   Q w  w  w ,}  w  QL# w  w  w  w  Q w  w  w   Q UV ,}   + wϠ% L"$ UV w L"  ^0 4  Q w ^ ՠ%  w ,} Q w ^ ۠%  w  Q L$ L"ȩ% 멐  %  2L% w ,} w   Q w  w  Q w UV w w  UV w w,} UV w  w  UV w    A`A`@@,}AA?Po" v" """"("2#7z#<#Z#d"$$$%% A`A`@@,U!B!B!B!B!B!B!B!Bc1B!B!!B!BB!B!1`!F1B!!BB!!BB!1B#!1>}TURBO BASIC Interpreter recibido del Atari Users Group de Holanda. Trabaja en los modelos XL o XE de Atari. TURB }O BASIC , ademas de ofrecer 42 comandos mas y 22 funciones mas que el BASIC de Atari, le da al usuario 1603 bytes mas } de espacio para el programa debido a que !"esconde"! parte de el mismo bajo el sistema operativo del XL/XE. Ademas }corre 3 veces mas rapido que el BASIC atari, incluye la mayoria de los comandos del DOS,tiene graficos avanzados y funcion }es de programacion, ademas no le importa si los caracteres estan en minusculas o mayusculas o en video inverso para la }mayoria de los comandos.Nombre SintaxisDescripcionTURBO BASIC COMMANDS: Disk I/O BLOAD BLOAD "D:name" Car }ga archivos binarios desde el basic (opcion L/N del DOS). BRUN BRUN "D:name" Carga y corre archivos binarios (opci }on L del DOS). DELETE DELETE "D:name" Borra el archivo indicado (opcion D del DOS). DIR DIR Directorio del di }sco (opcion A del DOS). DIR "Dn:*.*" Directorio del Drive n, notese que los wildcard pueden ser usados. LOCK } LOCK "D:name"Proteje el archivo indicado (opcion F del DOS). RENAME RENAME "D:old,new" Renombra el archivo ind }icado,por otro (opcion E del DOS). UNLOCK UNLOCK "D:name" Desproteje el archivo indicado (opcion G del DOS).Graphic }s CIRCLE CIRCLE x,y,r Dibuja un circulo con un centro en x,y y un radio r. CIRCLE x,y,r,r2 R2 es un opcio }nal"radio vertical" para trazar verdaderos circulos o elipses. CLS CLS Limpia la pantalla. CLS #6 Lim }pia una pantalla abierta en el canal #6. FCOLOR FCOLOR n Determina el color de relleno (fill). FILLTO FILLTO x,y } Un comando fill analago al usado en el BASIC,"POSITION x,y:XIO 18,#6,0,0,"S:" PAINT PAINT x,y Otro tipo de comando f }ill , este otro es una rutina a recurrir que rellenara cualquier objeto cerrado tan grande como x,y que este adentro de e }l. TEXT TEXT x,y,a$ bloques-bit de texto en a$ at x,y.Memory DPOKE DPOKE m,v Pokes locacion m,m+1 con 2-byt }e enteros de v (0 <= v <= 65535). MOVE MOVE m,m1,m2 Transfiere bloques; mueve m2 (numeros de bytes) desde posicion }de partida m hasta la nueva posicion de partida m1. -MOVE -MOVE m,m1,m2 Igual como MOVE pero copia partiendo con el }ultimo byte de el bloque. BPUT BPUT #n,adr,len Pone Bloque; igual como: FOR I=0 TO len-1:PUT #n,PEEK (adr+I) :NEXT }I BGET BGET #n,adr,len Saca Bloque; igual como: FOR I=0 TO len-1:GET #N,A: POKE adr+I) NEXT I %PUT %PUT #n,a } Ahora,esta puede ser una manera incon_ veniente para poner(put) valores nume_ ricos tanto en archivos de disco como cas }etes u otros en uso. PRINT, which converted them to strings first, a slow and cumbersome process. %PUT pone el numero al } dispositivo "como es," en 6-byte FP formato. %GET %GET #n,A saca un numero almacenado con %PUT desde el dispocitiv }o y lo almacena en variable A. Again, esto es mas rapido que usando: "INPUT #n, A".Programacion estructurada REPEAT }REPEAT Comienza un ciclo (loop) REPEAT-UNTIL. UNTIL UNTIL Termina cuando la condicion cumple WHILE WHIL }E Parte un ciclo WHILE-WEND cuando la condicion se cumple. WEND WEND Termina un ciclo WHILE-END. ELSE } ELSE Extencion opcional para IF. La condicion IF no debe estar seguida por "THEN",pero terminada por end-of-line o dos } puntos <:> (colon). ENDIF ENDIF Termina una condicion -ENDIF or IF-ELSE.Note que esta permanece en la condic }ion IF para ahorrar mas que una linea BASIC, proveyendo al estamento "IF" su estructura como se muesta en la Nota 4. }DO DO Parte un "infinito" ciclo DO . LOOP LOOP El ciclo regresa a la partida de un ciclo DO . EXIT EX }IT Sale de un ciclo DO-LOOP . PROC PROC name Procedimiento de definicion de partida ENDPROC ENDPROC Fin del pro }cedimiento de partida. EXEC EXEC name Ejecuta procedimiento especificado.Programacion General PAUSE PAUSE n } Procesa una pausa n/50 segundos. RENUM RENUM n,i,j Renumera lineas de un programa n es la linea de partida i es e }l nuevo numero de partida j es el incremento de la numeracion Esta funcion cambia automaticamente GOTOs, TRAPs, y todas la }s otras refe rencias de lineas,excepto cuando estas envuelven variables o valores calcula_ dos. DEL DEL n,i Borr }a lineas desde n hasta i. DUMP DUMP Muestra todas las variables y valores de arreglos numericos, los numeros son de } valores DIMencionados mas uno.Para strings el primer numero es el corres pondiente al LENght(largo)de este y el segundo }numero es el tamao DIMenciona do de este. DUMP tambin lista nombres de procedimientos y etiquetas con sus valores de lin }eas DUMP name DUMP to device name, such as "P:" or "D:DUMP.DAT". TRACE TRACE Trace program during execut }ion. TRACE - Turns trace mode off (Default). DSOUND DSOUND n,f,d,v Form of SOUND which activates channel }-pairing for increased frequency range. DSOUND Turns off all sounds. GO TO GO TO n Alternate form of GOT }O. *L *L Turn line-indent on (Default). *L - Turns line-indent off. *F *F (or *F +) Special }mode for FOR..NEXT loops which corrects a bug in Atari BASIC. Seems that in Atari BASIC, an "illegal" reverse loop like " }FOR X=2 TO 1:PRINT X:NEXT X" will execute once even though the condition is met initially (X is already greater than 1). }Turbo BASIC fixes this bug, but leaves it available for Atari BASIC programs which may take advantage of it. *F } - Turns off the special FOR..NEXT mode to make Turbo BASIC act like Atari BASIC. *B *B (or *B +) Command which } allows the break key to be trapped via the "TRAP" command within a program. *B - Turns off the special BREAK }key mode. -- -- Special form of REM which puts 30 dashes in a program listing.Line Labels # # name } Assigns the current line number to the label name. This is a convenient way to get around the problem of renumbering whe }n using variables as line numbers. Labels can be thought of as a special form of variable, as they occupy the variable na }me table along with the "regular" variables. We also believe that the number of variables allowed has been increased fro }m 128 to 256 to allow for the addition of these labels. GO# GO# name Analagous to the GOTO command.Modifications } CLOSE CLOSE Close channels 1-7. DIM DIM a(n) Will automatically assign a value of zero to all elements of t }he numeric array being dimensioned, and null characters to all elements of a string (The LEN is still variable, however, }and initially zero). GET GET name Wait for a key press, assign the value to name. Same as "OPEN #7,4,0,"K: ": GE }T #7,name:CLOSE #7". INPUT INPUT "text";a,b... Prints text as a prompt before asking for variable(s)same as Microsoft- }BASIC LIST LIST n, List program from line n to end. ON ON a EXEC n1,n2,... Variation of ON...GOSUB for proc }edures. N1, n2 and so on are names of procedures to be run. ON a GO# n1,n2,... Similar to ON...GOTO except tha }t line labels are used instead of line numbers. POP POP This command now pops the runtime stack for all four types } of loops. PUT PUT n Same as "PRINT CHR$(n)"; RESTORE RESTORE #name Restores the data line indicated by the la }bel name. RND RND Parentheses are no longer needed at the end of this command, but it will still work if they are !}there. SOUND SOUND Turn off all sounds. TRAP TRAP #name TRAPs to the line referenced by the label name.TUR "}BO BASIC FUNCTIONS:Arithmetic/Logic HEX$ HEX$(n) Convert n to hex string. DEC DEC(a$) Convert hex string #} A$ to decimal. DIV n DIV i Integer quotient of n/i. MOD n MOD i Integer remainder of n/i. FRAC FRAC $}(a) Fractional part of a. TRUNC TRUNC(a) Truncates fractional part of a. RAND RAND(n) Generates random number %} 0-n. $ $nnnn Allows input of hexidecimal numbers, but they are converted to decimal. Ex: "FOR I=$0600 to $067F &}" => "FOR I=1536 to 1663". & n & i 8-bit boolean AND. ! n ! i 8-bit boolean OR. EXOR n EXOR i '}8-bit Exclusive-OR.Memory DPEEK DPEEK(m) Double-PEEK of m,m+1. TIME TIME Time of day(numeric). TIME$ (} TIME$ Time of day string, HHMMSS. Unfortunately, the time commands don't work properly because they were written for Eu )}ropean Ataris which operate at 50 Hz, instead of 60 Hz like American ones, the net result being that they gain 12 minutes *}each hour. INKEY$ INKEY$ Returns last character typed. INSTR INSTR(x$,a$) Returns relative location of start of +} string A$ within X$ (returns 0 if not found). The match must be exact; strings with the same letters but differences in ,}case or type (normal or inverse) will not be found. INSTR(x$,a$,i) i specifies the starting point of the search -}. UINSTR UINSTR(x$,a$) Same as INSTR, does not distinguish between case or inverse characters. Ex: UINSTR("HeLlO","he .}llo") returns 1. UINSTR(x$,a$,i) Specifies optional starting point. ERR ERR Value of last error number. /} ERL ERL Line last error occurred at.Constants%0%1%2%3These four constants simply stand for the numbers 0 0}-3, respectively. The difference with using these in a program is that "X=1" requires 10 bytes, whereas "X=%1" only needs 1} 4 (numbers require 7 bytes, 6 for the number plus an identifier preceeding it. It is always a good practice to make var 2}iables for numbers that are used more than three times in a program).NOTES: 1. Variable, Procedure and Label names 3} may contain the underscore (_) character. 2. To print a double-quote (") in a text string, use two of them together, i 4}nstead of the Atari BASIC method of using CHR$(34). Ex: "TEST";CHR$(34);"TEXT" becomes "TEST""TEXT" in Turbo-BASIC, both 5} of which produce the output => TEST"TEXT. 3. Upon initial boot-up, TURBO-BASIC looks for a BASIC file named AUTORUN.B 6}AS. If it finds an AUTORUN.BAS file, it will automatically load and run this file. 4. Turbo-BASIC also prints out Engli 7}sh descriptions of all errors, including several new ones for errors involving the new commands: Error - 22 ?NEST = Loops 8} not properly nested. Error - 23 ?WHILE = WEND with no corresponding WHILE. Error - 24 ?REPEAT = UNTIL with no corre 9}sponding REPEAT. Error - 25 ?DO = LOOP with no corresponding DO. Error - 26 ?EXIT = EXIT is outside a loop. Error - :}27 ?XPROC = Error executing PROC. Error - 28 ?EXEC = ENDPROC with no corresponding EXEC. Error - 29 ?PROC = Procedure d ;}oes not exist. Error - 30 ?# = Label does not exist. Also, Error 15 has been expanded to include an UNTIL which relates <}to a REPEAT which has been deleted. 4. A multiline IF is constructed like this:10 IF X > 1020 PRINT X-1030 GO# =} TOO_BIG40 ELSE50 PRINT X60 . 4. A multiline IF is constructed like this:10 IF X > 1020 PRINT X-1030 GO# #!B!BBB!!!D!B1Bbc#!!"""""BBBb#bBB!D!"BBB!D!#b!#bB!1?}"B!D!BD!"B!#`abD!B!"D!B!"D!B1c#F#D!B!B!B!B!B!B1b a1F!D"D"1@}B!B!D"BB!ab1F"B!D"D"B!Db1F#0cF3B!B"D"D"!DB!B#Aa1F"1B"DB"1A}DB!D"!Db31af#1D"!D"!DB"!DB"Db FcDb"D""D""Db"11aFf"3DD""!DD"1B}"!DF"#01ac1DDB""!DDD"""AcDDF""""!DDDDB"""#1cc""#331DDDD1C}DDFfffa11#0 aFffDDDDDDDD330bc133""""DDDDD""""fdDD1D}1c 0Ȉ"""DDD""$DDLF10 1c32&dDȈ""$DH""$DD3"f0 c"&DH""DD"$DH"&D̈fc 1E}0bfDș"$DH"$D"$D"$Dș1c 0 013&Dȑ"DH"DH"DH"DH"d#10 1fd̙2$L"D"$H$D"D"d̙ 0 0c1F}2dɓ"D$D$H"$H"D"D&330 cLɓ&H"D$I$H"D$H&L2dLcaÆ33&L&H"H"H"H"H"H"H&L!a 0a12l1G}&H$ID"H$I$"D&I$df10ac3&ɒd$ID$ID$"H$"Idac6IL$$I"ID$$I"ILd&&fc 0`#&ɶI2IH1H}HDDD$$$$$əc 8p09I&$$$$DHII"I&If100ffI$dI"I$$II$$II&ɘ1 8p1I$II$I$$1I}I$DI$M6#0paffMmI$I$I$I$I$I$I$laÃcI$I$I$I$I%$I$I%ؓ33c 88pfmi$RI$RI$RI$1J}I$I#lc8p` 81mI)$I)$II$Ki%ͳ310ÃÆ8fl[i-$RII%$RII%$K6L1 888a1%JII)%$RJIIi-%1K}I39pqffimm-%%%$ٶ8 s6Ғ%%%---f33 888fͽ-iIJRR))IJJR֋l1L}pcKZҔ)JRR))JR-k573apfmkZ)JR)JRkZִmc808<8mZԥJR)JJR)Jkmf3p1M}ÆsfZR*RJTJR+Veٙqp88q9ٶVRJ*TRJ*T^ff18pp<<837m^RRRTTTTUomqÇ1N}9{zTUJTU*RUnq88xq36ֿzURURTUSٳ98<<Î9fͽU*URUTUkfqp88q11O}o_UUU*UUU_318pp<<9gfUUUT~qÇx9ٷUUUUU_vf188<837m1P}UVUUjWmqxÇ9zzVUUsxx>p;mm9?|>8wmv۶ݷmm1S}qLJx۷vۻws8x<swLJ~?|ww{{۹1T}>=sLJxx~x||Ǟ{w9?~1U}?|~yy1V}||?={Ϗ?~|???1W}|~??>1X}?????ߟ?1Y}???1Z}???1[}1\}?1]}????1^}????1_}??}?Ͽ|1`}~>{Ϗ?Ͻ>~??1a}??>>}w?Ǟwwx~?|y1b}~y?>{<>~y>?>9w~1c}?so{{{ww|?|~=wwwwwwwwݝ81d}<ywo۷nۿs9sݶmnp|>|x8;m[[[[[[[k{fq9ݿkZֵ81f}9wojֵkZZ׽39p3~zjիVZj8x1kjZUj^m<8xx88qs71g}mW_UUjU^^wsÇxǎsٶUVUUjUWc8px<x8qfn߿UUUUUU;xÎso~UU1q}lb AUTO2 BASbWORK2 BASbWORK3 BASb[MANUAL bSPIELE BASb ,TURBOIO BASb6WORDWRAPBASbEBLOESCH BASbKSPHERE BASbbRTBDOC1 TXTb&TBDOC2 TXTbESFERA CTBb>TEST PICb%DOS SYSb*DUP SYSbAUTORUN SYSUUUUUUUU*[fsp<<qݽUUUTUU_ݙcpps3fUU*UJUTWfsqÃ<<q͛{UU*U1r}JUJU^klc8x8x8agvm?WJTU*RU*^33aÎsժ*U***JJJzcp<<qffYz*TRJ*TR1s}Jjm3p8p3mjԩJ)R*RJTJկZfcaÃÃ1fmֵ)RJR)RJR+Zٹ8pp<8 q3[-kZ֥)JR)JR)Zֵ1t}mfg8Çp8ɬִ))JR)JJR%)KZM8`8336kKJRR%))IJJRfg18880f%%%%)))))IIKKkl1u}0Çc33m[KIIII)))%%%%$ff18`c͒-RJII)%$RKIimٙa880c32l[I)$JI)$JI)$[6fsaÃ1v} 1ͳmI)$I)$II$Ki%ə0`1336Ē[i$II$JI$JI$JI$mfc80amI$I$I$I$II$I$M8ჃÆ1w}36$I$I$I$I$I$I$mmff1p` 8clmI$I"I$I$$I$II$mq0pÌc#dMI$$HI$I$DI&I$mffc p 1flěd1x}dDHII"I$I$$$dm 8p01$$$$I$I"I"I"IIHLmdc 0afdd&I2HD$$I"HD$$I2Il38Æc&ID$I1y}D$I"H$"H$&Id1p af&c$ɒd"D$H$D"H$Id6L31a 0a1Ʉ2dDDDDDDd2dcaÆ8#2&L2d$H"D1z}$H$H"Ddɓ230 8dȑ"D"D$D$H"$H"Dɓ&LɈ1 0 c303&D"DH"$H$D"DH2$L3&f10 1C&Dș"DH"DH"DH1{}"DH"d̙c 0 01ș"$D"$D"$D"$D"fFc 0f3"dDȉ"$DH""DD"dDș10 cfD̈""$DD"$DD1|}"&dL!0 1b 2""$DDH"""DDDH331c 01""&fDDDDH"""""DDDD̈F3 Ȉ""""""""f1}}fb10 aa11fffb""""""!DDccaDDDB""""DDDDb""#331~}c33DDD"""DDB""#1ac Db"!DD""!DD""Dfb1a1DF"!DD"!DD"!DF"#b0F"1}1DB"DB"D"!D"1f1aAF"1D"B"DB"DB#Db#a13B!B"D"D"!DB!B#b b1F"1}B!D"D"B!Db1F#a1B!B!D"BB!D"D"b1a0F!B!B!B!B!BB"bc#B!"D1}!B!"D!B!"F#c1#BD!"B!"BD!BF!aF1!"BBB!D!"BB1F!#1F1B!B!B!D!D!1}D!D!D!!!#`F1BB"!!!B!BBBc#!Bc!B!B!!BB!!Bb#1c!B!B!B!B!1}!B!BcB!B!B!B!B!B!B!B!#!Bc!B!B!!BB!!Bb#1c!B!B!B!B!07d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%5} DD˙`  }J)Lr J  ((  p L ()   J5}L= ( L 0q A    IB JC;? D W 5} LL  ` W )LA!  ߰")-݆ p" 5} $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ`5}$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H 5}p h  hyhy D L> L JJ    ! LA*` BF5}7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L5}EE !E^ ^ E E7EȩEdE/EȩE  D5} .L }  ;F d  ;?F7F? ( .   Z D LL d 5} . D  L    p  E` , d)  D L) 0BM݊L݉5} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G5} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G5}TEST PICCDOS SYS5} C C*(> C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK5}.COMLu L1 L ;LHL  T`  `1  ɐ     `TU 5} L ? .  t`GBJ ~DEHI B V0dV5}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh5}DEL8HI4 0 HI,0 0  9 .G VLO5},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D1:MEM.SAV J y08 B|DEHI5} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI5} VY8 B V  @  /DE `E:D1:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO 5}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -5}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH5}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu '4} 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG9}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES9}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N'9}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx 9}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT9} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL9}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD9}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.9}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC9}COPY--FROM, TO?OPTION NOT ALLOWED TIME COM 088 COPYING---D8:TIME.COMCOMl# 0|D .L/%#9}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY9}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 9}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A9}LLOWED IN DESTINATION 0 <.|Ks3>00x|73>00x`c6<9c` 33c366fffg~33>00xgfffff<=}11111{!!\]_\ED!EOHI B V`}   =} TURBO-BASIC XL 1.5 (c) 1985 Frank Ostrowski!  ӥL]""$$ (p=}%J[WܠjeC /D%Zub2gTSt$8®݊Ò2% 5R=}Ţtd.’$3@X7t5w5$?## $#L+D:*.*S:C:P:$#.#) `:#(6ENeU\l؏&/ؕ؄sأ$=}LENeU\lأ$8آǔƐƉƐƇ4cY%٦rULۉCۄړp^gyض%iwܸJڅ*ܣ$ڭڞجئأأ=}$ ,(""(222000000..222222222222222222222222222222**22*22(222(2222222222 ,(""(=}0000000--**2*(22(2222222 V`hh@,lHH$HHHHHHӍl"=}H$HHl $`GHFH\` ` 4ӭ l 4Lq ӠԪӅԆL} Ӡ L( =}) ` b% +L:#HH 0 HHLj%ӥHlL{ee 8eee=}eӦee褢%ƚƜ`88夅奅8=}夕奕Ӡȱȱȱ㦢`L+`8` .E)))8@8e0 =}*څۅ܅݅ޅ߄ԠF0y"ޥy"ݥy"ܥy"ۥy"ڥy"و0ǠF0y"ݥy"ܥy"ۥy"ڥy"٥y"؈=}0ǠF0y"ܥy"ۥy"ڥy"٥y"إy"׈0ǠF0y"ۥy"ڥy"٥y"إy"ץy"ֈ0=}ǠF0y"ڥy"٥y"إy"ץy"֥y"Ո0L-`8`E)))8i@0 *ڄԠ=}"("!""" "L**""""""&О"("!""=}" "L**""""""&О"("!""" "L**=}""""""&О"("!""" "L**""""=}""&О"("!""" "L**""""""&Оd=}"("!""" "L**""""""&ОL-6"e"=}"e""e""e""e""i""}"""}"""}"""}"""}"""}""ǭ"m"""m"=}""m"""m"""m"""m"""}"""}"""}"""}"""}"""}""ǥՅօׅ؅مԅՅօ=}ׅ؅`` ` ` `80 `ԥՅ +.JJJJ)iFiFi1FicFi'ȐȦoFiU=}ȐFiiFi#iFiGi Fii@F iiFiiciՊFigi'iՊօשBL-`I=}))83Ԥԥդե֤֥פץؤإ٤L,K6"ХL--L--L-=}-E0:e٥eإeץe֥eՐ؅٥ׅإօץՅ֩L-8٥إץ֥հ'I8=}م٘؅ؘׅטօ֘ՅL-ؤm\G0Q@Ն֩م؅2եمֆשم"ե؅֥م׆ةեׅ֥=}؅ץم؆لԘ)q +` . |. &7i |. ,%!L?.`刱䈱㈱∱=}ሱ`ԅՅօׅ؅م`ԍՍ֍׍؍ٍ`ԍՍ֍׍؍ٍ`L.L. Խսֽ=}׽ؽ` L%/`ӽޕ &ԅ)@إ)JJJe)e - M=} 1. &Je0F 2 . /L(8`@ԠՈքׄ؄` . |. , . . |. , #/L(8`0 I@ԥ)=} 2f / . & r 1. #/ &?P , .Iiԩ +)ԅ ,ӽޕL(`8`$=})Ԧ61718191:1;1 (ť)8@0$Յ)e)e -F . / , . &1 1.=} #/ &F I`U9>`D'RFuCU?b9dYdg@W2@?tS)%)@0)%ԅԢ / . &G =} 1.Ӱ6 #/ &.ӽߕ ,ԅԥ B1 (`8``0?i? . . / , #/ &ԍՍ=}֍׍؍ٍ . . ( / , O2 / ,0 .JeF 2`L+) .e٥eإeץe֥e=}Պi؊؅٥ׅإօץՅֆե1ԥ'JffffJffffJffffJffffم`ԩ&&&&*&&&&*&&&&*&=}&&&*`Pi`)JJJeԅԘ)Peԅ`եԆ8@EB)JJJeԅԥ)PeԅԘ)3eԅԽ3eՅ՘)JJJ}3=}}3`)JJJeԅԥ)PeԅԹ3eԅԹ3eՅդЧ` 0@P`'Nu pX@(#d,X L(  兢=}0襙 bɥ⥋㩀 50ɥ0DȱȱȄ   ik#ZMkVgğe拰ㅋ=}⅊0 eee拰 L f5дƨħ 4LY4 f5К,樥ŧH 4h h5L4樤ܱ.* O %30=}  5Ԅ +(fԤԈ`ř嚰Ԥ`ڥۥड़0-԰eڅڐۈ0eeL+58` =}O#`,#5  6`]5 6DE 68DHEIHI V0$ 6Sл B=} V,# 6` $#LllBHI V0HH V0Ԩh``{a$%Ȏ$$xө$Ѝ$ `=} `@X a Ӆʢ ʎD  _ɠ %` ɩHH `өL: g% D>}:AUTORUN.BASөjJHH`ՠԢӱԙ!ӹ!`֝DEIHB V0Y|ڝDa۝E>}օܥׅݥܝHݝI V0+Ӡڑڑ0`l `  䅠 _ɠԐ>}e拢 &L &Lħ © ¥4 䥝ň剰' k ɀ8@4= LY ĩ`OJ ]J?L>} KԪȱLRHHצ R, hhLRHHHHHH /0ȑȑޠhhhhh>}h`HHHHHHHHHH $H bɐhȥLHhhhhLň剰)>}i桰` )``L(兢ħ #$ x Hҩ h$襚ҥ ԝ`>} UV #T` ` `,H ¥ȍ` JKhLŢ  #)I L ¤Ȣ`L¦ ¦ Lĩ>} ½J*K+ $LąLĩ …L~ …`H Ġh é`,H hH Ġ  ĭ 8}}>} L n [h`LkL © 8倝偝 Ġ  ĥ󥃅  Lĩ LH> } éLH#h ĩ`H hKJ L+ , H hHHħ s hKhJ  Lĩ# qL > } ŘL ũ& QŽLM " ĽNL  ĥԝL՝M  ĥԝN%LV  ¤ħ` Ťħ` ƪ Ċ > }Ťħ` ¢`届 x݅ L ĽCӠɀ L]Ɉ L] Ln LŠI> }HEDBL$HH hh +L `ħ LĢl ¦`YDAER ԅՅ֦> }󅗄`L+ ¢p 0 Hp hɈL` ,#,$,!Lé ,H ĥDEԝH՝Ih L>}©L $`L© , k ĩԅ  + ĥ 夨ħ`2ƪƪ ! A!Ƚa!Ƚ!Ƚ!Ƚ!Ƚ!>}``氤hhL1@$ƪư 0 0 n$P`L+FҐ֥װ綾إٰو LǠFf>}ؐ ee&ee* &eeeԪeըee$.ƪ@!Ƚ`!Ƚ!Ƚ!Ƚ!Ƚ!`檦>}!!!!`!@!^!` Ȅ 8 n奱 ٥Lǥ֤צưĘ=ŗ78֪א& >} eԥe$`L: L ԅՅօׄ 1פ& ٤ţĢԅeՅe8包卅 ]&>} 8Ԩժ%אְ`ֆL夨ħ` FҰg8&0ei֥i0Tׅiإi0BJe؅eم0&f>}fff&0 &0 eeL+օפإ颎 %8包ԥ卅 L ɥ >}ȱъŠe拰8``,ªȱȱI ѝ3ȥLɥHHO]>}  ȥe暰Х ȥL+ʅȱhh`Lħ OԪȱԨ``L :0>} `L(奷 bɥ󥋅ȱȱȱȄ#鈄0B8eeŶ>}ɛ,@LBˤ,ɛ`L?± ˤ樱f Oƨ x݅ + ~ [ˠ O樥0# +  L˥`>}LL :ɛ,$PH h $P润䧰 ʐLʦ䧐 +` ʐL3LBˢ>}ԝD՝E֝HםI L 兢L]& 兢L% ,L6 ,L6 &L6 (L6妪@!I@!` ؐb`P KW ؐRB ؐ>}=;G ؐ4@ ;+ƪƪ@!=A! (ƪƪ@!A! ƪ@! ,@@檦@!`!!!!!!`ƪ@! ǩjҤ>} /L.٤ƪƪ@!@!, 舽`!`!!ـ!!٠!!!!!`@!jI*` . ֪ (>}ϰ`(8` ֤ׅԄ +҅L: Lyƪ8吪周Ly sũ + ŐL Ly sŠԄ h L}>} L}٩    e쪽pLyL( + ڥHJJJJ h) 0:i`  ک; n +ȱ)ȥ%>}ݓ Lh ԍՅԄׅ֩өL:ƪ?Ԣ )ɠ )  -L &Lڦ@!)@!` n)8@> } -L:` / n)8@I= n)8@/ѩ֔$ሄ ,L: + n 0L8 n>!} 0L8 n H1L8 n /L8 n /L8 n D/L8 n 1L8LLإL( &)ԥ)8@JjH@>"}MC)JJJe)e .F / .P . &F . #/ &L.L(HHHHHH /hhhhhh &>#} Y/hԅL:,` L _ܘ%ᨥ%Ly _ܘᨥLy _ܘEᨥELyٚ<|'g 0L`>$}!!!!i ` &LإL٥LyɥLzvmZ ƨ!0 4 䦵 ¥ԝD՝E֝Heם>%}I Lܤį eį L` x݅ƨLLLܤ ©`#ۢ Lĩ_,ߤ>&} ڄ . eڅԥeۅհ"8څ֥ۅא8ܥݰL۠Q%0ԅإՅ٥ަ0%Q% >'}L-ե0LޥڤLyمօנ6&֐ eו`L( Hħ hբՅ `ޥԢ `ޥՅ֠>(}&&֐eܥeېڈ 7 \ 7 j N \ N j$0!ee80å/8ܥ۰uڕ0>)}eUiV`TUV`8UV`eTi`8TȢ` $L„')Q ȱ8 e>*}新`8`L齀).Q Ӱȱ8e新 O :L䅫# *$Ŭ>+} Ʃ HL"䥫ș L` Ml/#樱0ZS'`ȱȱȱȱȱȱȄ`ȱօȘuԩׅu՘e֨҄`>,}I 屝Ҡȱȱȱȱȱ` n$҅J?eԨe` L 兙 兛 n %3 Ԥ` ҩ,>-} , , L檤 ٙ!ؙ!י!֙!ՙ`!ԙ@!ә !ҙ!` 䤪ƪ!ٹ!ع!׹!ֹ`!չ@!Թ !ӹ!`ƪ!!>.}!㹁!a!A!Lp ґȥӑȥԑȥՑȥ֑ȥבȥؑȥّ` ***j)e)e`ʭȅiȅ>/}iȅȩȩ Lfإ  4  \ +] ¥򄟄>0}   넨ɛ$0L祔 Z f0#ڠ쩀 ߩ6ei$0 녖چ + !5>1}ɛȑ @膔7 ɛ 襔!ɛL! _ɩ8$IȢ %e拢 >2} &!$P* &8孨客 "&$ 1L~ L~ &L _ɰe拢 &L~ +0 %30Ԅ >3}L 9:枢0 O L :H9Hhh tLHH`h>4}hLCL馩`ʆLC枢0ְşLC`A枢Ɣ!L!L>5}!T 򈩛LQLD ijq ߰,iŰD VD8` 覲`8` 넬 S( +饰>6}0 S0:$$ p8`$p (ȩ@҅ҥ򄬤 ߰ A L8򨢄 %Ӥ򈦬ʽ ʽ % >7}+HH 屝EҨhh$P0Ƭ 襯I `_A[`8`80 &Ոԅ>8}` 넬$ +  + h갳 h) + , 褔ԙ!` "8` 襔 ɛ "ȱ">9}嫤!`! `) ɛ%)a{)_0:A[_դ`RE͕DATINPUԑCOLOҝLISԖENTEҚLEԛIƜFO>:}NEXԑGOTϑGO TϑGOSU½TRAАBYŐCONԞCO͟CLOSŐCLҐDEǞDI͐ENĐNEנOPEΖLOAĖSAVŢSTATUӣNOTPOINԡXIϤOΒPOKťPRINԐRAęREA>;}ĨRESTORŐRETURΩRUΐSTOАPOХGEԫPUԑGRAPHICӒPLOԒPOSITIOΐDOӒDRAWTϓSETCOLOҬLOCATŔSOUNĦLPRINԐCSAVŐCLOAĚERROR- ><}DPOKœMOVœ-MOVŪ*ƐREPEAԑUNTȊWHILŐWENĐELSŐENDIBPUBGEԒFILLTϐDϐLOOШEXIDIҖLOC˖UNLOC˖RENAMŖDELETőPAUSŖTI>=}ME$PROøEXEÐENDPROÑFCOLOҪ*̕-RENU͒DEDUMЪTRACTEXԖBLOAĖBRUθGO*’PAINԟCLӔDSOUNCIRCLū%PUԘ%GEԚG>>}OTGOSUTSTETHEΣ<<>ުNOOANĨ<<>STRCHRUSASVALEADATCOPEESIRNFREXLOCLOSQSGABIN>?}PADDLSTICPTRISTRIDPEE˦INSTINKEYEXOHEXDEDIFRATIMETIMMOEXERNRANTRUN%%%%GOUINSTERER+,%5>@}&6(+8,<Xk`fghilm^deDѳHc?,Ќ,е,Y_Ҳ+7,/0>A}1 2!3"4Ɛ"-"."-؂ٿ֐ː>B}ĐאŐbj+9,+;,ʐͭ>C}ͭ@ABC\=>[<+:е<,&%rvnnxc<\>D}-78s_XV+@D&0d*"'2GJh N>E}Rl~&2 +饰(+VWZ ]a8`L`  ¤ħ.H h L5 䄡 >F} 䅭 bɠ04Ů .ŭ%) e拰 ĩ L+Ư0 Le>G}`毤Hɛ) h`  L ȱ R @ʆ ȱȄ Iğ` :62T F :>H}7 8 Lbԩ- L 8 8,I ɨ 8L.UH `ƨh $ %3   + \L L 8󅯩" >I} 8" ©" Ư" L8q :Z#]abj(=) W같  L樤ħ`hh`H YhZ >J}L<>EO ƹƹ0`H f5h`I&` =? FQA` L񄳱ȱI 䦐>K}Ħ ąŅ T k /䧰 k ,Ǡ ĩJH ThĥȑĥȑĦʊȑ`HHąŅ>L}H h hhhh ȱIELZ L`ȱI Hȱȱȱȱȱ >M}, h @ $L+L.*ȱȱȱȱȱjEE `EjI `e`ħ ¥>N}0 ` Lk 䦪`! 䧰L A@L `I&`L ©؅ L.>O}0`STOPPED륺 bɠhhL :ʅ` k %3Hƹ h5h`hbjH h #>P}ԤLQ #LLei  `LԑȥՑȥ֑ȥבȥؑȥّ``䈥剰>Q}#)iiLɠL4űI&`048ץğ=ȱȄ >R}`L  L0e拠0ȱȄL  䦪`!' >?L (<ж`!  $S}>Л +`,LőŐ78Ƒ8 Ƒ`8` - PѠ>T}`,,L L PQ 8,L ȱI ѝߠȱ`ԩ>U},L E  $EL+L],,,؍ 0âLɀL ©7 F󦹩 RbL g >V}0g `Ո V fL{Ն + +􅕄L AT LINE?BLOAMEVALU>#VAR$LE?DAT>3276INPUDISTACOVERFLO?LIN?>W}FOTOO LON?DE?GOSUGARBAG?CHMEͣ?LOA?NES?WHIL?REPEA?D?EXIXPRO?EXE?PRO?IS OPE?DEWR ONLCMNOT OPEΣRD ONLEOT>X}RUNTIMEOUNA!FRAMCURSO!OVERRUCHKSUDONMODNOT IMPRA͠D?>#FILEDSK FULFATAL I/FILENAMPOINLOCKEDCM>DI>Y}?FILPOIN?APPNBAD SECTORӥHՄ +h & .hԩ + ,҅L: ƪn (@Մ$ 0` 0>Z}` 0LoH - . /h &@Յ՘JJJJ X) 0:i`AVC2 sŠ 5  <)  <>[} L L + e +e`e`&&&&&&eee` &>\}&eee&*`` 兙 䦪!0 4 ۄܱ **m ݤܱEۅڦڱ= >]} ܥeƥiեLN@ ` **)]` 00`` ( ((((((((8>^}`W)ߥ & &e &߽řِ׼JJJJ&eXޥeYߥ䥛 9 FfЎᰈ >_} `  M 8*` 兙 󥐅i祣L{ &L>`}  0 & L ȑ & L; # )ȱ L >a})ȱ) )ȱ 8ƣŐő0eސ`ƙ8ް`)ȱJJJ`>b}``=`]``` E߭H Ġ} hL±&Lv`[  ȱ R] >c} L L  䅠 bɰhhğȱȄ L l"0e拱LjLx`[  ȱ R] <h/