SYS: disk BASIC ver 1.0p! B( x  >> QPePU2U3KKSYS: disk BASIC ver 1.0p! B( x  >> QPePU2U3KKH#E:e3e(e eGeJedrc_döbcôdÚdÉdtdÊ`Ìa` `I`[C[i[ZZ[ZïWWÒWSÝST-T]TTñUSRôRFQUXV$QPPPPPPgPPOÿOjNPNNML,Kt8ö{Þ{5vKjG M \à[[sZYåYkZcZRZ[ZYSZÈWjVuYSN___ä_À_Ï_c_+_ÍX'XXåX>8877Õ777Å6656Ì5:5×4T443å3<3Ä2&02&2V G Yqzp×/1V>>= 7>>>>GeGe>2!pp!+ 6#>2*:*o&!z(6# ~! ~> !} >2m->>>>uV1!E:m!ͺ>>>= Ge:( >Jedrcrc7>8!͒WͯWOcZ2Ү2Ӯ2Ԯ2ծ!"22Y[Z2AP!FQ"N"2͍XuquxLoL ͏!HK͏ý SEGA SC-3000 Disk BASIC ver 1.0p Copyright 1984 (C) by MITEC > Ͷ{> Ͷ{%>Ͷ{> Ͷ{> Ͷ{Ͷ{ Bytes free }> Ͷ{͞{!K>SuquxLoL !ͺ>222!FQ""NͶb!:D !K Ready 22]1:쫷(*͞{> Ͷ{>2]!"N> ({01u:^ "͎|>u:쫷2*`[>4u"2d>!0,!<ցap0V\s!&+bmap000 3S000000F9F9ͣ 2͝ 2ͻ!2"2#2F22= h!6+60+6+6+6+6 +6>= h!6+6(+6+6+6+6 +6>Ùa2͹F25b2>u 2= (Y8Q}(> (>)u,}8*V6#"X6#"Z2Ү2Ӯ2Ԯ2ծ!"ͺ>t8uquxLoL #"*T= h:>6u:ˮ2!L(!FQ""N:ʮ=̶bc*Ʈ"*Ȯ"[®:ĮC *A22"!"*|G(2ĮS®*"Ʈ*"Ȯ͠[U!> >uÈ!!&E֐apJHIB ~:0>JJ%ECDCSF9FLF=1FMCBkF>pH<@4C?2O^#V###" ">:B1O>S͇>8!FQ""NͶb2!jV""T!:D !Kyͥ!K*}( !K*͞{!KyR 78 ? in error1>S͇2:2ʮ:2ˮ!FQ""N2Ͷb!jV""T!!:D !"K*}( !(K*͞{!-K Break in 'X!4ۿ!mj"%!8h"#!FQ"!M "L!FQ"N!2"P!G "R!jV"!jV"T!V "X!<3"V2n2o!uY"!X"!!H"՞!"[!#"! "!"7=:( (mj8zu]̇~͐J>5uJ| >, J| }:e3eJ>5u!},}#F#fh8|ʴ ʹ !>   C, *8|(_(`>, 8|(F(G>!  2DM{ T]le8> Ͷ{> Ͷ{!jGap >u>#u>$u>%u>&u>'u>(u2"= (: : (4:(0, "x("=J| }02"> (:( >u>5ux((J!<&%(e e +x x((e eM #> M > M ( :n>Du>ͮ >ͮ !>02#:"ͮ :#=G:"O(@(x2# >ͮ >ͮ >ͮ  (e e#!#:"O(:#Gy o&= NyM :"G(yM > M > M  03 W:w(_ x(R> ._ ?> ._> d_ ( 8:<2& > { >2>@uG:o ͮ <ͮ 2<2oxX ($ 0@( ($ ( ( ( (-2':(!=2:O082:<2!O(z # x ͗ >@u><͗ }(+'XGe'X 0o&))))p F#(~X #> >> d_> ,_z >2>!"= e͞8`} \DMX0(X 6#6p#q#Kx(Iq#p#>( ͞8/} +MD>) p#q# > s#rÍB>u>Eu>5u>Fu>;͞D}DDMXD!~(=#>( mj8y>)8qfnDM{8i######}zu{*nf"^Vmj8Bu>!u>u>u!kR(~(_#~+(>>= 8h8>tX8J>u>*u>5u=J| H}0CE(<2M(<2: :(:(xJe> ( :(>u>5u>2$2(2=,(! (C:(?8h81>t:,>, =J8"&>2(> (:( >>5>>u:$!(!{K&* Loading start * Verifying start ~_2%ͤ_( & >2%!>2Ow# W_:%(go:( "&x:%( :(Ru(M:%!((!6Kv5vv!DKá Skip BAS:  Skip OBJ:  Found OBJ: !FKv5vv!DK:$(![&R#ѷRa_ͤ_' *&O:$y(w I#z x:$!(!K͇* Loading end * Verifying end >Cu:$(>Auͤ_G=8h82>t>, #=J8>, =J8> ( :(>>5u:(,B8C&"(!K~'_z c_>&R+_!M~#5M [&*(R#J|5O}5Oz5O{5x5>55_z c_R>'+_*([&RK~5M#z xM5>55!%K͇* Saving start * Saving end _xG+_ɯ>2$=2> (ͤz>#u> >u:(,:$!(!K&* Loading start * Verifying start ~_2%ͤ_( & >2%!>2O"w# "W"_:%("""x :% :(Qu(L:%!'(!5Kv5vv!CK Skip BAS:  Skip OBJ:  Found BAS: !EKv5vv!CK:$(*\[TR##ѷR>>u_ͤ_ *T"O:$y(w#z "x:$(!K6"V#6"X#"Z͇!K͇* Loading end * Verifying end >Cu:$(>Au:$(*T ~ͤ_G=ͤz>#u> >u:>#u,*T~>=u!aK* Saving start ~'_z c_>R+_!M~# M *V[TRJ| O} x >  _z c_R>+_*V[TRK~ #Mz xM >  !K͇* Saving end _xG+_!:O0 6 #< >2>)U>(2!" " "=*B}2|2 >,=J|}2 >:ʬ ʬ,=,(!J|}O>:ʬ ʬ,=,Hmjzu]!}!h-(J:˟2)2: o&~!?~|}2 !h͆!ͨ!?~)" >:(l (h, }=,(" >:(P (L, a=,(">:(4 (0, E=B :2=F :2>:( (yg O:2>u>5umjzu8]!h-!!?~8)2v: _/o&#{8Z)0)Rj&+{()R0Z)`i))[ Ͱ" *Ͱ[ R(0":G: _/o&#{8Z)0)Rj&+{()R0Z) h(!* |( * +" (x 1=˨*+"|(P 1=x 1=Px͌aP*x`y((zS_X `( * Ͱ]A: 0 >0>_X ` Z* ͰUI: 88 >0>WDM!>=( 80,_{ =J>, =J| }w>:( ( >u>5u=J>:( (>u1= (:(>S%J| }0 >S> ( :(>u>5u=J| $M>, =J| i>:( ( >u>5u=J|–}Җ "> (:(Ñ>y>y>y>yÛG>,‘=,(mmjzuږx8!͆ !͆!ͨ?~8x| s))))====x0=ya| O}0Jx(>y>, '=J| -}0(Dox= =y> (:( >u>5u`xPK !L>G^ #>SN >K!O~#( F## F#~Ͷ{SystemN-formura too complexS-formura too complex "OverflowDivision by zero!Function parameterString too longStack overflow&> Out of memoryNumber of subscriptsValue of subscript2Syntax#Command parameter$4Line number over'1Illegal line number(Line image too long)%Undef'd line number*;Type missmatch+< Out of data,RETURN without GOSUB- GOSUB nesting.0NEXT without FOR/ FOR nesting5Statement parameter6Can't continue7FOR variable name8 Array name9 Redim'd array: Undef'd array= No program?Memory writing@Device not readyA Tape readBUndef'd functionC VerifyingDPRT:2 not selectedEFunction buffer fullFIllegal directGR Disk offlineHFile not foundI Disk fullJFile write protectedKDisk I/OLFile already existsMBad file numberNFile already openO Bad file modePFile not openedQInput past endSHard write protected Unprintable=8| } 0G> x2*E>>#u2][\*T ~@ (R0Y(w#   (+!BK*T@ > (&{01u:^>1u͎|8 R?8>uReceive end - converting =,(58:9062<= (>:(:, =N( E(O(2;= (:(>u>5u>@0:;N(O(0xG:<5(6(7( x>7>2=>82<>E2;>@:;N(O(0xG:<5(6(7( x>7G(x:=W z((O x zW(( G=x7*L"= +!> Ͷ{> Ͷ{78t2+:+< ($2+G+68]!+~(6!> Ͷ{> Ͷ{:5,<  i&͞{!!K>8*N"K Bytes free >>G>Ku> Ͷ{ >"Ͷ{~Ͷ{#  N>* F> >.Ͷ{#~Ͷ{# >"Ͷ{̀!####> Ͷ{> Ͷ{͠[0>8*[[͠[8_[0_=ͤzڙ"> –":ʙ"͗4*T~ʜ"7ڟ":5!483ڥ"!  !T4ڢ"5ڢ"2-6 w#6*V[TR}($|G| >Ox> #5ڢ"w6ͭ"2-5ڢ"ywa2,"ͅ68,% ͌5:+G+ͅ68>8>>#>=>G>I>J>Kuů2,"ͅ68:,<2, :-G??OxG:, €#:ʃ#͗47چ#:5!4ډ# ~Œ#+~2-[T#G(͟#x2-!R|x Kxg2,ͺ#68>% *T~( O  #6"V#6"X#"Z>8>>#>G>H>Ou>>>K*T ~uů2,ͺ#68:,<2, :-G??OxG:, y$͗47ڂ$:5!48t ~ q+~2->2,2.$>2,*V6#6"X#"Z>2^͐$(+2_8>>#>>>G>H>K>Ou!/:._F:.<2. $:,<2, >2,:-62-x:-G??OxG:,G/68=28h8J>t:(?͗4> (: .78/:5!48'38%+:+Gͅ68͌5>8>>5>G>H>J>Ku=28h%>t:%>A mS f͗4!/ ѯ28h8P>t:(E> (: 7͗4784!405!/48'! +:+Gͅ68>8>>5>G>H>K>Lu=28h8c>t:8X>, N=" G" >= (: 3͗4780!48+ ˾P +:+Gͅ68>8>>5>G>H>Ku=8h'>t:'͗4>,'=J'"&>,'=J'"(> (:'K&B'7':5!483'!  !T4'5'2-6 w#6*([&R}($|G| >O!/[&s#r#[(s#r#*&"&x> G5'w62,'/ͅ68~*&/"&:,<2, 2-5'yWw2,'/ͅ68>*&/"& ͌5:+G+ͅ68>8>>5>=>G>I>J>Ku:-G??OxG:,t:a)͗4>, =Ja)"&>2(> (:^)7g):5!4j) ~p)+~2-G??Ox2,N#F#^#V#bkBW):(( K& d)C&#"(| }0 PYDMW)PYB"(S&:-͏)G> x(^2.*(|(Cu)68b%:,<2,:.=2. 2,:-͏)G()x2-͏)G> x2.u)/68>8>>5>>>G>H>K>Ou:-G??OxG:,;(,`+=Jc+|c+>;`+~o+l+| ~ݾ( 6n& #~w+}<<]=2?=bE`+>;(J (F:(B,`+=,( J|c+}2>> (#:(;(,`+=Jc+|c+}c+2? :>O :ஷ/+~ )~#~z+8#~z+8  #-y()(%!`͆:?2G~# (( E>;~* (:(>>5>K>M>O>P>QuG 0 x0x7=# =JZ-|c-:*c-}c-Yq!>;(,W-=JZ-|Z->;W-~i-f-| ~ݾ( 6n& #~w+}<<]2?=8h8 33>2@tmjZ->;(H (D:(@,W-=,( J|Z-}2>> (!:(;(,W-=JZ-+|Z-}<2? :>O :?G:@ *zuw# (4:? 8+G6# (":(w# ( =w# (>;p, (:(>>5>I>K>G>O>Pu ~??O~݆Gͅ68=JV.|V.}(V.O>,S.=JV.|V.}V.V.G>;S.7Y./68{=bE8i:ஷS.>, [=J8V| RM>, G=J8B| >}(:G2!/ ~#( E>;(:( >8>>5>G>Ku=JA/|A/}(A/2->,>/=JA/|A/}A/A/2,>;>/!/T]6=8h>/>t>, w=J8r| nM>, c=J8^+| YE:!/ (w# ( =w# (>;(:( 78:-O:,G/ͅ68>8>>5>G>Ku=28h8k>t:(`͗4> =( ((E>A >S 8=# J| &(#:*8M> (:(x!&08 >5>M>u= (=:(9=# J8"| :*8}(>,( (:( >>5>Mux 2&2GT] 2:*2y2Yq~ 271:5x(y0ʒ1bk4832 bkT41 #~(/7>Ru~??O~݆Gͅ6>Ku7>Ru͌5>8G:Ѯ(UO:*8NyYq~(J( ?^p4 2 6#T]6#6>I>K>M>O>Pu~??O~݆Gͅ68N!, ~(4y586w6:Ѯ(PO:*8IyYq~(E= ? q8@^F4 4~ 6~6wͥ3x>K>M>O>P>Qu~??O~݆G68>KuT] N#~ ,i&~6o 7կ2+:+< (32+G+68,  # (x G!7>Kuկ2+:+< (/2+G+6>Ku( >_zW 7!6 #: 0!O 6 #< !:G~.( #1:Oy0 DG6 #! !0:8! T]!O 6 #< ! 6.> 2&:*W!z( ~_ { O(78$ ,68%>8>G>Ku&:*W!z( ~_ { O(78$ ,ͅ68%>8>G>Ku8!,O ~(# y !,7ɯy0 !,o>g~!A6͕78!B6 N6(!B5 !A5(707>F7> 7j608@0 >=͕78!A6Ͱ6 >= 6(!A5 7>E7> 7608@0 >=>F7> 7708@0>= O(>e= x   x C!(+| 3Q< x   ! B0 !7>7 787` 7!C6#6#q>!C7 087?77!C6#6>8Gg 08 8!Cw#6#q#6#p#6#6#6#6!C!L08 >00w#:L:*W!z( ~_ { >>> ů22: >JeJ|”9} Ҕ9>,™9}2߮= ʐ9:ʐ9,@9(™9J:Ԯ(|/g}/o#:Үo>g>,™9J:ծ(|/g}/o#:Ӯo>g>)™9BK|”9U|(  |”9]:߮[Z> (Y:(U,™9> (H:(D,(J|”9:߮MZ> (*:(&,™9> (:(J|”9}Ҕ9:߮MZJ>5u>u>O=# yC( S(>u6:oyC( >5u} 8E!6#>, 8h8J>t>2>*2t!B:w#( >* >*9yS(xI`xi[J|9}Q:OQ:>09:0A9G0A a9g9a =#Q2Ͷb!Z6 "ۮ>2خ[ݮ>ͤz0':خ !6?#6 >2!6?#6?#6 >2 >;;bE;>Sٮ[ۮ>,( (;35v>2]N;Z> *} !`͆4v>2**} >E0Ss0B~ v>ͤz82E*}(vSۮ:خ<2خ[ٮ>,ʮ::(* (&>u!;K>SÝ:? Redo from start [ۮ> (!;K>S? Extra ignored >u>/u:O!( +~  (y2:(.Z:G! (&#Oy(> !ZR >t=#<=J| }}2Ѯ>, m}*V >2=*X"=bE8SZ> { (> Z>ͤz*} :og6 E0!`͆E>,ʀ<: >u>Mu:=G:O!(!=:= =,(.J|=}=o~w>:ʱ= ʱ=,==,(&J|=}=~w>:(T (P, hy(d=,(1*B> R=*Bz8Tg{8]o:P>, J| )}0$2x : :Je>: >u>5umj8Nzu?~8 | }(E>(( $> (,(: yTF9F>ubE8M*֮~(K*} [֮>E0(8Ss87~ [֮>ͤz8%E(?S֮>,(J>u>u>*u=!:( ( 8 |(ͺ>J>)u| *T>,}8 >"֮>)u(Y(3( "  A :( (=bk+++++n&=>:( (,(>;u:G=,(J|<@}<@E>,7@=:O:㫑:3@ 3@,7@=,(:(v (rJ| t} o}2A>:(Y (U, U=,(-:(F (BJ| D} ?EcZEkZ>:(% (!, !=:( (J| (0 =2nJ>u>5u:ԮG:ծO2Ү2Ӯ2Ԯ2ծ=*B}2Ү|2Ӯ>, )=,(J| 2}0-G>, J| }0Ox2Ԯy2ծ> :>u>5u=*B>,( : J| }0,K> :>u>5u= * *B> R*B>,(&!3=, & J| 1}0,, =!B &=F .> (:( >u>5u| }O:2"| xA=z8Tg{8]o} xDMbAk`A`iBKTA]PAxٷ(rNjN`=*B">, J| ,}0'O:2x͌a"> :>u>5u>( PJ:Ԯ(|/g}/o#:ҮG> :>, .J:ծ(|/g}/o#:Ӯ0o> eh>) >u>5u "  A :BM,7C CEJ: y&2C:ox8j:㫸8dy2Dx2E x0S2y2J:(8:Ԯ(|/g}/o#:Үo>g J:(:ծ(|/g}/o#:Ӯo>g| >>5u>u:̯WOJ>:( !bE>u:⮧>9u*̀x>:u>,( :>ubE8B:⮧(7GOog*͵x0 ((">,( : >u>u>u>9u> (*:(&bEڅD*}ŠD:⮧ŠD> ( :( ,(t!K*{!Ǒ*{ͥu!͆]LDzu!-]D"zu!-(nD>,C : L*"*"[:>u>0ubE8*} E:⮧ E"> emj8dzu*{8N> Jmj8Mzu>!h mj87zu͆!}J2S*"*" L>> >*>5>7ubE8-> &*} mj8zu 8h8>tJE>u>*u>2͞E">( Nmj8Vzu?~8K| GDM!:<=(##q#p#:<2(>)(, >,() 7>u>u:⮧ *} {^z>u1OGog*} ͟wFSv0O> (> (>uJͱL:( ́LTF= W8[|(R>,}8KT]*mj89zu] >(( *>(( =60>:>u>)u>5u= (G|>#u*R> *L*N"2̮G:̮ > Ͷ{> Ͷ{jG:̮( > Ͷ{> Ͷ{*N"2̮0 ((!>ˁ|((,( A(T]&>u>#u0(>! R8R,H<,})H#N#F#B8[ `i͞{> 1HO(+8D  g4Ϳy4}G |1HNgo4Ϳy4E} + C (3A (" <1H G :(I (01H1H#|yGͶ{ (> Ͷ{͠[0*[[0 ͠[8_[0_=,(*J8J| J}=0D(!FQ!L2""N, J8| }=0̶bc> :>u>5u=#>*N .=J|>5u}2Ѯ>,>u}*R(*P>*L2Ю">8h8">:(;(,( (>t>tmjJzu͘q5v:Ю ;( > Ͷ{> Ͷ{>:(y (u,( ;(]>u:Ю(2(N: :D0>2D:> Ͷ{> Ͷ{.:0>2 :n(> Ͷ{:0> Ͷ{: > (:I:Ю( > Ͷ{> Ͷ{*N">((gI͘J:ЮgI,-gI> Ͷ{͘J:ЮgI(F: }&0~:D,,/<}gIgI2DgI}(0dO:( >8TO:gIy2gI:n: :gI/ Ͷ{gI=({Imj8zu?~8 | >) >!u[> J2ĮS®*"Ʈ*"ȮUJJ> >: >umj>uzu?~>5u~#( Ͷ{ > GzKxG:2N v!{(N(ZBKz>(N_z>(NW(#KB͂q{(#KB͂q>͌a{<( N |( YP+N *ѭR>.u}(?L>0u "*+#"*?L8"*R>/u*"DM*!ѭR 7y #x +# !ѭ"!^"ϭ*ϭ!έR>-u[s#r#[s#r#s#r#w#"ϭ*ϭ!^R>,u+~+V+^+V+^S+V+^S"ϭ 0G!9Map=M=M=M=M=M>M=MQMWM`MdMuMyM}MMMMM=MMMM=MMM=MM=MMMMMPP>gPPz0>g.jN>SM>gPͿOPzW8PPOPP:?>(>2?:?>(>2?: cͶbPPgP>>2cZkZ:A2A:n>(=2n:OP ( {o0.zg8&jN_dO(e e ( ( ( ( ( ( (>>G2: xJe|8}8|0 Db͖Nz({ R}8L _d:e3e&_d:e>3e| g(e:_ e:e3e}(y͌a{(>2ή2Ϯ͈W͠[0!:] ʹR>2Ϯ> Ͷ{> Ͷ{ʹR*[:ή( !Ϯ4x 6y ʹR~RjV(W6ʹR( :ή2ήz!O >2ή:ή(z 8TzFQ OZV͝S>2? :0>2>[< !>:e3e$ ! ::e3e$ P!"G|8;}87{_}oJQ_d (e e:e3ez({({_:OP0SapPPPP ({0  ( _0z0W$  ( {8_>_z8WPPz2{2:W:_2 `Pz0:({0 !~#$QO:g>܌a$%(܌a 0G!RapRRRRRRR RRRRR!R%R)RlRRR{RRRRGR8RRRRRRRRRG:EW:D_' OͱU IX:e>3eT0 :ex3e=:EWX:ex3e>S:EW:D_X:e> 3eX:ex3e>S-T>S]TS͝SWͯWT:?>(>2?:?>(>2?>2?>2>2>2ͶbW>2@>2A: cͶbTT-TS>>2cZkZ:A2A:n>(=2n:D_:EWX:e:ͮ3e:D_:EWX(e e2ͮ:?((*y > :e3e:D0>2D(%(&('rS͖S{S͖SrS͖S{S͖S_S_S{S{S͊S_S͊S>>>>>>>>>>_͊S͊SͱU2D:EW:D_X:e> 3e#{( ͱU(##:D (:EW:⫺(yX+(e e g:E=W2E>':EW:D=_2DͱUG{'(X#(e e+:e3ex(X###(e e+++:e3eX:e> 3e7ͱUO'WX(e e (`:㫹(5QX:e>3e3e&> 3e:㫺(7X(e e(%ͱUo:g͊`UX:e>3e3e:E=2E:D_:EWX (e eO:ex3eA{'(#:㫺(#(e e ##̧7:EO:㫹(QX(e e  y*[:EW:⫺(X(e e(zUWX:8X(e e('X(e e( +R0#R((e e#(w#6 *B~bW\sZY:#O WW 8O:#G :?apVVV!]Y( !r]!2]Y(!2]!\Y(!\!r\6ͥYY_(:A hWzWuW zW{( :?O!W ~2?{!6>#_(:AhWzWuW zW{ ͈W!6]NA  #~"B_(#"B*B^>>>>_!W"B>88}8 2|2ͯW7:OWX:㫑O > !((:e3e W:W2E>2DX> :e3e3ez?{(?BK(! <*F#R(O"F:H'2HP 72H:I'2I` &2I:J'2J` 2J:K'2K$ 2K"F!"F2H2I2J2K!IN!JF:K!X6:#xX6:#yX>20w#0w#&:o6 MY8O>: G>#8BEMY8<>: 4>Y8/MMY8)> !>Y8x2Ky2J}2I>!"F2H7!>68o=68))))$% o7\:#W !2]G !r] !]ͥYY!r\~ #>8O:@y(!ZA0 !za8  6!#######(!.0(2>MZ:>< >2>!MZ>2>!.>2?>2?>2@>2@!&./~#/~#/~#/~#/~#/~#/~#/~C[!###Gy˾wx[C[!###G>wx[C[!##q[C[!r#s[ O!; :e3e O!; (e eo&))):( :e3e  Go\o_((xo\o(}(} xo\  :$/Gy2$o\  :%/Gy2%O!a\w  #Ca\wzW{#w{ _x_:G2x2#yo\/_/       ɫϸ!qazlo#edc ?+p$rfv_*`%tgb}{&yhn 'ujm|~=)(1QAZ,KI2WSX .LO3EDC /;P4RFV:@5TGB][6YHN 7UJM\^-098GOTO REM CHR$(ASC(SGN(COS( TO GOSUB DATA STR$(VAL(RND(TAN( STEP RETURNREAD TIME$SQR(CLSFRERAD(NEXT SCREEN RESTORE LEFT$(EXP(DELETE PIPRINT IF POSITION INPUT RIGHT$(LOG(LIST THEN COLORDIM MID$(ABS(LINE FOR SIN(INT(RUN AUTO VERIFY "LOAD "SAVE "PSET W.͏_zWG__͏_O_*̀_-9_*̀_,̀_> !)̀_+}n_>͜_͚_͚_͚_>͜_c͜_.__>ҧ_(_._|g_-·__{__> __>_> __ _WO:(i&)))i&)))(e! ew#O:(i&)))!i&))):e!~#3eD}`x`R(.( A(e! ew#A:e!~3e#( :e(> 3e!<(<=(2x2z8|8|0Dg}0Do>0 yHG{ZW|eo>O!}GzaxG8'{_:za|_}_R8RzWyٷ(zS_:͌aO>8O_d!ao>gFy x/G(e e:e3e((e e:e3e :G(e e:e3e @,b|(+",(!  ,b|(" !6>u>#(! >= *T ~ :=J85> +!:*( =+R0*\++++R8 "T ~>>#u=J8 > : *ZR0 ~>>5u:((rc>2>Jed>Je:(:(x Je> Je>Je:Je>2:( (rc>2>Jed>Je:(:(x Je> Je>Je:Je>2>2Ge>2>2>2>2>2>2>2>OJe:(:(x Je> Je> Je> Je>v Je> Je: Je!:e>3e x ! :e:3e x >3e<  >3e>3e3e3e!<:e> 3e x !T]6>2>Jeb<<öfz >öf,}0>öf[TR(=*T!"ūnf~R0"ū O *ūR8>öf*T~O(~w~w  ,}ut^~( 8ut_>a>2ī͹f8W*Zz]f8 *\R0><>2ī͹f*T~( O~w~w66  W*T~(O###6#6## z7W[T*T!2ЫSΫO  ˁA l _g # !"  A : ˁOR # 8͆g0 8͆gng ͆g,( "  A :ˁRf#f>(33>Sū8^ ([ūRE,}8D###~#foɫSy2ǫy2ȫ(0 DG+G#!Ы:ȫw8> :īg>7*ū:ȫ( hO͊}DOp}x/Gy/O !ɫ[ū:ǫO*Ϋ:ȫwoh8.> #oh8>t>tt8>/u>u7bj1i͠hͭh>( lq8>) >t7>ͤz>/u͞8o}(k>(('>z0>u>u>u>u>/u!wq8zu?~8| #>,() Nv0(=(7>zp±l!ڱl֠(#(>( t!0Pwq8dzui((( ( O?~|y @apiOjiij$jqVj>) &>/ulq8>, wq8>t>!u}2>2!i*(2>2ði:8}2:8!T]O y2(:0>,wq8zu?~|iisi^j*!ði!kj*:+> 2+͂q:+=2+:+RkRk alڪkók{j0 :+ªkm>O:+=O!5l F#fhyڳk{j8E33,zuzu!k!,yapׇ珨ٍǑzkkkkkkkkkkͥuóklqڪk>O!8lq8>t>tukͥuh>tX>O:+(!y!8={j8>izu}̔ͥu5y {j8!zu?~0l}/o|/g~ͥu{j8 2+72+-kk0 !IlyƇ_~!`(!͆?~82͆?~8(yapll$l}o|g}o|g}o|g~> u͕l͠l6pͱo>( wq8>) zu7!l*>zp(7!8ր(C(?(;>(bm!vm(( ># wq8c>) \zuUmapm܋ŋ kCW rm֌!mmmmn.n;nnAnnn oHooemͥu>!>>>M>N>Pulq8>) >t]m: >!w#w#w!Ct!Æ]!`ʆ!h!Æ:(:o&~:!:G(~ #6 E0hmSs8~!`Æ?~bm~?~bm|bm(e e?~|bmMx}~?~|bm}=bmbmOy //G/ O!n ~m?~|bm}=bmbmOy / x m?~bm|km:*km}km!`͆Yq~qm=nm q!Æ?~bm|km:*km}kmYq~qm!~ݾ( 6####N ~?~bm|km:*km}kmYq~qm!~6G(x####xO ~(~ +~:5!,~<  #y>8m͞8p} l>((({0>u>u>u>uͥu!wq8zu?~8| #>,() ͚w0(=(7>ͯ0 >uSs8~7ͥu"'")_^#V*)*'=(p=wqpzu?~| e}(a2>, W=# =wq8Hzu?~| >:*88}(42ѮYq~(.= (!:G<3w#>) >/u>!>M>O>Pu~O!, ~~ yݾ .~ݾ & ~( +>x ~87!=( !uq*#!q*%!9R>u:G:O@2!ѫ!!ѫ}̈́]r!٫}!Cs-ir!Ks-ir!ѫ~(rq> s~Lr!ѫ#^#{rz~#8+s{ƙ'_r{ sr>.sz rsrz~#8+s.r>.s!ѫ#^{(sVr#.r:ѫ(rr> s!ѫ##~ss(1>.s~s#~s(~#sos}( s >Es~r~ssr> ssG>+(>-s0sw#:<2> W~_( ~+_ {ѧ!>& V=H(h(I= ! Ϳs86o= | .} )} g.sͿs8| ))))o7>"u=!908!FA87 !fa8W7?~8-> x(  |$t ))))y2_!3t~0123456789ABCDEF6#6# #~'8w#̈́t(G̈́tw#̈́tÖ́tw#:W:< u+N=y 22B"Ӟ=( (=:(:O*Ӟ #ҞR8>u*ӞA(w#q#"Ӟ!"Ӟ*R >uPY +#"*R >u`i"!"*՞!:G:O( (  # x:G:8G:O:2y2!( O~q#:G!(~#Ͷ{>Uv>2"!gy**z0'*T] z(*͵x0ۧ7>ʒw>Òw##"##X#~(#*R>7’w! nf^VR>ڑw####++++!V^z (V^++++{( ~%~#O w:(M~%~G:%~O(-0xOyx/Gy/O*yw#xwyO z>8%:w#O%~2O#%>áw>2"!gy**˽z0'*T] z(*˽͵x0ۧ7>xx>xx####X#~(#*R>7 q!nf^VR>8O####++++!V^z (V^++++))):(}͆|(z0##N#F! DMy*X[V+RDM"!gy*zYy*|]y}]y]y!: _ W{(c8^= :>(>%~<_8D 8>MD*X+ z81*|}! }|!~#! 6#{ >>>7"ܞ`i"ޞ"""!6#"z(*"*""*ܞ***ޞDM*|(8.D!E!%~( #  # B A~#i͟}*XB"X}*X "XDM*V~(_#~(#^#V#+7*{8~2O#y(*{88~%~G:%~O(0 xO͖{ yO͚{8:wG(#wG2>" % ("(z"(337x(>,( (z:O! w!4˽*{8}˽*{8͆DM*X~($_#~(~  #~%~_##y YP ͚{8+r#s#6#PY>%~O͚{8 r#s#67͟}}מSמAͶ{!{*!{*!^!`60 ?s||(5utwwGO>!dˉڀ8x  ?$w#w# (>A " <G :(9I +~͔w#0%ڀ8p#$y(q#!_p>7 w#:_ *`T]|Q*`,}8"n&#:_o&#R}R| 1*`T]|*`>,}0*V+:_O͊}8 !_%7>,}8!#}(,}0*V+էR0 RDMp}*T~(-nfR(8(n& 7͟}*VB"V*XB"X}*V "V*X "XT] *ZRDM%*ZB"Z}B8! *ZŷBDM%*Z "Z*Z*\R"\w"T#w"V#w"X#"Z!5~O~0# @`!`ƀ( ƀ !!!F ~8 !f7 +!6 #!!VB8(~????0w#~0w##B(~????0w8|(f(fc~}/o|/g#||~c~}( #}+ !!`͆~>+|( |/g}/o#>-S> ~>E]!(.~ͳF(/<ƀ_yƀO{0 !`͆  /w!###6F(~'w '!~'8we>w##33PPPPPPO?G??Gyx(  #!8G !%8O337~(~ ͔ ##~(#~337x(R0 `i"t2s!v}&+.-:s(&.>( (&&:sͯ8&$%Ĕ*t}*t}_|(!v͆33:s2r`i"p!d w#>.(,6(N=68&O:dy(*j}'o|'g"j=6(. &=68O:dy N*j}ƙ'o|Ι'g"jO!d~ #!o6-*j}'o|'g"j:d N*j}ƙ'o|Ι'g"jyE(e Z&+.-:r(&.=(( >6(!l62m=68"!o45 O!m#~y j*m))))o"m:o `:l( *m͇"m*m!j~'o~'g!pNF|( >>0͇>}PY!d>:l >*p6#337?:r!d#####~w+~w+~w+~w+~w+~w!d#####Nw>'o>'ga{?˯>؃8*g.=60؃8O i$ >o>337!ZA8 g}87&lD>68 )8#T])8)88хo>8g=x( 337>70:?    !(!^#V#͜{y (0 }0 yO'd { 7BK>),jB0 = 7DM!08x()8?INPUT$LISTLLISTAUTODELETERUNCONTCLOADMCLOADCSAVEMCSAVEVERIFYMVERIFYNEWRENUMFILESLFILESBOOTREMPRINT?LPRINTL?DATADEFINPUTREADSTOPENDLETDIMFORNEXTGOTOGOSUBGOONRETURNERASECURSORIFRESTORESCREENCOLORLINESOUNDBEEPCONSOLECLSOUTPUTCALLPOKEPSETPRESETPAINTBLINEPOSITIONHCOPYSPRITEPATTERNCIRCLEBCIRCLEMAGVPOKEMOTOROPENCLOSECOMSET^*/MOD+-<>><>==><==<><=NOTANDORXORLIMITGETPUTDSKI$DSKO$KILLSETNAMEFNTOSTEPTHENTABSPCAPPENDOUTSAVEMSAVELOADMLOADMERGECOMSAVECOMLOADUTILITYMAXFILEABSRNDSINCOSTANASNACSATNLOGLGTLTWEXPRADDEGPISQRINTSGNASCLENVALPEEKINPFREVPEEKSTICKSTRIGEOFLOCLOFDSKFCHR$HEX$INKEY$LEFT$RIGHT$MID$STR$TIME$](k ^͆]!` !h͆ϔ!!ͨ:OaĔA ~8a ͨ@͵@!,}!F~0xG͔!,Ǒ!!z]!Ǒ!,}!4}!͆!4!<}!͆!4!<Ǒ!Ǒ!<}!͆!4!hǑ!4}!<͆!4ͨ!<}!,͆!͔!<Ǒ!4}!,͆!4ͨ!hǑ!~'wa(!,}!h͆!,ͨ^k!^k!^]{ ϔo!ܘ}!"ܘ!!~_{ w>ww>w:w>wwwww!͆!}!ܘ͆֌֌}!Ǒ!}!ܘ͆!z!ͨ!!}!}p!͆!}!͆bk!Ǒ}!!͆!}!͆!x!Ǒ^!^!^ͫ!Е͔Ǒ^!}:Ö́!h-(݊ϔ7!Е͆aĔ*!͆!hz͔֌!$}!͆!$ͨ ^]ʙ:GOܔxO8!}!h͆!ͨ!}! }!͆}!! ͆!ͨbkǑ!}!!A !Е͔ǑyĔ^!̘}ŋ!Ԙ}!̘͆܋!Ԙͨ^!Еz͔܋^!}>2Ø]͔}>2Ø!͆!ȕ-ٍ!}!-/z!}:Ø2Ø!͆!Е-M!z͔!}!͆!ؕ-s!Е͆!z}8!͆!}!`͆!}!͆!bkǑ!}!y !͆!}!͆:ØĔ^!}!}!~ ~ʨϔè!~2~8 ~ͫ2': ~'ͫ~ >P'ͫ2>ww!͆!!hǑ!}!͆!ͨǑ!!}!##:!#w+:wy!^Oi`}'o|'g}'o|'gy'ox'g|g}:Ö́!}͆̈́!}!͆!ͨ!͔!ǑyĔ^!~ ~ҥ~ !`͆å!~O( yG> 7?G!( ~_6+ ( ~_~w~( {(!Ǒ^͑!%#~ :G:!2 ”!#~^!s>w!%z!z3 !sߓ!zq: !s4!%q!ߓ:!G:2:G:"(*:#'o|'g",*:#G}'o"0:2:G>'2} 2:s(!s8:(*>'o>'g" *>'o>'g"| >2!"!#~(: :2 ͨ͵ "!s#^͑!#~(!%#~ *!4 w# 4!;q !,6# !%~(=o&)))_}o|g4!,q!,!%:G:!2:O:" *:#'o>'g".*:#G}'o"0:2:G>'2 } 2!,#~ ߓ/: *}'o|'g"*}ƙ'o|Ι'g"} 2*| "!,#: :2 ͨ͵^G:O( yx!Ę}z]!Ę͆xG!##~(++~x͔Ǒ͔!͔NĔ!~ 7C5~w5C͑!!!~^~ ͆^: *&" *>o":" *#&"# *#>o"#*#*R0!! O~q#*#*}'O|'Gx Vy0Q(=( !%y'O!%y'O:G:! !%q!%3q:( :23: !># ^*}'o|'g"! >'o&>"2"!#:5!##>?CQQ!ͫ!ͫ~~#~>#bk#6######o+o+o+o+o+o+o bk+6g#g#g#g#g#g#g#g +>'w+>'w+>'w+>'w+>'w+>'w+>'w +'w+'w+'w+'w+'w+'w+'w! "! @! !:2~(#^#V!: w>#6#= !`!~##~!8ˎ!8ˆ @P!5b71b'v`X(Bq$t"P1AY&SYW)WyQ1E2QbSpyc&yxS34esY#XPCBHBiP@ gVy'Us"@$0AffffgPCh%!8T'Us"@i33333ffffg41Eu 3g0YGHT 0BQ@hisuweTb8UG&`7ruUiUUUdU$0q5dVYE#3tHrpp'((FDhp4s` *****************************  ***** YENODRAW ADAPTE *****  ***** SUR LE YENO-SEGA ***** ( ***** PAR M. LE DOUARAIN***** 2 ***************************** 3 1,1: !4:: " AVERTISSEMENT :" !5 " ---------------" 6:: "Pour sauvegarder vos dessins(en rapi-": "de),vous pouvez utilisez SAVEIMA":: "Apres avoir cree votre dessin :": "Faitez BREAK , puis tapez NEW,puis ": "tapez RUN ";(34);"SAVEIMA.Z80";(34) R7: "Il cree un fichier binaire que vous ": "pouvez lire avec le prog. IMAGE.BAT" V8 0,17: "Couleur bord : ";BD:: "EFFACAGE ECRAN VIDEO ( O / N ) ?": BD15 : 56 9 "O" "o" 60 &: "N" "n" 2,2: ,,,BD: 70 ; 57 < 1,1: = 0,0: "COULEUR DU FOND : " >CRAY15: 400 ?F0NDCRAY #B 2,2:: 1,F0ND,(0,0)(255,191),BD F S#0,"E0C0A01000000000" J S#10,"F0F0F0F000000000" K S#15,"10107C1010000000" M S#20,"4428102844000000" N 40500 'O &HFFC0: "ROUTINES.HEX": "VIDEO.HEX" PCO128:LI96:E8:CRAY15 ZC500:TRA0:GAD0:RET0:CL1 d ----- DEPLACEMENT FLECHE ---- i 2,2 nA$ˀ: A$"" 139 #x A$ˀ(13) E1 E8:A$"": 300 # A$ˀ(13) E8 E1:A$"": 300  A$ˀ(12) 10  A$"" 40000  10,(240,0),10,CRAY  (1)7 COCOE  (1)3 COCOE  (1)1 LILIE  (1)5 LILIE  (1)2 COCOE: LILIE  (1)4 COCOE: LILIE  (1)6 COCOE: LILIE  (1)8 COCOE: LILIE RET0 181 O CO0 CO255 LI0 LI190 COCO255:COˀ(CO):LILI190:LIˀ(LI): 190  CO0 COCOE:  CO255 COCOE:  LI0 LILIE:  LI191 LILIE: LI0 0,(CO,255),0,CL: 197  0,(CO,LI1),0,CL  10,,,0  (1)2 500 - TRA 1000,1500,2000,2500,3000,3500,700,800 P GAD0 GAD 3 GAD6 GAD 10000,15000,,,,,30000,35000,42000,42100,42200  110 , ----- MUSIQUE POUR TOUT ---- 6 360:PU1 @ PAU J PU,PAU,10 TPUPU1: PU4 0: ^ 320 h 300,400,500  ----- SOUS - PROGRAMME ! ----  ----- COULEUR ----  1,1  0,3  (12);"0 :Transparent"  (12);"1 :NOIR"  (12);"2 :VERT"  (12);"3 :VERT CLAIR"  (12);"4 :BLEU FONCE"  (12);"5 :BLEU CLAIR"  (12);"6 :ROUGE FONCE"  (12);"7 :CYAN"  (12);"8 :ROUGE"  (12);"9 :ROUGE CLAIR"  (12);"10:JAUNE FONCE"  (12);"11:JAUNE CLAIR"  (12);"12:VERT FONCE"  (12);"13:MAGENTA"  (12);"14:GRIS"  (12);"15:BLANC" PUCRAY 2 10,PU2: " ": 10,PU3: ">": 10,PU4: " "  (1)1 (1)2 CRAYPU:  (1)1 PU0 PUPU1  (1)5 PU15 PUPU1  460  ----- CHOIX --=> OPTIONS ----  1,1:  12,5: "OPTIONS :"  (12);"---------" ::::: & (12); "1 : OUTILS 0: (12);"2 : GADJETS :: (12);"3 : COULEUR " ?: (12);"4 : LOAD / SAVE" B DPU1 5N 10,PU10: " ": 10,PU14: " ": 10,PU12: ">" X (1)1 (1)2 640 b (1)1 PU2 PUPU2 l (1)5 PU7 PUPU2 v 590  GOTO ???  PU1 5000  PU3 6000  PU7 50000  PU5 1,1:: 400: 100  *****************************  *** DETAIL COULEUR FOND ***  *****************************  (1)0  ,CRAY,(CO,LI)(CO,LI)    ***************************** ! *** CARRE COULEUR FOND *** " ***************************** # (1)0 % ,CRAY,(CO,LI)(CO7,LI7) &  ****************************  ***** PSET *****  ****************************  (1)0 + (1)1 CRAY0 0,,,0: (CO,LI),CRAY + (1)1 CRAY0 0,,,0: (CO,LI),CRAY  GAD0 $ GAD3 (255CO,LI),CRAY: . GAD4 (CO,191LI),CRAY: "8 GAD5 (255CO,191LI),CRAY: H &HC000: 1,1: / 0,5: "*************************************" ) "* *" ) "* SAUVEGARDE D'UNE IMAGE VIDEO *" ) "* EN Z80 *" ) "* *" ) "*************************************"  "VIDEO.HEX" 7 310 < A&HC000 &HC036 F D$:Dˀ("&H"D$) P A,D Z A _ 2,2 d &HC000 $n 0,12: "Nom de sauvegarde : ";NOM$ x NOM$".IMA",&HC100,&HF102 &HFFFF: , *** MACHINE DATA *** R6 F3,21,00,00,CD,E0,FF,01,00,18,21,00,C1,09,22,14,C0,DB,BE,32,00,00,0B,78,B1,20,EF U@ 21,00,20,CD,E0,FF,01,00,18,21,01,D9,09,22,2E,C0,DB,BE,32,00,00,0B,78,B1,20,EF,FB,C9 DC9CD NROBOT,#5000 8 241 658 8 241 659 4 241 660 2 241 661 2 241 662 1 241 663 129 241 852 7 241 853 7 241 854 7 241 855 7 241 858 1 241 859 1 241 860 193 241 861 193 241 862 255 2 &HC000  *** IMAGE EN Z80 ***  *** A CHARGER *** (: 1,13 )2 "+-----------------------------------+" )< "!+---------------------------------+!" )F "!! !!" )P "!! IMAGE EN ASSEMBLEUR !!" )Z "!! (Z80) !!" )d "!! !!" )n "!! A CHARGER !!" )x "!! !!" ) "!! !!" ) "!+---------------------------------+!" ) "+-----------------------------------+" "VIDEO.HEX"  "LECTIMA.HEX" # T0 15: G1 15: G: G,T: 1 B: 0,13: " Inserez la disquette et appuyez sur une touche ..." "" 195  : "FICHIERS : ": (19);  &H20AB T "NOM DU FICHIER(.IMA):";NOM$ *^ (NOM$)8 : "Nom trop long !": 340 h NOM$".IMA" r 2,1:: 1,1,(0,0)(255,191),1 | 2,2: &HC000  "" 390 }ӿ|ӿ}ӿ|?@ӿӾH#E:e3e(e eGeJedrc_döbcôdÚdÉdtdÊ`Ìa` `I`[C[i[ZZ[ZïWWÒWSÝST-T]TTñUS 1153 64 241 1154 64 241 1155 64 241 1156 64 241 1157 64 241 1158 64 241 1159 64 241 1176 63 241 1177 63 241 1178 63 241 1179 63 241 1180 63 241 1181 63 241 1182 63 241 1183 32 241 1184 248 241 1185 248 241 1186 248 241 1187 248 241 1188 248 241 1189 248 241 1190 248 241 1191 248 241 1360 7 241 1368 193 241 1369 1 241 1370 1 241 1371 1 241 1380 128 241 1381 128 241 1382 128 241 1383 64 241 1392 1 241 1393 1 241 1394 1 241 1395 1 241 1396 1 241 1397 1 241 1398 3 241 1399 12 241 1400 8 241 1405 255 241 1406 1286!! ":Ӿ x ! ! ",:Ӿ x 241 1437 128 241 1438 128 241 1440 248 241 1632 64 241 1633 32 241 1634 32 241 1635 16 241 1636 8 241 1637 8 241 1638 4 241 1639 2 241 1648 16 241 1649 32 241 1650 32 241 1651 32 241 1652 16 241 1653 12 241 1654 3 241 1662 128 241 1663 127 241 1664 4 241 1665 2 241 1666 2 241 1667 2 241 1668 4 241 1669 24 241 1670 224 241 1680 1 241 1681 1 241 1682 2 241 1683 4 241 1684 4 241 1685 8 241 1686 16 241 1687 32 241 1888 1 241 1897 128 241 1898 64 241 1899 32 241 1900 24 241 1901 4 241 1902 3 241 1910 128 241 !۾Ӿ# xɶ}ӿ|ӿ}ӿ|?@ӿӾH#E:e3e(e eGeJedrc_döbcôdÚdÉdtdÊ`Ìa` `I`[C[i[ZZ[Zï11pppp11pp11pp11pp11pp11pp11pp11pp11pp11pp11pppp11pp11pp11pp11pp11pp11pp11pp11pp11ppUUUUpUUUUUUUUpUUUUpppp@ lllppB GAD6 (255CO,LI),CRAY: (CO,LI191),CRAY: (255CO,191LI),CRAY: L  ****************************  ***** LINE *****  **************************** ZTˀ(1)  ZT0 ZT2  ZT1 C500 1545 9 ZT1 CO3 CCO:LLI: L30 1,(C3,L3),15,CL:  1,(C3,256L3),15,CL: 8  (1)1 CO3 LI3 LI0 2,(CO3,LI3),15,CL   CRAY0 (C,L)(CO,LI),CRAY   CRAY0 (C,L)(CO,LI),CRAY   1,,,0: 2,,,0  GAD0 C500: . GAD3 (255C,L)(255CO,LI),CRAY:C500: ." GAD4 (C,191L)(CO,191LI),CRAY:C500: 6, GAD5 (255C,191L)(255CO,191LI),CRAY:C500: o6 GAD6 (255C,L)(255CO,LI),CRAY: (C,191L)(CO,191LI),CRAY:(255C,191L)(255CO,191LI),CRAY:C500: @C500:  ****************************  ***** BOITE *****  ****************************  (1)0  (1)1 C500 2045 7 (1)1 CO3 LI3 CCO:LLI: 1,(C3,L3),15,CL  / (1)1 CO3 LI3 2,(CO3,LI3),15,CL ! CRAY0 (C,L)(CO,LI),CRAY,B ! CRAY0 (C,L)(CO,LI),CRAY,B  1,,,0: 2,,,0  GAD0 C500: 0  GAD3 (255C,L)(255CO,LI),CRAY,B:C500: 0 GAD4 (C,191L)(CO,191LI),CRAY,B:C500: 8  GAD5 (255C,191L)(255CO,191LI),CRAY,B:C500: u* GAD6 (255C,L)(255CO,LI),CRAY,B: (C,191L)(CO,191LI),CRAY,B:(255C,191L)(255CO,191LI),CRAY,B:C500: 4C500:  ****************************  ***** CERCLE *****  **************************** (1)0  (1)1 C500 2543 7 (1)1 CO3 LI3 CCO:LLI: 1,(C3,L3),20,CL  / (1)1 CO3 LI3 2,(CO3,LI3),15,CL  COC RAYLIL: 2547  LIL RAYCOC: 2547  ::C500: 1,,,0: 2,,,0: % CRAY0 (C,L),(RAY),CRAY,1,0,1 " CRAY0 (C,L),(RAY),5,1,0,1  1,,,0: 2,,,0  GAD0 C500: 0 GAD3 (255C,L),(RAY),CRAY,1,0,1:C500: 0 GAD4 (C,191L),(RAY),CRAY,1,0,1:C500: 4 GAD5 (255C,191L),(RAY),CRAY,1,0,1:C500: o GAD6 (255C,L),(RAY),CRAY,1,0,1:(C,191L),(RAY),CRAY,1,0,1:(255C,191L),(RAY),CRAY,1,0,1:C500:  ****************************  ***** ELLIPSE *****  **************************** (1)0  (1)1 C500 3043 7 (1)1 CO3 LI3 CCO:LLI: 1,(C3,L3),20,CL  / (1)1 CO3 LI3 2,(CO3,LI3),15,CL % COC RAY(LIL):RP2:NBR2: 3047 ' LIL RAY(COC):RP0.5:NBR1: 3047  ::C500: 1,,,0: 2,,,0: * CRAY0 (C,L),(RAYNBR),CRAY,RP,0,1 ' CRAY0 (C,L),(RAYNBR),5,RP,0,1  1,,,0: 2,,,0  GAD0 C500: 5 GAD3 (255C,L),(RAYNBR),CRAY,RP,0,1:C500: 5 GAD4 (C,191L),(RAYNBR),CRAY,RP,0,1:C500: 9 GAD5 (255C,191L),(RAYNBR),CRAY,RP,0,1:C500: ~ GAD6 (255C,L),(RAYNBR),CRAY,RP,0,1:(C,191L),(RAYNBR),CRAY,RP,0,1:(255C,191L),(RAYNBR),CRAY,RP,0,1:C500:  ****************************  ***** PAINT *****  **************************** (1)0  (1)1 (CO,LI),CRAY   ****************************  ***** CHOIX DE TRAC *****  ****************************  1,1:  12,5: "CHOIX DE TRACE":::  (12);"1 : POINT"  (12);"2 : LIGNE"  (12);"3 : RECTANGLE"  (12);"4 : CERCLE"  (12);"5 : ELLIPSE"  (12);"6 : REMPLIR" ! (12);"7 : DETAIL COULEUR FOND"  (12);"8 : BLOC COULEUR FOND"  PUTRA 2 10,PU7: " ": 10,PU8: "->": 10,PU9: " "   (1)1 (1)2 5170  (1)1 PU1 PUPU1  (1)5 PU8 PUPU1 ( 5120 2TRAPU 7 GAD3 GAD6 GAD0 < 100 p **************************** z ***** CHOIX DE GADJET *****  ****************************  1,1:  12,5: "CHOIX DE GADJET":::  (12);"1 : "  (12);"2 : CARACTERES"  (12);"3 : MIROIR "  (12);"4 : MIROIR "  (12);"5 : MIROIR /"  (12);"6 : MIROIR /"  (12);"7 : PRESENTATION"  (12);"8 : IMPRESSION" # (12);"9 : FLECHE Ss/Avec LIMITE"  (12);"10: COULEUR FLECHE"  (12);"11: INVERSION VIDEO" :PUGAD 2 10,PU7: " ": 10,PU8: "->": 10,PU9: " "  (1)1 (1)2 6170  (1)1 PU1 PUPU1  (1)5 PU11 PUPU1  6120 GADPU $ 100 ' ******* ZOOM ****** ': +++ NON TERMINE +++ : ******* CARACTERES ****** : 1,1: $: 12,5: "CHOIX DE CARACTERES"::: : (12);"1 : CARACTERES No1 " : (12);"2 : CARACTERES No2 " : (12);"3 : CARACTERES No3 " ;PU1 2; 10,PU7: " ": 10,PU8: "->": 10,PU9: " " ; (1)1 (1)2 15200 $; (1)1 PU1 PUPU1 .; (1)5 PU3 PUPU1 8; 15120 `; --- CARATERES ??? --- j; PU 40500,41000,41500 t;GAD0: 2,2: (a 3,15: "Impression (M)ince ou (L)arge" a 6,17: ": > ";Q$ b Q$"M" Q$"L" 25080  b Q$"M" 2,2: 2,0:GAD0: 0u ******* PRESENTATION ****** :u 2,2 Du 0,,,0: 1,,,0 Iu 30100 Nu PU1 2: PAU1 15 Xu 2,2: ,0,(0,0)(255,191),PAU lu PT vu 1,PT,15: 2,PT2,11: 3,PT3,9 u PAU,PU u 0 u 2,2: 1,1,(0,0)(255,191),1 uGAD0: 0: u 370,370,392 u 440,440,392 u 370,330,294 u 294,330,374 u 370,330,330 u 370,370,392 u 440,440,392 u 370,330,370 u 294,330,370 u 330,294,294  ******* IMPRESSION ******* ˆ 1,1: ̈ 10,5: "IMPRESSION:" ֈ 10,6: "-----------"  ,,,,2 ) 3,15: "Impression (F)ine ou (L)arge ?"  6,17: ": > ";Q$  Q$"F" Q$"L" 35090 [& Q$"F" 2,2:: 2,0::::: " By YENO-SEGA SC 3000":GAD0: [0 Q$"L" 2,2:: 2,3::::: " By YENO-SEGA SC 3000":GAD0: : 35130 @ ******* ? CHR$ (?) ******* C CRAY D CO2558 LI1918 :: E CRAY G (CO,LI)(CO7,LI7),,BF J A$"1" CO,LI: (200) T A$"2" CO,LI: (201) ^ A$"3" CO,LI: (202) h A$"4" CO,LI: (203) r A$"5" CO,LI: (204) | A$"6" CO,LI: (205)  A$"7" CO,LI: (206)  A$"8" CO,LI: (207)  A$"9" CO,LI: (208)  A$"0" CO,LI: (209) Н 4 -No1-- PATTERN C#200+ ----- >C#200,"FFFFFFFFFFFFFFFF" HC#201,"AA55AA55AA55AA55" RC#202,"CC33CC33CC33CC33" \C#203,"CCCC3333CCCC3333" fC#207,"BFBFBF00FDFDFD00" pC#208,"FF808080FF101010" zC#204,"AAFFAAFFAAFFAAFF" C#205,"CCCCFFFFCCCCFFFF" C#206,"8888FF8888FF8888" C#209,"0000000000000000"  ( -No2-- PATTERN C#200+ ----- 2C#200,"F0F0F0F00F0F0F0F" <C#201,"0F0F0F0FF0F0F0F0" FC#202,"C8BC8380C03C0B08" PC#203,"010101010139827C" ZC#204,"080402018D51433C" dC#205,"10204080B18AC23C" nC#206,"059101610941FE01" xC#207,"81427E3C18180800" C#208,"106C8282826C1000" C#209,"0000000000000000"   -No3-- PATTERN C#200+ ----- &C#200,"9249249249249249" 0C#201,"C1A2948894A2C1FF" :C#202,"06C0310E00C0310E" DC#203,"708C0300708C0300" NC#204,"8484841050544404" XC#205,"001F600000708C00" bC#206,"F708080CEE111008" lC#207,"1E01017EFF24C7F8" vC#208,"103FC1010301FF10" C#209,"0000000000000000"   *** FLECHE SANS LIMITE ***  *** D'ECRAN *** $ RET0 RET1: . RET1 RET0: t *** COULEUR - FLECHE *** ~CRAY(2)CRAY 1,1:: 400 CLCRAY CRAYCRAY(2) GAD0: 2,2: ؤ *** INVERSION-VIDEO ***  &HFFC0 GAD0: P ******* LOAD / SAVE ******* Z 1,1: d 12,14: "1 : CHARGER" n 12,16: "2 : ENREGISTRER " xPU1 5 10,PU11: " ": 10,PU15: " ": 10,PU13: ">"  (1)1 (2)2 50090  (1)1 PU2 PUPU2  (1)5 PU3 PUPU2  "" 100  50050  PU1 50100  PU3 51000  ----- CHARGEMENT ---- 1,1::PAU0 & 6,8: "CATALOGUE DE LA DISQUETTE : " Q 4,12: "INSEREZ LA DISQUETTE DES CHEFS D'OEUVRE PUIS APPUYEZ SUR ESPACE"  "" 50127 W 4,12: " ": 300  PT1 2: PAU0 240 16  "" PAU,PT: 50200  20,PT;NM$,PAU,16 0 (NM$,10,3)"DAT" " ";(NM$,8)  PAU,PT  +++ CHARGEMENT %":: "NOM DU DESSIN A CHARGER : ";J$ , (J$)8 50210 6J$J$".DAT": 2,2: 0,,,0: @ J$ AS #1 J (#1) 50290 T #1,X,A1,A2 ^ X,A1: X&H2000, A2 h 50250 r: 300: 100 8 ----- SAUVEGARDE ---- B 1,1: LL 0,10: " Sous quel nom voulez-vous le sauvegarder : ";J$ V (J$)8 51020 `J$J$".DAT": 2,2: 0,,,0 j J$ AS #1 t X&H0000 &H17FF ~ (X)&H00 51110 A1ˀ(X) A2ˀ(X&H2000) #1,X,A1,A2  X : 300: 100 CR^ QQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQAAAAAAAAAAAAAAAAAAAAQQQQQQQQQQQQQQQQQQQQQQQQQQQQQAAAAAAAAAAAAAAAAAAAQQQQQQQQQQQQQQQQQQQQQQQQQQQQ$ 1,1:: 0,10: " Impression ?" A$ˀ: A$"" 410  A$"O" A$"o" 450 & A$"N" A$"n" A$" " :: 190 : 410  0,14 # "Impression (F)ine ou (L)arge ? " A$ˀ: A$"F" A$"L" 490  470 ( X0 20:: 0,17: " Pret ?"  "" 500  ,,,,2 a A$"F" 2,2:: 2,0::::: " By YENO-SEGA SC 3000": 1,1:: 190 a A$"L" 2,2:: 2,3::::: " By YENO-SEGA SC 3000": 1,1:: 190 NRAMBOARTANX!,2 a A$"F" 2,2:: 2,0::::: " By YENO-SEGA SC 3000": 1,1:: 161 a A$"L" 2,2:: 2,3::::: " By YENO-SEGA SC 3000": 1,1,1:: 161 TGNCOTTAGEEAN!11pp11p11p11p11p11p11p11p11p11p11pppp11pp11pp11pp11pp11pp11pp11pp11pp11pp11pppp11pp11pp11pp11pp11pp11pp11pp11pp11ppUUUUpUUUUUUUUpUUUUpppp@ lllppp>88<<><? #< #zr'8>~~@HH@@@PPPPPPPPP  p~~~ 00x00x   ~~~ @@@ PPP   ~"D @ !@D" !!!    !!!    ?@ lll @@@@@@@@@@@@@?? @ ʴ@P(!!!    !!!    ! @ `!!!    !!!      BB> !!!    !!!    !!!           !!!!!!     !!!!!!!!!     !!!!!!           !!!           !!!       !!!      !!!  ?W'WP P__PPPPPPPPPPPP   @@3aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQ 4280 255 177 4281 255 177 4282 255 177 4283 255 177 4284 255 177 4285 255 177 4286 255 177 4287 255 177 4288 255 177 4289 255 177 4290 255 177 4291 255 177 4292 255 177 4293 255 177 4294 255 177 4295 255 177 4296 255 177 4297 255 177 4298 255 177 4299 255 177 4300 255 177 4301 255 177 4302 255 177 4303 255 177 4304 255 177 4305 255 177 4306 255 177 4307 255 177 4308 255 177 4309 255 177 4310 255 177 4311 255 177 4319 128 177 4400 128 113 4401 64 113 4402 32 113 4403 16 113 4404 8 113 4405 4 113 4406 2 113 4407 1 113 (xxxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxxxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxxxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyxyTTTUUUTTTUUUTTTTUUUUTTTTUUUUTTTTU??TUUUUTTTTUUUU????TTTTUUUUTTTTUUUUffffff??TTTTUUUUTTTTffffffffffffffffffffffffUUUUffffffffffffffffffffffff?ffffffffffffYENODRAW.UTI*SAVEIMA .Z80.IMAGE .BAT/VIDEO .HEX0LECTIMA .HEX1ROUTINES.HEX2CHANTIER.IMA?VOITURE .IMAMROBOT .IMA^GLOUTON .IMAoMARC .IMA|PHARE .IMA>+,-3=456789:;A@ @@  ||BBBBBB>AA>!!!aa!P00P@@OP``PO |BBA>!!@@  @@@  ! B! ! B? ! BB?? ! !> ?BB?? ! @@@@@AB ! ! A> BB !  B! ! BB @@@@@@0` @    @@@@@`@@@@@ @`@@@@@@@@AA@|@@  @| @@ @@@  @ @0<p3!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!QQQQQQQQQQQQQQQQQQQ ???    @@@@@@ @@@@@@ ??? PPPUUU   ???``PPPPUUUU   ?O+ |0@@ x@ PU ?,/(I0 ``?? @@ 0 >@@@p29 2 113 730 1 113 731 1 113 732 1 113 733 1 113 734 1 113 735 1 113 784 1 113 785 1 113 786 1 113 787 1 113 788 1 113 797 128 113 798 128 113 799 128 113 800 1 113 801 1 113 802 1 113 803 1 113 804 1 113 805 1 113 806 1 113 807 1 113 816 1 113 817 1 113 818 1 113 819 1 113 820 1 113 821 1 113 822 1 113 823 1 113 832 1 113 833 1 113 834 1 113 835 1 113 836 2 113 837 2 113 838 2 113 839 2 113 887 1 113 888 3 113 889 7 113 890 15 113 891 31 113 892 63 113 893 127 113 894 255 113 895 >|?<>~?px|>?p8p8?`` @ a  @ 0@`  ` @?? ` `0 `????? `  ?`` `@@@0`0 0 0 @@@ |88`0 0  9ap 0 0 ?~ @A1 0 @ ????? @@ B G@ ??~~||| @AB @G @ 8p8p>>???~ @>>>~|||@@@@??? @ 8?7qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq666 254 129 2667 255 129 2668 254 129 2669 255 129 2670 254 129 2671 255 129 2672 170 129 2673 85 129 2674 170 129 2675 85 129 2676 170 129 2677 85 129 2678 170 129 2679 85 129 2680 102 129 2681 153 129 2682 102 129 2683 153 129 2684 102 129 2685 153 129 2686 102 129 2687 153 129 2688 102 129 2689 153 129 2690 102 129 2691 153 129 2692 102 129 2693 153 129 2694 102 129 2695 153 129 2696 171 129 2697 85 129 2698 171 129 2699 85 129 2700 171 129 2701 85 129 2702 171 129 2703 85 129 2704 255 129 2705 254 129 2706 254 129 0  0  @  @@@  @@@@ ? @@ @@ ? @@ @0`>q?@0`????UUUUUUUUUUUU?? ;ggggUUUUUUUUUUgggg{?ggggUUUUffffffffUUUUgggg?ffffUUUUfgfgffffUTUTgggg?ffffUUUUfgfgffffUTUTgggg?ggggUUUUffffffffUUUUggggggggUUUUUUUUggggw?UUUUUUUUUUUUUU?7 UUUU?0  ?O10  @  @@?@  @@`?`A!  @ @@  @@ @0`@0`7qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq 255 129 3934 255 129 3935 255 129 3936 255 129 3937 255 129 3938 255 129 3939 255 129 3940 255 129 3941 255 129 3942 255 129 3943 255 129 3944 254 129 3945 255 129 3946 254 129 3947 255 129 3948 254 129 3949 255 129 3950 254 129 3951 255 129 3952 170 129 3953 85 129 3954 170 129 3955 85 129 3956 170 129 3957 85 129 3958 170 129 3959 255 129 3960 170 129 3961 85 129 3962 170 129 3963 85 129 3964 170 129 3965 85 129 3966 170 129 3967 255 129 3968 170 129 3969 85 129 3970 170 129 3971 85 129 3972 170 129 3973 85 129 397+񱱱񱱱񱱱񱱱񱱱񱱱񱱱񱱱񱱱ѱ񱱱AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQQQQQQQQQQQQQQᱱᱱᱱQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQAAAAAAAAAAAAAAAAAAAAQQQQQQQQQQQQQQQQQQQQQQQQQQQQQAAAAAAAAAAAAAAAAAAAQQQQQQQQQQQQQQQQQQQQQQQQQQQQAAAQQQQQQQQQQQQ񱱱񱱱񱱱AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAQQQQQQQQQQQQQQᱱᱱᱱQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQAAAAAAAAAAAAAAAAAAAAQQQQQQQQQQQQQQQQQQQQQQQQQQQQQAAAAAAAAAAAAAAAAAAAQQQQQQQQQQQQQQQQQQQQQQQQQQQQTION ****** :u 2,2 Du 0,,,0: 1,,,0 Iu 30100 Nu PU1 2: PAU1 15 Xu 2,2: ,0,(0,0)(255,191),PAU lu PT vu 1,PT,15: 2,PT2,11: 3,PT3,9 u PAU,PU u 0 u 2,2: 1,1,(0,0)(255,191),1 uGAD0: 0: u 370,370,392 u 440,440,392 u 370,330,294 u 294,330,374 u 370,330,330 u 370,370,392 u 440,440,392 u 370,330,370 u 294,330,370 u 330,294,294  ******* IMPRESSION ******* ˆ 1,1: ̈ 10,5: "IMPRESSION:" ֈ 10,6: "-----------"  ,,,,2 ) 3,15: "Impression (F)ine ou (L)arge ?"  6,17: ": > ";Q$  Q$"F" Q$"L" 35090 [& Q$"F" 2,2:: 2,0::::: " By YENO-SEGA SC 3000":GAD0: [0 Q$"L" 2,2:: 2,3::::: " By YENO-SEGA SC 3000":GAD0: : 35130 @ ******* ? CHR$ (?) ******* C CRAY D CO2558 LI1918 :: E CRAY G (CO,LI)(CO7,LI7),,BF J A$"1" CO,LI: (200) T A$"2" CO,LI: (201) ^ A$"3" CO,LI: (202) h A$"4" CO,LI: (203) r A$"5" CO,LI: (204) | A$"6" CO,LI: (205)  A$"7" CO,LI: (206)  A$"8" CO,LI: (207)  A$"9" CO,LI: (208)  A$"0" CO,LI: (209) Н 4 -No1-- PATTERN C#200+ ----- >C#200,"FFFFFFFFFFFFFFFF" HC#201,"AA55AA55AA55AA55" RC#202,"CC33CC33CC33CC33" \C#203,"CCCC3333CCCC3333" fC#207,"BFBFBF00FDFDFD00" pC#208,"FF808080FF101010" zC#204,"AAFFAAFFAAFFAAFF" C#205,"CCCCFFFFCCCCFFFF" C#206,"8888FF8888FF8888" C#209,"0000000000000000"  ( -No2-- PATTERN C#200+ ----- 2C#200,"F0F0F0F00F0F0F0F" <C#201,"0F0F0F0FF0F0F0F0" FC#202,"C8BC8380C03C0B08" PC#203,"010101010139827C" ZC#204,"080402018D51433C" dC#205,"10204080B18AC23C" nC#206,"059101610941FE01" xC#207,"81427E3C18180800" C#208,"106C8282826C1000" C#209,"0000000000000000"   -No3AAAQQQQQQQQQQQQF0,FF  01,00,18  21,01,D9 & 09 0 22,30,C0 : 3A,00,00 D CD,FD,FF N 0B X 78 b B1 l 20,EE v FB  C9 2PDFBFD%%)wY1ˀ("&h"Ā(Y$,2)):Y2ˀ("&h"Ā(Y$,2)) x &HBF,Y2: &HBF,Y1 -yA$ˀ((&HBE)):A1ˀ("&h"A$): A10 52500 z X,&H3E:XX&H1  X,Y2:XX&H1  X,&HD3:XX&H1  X,&HBF:XX&H1  X,&H3E:XX&H1  X,Y1:XX&H1  X,&HD3:XX&H1  X,&HBF:XX&H1  X,&H3E:XX&H1  X,A1:XX&H1  X,&HD3:XX&H1  X,&HBE:XX&H1 ? X&HFF00 Y&H17FF X,&HC9:XX&H1: J$".HEX",&HD000,X: YY&H1: 52070 J ESSAI.HEXSSAI.EXYaC-- PATTERN C#200+ ----- &C#200,"9249249249249249" 0C#201,"C1A2948894A2C1FF" :C#202,"06C0310E00C0310E" DC#203,"708C0300708C0300" NC#204,"8484841050544404" XC#205,"001F600000708C00" bC#206,"F708080CEE111008" lC#207,"1E01017EFF24C7F8" vC#208,"103FC1010301FF10" C#209,"0000000000000000"   *** FLECHE SANS LIMITE ***  *** D'ECRAN *** $ RET0 RET1: . RET1 RET0: t *** COULEUR - FLECHE *** ~CRAY(2)CRAY 1,1:: 400 CLCRAY CRAYCRAY(2) GAD0: 2,2: P ******* LOAD / SAVE ******* Z 1,1: d 12,14: "1 : CHARGER" n 12,16: "2 : ENREGISTRER " xPU1 5 10,PU11: " ": 10,PU15: " ": 10,PU13: ">"  (1)1 (2)2 50090  (1)1 PU2 PUPU2  (1)5 PU3 PUPU2  "" 100  50050  PU1 50100  PU3 51000  ----- CHARGEMENT ---- 1,1::PAU0 & 6,8: "CATALOGUE DE LA DISQUETTE " PUZZLE "  6,21: "FICHIER"  6,20: "NOM DU : ";NOM$ 7 (NOM$)8 14,20: " ": 185 NOM$".IMA"  2,1:: 1,1,(0,0)(255,191),1  2,2: &HC000  "" 420 $ 1,1:: 0,10: " Impression ?" A$ˀ: A$"" 440  A$"O" A$"o" 500  A$"N" A$"n" : 161 : 440  0,14 # "Impression (F)ine ou (L)arge ? " A$ˀ: A$"F" A$"L" 527   520 ( X0 20:: 0,17: " Pret ?"  "" 528  ,,,,2 a A$"F" 2,2:: 2,0::::: " By YENO-SEGA SC 3000": 1,1:: 161 a A$"L" 2,2:: 2,3::::: " By YENO-SEGA SC 3000": 1,1:: 161 TGNTEMPLEALX! : " Q 4,12: "INSEREZ LA DISQUETTE DES CHEFS D'OEUVRE PUIS APPUYEZ SUR ESPACE"  "" 50127 W 4,12: " ": 300  PT1 2: PAU0 240 16  "" PAU,PT: 50200  20,PT;NM$,PAU,16 0 (NM$,10,3)"DAT" " ";(NM$,8)  PAU,PT  +++ CHARGEMENT %":: "NOM DU DESSIN A CHARGER : ";J$ , (J$)8 50210 6J$J$".DAT": 2,2: 0,,,0: @ J$ AS #1 J (#1) 50290 T #1,X,A1,A2 ^ X,A1: X&H2000, A2 h 50250 r: 300: 100 8 ----- SAUVEGARDE ---- B 1,1: LL 0,10: " Sous quel nom voulez-vous le sauvegarder : ";J$ V (J$)8 51020 `J$J$".DAT": 2,2: 0,,,0 j J$ AS #1 t X&H0000 &H17FF ~ (X)&H00 51110 A1ˀ(X) A2ˀ(X&H2000) #1,X,A1,A2  X : 300: 100 CRPU@F0COLI0ECPTR @ @)R)R)R)R)R)R)R)R)R)R)R)R?2) ??RdIdIRdI @E @  @ @ @)R)R)R)R)R)R)R)R)R)R)R)R)R)R)R)R)R)R$22) ??RdIdIRdI&  @ @ @)R)R)R)R)R)R)R)R)R)R)R)R)R)R)R)R)R)R$22) ??RdIdIRdI @ @ @)R)R)R)R)R)R)R)R)R)R)R)R)R)R)R)R)R)R$22) ??RdIdIRdI @)R)R)R)R)R)R$2@@ @@RdIa~aaA I$II$II$II$I%I%%J%%J%`A? $II$I$II$I$II$I$II$I@@ ? ?I%I%I%J%J%J%J%J%J%8 A@@D#D@ @ ?$II$I$II$I$II$I$II$II%I%I%J%J%J%J%J%J%0QQCDCDD#@ @ $II$I$II$I$II$I$II$II%I%I%J%J%J%J%J%J%`@?$II$I$II$I$II$I$II$II%I%I%J%J%J%J%J%J%@  @$II$I$II$I$II$I$II$II%I%I%J%J%J%J%J%J%@ ?  $II$I$II$I$II$I$II$II%I%I%J%J%J%ʐeJPe @? @@@@@$II$I$II$I$II$I$II$II%I%I%J%J%J%*0%*`@ @@$II$I$II$I$II$I$II$II%I%I%J%J%J%  @  @ ?$I$I$I$II%IJ%J@ @ 10 16 225 3311 16 225 3376 1 241 3377 3 241 3378 3 241 3379 7 241 3380 15 241 3381 15 241 3382 31 241 3383 31 241 3384 252 241 3385 254 241 3386 255 241 3387 255 241 3388 255 241 3389 255 241 3390 255 241 3391 255 241 3395 128 241 3396 128 241 3397 192 241 3398 224 241 3399 240 241 3528 8 225 3529 8 225 3530 8 225 3531 8 225 3532 8 225 3533 8 225 3534 8 225 3535 16 225 3536 1 225 3537 1 225 3538 1 225 3544 4 225 3545 4 225 3546 4 225 3547 216 225 3548 32 225 3560 16 225 3561 16 225 3562 16 225 3563 16 225 3564 16 225 3565 16 225 3566 8 225 3567 8 225 3629 1 241 3630 3 241 3631 3 241 3632 63 241 3633 127 241 3634 127 241 3635 255 241 3636 255 241 3637 255 241 3638 255 241 36