GBMiniDemo_(PRG formatted GEOS file V1.0 !AA!GBMiniDemoV1.0Dennis Ellisbasic 9 > 9 6  9 5  |geoBasic 8Copyright (c) 1988, Berkeley Softworks`   ( 9cT!#bfIU()*L(ƉńϐՔ RETURN 650ESP: $(1)="": $(2)="S    ": $(3)=" .":GOSUB I: GOTO M  660BE: $(1)="T     ": $(2)="       ": $(3)="    .": GOSUB I:GOTO M  670PI: $(2)=CHR$(26)+ "B    "+CHR$(27): $(3)=" D  E ": $(1)="":GOTO I 680I: $(1)=CHR$(24)+ $(1)+$: $(2)=CHR$(24)+ $(2)+$: $(3)=CHR$(24)+ $(3)+$: DIALOG" ":RETURN R. )iiLLH,;;9>9>GC3JC,=r,LG62CTGBMiniDemo&'  )) )*+ ,- GBD-33'fi H,0048;?CGk/00)7:;?CG0AAAI O \ׇ؇ه @  `O88C(}T(}e(}v(}(}(}(}(} 8 9 8 L< 8 ? `,  <   $  Lf  i  ` Hh`Hh `T S HH H H ` hh hhu؅% !M {$ 9 8 ` hHHH~hhh(`8 H HH < hh h LV… H qe , h`   HH8 i: i0 L[ Error I: 7 5 6 L©@{L~` LN    (LNLE LE <  ; Lw© < { ; H thL©,,, , ,H hL ,,, , ,,,,,,,!,$,',*,-,0Hx hioil LO LO LO LO LO LO LOLG"hhH5 hhhHH``e) (8eȐ`V U Lp` !L| !$L|   ! |  L,­ժ) ``0Eg؄uc̄GWOC7u3, ,o , , , ,,NDŽ: 1: x      X`HHH hՠ' r hh: LHH Lo Lo LoLLOLO LuH h u,L + $A ` G F OHHLO: LN LE   N  LE   N  LB&LE   N  LE   HHHʍ9)L/)   N  L!E O OLO4 `4 4 /LK    G F ] OHHLO ~LK ] x ©-XLt)A[8`L 0$LH`L 0x  0  ݭ ݩЩȍЩЩЭ!Щ؅ { * 'Ѝ(Э)X `x  ݭ )ݩ;Щ9ЩȍЩ 0 (X` ? K/ )/@..L7LOLNLEL{***` & &e & & &`J 0 J `x   2(qBI y( yL( y,H  L$E  LH  X`Hx  h  y(Bq y  X` uoo8 u`,   o( +/ L    `Pi`P e e` ~q1(`ĐŏHH ~hhĐ ŏL!`Q R ! ş ( !ſ 󢉠 ŋLf ! ȱ ȱ eȱ e(Ҋ0ȱ ie !! ( 05ȱ 0ȱ *ȱ ȱ Ő䏰  e !!`)I 8 ~ȥȥLNHI8eČŋ h`0 ~hL!,D 0ZHHeȱeD $,O eO P eP  hh`iШutsrqpq) *,q q`tsrqp`)`pv`vp`IqIquIu LRvqvrvsvtvu`tustrsqrqiѨ`q0pppu&t&s&r&q$q0 p"L8ppӰLputsr qq pu`p fqfrfsftfu`LHue{uteztseysrexrqewqLppLvʢ8p pIi LI8uuutttsssrrrqqq LILvep0ipE Lpv` LJ H wu||f|f}f~ffhJ`p.vp& |Hq :h|q ` pip pL  HLp~vv L8pp pwqxr yszt* 24(z&y&x&w0⨥ztzysyxrxwqwL@ u(Lp8LH HLp8頦 H h qrst`pɑL, Vts`pɐ  L,LVq*rstup Lqrstup LޢH h LH e heL`H hL)88 ` `p$0ɢ- 0HI7ɡ3+/.f$P%p8)E ff$Pp($ f)$0 !Щ j*I /` HvL vp{uztIL` F-ȑȩ0pLL^ H dT Y    J Vi 0 i8.ȑ0ȑtyftsyesrydrqycq00ڊIi i/ȄȪ).ȑI)$<Ш0.ȩ+28-ȑE/8 i:Hȩh`ȩ`nk'>nk(  p j`p`pɠ Vut󩠅p  `F` L  HplvL S SH  +H E   E d AhJ`LHpI`8;)< H duiP R pɈ i8Hu  hLLq4X>Vt~w/z*|cYX ~u1r c p`p8Hp: H ? H  H ! D H h I HLdL,^Vy dv88; 54541r H  L  H  L    H H J N IN 1 H h 1L SN Z S EN  ELHLIڢIڢ-(h#5](IڢH 1pHɁ  H g hɁ  H h 1` vy{| g|S}dpL}Qz}c0~~D:~L̑ LHH ShhHH I dhhe I HHhh` LHH S  dhh  ELduLRuL ~LK ªHH       x  E,] LE 8僅儅L M BJ K 356X8?7Dž4LxL  L ee Š ,H L$E  LHL L L'  Q / # L  F / # L ; /"*LHF ȱG `RQLx 8# )#,)Q )#, 8#Q Q u F G L L`)ȭG F e` F* A! L*0 A!,O!`L  *L{! E * X* ) L!0E8勅縷包ŭŬ $0C ~0ڥee8L~ee8L~LHee` ! 'E ! !  !L!IIi` `J   ee ,# 0 nLz"0 "  eJ  С e(`H /"2 e,$HH !hhh  h©`h`h`L!悄 : 0:,8(` # Օەɕ` # # $ ե ۥ ɥ   `  8ðIi  8ϰIi  `&&JfJf8ee` &  i` i  i  r  r`؇ ه4    x$ %LO % q 'н)^ ( I-Ѝн)^ ( I-ЍнH )  M# $h)@ % LJ% } uÕH h*н^ I-L% Ѝе} uϙ` w w } w L3%` Ș݉ ) ` ݕ ;   `   e e  ^ Ѝ `Ƚe k  N Z8juHȱZuHiN hhο` LF   ޭ ާ 潥) I  j Օەɕᩀ ` gp x ,' ЩЎЎԎ Ԏԍԍ ԍԭ) ~ u  @. M ] 4 56 K w. 3 D 1 2 8873L Dž4<$ALO\ [  xX W Z Y 9` 0Ki  L*0:  L* L  *L' E * X*  ) ``On disk:Insert new diskswap errorgeoBasic and data fileP@must be on the same diskPPin a one drive systemgeosgeoBasic Info ?Extra ignored?RedoTPH HH L)@); ; { t $:     hh hLNGBMiniDemoV1.07 6 5 )# 6 5 ` 6 5 `' M LK )L) )L)t,w,,,,,,) Š  LH`  F  # ` `   ȱ ei` )` 0 ` )` )  ȘL) )L/" 0 `   ȭ ` L* .x *H  '  h *    (LX* *"  )  P+L.* L+* eHeHx  m ) 4*  )    P+hh  (` ȥ`Lc3?fc0fc3fc3>9  ` l l l l l p`L© T& Q@  X M P 7U`LKĠX r LK UFU?UUBU@U:UU;UO);   {V3 {KNQOQ 'QЍ(QQ)QV G Q , LQ@ =)5V ;)3Vߍ<)4V` X X ( RR S RRʍRR6 7 R T=V#WH<V"WHV=©<©@U @ R , hÃf훆cf͛cf͛f͛f͛c>À~L¬``6 6 L©6 0ɠ` TJ@  2X M Pة{HH hh@ YŠLO `RR S RRʍR&U 6 7 &U T @ @ U ,  SP Ġ' M ¸P@`` ' =  {X 0  HRHH LK w`U@UU @ tŠ O`` basic data V1.0basic@ !AA!GBMiniDemoV1.0Dennis Ellisbasic 9 > 9 6  9 5  |geoBasic 8Copyright (c) 1988, Berkeley Softworks`   W M LK`HH ;hh W ieW$L;  e e ii ! 8僅JfJf  e  e    `Disk full, remove some filesPlease Select Option:new documentexisting documentto deskTopFile exists, choose another.Data file is beyond V1.0WARNING!This file is write protected.Please enter new filename:Please enter an author nameopening filecreating fileLu  H @@~h ei2i( 5HХ LHLHL  L2v ­L   P ' hLhL 5hХ H @~@ {h v M Pv r  ')JJJJ5'Ѝ* `Not enough free space onP@disk for desk accessory.running desk accessoryLNLNU V U UU/ - T S ,w S  R Q S OOd ZUU)@   9 ?LpOH OL') OLLUU@`……ȱW Y ȱX Z Y Z Y i[ Z i\ [ K$\ L$Y B$Z C$U V `DCՅ) ՠȱ ȱȱ爈ɑȱ eU iV $ ` AQ BQBQAQSP _S NT M LK` PAQ.BQAQiAQ G­BQAQ J©U M LK BQAQ  'AQIBQI U&TPT M `NDžVe u8AQ8BQ8P8Qii"/E` 0p gp xL  " / 3 D A+ , -  ')JJJJ 'Ѝ* %Щ&   e e ii ! 8僅JfJf  e  e    `©,2BM慁 "Dž,Lx # y` `(C ;©8iH h `i ` ԅ x `Please reboot your systemP@using the same GEOS diskPPthat was first used to runP`geoBasicCannot install geoBasic onP@this disk. Please refer toPPinstallation directions inP`the manual.Cannot install geoBasic on aP@write protected disk.Error installing geoBasicgeoBasic installed.Lux  { t© ) )  OɜZ   ) )   ȱ/ Oɜ yOɜLH8僅儅 x )v  ) ) w  Oɜ8 x ; <  / XLcvX` Ȅm   LH  *   ` Q ; /" eeHHȱĠ0hh`Ɂ Ƀ xP vP whihieÑÅȱeđÅ)?ȩ-ȩ(ȩבȩ i i eÍ ȱeč eÑeđqȩ Lw wȱeÑȱeđHHHȩ eÑ eđ)?< wȱeÑȱeđHeÑeđqȩhhhhL?weÑȱeđ`eÑȱeđ`Lx  eÑȱeđȱeÑȱeđоȱeÅȱeąȘHeÅȱeąHH QR u hhG #LHF iȥieÑȱeđkȩhLw`ÅeÅiLyeÅȱeąHH QxR u hhG #LHF q)xqȐxix(ȥixeÑȱeđeÑeđtȩiLx`    feeii   e  e  `LWgLITL]LZLL8LLLL ]L,]LTLJnLTLmLnLL &iee`HHH H [h hHHst /#,ʄ E\hh)ŌLP   eȱeɥ OL-Q,LH O ] ȭ ȭ ȑ $Phihiȑȑ Q e?e4 ]掤Ǝ8ȑL-QLQ`hsht HȊ@ȥ Qes et΅ ʭ ʆ~ Qee`LP ~ *& e~e`LH YJ S RH!RH K\ ͢R , h!h hh  YLY YJ   ooSS jS SS SR5 7 R uSR ,  '  Y\ SLR Ġ' M LRHH hho   C B  t­C B @=  LY +oH  -o ( ' ;SL* SbSٞٳٳ?03L©`5 0ɠ`5 I5 L W ihh H Hl ( \ ˍQ GR M L 򅂤Ƃ` 6L ȱ e'0 SLTLa:L]ȱȱe )# ZTM L.HLT"8逰!i@:e`L_J cHcHL)#J cHcHL)#L] 0`J HH .nF G nhh ` V M\ AV U TL0. ` W. ` U TL3 H\ U E\ ?L 2UL9 W"<` PUL$ PU. L' PUL* V  LUL[tIUU U  K\ .k V +_X`q ,ϩ`JHjh`JjFf` ` `ǥҔ6`66` V `@L)fȅL)f, k V- ^ V K\ k V ^ V` k V ^ V`LL5 3 f78586 6fLf W8$0`LHNcHMcH VL*WLch h!H LtHsHrHqHpHl h#d VhJhvhwhxhyhzhEp`ƂƁHH [ [ /#8騐*IEY )#L C B  -桪 ? > C B ,= 0=  XLYLHLq q q?  XLLH S!H H ^HH phhh h!  ŠLpLp S nH!nH ^HH ^HH pnn mrnʅohhhoeohoeo o"nn t )hhhh ) wh!h Lq qXLYx  ,= P = 0 ? > C B  H ? > C B h  LHX` S!H H ph h! er!n n H nʅ h Lponn t )@= Lp! L8­@ A # C B  UsLp@ A `  pr> ? B C = o wŠLp  X`  ` H H h h HH/H H Mhhh h б H H     xhh Lr ȭA LJ©,= PL tA @ B C W$0 d iA @ C B   , rL,= P =   /#&, A @ C B )#Ls,Lp A @ C B X` 6t  )  X` W  H prh )  C B @= X`L[ 6t  )  X` 6t  )  X` Wo /#H,Ђo x W i o /#, WoX`H th`LoLXpLpLSqLoLoL7q ()LCB  /#ɚhɝc,S; )#` W$0 d iHH  (( ~hh C /#Lo8 i  W)#(m ʝ( C )#LoL]x   y  X`goJJJJpH)ph p(` 03E`gSprites On/Off@SprtOnLq@Clock On/Off@StartClockԢLqcDrawing On/Off@DrawLqMenu On/Off@ShowMenuLq+%Font@FontBLqStyle@StyleULqEnter Text@EnterTextnLqPlace Text@TextButtonLqG=HO\cyCloud@CloudLqFire Hydrant@HydrantڢLq+Screen  `Sprites  `Clock  `Drawing  ,`Text  `Bitmaps  `-(@_@@&@,:@BP@Uc@k h  ,     : ) 6ELY`ry line@DrawLine;Ltbox@DrawBoxPLtcurve@FollowMousfLtpatrn@PatternLterase@EraseLtcolor@UseColorLtD&-=blank@StopProcLtblank@StopProc3LtBitrBitMaphBoxErrClearJxCloudTDoMous,DrawDrawBoDrawLiESPEndBoxEndColEndLinEndMou6EndPatEndSprEnterT0EraseFollowFontGetOldHideMeHydran^InfoLastSpnLoadScXMain2Mark1Mark2PatterProgInSaveScNSetOldShowClShowMelSprtOfZSprtOnFStColoStartBStartCStartLStartMStartPStopClStopPrJStyle&TextBu:TextHeDUseColmenu18info6draw;zapitg@GetOldPos: xp(0):yp(0):6@SetOldPos: xp,yp:.@EndSprite: M@DrawLine: @StopProc: @StartLine: [@StartLine: off: @Mark1:1: x1,y1: @EndLine:b@EndLine: off: @Mark2:1: x1,y1 x2,y2: @DrawLineU@Draw: dr0 dr1:"draw": @Main dr0: "zapit": @MainX@FollowMous: off:@DoMous:me1: @StartMous:X@Erase: off:@DoMous:me0: @StartMous:W@StartMous: off: @Mark2: y215 #" @EndMous: @DoMous,1: p,@DoMous: x14: @Mark1: me: x1,y1 x2,y2:x2x1:y2y1: :[6@EndMous: off: @DoMous: me0 @Erase@ @FollowMous8J@StopProc: @DoMous:CT@Cloud: bit$"cloud": @BitMapB^@Hydrant: bit$"fire": @BitMap5h@BitMap: @Bit:r@Bit: off: @Mark1| bit$,(x18),y1:>@Mark1: x1(0):y1(0):>@Mark2: x2(0):y2(0):1@DrawBox: off: @StopProc: @StartBox:Z@StartBox: off: @Mark1:1: x1,y1: @EndBox:2@EndBox: 6607 off: @Mark2:255: x1,y1,x2,y2: @DrawBoxY@Pattern: @StopProc: off: @StartPat:Z@StartPat: off: @Mark1:1: x1,y1: @EndPat:2@EndPat: 660p off: @Mark2: "Pattern number (0-31) ",a: a: x1,y1,x2,y2: @Pattern5@UseColor: @StopProc: @StColor:}@StColor: off: @Mark1: x1(x18):y1(y18): @EndColor:2@EndColor: 660 off: @Mark2: x2(x28):y2(y28): "Foreground color (0-15) ",fg: "Background color (0-15) ",bg: bg16fg: x1,y1,x2,y2: _@Font: "Font Name",f$: f$""f$"BSW"2 "Font Size (up to 12)",fs: fs0fs9}&@Style: c1: @StartClock: "Style (14,15,18,19,24-27)",ss :(ss):?0@EnterText: "Enter text",a$:::@TextButton: @TextHere:nD@TextHere: off:c1: @StartClock: @Mark1:f$,fs: x1,y1: a$;:N@SaveScreen: off: "File name to save",fl$: fl$,40960,8000:fl$fl$"/c": fl$,35840,1024:VX@LoadScreen: off: fl$: fl$"" 7b fl$,40960:fl$fl$"/c": fl$,35840:Dl@ShowMenu: m0 m1: @HideMenu'v 151116: 0,0,39,1: m0:K@HideMenu: 151516: 0,0,39,1: @ESP: in$(1)"": in$(2)"Some kind of error": in$(3)"has occurred.": @Info: @Main@BoxError: in$(1)"The second point must be": in$(2)"below and to the right of": in$(3)"the first point.": @Info: @Main@ProgInfo: in$(2)(26) "geoBasic minidemo"(27): in$(3)"by Dennis Ellis": in$(1)"": @Info@Info: in$(1)(24)in$(1)sp$: in$(2)(24)in$(2)sp$: in$(3)(24)in$(3)sp$: "info":