@L}5 _$% l0$)$$Hȱ$ UhL" `e$$%`$%`  R@P!( L(1   Y I`  d  Ld M * @  $ % CC$$)%1 Udߥ$9%: !0 S$% DD˙`  }J)Lr d M * @  $ % CC$$)%1 Udߥ$9%: !0 S$%} DD˙`  }J)Lr J  ((  p L ()   J}L= ( L 0q A    IB JC;? D W } LL  ` W )LA!  ߰")-݆ p" } $G@LL 08`Q")<2Q0 -G$Ș݆ UL# ; p8(()(0ʥ)NQ` }$GȘ݆LU )L ݆ L GȘ ݆LL )W>Z   HH)H }p h  hyhy D L> L JJ    ! LA*` BF }7'8  M HN H` 8 Z  \LdJJ!"! GFE@F (!L }EE !E^ ^ E E7EȩEdE/EȩE  D } .L }  ;F d  ;?F7F? ( .   Z D LL d } . D  L    p  E` , d)  D L) 0BM݊L݉} ML  N݆ L NLML [ TEqEHȱEqEh 0Gȹ G} HLL GɛL  LFREE SECTORS G) *Gȩ GȽG GȌ*jj >G} C8jJ3j2CD( C202C ԠBX` N 1? l LlD:RAMDISK}.COMLu L1 L ;LHL  T`  `8  ɐ     `TU  } L ? .  t`GBJ ~DEHI B V0dV!}QDEHI VF9 ,0 ,0 s0hhL  L` H hDHEh"}DEL8HI4 0 HI,0 0  9 .G VLO#},0 L4*IJ`llD1:AUTORUN.SYSNEED MEM.SAV TO LOAD THIS FILE.D8:MEM.SAV J y08 B|DEHI$} V0 0`B;DEL`?<0LV`@ʆ v s? F0Ξ05: [ BDEHI%} VY8 B V  @  /DE `E:D8:DUP.SYSERROR-SAVING USER MEMORY ON DISKTYPE Y TO &}STILL RUN DOS B;DE J  (` 9 V⪍ ઍ  -'}LLu ÝDEHILV 9 .l 9 .l  `` s$B BH(}I|DE V BLV nB,DE JLV B V BLVDEIʩ BꭝLu s} 3E:}DISK OPERATING SYSTEM II VERSION COPYRIGHT 1984 ATARI CORP.A. DISK DIRECTORY I. FORMAT DISKB. RUN CARTRIDG*}E J. DUPLICATE DISKC. COPY FILE K. BINARY SAVED. DELETE FILE(S) L. BINARY LOADE. RENAME FILE M. RUN AT ADDRES+}SF. LOCK FILE N. CREATE MEM.SAVG. UNLOCK FILE O. DUPLICATE FILEH. WRITE DOS FILES P. FORMAT SINGLEL !N',}#"&))9(&*)/h)''-&؆莟R'S  vL/ˢ L }Insert DOS 2.0s, type Y Λx -}DEfHI 1莏#q! @ y0ɛ8A0,' ȅ 1 1ild! 1L!NO SUCH ITEMSELECT.} ITEM OR FOR MENU! 0 .z:*{}.|{ 1 0 0JB 18L%|DL/}%DIRECTORY--SEARCH SPEC,LIST FILE?[# 0 0 &|D3" 1L!NOT A DISK FILEN !B 1L!E# 1 !BD0}ED:}:1BJ|DE 1DEBHI 1 h0ߢ 0.1}  0?詛 1 y0YЛ 1 ;#L" ;#L! BL1TYPE "Y" TO DELETE...DELETE FILE SPEC2}COPY--FROM, TO?OPTION NOT ALLOWED786 FREE SECTORS COPYING---D8:TURBOK.COMl# 0|D .L/%#3}##JB|DE 1BHID#E 1#0: B 1L!#͑### B 1#c$0SY4}S1}:## # # .#Ƚ# # 𩛙## 1,#PD#ELJ- <.BJD#E 5}1 1HH 0hh|DL%1}:̳# L% #D#EL% 1 0 . .0O% 1L!WILD CARDS NOT A6}LLOWED IN DESTINATION 0 <.|K}N 2 FORMAT. t* 5) 1L!`) 0NΞ 0 L1) 1 L!BAD LOAD FILELOAD FROM WHAT FILE?) 0 ?}0#B 1L!WHAT FILE TO LOCK?) 0 0$B 1L!WHAT FILE TO UNLOCK?DUP DISK-SOURCE,DEST DRIVES?TYPE "Y" IF OK TO US@}E PROGRAM AREACAUTION: A "Y" INVALIDATES MEM.SAV.FE! +L1   `*  70 2 2A} 0.* 1 y0 0)INSERT BOTH DISKS, TYPE RETURN^, 1 y038逍 N, 1L! ,B}C, t*  Lx+, 0 ^, 1 y0 , ,0,0 ,L+ ,I0 ,Vǭ0C}Ξ, 0 }, 1 y0C,ШC, 0K'!" H H 'h h Lx+!EF 5L1L!D,I,HhD}` NOT ENOUGH ROOMINSERT SOURCE DISK,TYPE RETURNINSERT DESTINATION DISK,TYPE RETURNE}`  `8 rL1`-* 1P* 1 y0Y`hhL!NAME OF FILE TO MOVE?- 0 0|DL% <.F},^ 1 70 0 .@L# .BJ 1  DEHIB V L1 ,} 1 70,L.  G}JB|,#P#DE 1 HI BDEHHII 1 B 1 ,^ 1 70,0La- B V,#PH},^ 1 70 0L#L!-* 1P* 1 y0Yj383}mm ݭI}}`8}``|* ? ɛ,`|:-)| / 1L!`DESTINATION CANT BE DOJ}S.SYS0 0H{ 24Δ 28/L!/) 2 Π 2 0 ξK}hAΞB,0 J 1 BDEHI,HÝDE 1HIHIDELSAVE-GIVE L}FILE,START,END(,INIT,RUN)O S0 1`BDEPHI V` S0H 1 L!M}0 0 1L~0`PLEASE TYPE 1 LETTER,0`hhL! 70 1L0L<1 ,;ɛ7,"ɛ:ݦ1ݥN}A"D|ݤD|ȩ:|ȩ|ɛ,,(/+.ީ1 1,ɛ`轤{NAMEO} TOO LONG B VL!` L1I H1EΝDL1|mDiE` V0`8d/8 i:222 1 LP}!ERROR- 128ɛ+,' 20*.. өr2 1``2TOO MANY DIGITSINVALID HEXAQ}DECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8uR} ECIMAL PARAMETER800 0 8 00`,0'D800 H,ɛh`2L1NEED D1 THRU D8u8<<  B JKIHiDiELV`L8 8 BLV`LxT}8t8l Lu8hihiHHȱȱL8c !#3`Lu8JJJJ`H 8h`HU}ȩh Q8L8 Z8L8 8L8 8L8 8L8S:@9E:E9H '9 H9I9 8 '9h)0ICV}9D9L8 L :::: :Lr:::IEL[::i:iIIL[:`:i::iX}::L:`L{:w:w: C`L:L: D8:MEM.SAV: 8| 9 '9`L:L: D:DUP.SYS:̩ 8Y} x:ɀL: '9`88 |9Y:X: '9L); D8:DUP.SYS; 8::88 9 '98? :`;WL`; 9Z}Ln; ` :Y;Y;L;L;)} Setting Up ATARI 130XE Ram Disk; 9L; ; -9  [} L;D8:; :9 :Y;L-@@> $Inserte otro diskette y pulse  A@:-@@:  Seleccione programa usam}ndo  >-@@> $ y presione $""----------------------------]6-@n}$AF:A,9AF:A,KB2H]B2I"3BBy%6-$AV%A$36-%Ao}V,()A`6))-@$@%@@@-@J%%AUT%%AUp}^ h r'B2H@'B2IA$|]B2V@'B2W@9B2w@KAq}]AAY@b$>>112,112,112,48,70,64,156,80,6,112,112,112,2,16,2,16,2,16>>2,16,2,16r},2,16,2,16,2,16,2,16,2,112,112,112,2,0,2,65,0,6""----------------------------A"AdAU"(As}PM-@@ .-@&@5 A6-@M6-@)6-F:Ad,)AU*(A`t}"@A`!!@*@APAdAU/"@6-%@#!/6-@u}/"@6-&@) @/6-'-@  !-@&'  )-@ "-@&) v}& 6-0-@@+-@@M2@@@@Q e-@@ 2@w}  : APD$N""----------------------------XG A6.D:G67B:,%@,.7$x}@&@<$@,b @@l@ Apv @ AdAU##F:Ay},"Ap)(A`G-@@G  - ERROR F:A, - >-@@> $ z} Verifique y pulse  F:Ad,"AUAP A1B2H'B2I1+{}/AdAU/  Cargando: 7@,$D:MENU A1B2H'B2I1+D{) @ SLISU }} d##*****************************n##* CARGADOR NINJA COMANDO *x##* *##* ~}Revista STAK # 6 1992 *##*****************************M;@,(>:A%,)6-A;A}MAR@5-@@5(REVISTA S T A K PRESENTA:1-@@1(Cargador NINJA COMANDO3}-@@3(Version Diskette/Cassette%6-A66-Av% A %6-A6-Ac% A +}6- B+AR>-@@4(Vidas Ilimitadas? (S/N) > A0S*0NA0} 4S6-%@(+@-@@ 6( (D)iskette o (C)assette? @ A0D*0}CAp" 4DAb@,'-@@ 'AR@6(Prepare @ 4C(CASS A@}J (DISKT(ETTE con NINJA COMANDO^+-@@!+(y presione h F:B2y,@A`r }**** EJECUTA CARGADOR ****|6-?:A6,**** LEE TECLADO ****T#@@K:0)@=*}@F6.>:,Q@T$##***** REVISA LINEAS DATA **** A+-@$6-+6-@}-%@#"! 6-%$6-%@! n")6-F:A,%F:A,$AV/9+KA}@dk(Error en Numero de linea n"A@ +A@d=(Error de DATA en linea @}6-%@ $""**** DATOS DEL CARGADOR ****X[[169,48,133,12,169,6,133,13,169,1,133,9,169,255,141,248},3,141,1,211,169,0,141,68,32832bZZ2,162,0,169,0,157,0,7,232,208,250,238,31,6,173,31,6,201,192,208,238,76,116,228,41690lY}Y169,0,133,82,133,8,169,1,141,240,2,162,98,160,6,32,66,198,169,0,133,20,165,19,27932v]]197,19,240,252,32,32,1,162,255,154},173,106,1,208,8,169,12,141,252,2,76,128,198,76,34737jj152,197,125,29,160,195,193,210,199,193,196,207,210,160,206,201,206},202,193,160,195,207,205,193,57676ee206,196,207,160,210,197,214,201,211,212,193,160,211,212,193,203,160,185,178,160,155,0},0,0,43000VV169,6,162,1,160,52,76,92,228,169,94,141,226,2,169,1,141,227,2,96,8,32,41,1,25316ZZ32,78,1,173,107,1,240,1}0,169,95,141,34,2,169,228,141,35,2,40,76,95,228,173,247,35511\\130,201,198,208,8,169,165,141,247,130,238,107,1,96,173,107},1,208,6,32,78,1,32,32,26063::1,96,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,193**** FIN DE DATOS ****D8:}CARNINJC.BAS8,1,32,32,26063::1,96,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,193**** FIN DE DATOS ****D8: %d##*****************************n##* CURSO DE BASIC: LECCION 5 *x##}* EJEMPLO DE GRAFICOS *##* Revista STAK # 6 1992 *##*****************************#+@%@#S}in ventana+0@@+Rojo Oscuro*0@@ @*Azul Medio+0@@@}+Verde Medio @ROJO-@@!,!PUNTO DE INICIO/AYFINAL} -AY@!,!PUNTO DE INICIO/@FINAL  @AZUL"',}'PUNTO DE INICIO,'/AY'HASTA, E INICIO6'/AY@'HASTA, E INICIO@'/@}'HASTA, E INICIOJ/FINALT @VERDE^',@'PUNTO DE INICIOh-}AY@r1%6-@&P:H:,$@,1ALEATORIO| /HASTA, E INICIO  AD8:P}ROGBAS6.BASr1%6-@&P:H:,$@,1ALEATORIO| /HASTA, E INICIO  AD8:P {$ ; SLISU } d##*****************************n##* CARGADOR EXPLODING WALL *x##* *##* }Revista STAK # 6 1992 *##*****************************M;@,(>:A%,)6-A;A}MAR@5-@@5(REVISTA S T A K PRESENTA:1-@@1(Cargador EXPLODING WALL3}-@@3(Version Diskette/Cassette%6-A66-Av% A %6-A6-Ac% A +}6- B+AR>-@@4(Vidas Ilimitadas? (S/N) > A0S*0NA0} 4S6-%@(+@-@@ 6( (D)iskette o (C)assette? @ A0D*0}CAp" 4DAb@,'-@@ 'AR@6(Prepare @ 4C(CASS A@}J (DISKT(ETTE con EXPLODING WALL^+-@@!+(y presione h F:B2y,@A`r } **** EJECUTA CARGADOR ****|6-?:A6,**** LEE TECLADO ****T#@@K:0)@=*}@F6.>:,Q@T$##***** REVISA LINEAS DATA **** A+-@$6-+6-@}-%@#"! 6-%$6-%@! n")6-F:A,%F:A,$AV/9+KA}@dk(Error en Numero de linea n"A@ +A@d=(Error de DATA en linea }@6-%@ $""**** DATOS DEL CARGADOR ****X[[169,48,133,12,169,6,133,13,169,1,133,9,169,255,141,24}8,3,141,1,211,169,0,141,68,32832bZZ2,162,0,169,0,157,0,7,232,208,250,238,31,6,173,31,6,201,192,208,238,76,116,228,41690l}YY169,0,133,82,133,8,169,1,141,240,2,162,98,160,6,32,66,198,169,0,133,20,165,19,27932v]]197,19,240,252,32,32,1,162,255,15}4,173,106,1,208,8,169,12,141,252,2,76,128,198,76,34737jj152,197,125,29,195,193,210,199,193,196,207,210,160,197,216,208,20}4,207,196,201,206,199,160,215,58614ee193,204,204,160,160,210,197,214,201,211,212,193,160,211,212,193,203,160,185,178,155,}0,0,0,43534VV169,6,162,1,160,52,76,92,228,169,94,141,226,2,169,1,141,227,2,96,8,32,41,1,25316ZZ32,78,1,173,107,1,240,}10,169,95,141,34,2,169,228,141,35,2,40,76,95,228,173,199,34359VV21,201,1,208,8,169,0,141,199,21,238,107,1,96,173,107,1,20}8,6,32,78,1,32,32,22686::1,96,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,193**** FIN DE DATOS ****D8:CAREX}PLO.BAS8,1,32,32,22686::1,96,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,193**** FIN DE DATOS ****D8:CAREX@  FLOADSUMD%%Ϡ̠ŧ%% }ά%%ԩ%%報 + Revi }sando DATOS...""****************************""* FLOAD$: Rutina Rapida *""* Para Lectura de DISK/CASS*""*** }*************************$;@V,. #A6-8-@@VB"L67B:,%@,.>:,V } 6-%` jAUPAt""****************************~""* POKEa Rutina *""* 'DISO }LUCION' *""* en Memoria (1536-1625) *""**************************** #A6--@ }@"A5% 6-% "B1!A ""****************************""* Pantalla Roja y } Grafico 0*""* si hay error en los DATOS*""****************************  +A@f** "DATOS m }al tipeados... Verifique...(+@%@2""****************************<""* Espera hasta que se *F }""* Presione START y carga *P""* una Pantalla en formato *Z""* Micropainter (62 sect.) o*d""* 7680 bytes +4 de c }olores.*n""* (Si no tiene pantalla, *x""* lea texto del Articulo) *""**************************** F:B2y },@A--@@ D:DIBUJO.MIC A''6-?:C:,<@<B1<Av,)@ }A)@A)@A )@A@ B }""****************************""* Ajuste de Lista de *""* Despliegue para Rutina *""* 'DISOLUCI }ON' *""****************************)AY)6-A$$AV"-A#,% }6 @7A#%@A7%@AJ-@Av@T%@x^%%@ }h%%@A'r |?%Ay@e+%A?%AA$'A` }'AaA$""****************************""* Se activa la Rutina *""**************************** }AY@4wA@'A@9AAKA@@]A AYwA6%@& }@**6-?:A6<A6%@<@, F:A,"@A@""6-?:A6<B<@,"" }****************************""* Se repite hasta el fin de*""*los tiempos o hasta pulsar*""* BREAK. Lo que suce }da *""* primero... *""**************************** A &0""************************** }**:""* DATOS DE FLOAD$ *D""* (FLOAD: Fast LOAD) *N""* (o Carga Rapida) *X""*************** }*************blTT216,173,1,211,9,2,141,1,211,104,104,104,10,10,10,10,170,169,7,157,66,3,104,157vUU69,3,104,157,68, }3,104,157,73,3,104,157,72,3,32,86,228,132,212,160,0,132,213,1731,211,41,253,141,1,211,96""******************* }*********""* DATOS Rutina 'DISOLUCION'*""****************************[[104,104,170,104,168,104,104,76,92,22 }8,216,165,203,208,3,76,98,228,198,204,240,3,76,98[[228,169,2,133,204,198,205,208,7,169,0,133,203,76,98,228,165,205,170,16 }9,4,133,206,169^^124,133,207,160,0,165,208,145,206,200,165,209,145,206,165,206,24,105,3,144,2,230,207,133SS206,202,20 }8,231,165,208,56,233,40,176,2,198,209,133,208,76,98,228,0,0,0,0,0,0""*** FIN DEL PROGRAMA ***D8:DISOLVE }.BAS,165,208,56,233,40,176,2,198,209,133,208,76,98,228,0,0,0,0,0,0""*** FIN DEL PROGRAMA ***D8:DISOLVE *+--TECLDATABFHXBLINELINDATOTASUM$} ##*****************************##* A N G E L A Z U L *##* $} *(##* Por: Rod Rubber *2##* Bill Yesterday *<##* *F##$}* Revista STAK #6 1992 *P##*****************************dy A0+)AR@;-@@$}S(A N G E L A Z U Le-@@y(por: Rod Rubbern(-@@((Bill Yesterdayx--A$}")Ad%- F-@@4((C)assette o (D)iskette ? FAdAU06-F:Ad,0@*$}@XA@7AdAU B+"@X76-@l1;@,;@H,;@,;A96,I67@$}H,.>:,`6.0123456789ABCDEFl6-@@6-A#A# A@&()(=(REVISANDO DATOS@(,6-$}%@",B:,@A@=(>:@(,LINEA:=6-F:A,%F:A,$AV/  (%( Falta LINEA $} !!/ AP##6-?:Adkk030F0F3F30C3FFFFF3C000FCFFFFFFFFF%}FC00000F0F0F3C3C0C0C3300000FFFFFF3FFFFFC303FAFEFFFFFFFFFFCFAAA0,3537CjjA5E6FAFECFFFAA005585AA8085E1AA025A54AA02586BA3AF8FB%}FFFFFFFCCFCFCFCFCFCF3C30F00000F3F3F3F3FFFFECF,259HkkFFFFFFFFFFFF888888C8C8F8F8FC00000303030F0F33CFFFFFFFFFFFFFFFFFFFFFFFFF%}FFFFFCF0F3C3C0C000A0A800C0,2474MkkF0FCFCFFFCFF0003303CFFCFF33F3FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFAFEFFFFFFFFFFFFAF3FFFFFFFFF% }FFFF3FCF,3936RkkCCFCCCFCFCFCFF3FFFFFFF3F0F00FFFFFFFFFFFCFCFF3C0FCFFF3FFFFF3F000000C0F030C0C0303C3F3F0F300F0FFFC0,7638Wkk%!}FCFCFFFFFF0FF0020A0A0AF2CCCFA8AAAAAAAAAAAA2A3FFC3FBF8FAFA3A8CFFFFFFF3FCFFFFCFFFFFFFFFFFFFCCFFFF3,7642\kkCFFFFFFFFFFFCFFFF%"}F3FFFFFFFFFFFFFFFF3F0F0F0F3F0FAFACAFACACAEA0000A8A8A8A3A38F3F3F3FFCFCFFFFFF3F3F,7646akk3FFCFCF3CCC0F0F0F0C0C00000000300000%#}00000000003C3300C03020202FFFFFFFFFFFF3F0FEACAF2FCFFFFFCFFAAAA,1515fkkAAAAA91555553F3F3F3FCF4F606A03FFFCFCFFFF002AFF3F3F3F3%$}F3F00ABFFFFFFFFFFFA000FFFFFFFFFFFBF00AAF3FF,1846kjjCFCFCFFF008A2A2A2A2A282313148F3FFFFFFFFFFFFFFFFFFFFFFCF2CACAF8C8C808888%%}8088802020202020202022328,480pkk022A2A22022AFCFC3C8FA2A2A2A85555555515058A0A4A4A6E624AAA002A2A2A8A8A8A8A00AAA2AEA2A2A2AB00%&}AAABA8,3258ukkA8A8AB3E00AAEAAAAAAAAAAA00A28A8A2A2A2A2A008A1415151516151528FFFCF2CA3AAA2AAA28AAAAAAAA8A22AA8808,1290zkk0%'}888888888882A2A2A2A2A2A2A28AAAAAAAAAAAA0AAAA0A0A8A8A8A8A8A32A2A2AA23CFFFFFF2AAAAAA80AFEFFFFAAAA,5746kkAA8AAAAAAA2AAAAAAAA%(}AAAAAAAA88AAAAAAAA0AB3FFF8AAAA08FBFFFFFFF2A2A2A2AEACACAFAAAAAAAAAAAAAAAAAAAAA,4421kkA8A8AAAAAAAA88880888888888882A2A2A2A2%)}A2A00AAAAAAAAAAAAAA00AAA38F8F8F3F3F00AAFFFFFFFFFFFF00AACACA,6133kkFEFEFCF000AAA3AFBFBF3F0F00AAF2F2FCFCFCFF00AAAAA8AAAAAA2%*}A00AAAA8A2AAAAAAA00AA88888888888808A80000,6360##** F I N D E D A T O S **D8:ANGELAZL.BAS0AAAAA8AAAAAA2$o@_O E8),}ppB@pDPPOA@#/-054!$/2*5'!$/2!.'%,!:5,por2od2y"ill9)-}*5'!$/2*5'!$/2@@V@ @A @@I@@ @AL`A@A ).}V@`ҩҠ?@R?R\@ )?RR\@R?U@S@T@U@RX@ A BU@T@S@ݩU@S@T@`U@i X@` )/}˩P̮S@iPːLAT@ e˅ː` AX@)X@)X@H X@Ƚ"I X@ˠ(nI X@ȽI X@`JTBWBZB)0}^LpBsB`AAAA` BЍТPQR 0@1b@ g@pFԢF)1} \``@`S@ RLDLD5xT@T@U@ B GLC ҭT@T@U@ B GLCU@R]@)2}RW@ A B DT@R iLD@@LELDV@AxS@S@8U@U@ B +HLC ˭S@S@U@iU@ B HLC)3}U@R]@RW@ A B DLB Dڭ]@) ݢRW@R]@0 fL2D `ڢԬW@RLDDR @ ة@@)4}@ȹ-)8 @0@W@ALDA`ЍЍg@ D "E g@ QH QHЍТ g@ QH QH HL)5}HAi @@ ݢAi @@ ` `ER R EREEE)6}R .E .E .E~EEiEЩѢi(АE(ж`'!.!$/2*5'!$/2%-0!4%^@T)7}@R 0 ^@^@_@i^@&^@T@R )^@^@_@iS@_@$_@8S@A@ B HS@U@iU@A@LCS@8_@)8}A@ B +HS@U@8U@A@LCHHh@ ԍЩ  ԍЭ ԍЩFhh@H ԍ ԩFh@H ԍ ԩЍFh@)9}H ԍЭg@ЩpFh@MC@C@C@R@R@R@R@D@ЍЭ`@a@`@a@0x@ҽ@ ҍҢ):}a@Lb``./ԩ H`H`H`HЩHЩЍ Щ Ѝ Щo`ԍG`G G`H b);}Hb cc@`HH XH`HH XH`HHHi bbbb QHH`HHH bbbb)<} QHH``HЭH QH` RG"HЭH QHHH`"HЭH QHHH` NB B ^G RG wA #A hH XHLB)=}8  !"$!!& !+-!!&3579;=&!#%')9;=?1BDFXZ\^`bdrtuwuy{  !!#%!!!!)>},.!!468:<> "$&(:<>@ACEGWY[]_acWsuvuxz !')!!& !/1!!&?@BDFHJ*,.02157HJLNPRTVegikmoq)?}!!(*!!!!02!!!ACEGI+-/13468IKMOQSUWfhjlnpU}}V~~~~~~UuuwuV^^^Uuuw}Uwww)@}wwuV^UuuwwwuV^^^UuuwwV^^UwWWwwwVVVvvvV^^}}j~~~~^^uwwwuuj^^^}wuuj^^^uj^)A}uwuujjwwwwwwjvvvVV?????????????? ?)B}$VUUiR%UUVXCSPPPP`UUUUUPUUQUUUfWWVUUeI`PUUUVWW[kk[[???????ꪪ****(:*(")I}*******( ***<* *?**********)J}???**H**********(IPQPGQ!QQНPQНLgPQQНP QНLgPPQQQPQ"QԠ-L}E#`'`$`(`ԮQQP

cacccffg0hff,gg(ff@ghffgh?@EF<;=H7:KJLMNOPQRSVUTWXY[ZQ8\]^_`abcdef?gj=ihk44lmqp5onrsutv& !-_}&#"$//3-).110-)&.,,#"$()&'*,+*,+ !-`}22  !*,+)'(#-&"$%LKMOJNR-QSPT=>@? ABDC5EFGHI13 428-a}6579:;<UVVW.//0    ! "#*+$(,%&-').YX1Z[V]\W-b}_^0ONMGFPQK:HUL9HTSRJI>=!54?@;:6DE<96CBA871223#//0HHSi+;i ԍн?i ԍнCi ԍнGi-c} ԍ Sihh@$ЩSiKi ԍЭLi ԍЭMi ԍЭNi ԍЭOi ԍЭPi ԍЭQi ԍЭRi ԍЩ| ԍЩ ԍԭRi ԍЭQi -d}ЭPi ԍЭOi ԍЭNi ԍЭMi ԍЭLi ԍЭKi ԍhh@N|HvEsptx cps::U_𬫧W-e}_9::>Z𿫪:>>ꪫ:55UU\p<<<<-f}<DIBUJO MICGRAFICO BAS<?ꪪ-r}𯪪p\pk?:::ꪩ5?p -s}UUkkkkkk?骪j\6 UU𰯪jjj-t}骪jj jjpUUZ5 :ZU𬬫kkkkklꪪ-u}:665 𬫗\\tv?ꪪ\|::::=_-v}: 5:::ꬬ:ꪪ𬫪Z_-w}?ppppppppppppppppppp::ꪫ::66Z<~<ý-x}g::;ppp<멩<<<<:::ڬppp\::VV-y}?|6665=::jk :::: -z}k_?~::j 566::66Z秧pp<<:::jj-} 66<<::j 566::66Z秧pp<<:::jj,/Ԣ ` 2 Pv)L]恥ł`(81}8<UUUUUUUU]_]uu}jkkZVU驩knkZVU驩奕jnkZVU奥onkZVU奥奥奥jkjZVU驩jj1}kZVU奥u]WUUU]_]uu}wUUUUUU 03 0 0 1} 00 UUjjjjZZZZVVVVUU}}}}********************* 1}UTTPP@@UuuUUUUUUUUW__WUUUUUUW__WUUUUUUUUUUUWWWWWW]}}]U]___]]]UuuuuUu1}}}wwuUW  nnkZVUVVZZZZjjUVVZZ[ZjjU麺VVZ[[[nkU麮VVZZ[ZjkUVVZZZ[knVVZZ[[kkVVZZZZ1}jjU麮VV[[[[nkUVVZZ[[kn]]UUUUUUuUUUUUUUU *  * 1}U]]]]]U]]]]__]UuuuuuUuuuuuU}}W}UUWWUUW]U]]UW]]WU]WUuUuuU_uu_Uu_UUUUWW1}UUUUUU_]]_]]_UUUUUUuuuuUUUUUUWUUUUUU]]UUUUU}}}UUUUUUuuUUUUUUUUUUWUUUUUת UUUUU___1}30 2©Gé <©é < ©éL< aڪ34%1}5Vvlj2""ۻU9B$Df{c332.ݻݽ?U ##TEUT.ff[U1}UJOffh&6w<36X'ww?ۻwJ8HH:@4ff$DD/ܻ̻f;Kk{ktTh1}wB""?,K{@@4 7TDB?ff7}tpAA647h8Vfd?ff,ݩ4 fd*O1}ff7kupxh(?;;[]@@I3+hUUS/:IYktw82gR""?1}Z6VVH@1UU3gtDC?v44fH37gvfe?&s79Oww1}1 ڪ0*?wwsFwgW3hwwQBAH5#wtSwvfd^ww6a1}UUTD xURwQUc1yڪww&555%qh$DJٙۼYٙ1}Xə;;;;;;;;Xɔww陛KKKKKKKKX閖wwəkkkkkkkk1}Ywwى뼽YwwٙVfffffffffkۻ˷wwwwwwwwwt@D1}CwAdfC313D4$ciwpSfvfdH#pUUUDY3x/kvBAAFw;1}:OwwyDUfV`d47(?ww"fBKvfe/wwf73UIYZ̨eUV?1}wwXwIfc32>ᅝJ::::@iji9EUS>|LLLKt)9wwv>1}ᔎL\\\\@@Yijit9N}tp4 -y&ff>ww2^@B9YjhTDD.ww̾1}wmup4 -iR""=ww̽л\\[@@FVUTDC=ͻͼ̽XBYJJJJt'GFWwuM˻̽ں1}9999@f(868=˻̽؈6&&&&D%UU-ff̽sdu39C32=ۻffTU1}%IB""<˻ffEE8DDC,˻̪̫65l$G&feL˻'5)1l1}466'wt<ʪ85`b6c DED4DC,ʪUUŃDj [dU$dc2""+UUŅ5C1}ffff5UU;IE\Ŧdwffd7wv;'5*+- fDC+DD65JGLyxfU [1}"""*DDEEwjhhiPED$DC*TUy88`@DSDzs6fecd0H'@d@DFD ha 1}DwDxwtRS4FDD 4DD@TS333w3x$ 4DDCDDCD5UT wxj@DDD@DDP01 wvf1}ffgwxEhZ9B DC4@C4E 33wv"f"gwxcT`DET0ETDPwvfewUwVfgwsEgUDDD4D3Ewvfe"U"Vfg1}wycS T3DCDUDPfeUTUDUEUVfcDgVwDUD@4DDEfeUT"D"EUVfhcPTDDD0DDDPUTDCD3D4DEUSECP1}DDDC4DDE UTDC34DEUXeCTDDD0D3DRDC32"""#34D@%D3DC4UDERDC32"#34D@%TDUD01}DC4ER32"!"#30%TC4DC4ETDEUC32"!"#35UTDETD0DDDDD2"!"$DDDDDC1}4DDDDB"!"$DDDDD0DC4DADC4DC4ET3A3ETD01}DDUDD@DDUDDC4DDDDDDDDD0DDDHDDDC1}4DDDDD0Ec3eC``1} Јi TЩi˅iȍЩ6Щ`Ǜ<ЍҍԍԍЍЅ1}ҍҍҍ҅  d©é <©é <0>C0"#0ԩ҅D@X ]&  P @1}>( =ԩЩ4ЩЩ ЩЍ y ' [     HL3ЍҍԠ1}Ј L<`C0Oƈ0U;W( Lҩ1}`   p`pA5zOȥi(1}ȥii٩,چO ) ȩȩ,Lȥȥ )?( )>ƅi(愥i1}ƆЧ;`9:ɸ`拭989::9ɼ:鹰9i@:i;8i[0! 67671}67568y0 32`MiWb:\|m 000ɔ-ɂ (LƊ `Ɗ `Ɗ1}0 `m'`$ *ƛ暩 Śm'ɴ`,'F'9'S'`'z'31}445ƕ45`, <`)iLi摥h1Ɲ0`I0i)z1}L8)|##i(f`Ɩ 日)0й8й@Ѝ`BFJNRVZ^H8(Ȣ Q1}`&L&&&&} &&&i&&&& && && & ҝ&&&&&&&ġei1}i(iƢ׽ &`""3Df33wU3UwDUwDUUfffffffffffffff̻ffwUUwDDDDff3f"D"3""1}""3DU33fw3UUDfUDwfU͈ffffffffݪffffffݻfffUUwfDUw3Uw3f"f"D3"""3"D""Uw3DwwUU1}wUUffffffffffffffff̻wffUUfwDDwDDw3f3U"D3""""3D3"Uw33UwDDfUUUUwUffff1}fffffffffݻffwUUwDUUDw3U3f3U"D3"""3D"f3fDTDDfUUUUwUUffffffffffff̻1}fff̪UUwwDfwDUw3Df3f3D3""""3DU"f3DwUDfUUwUUwfffffffffff̈ff̻ffwUUwDUwDUU3UU31}D3D""3"""3D3"U3Uw3DffDffUwwUfffffffffffff̻fffݻUUfUDffDf3Uf3f3UD""""""3D"D"1}DwU3UfDUwUUffffffffffffffffffffwDUwUDU3f3U3f"D3" !!!""I{G888:@1}KK[KtK[[[@@tpݩup;;;=@@IIIKt6&&(@#6h88:@k[Kt{[[@@tpݩupkKK=1}@@iYKtfF&(@48H8:@[kkKt{[@@tpݩup[kK=@@YyKtFVV(@4$&68HH:1}@Kk{ktK{@@tpݩup;;[]@@IYkt6VVH@44&88HZ@KKtK[@@tpݩup;;[1}]@@IIi{t6&VX@466888Z@KK[tK[[@@tpup;;;_@@III{t6&&X@6881}8:@KK[mK[[@Pʑ;;;?@PIIIL6&&)@YZijijYjyzijyzʙʙ1}ڙʙ DSwb"Tyc$Dx7dϪ Uf2w37D+w44D73+2U337+w4f4U7w+w2w3w7 T####6  T####1}-o%o%<%% K %%  %% L{&;?ABDEGIJLNOQSUWY[]_acegilnpruwz|1}2%-/6%#534/-/3PT@EDC1}4DP DD0}UUUUUU_5}UUULUSTUU]UTU??MQUQUT5}T}\U\UWUW1_OSUW__5}USUO?STW|UUWSUUUQJ?2 >UQB? UqP?5}<UEP<⪪*UEP<UT _6}?UTUWTUUuUTUUUU]@ UQ6}UU_?UUW\UEUUC_?UUWUUUUU@WUUTUUUUU@W6}UUU=UUUUUPWUUUUUUUUPUUUUEUUUU@U6}UUUEQUQUU@UUUUQTUUUUUUUUQUUTTU6}UUUTUDUPTUUUTU@U@TUUUUPUPU_6}UUUTTUPU_UUUT@UQU_UUUTUAU_6}UUUUUU@UWUUUUU@UUUUUUUUU@UUUU6}UUUUUPUWUUUUUPUWU]]U]_UUUUTU_W6}UUUUTU_"UUUUTU"]UUUUTU""]]UUUUU6 }""UUUU"(?WW_UUUU"wwwUUUU6 }WwwUUUUʪwwwUUUPww_UUT.U?6 }URuuuuuuWUN"wwwwww@U"*6 }uwuw@@TwwwwwwPP*uuwwwTUP6 }U@UH?UPT"?wUTRw6}UUQH*}UUU@UUU6}UUU UUU ?UUU ?}u]]Uu}]_6}UUw}}]u}UU_u}}wu}UUBWuAqqt|EqUU`6}?55qqQpEQ_UUX? 5qqqLEqqUUV??5qQLEQ_UU`?6}000?W_ U©SQTP_WuQ__U_WWu}6}]uu__w]}}wWUUUUu]uu__w]}}w_UUUUU]EE0\]t]AqwUUUUUTE6}5E|\]t]qqwUUUUUEOP]E E\WQTWqqwUUUU7P]E\SDQQq_UUUUWE\]Ew <6}303UUUU? < 0 UUUU? :,@@67<,.>:, @@"@@G-672 }%<%%8,,.7@<8,%@,@6-%8,%@D G("A 6-@-@!(2!} 0AdAUBAR@T-@@ \(ON nA@dA}-@3@2"}( 0-@@!S( INPUT BOOK %@ e-@@ }( ODIFY BOOK  $ Ar)@2#}$ A`;"@w@% AP16-; @ "@AP"@vAa2$}"@'%@/-@@#@( SURE (Y/N)M)@a@Ap"@h A"2%}@eA-"@'*"@# AP- @"@CA!!@*@xAS-@2&}@#(( SURE?? (Y/N)5)@? AWS@A"@x%%D:MAINMENU.LIB"@E2'}A1"@'6-%@' AP1 @"AU6-@2"@qAJ-@2(}@#@(EXISTS NO COMMAND >:,J Ap>6-F:@,%6-F:@,)(7-&@>( 2)}$2AR'-@@ /(OFF2$Q-@@#5(CHECK THE DISK DRIVE OUTGA2*}Q Ap*-@@#'( MESSAGE:*$,H%@!#-@@#>(EXIST NO MORE BOOKSH Ap62+})6-%@6-%@W) A H@!-@@#>(BACK TO THE BEGINNINGH Ap6-&@2,}6-&@W&-@ @&(7<%@),.-@ @.(7%@0<%@I,c-@@.(2-}7%@P<%@U,@-@5@Y(7%@V<%@V,c Ap=AR'-@(@3(LOADIN2.}G= AWL-@$@&( 8-@$@?(L@2 6.67@,.267@<2/}@,.D:<<6-C:/@ԩhhh i hԈhԈhԈhԈhhLV,F @@A(F6-?:<@<B20}-@@#-@!:(| |> &-@!&(26}0 A0@@D:*.*^-@@ +-@@8)@F627}7<,.>:,J ^-@"%@1-(7@<@,7@<&@,1 J-@@#-( CONTINUE";:IF PEEK(53279)<>5 THEN 670675 FOR L=Fo}ffff YY UU UUUUUUUU2p}``UU```````jeooej```pppDޖA0q1rl˅̩ͩ΢ˑ򩐍02q}1g  \ xsL}b \q0r1l`uzu>>tt2r}is)ILs)ab0cHd`exf10IHa`yxݭb/cGd_ew2s}fs)_/bGc_dwef01HI`axy߭bc0dHe`fxs) I Ls)!2t}x >`>H>0>>x&s)J~0~H~`~x~Lbޅ˩̩Vͩ΢wˑ͈ixͥivu2u}ŘĖ혈`&",dz2%6)34!!4!2)34!+0/22/$25""%22v}    U                2w}        U                0$(X+E,X+E)):NEXT X910 D=2^INT(LOG(N)/LOG(2))-1920 FOR I=1 TO N-D:B$(1)=" ":B$(57)=" ":B$(2)=B$930 IF X(I)<=X(I+D) THEN 102Fy}0940 TX=X(I+D):X(I+D)=X(I)950 B$=A$(((I+D)*57)+1,((I+D)*57)+57):A$(((I+D)*57)+1,((I+D)*57)+57)=A$((I*57)+1,(I*57)+57)960 IFz}F I<=D THEN X(I)=TX961 IF I<=D THEN A$((I*57)+1,(I*57)+57)=B$:GOTO 1020970 FOR J=I-D TO 1 STEP -D980 IF TX>=X(J) THEN 1010F{}990 X(J+D)=X(J)991 A$(((J+D)*57)+1,((J+D)*57)+57)=A$((J*57)+1,(J*57)+57)1000 NEXT J1010 X(J+D)=TX1011 A$(((J+D)*57)+1,((F|}J+D)*57)+57)=B$1020 NEXT I1030 D=INT(D/2):IF D>0 THEN 9201040 POSITION 9,3:? A$(X1,X1+29)1050 POSITION 9,5:? A$(X1+30,X1+F}}49)1070 POSITION 13,7:? A$(X1+50,X1+55):POSITION 35,7:? A$(X1+56,X1+56)1080 POKE 559,34:GOTO 6902000 POKE 559,0:A=0:FOR X=F~}9 TO 38:LOCATE X,3,Z:A$(X1+A,X1+A)=CHR$(Z):A=A+1:NEXT X2010 A=30:FOR X=9 TO 28:LOCATE X,5,Z:A$(X1+A,X1+A)=CHR$(Z):A=A+1:NEXTF} X2020 A=50:FOR X=13 TO 18:LOCATE X,7,Z:A$(X1+A,X1+A)=CHR$(Z):A=A+1:NEXT X2030 LOCATE 35,7,Z:A$(X1+A,X1+A)=CHR$(Z)2040 POSF}ITION 2,8:? " ":POKE 559,34:GOTO 1707,Z:A$(X1+A,X1+A)=CHR$(Z):A=A+1:NEXT X2030 LOCATE 35,7,Z:A$(X1+A,X1+A)=CHR$(Z)2040 POSD%23#f|AQNOAXBNO1XRIIQSDIDT@@J} J}S."D:EDITOR3.LIBAA`w +( J}/-@@9(BOOK:K-@@W(AUTHOR:i-@@w( LOCATION: |-@)@(LOAN:1-J}@@ <(ՠN-@@ X(OFFjA|A @ X(( EW BEGINNING&( OAD FJ}ILE4( AVE FILEF@@dXB7t@d Q( NEXT BOOK#( BACK BOOK0(LPHABET?( IRECTORY Q( O OJ}THER BOOK T(ETURN TO MAIN MENU--@@#T(!MESSAGE: By German A. Gonzalez M. |-@@#( FREE: J}3705-@?(BOOK:Q-@&_( NUMBER OFq-@&@|(BOOKS:R;B,;@0,;@J},9@,9A,;@W,;@,g68,-@)|68@,-@68@,-@68@,J}-6-@6-@i@.@@K:?67@,. P67B,. _67@,J}.i A6-%@W6-%@+!Ap=-@@#S(MEMORY FULL!!!a6-&@Wo6-&@}J}6-&@ Aph-@3@( 0-@!@A(Ap& S-@!\( h6-J}#-@#6-967@,. *678,%@,. 967@,.4"!-@@J}*(4 AH("@(((( AH)"@((() AH2"@!-@4J}@(( 2 AH(& @@6-&)@2"@@@PJ!*"A&&67<,. J}46-&@@6-@J AQ3"@06-&@)6-@3 AR%"@16-@% AJ}Z"AUAPd!! @2)!A"@@nD6-%@"!8,%@36-8,%@:(D @@xJ}% 6-% @@ (>:,@@67<,.>:, @@"@@G-67%<%%J}8,,.7@<8,%@,@6-%8,%@D G("A 6-@-@!( 0J}AdAUBAR@T-@@ \(ON nA@dA}-@3@( J}0-@@!S( INPUT BOOK %@ e-@@ }( ODIFY BOOK  $ Ar)@$ J}A`;"@w@% AP16-; @ "@AP"@vAa"A'J}%@/-@@#@( SURE (Y/N)M)@a@Ap"@h A"@eJ}A-"A'*"@# AP- @"@CA!!@*@xAS-@@#J}(( SURE?? (Y/N)5)@? AWS@A"@x%%D:MAINMENU.LIB"@EAJ}1"A'6-%@' AP1 @"AU6-@2"@qAJ-@@#@J}(EXISTS NO COMMAND >:,J Ap>6-F:@,%6-F:@,)(7-&@>( $2J}AR'-@@ /(OFF2$Q-@@#5(CHECK THE DISK DRIVE OUTGAQ ApJ}*-@@#'( MESSAGE:*$,H%@!#-@@#>(EXIST NO MORE BOOKSH Ap6)6-%J}@}~~AFAMBPQQHHVVYYXXPYHPXDDRKEGHV&} @@@&}HHΠ &}̠""ΠڠӠ""Š +A&} K6-6-@'6-@36-??6-K6-@eK6-6-'6-A 36&}-?6-AK6-d A`e Apf APg Ah A j A@ ϛ&}36-6-A'6-36-A - -<<68<,-G:$'A,$$%G:+@%,$'A&},$$ 9968<,-+A&+8<,$G:$'A,%8<,,$,$8<,!6-8<,8<, 6-8<,$BB68<&},-+E:$'A,$$%E:+@%,$'A,$$,$$.8<,!6-8<,88<, 6-8<,B L `$&}Λ 6-&!AA!0 6-&!AA!6-+%A&,'@& 6-&}+%A&,'@& A4îڛ>6-'A6-P:',H A!PRîԛ\6-'A&}6-P:',f @Ap AΛ +@@ --&@;,&}8<,%8<,%;/8<%@,%8<%@,%    --&@;,8<,%8<,%;/8<&}%@,%8<%@,%   ;@.@@K:;)@"@'A&}"@At" AA ՛+-@@#+( > @!-@@#>(NO&} CABE. DEBE SECTORIZAR-@@#(*;@.@@K:;)@!!"@I)&}"@PAW"@QAPp"@RAQ"@SAP"@TAQ "@U&}AP"@VAQ0"@CAT"@BAS"@EAU"@aAU&} AP3(FACTOR%-@ @)(3 AP"(VERTICE ARRIBA/IZQ."+-@@#+( &} -@@#(*!(VERTICE ABAJO/DER.!!)!AP'-@ @'( &} +-@ @+(    AP(6-?( GRAFICANDO( AR AW &}AP( COEF.RELACIONg@.@@K:;)@I6-&@Hg @)!@&}AQ#-@"@(# APϠϠϠϠ&}ϠϠϠϠ 6-@( IMPRESORAP$)6-%@!&}A)6-A AT)6-&@ )6-"#-@ @(# AP|6-&@&} AUP6-%@-@ @( APD!-@@#!(SEGURO?NO@.@&}@K:;)@O"AUAWX"@AW`b@xAWl$"@I%&} +p ӛz+ +%(INGRESO DE ALTURAS((+(( (1)-EJEMPLO( (2)-ARCHIVO( (3)-MANU&}ALY@.@@K:;)@Y @I)!@QA`p''&@HAaAbA&}c'6-6-!6-'6-$26-@6-@29<,9<,9<,E-@+&}-@/":68<,-> B E$0,0,1,3,2,1,3,4,3,1,2,3X7 +7(%GERMAN GONZALEZ MORR&}IS --------- 1989;-@@;(!*ANGULOS SE MODIFICAN CON FLECHAS-@@((-@@#&}(" ((-@@ @-@@$ -(   -@@@&}'-@(|!-@%'(|7-@%@(1-@%%@7(  3-@@ &}(--@%@ 3( f-@@&( FACTOR (ESC)8-@@M(REACION DIM. _-@ @&}f(1/*X-@@'( ANGULO HORZ. 9-@@X(SECTOR   /&-@@&( AN&}GULO VERT.##ϠŠD:3D.MICR4@@@@p#&}iULO VERT.##ϠŠD:3D.MICR4@@@@p#$@6-%@W) A H@!-@@#>(BACK TO THE BEGINNINGH Ap6-&@6-J}&@W&-@ @&(7<%@),.-@ @.(7%@0<%@I,c-@@.(7%@PJ}<%@U,@-@5@Y(7%@V<%@V,c Ap=AR'-@(@3(LOADING= AWJ}L-@$@&( 8-@$@?(L@2 6.67@,.267@<@,.J}D:<<6-C:/@ԩhhh i hԈhԈhԈhԈhhLV,F @@A(F6-?:<@<B-@@#-@!:(| |> &-@!&(J}0 A0@@D:*.*^-@@ +-@@8)@F67<,.>:J}?