,p@ O`  @`! #@%`')+-/1 3@5`79;=?A C@E`GIKMOQ S@UWY[]_a c@e`gikmoq s@u`y{} @` @  @ ` @ ` @ ` ǀ ɠ @ ` ׀ ٠  @` @`!Aa   !Aa!!#A%a')+-1!3A5a79;=?A!CAEaGIKMOQ!SAUaWY[]_a!cAeagikmoq!sAuaw}o!Aa!A/Oo!A!Ao` " B b  !"!B!"!""#B"%b"'")"+"-"/#1"#3B#5b#7#9#;#=#?$A"$CB$Eb$G$I$K$M$O%Q"%SB%Ub%W%Y%[%]%_&a"&cB&eb&g&&k&m&o'q"'sO`  @`! #@%`')+-/1 3@5`79;=?A C@E`GIKMOQ S@UWY[]_a c@e`gikmoq s@u`y{} @` @  @ ` @ ` @ ` ǀ ɠ @ ` ׀ ٠  @` @`!Aa   !Aa!!#A%a')+-1!3A5a79;=?A!CAEaGIKMOQ!SAUaWY[]_a!cAeagikmoq!sAuaw}o!Aa!A/Oo!A!Ao` " B b  !"!B!"!""#B"%b"'")"+"-"/#1"#3B#5b#7#9#;#=#?$A"$CB$Eb$G$I$K$M$O%Q"%SB%Ub%W%Y%[%]%_&a"&cB&eb&g&&k&m&o'q"'sAUTO fLIBS fOVERLAYS  gPRO_COMM 9gyPRO_EXPL JgREAD_ME TXT!W_PRINTDAT8hAW_BOOT INF;hzDESKTOP INF=hMARTKEYACC7j|W_PRINTPRGDh3SCHECK PRGIhVPROLIB PRG NhTW_PRINTRSCThMARTKEYRSC:jF_BENCH PRG i(F_BENCH RSC ii*F_BENCH CFGjt0IRECTRYLSTu. f.. fMEGMATICPRGZ GcFSELV60 PRGb G\AW_BOOT7PRGj G]3MMCONFIGTOSn G ` `1.19*O.|*m - ЭЭ// ??<JNA Jfa(|6*|.J9gByD"@g "U Qg&# $v # $&92v J9 gpAaA a(<*&T&<V$C$$f.fAa$Cv(f$÷fAJ`99A ah <.r9# # *# 2# JBy 0<`J9g0aJ9 ga J9 gaLaJ9 ga"aaa$BgNANqa&U Jga Mb`0y30A:AaA"p"U0)aaJf"A#~"A$#r"A@#v093aNual49a|?AzaBg Aax94J>f4Aa\Nua$"U ""#"Ut""X#aAaNua"U yf@|:BBF`t"Ua Jg Mn`a"U""#"U""#Afa U AaaRNua2AfaZAl"U apA "<r aXaNuAaa,U9L<g,aaJ@gAp`Ap` A"UaA a U!N U#aNuH0<aLNu@|9FNu$Թ2Nu <fNuA@a: Na6aNuHB?< NA\#LNuH/9?< NA\LNu/?< NA\NuB#/<NAXJf 9NuH *HB@H@dB@H@ H@(H0<*H 0fH fLQaL0Nu Input: pBooting up 0000k Ramdisk as Drive: Aq  Not enough memory to install Ram Disk! Spooler!! p Drives: A,qD p Screen Saver is Installedq A memory test on 0000k of user RAM Pass 1, setting all bits. Pass 2, testing & clearing all bits  Memory error in Pass #1 - Aborting! p Memory tests good!!q p 0000k computer with 0000k of ram freeq 0000k Print Spooler is Installedq p Hooking in Auto-Desktop selector Installing lowmediumhigh resolution desktop.q E****** MegaMatic ****** * v 1.19 * * by: Lloyd E. Pulley, Sr. * * Copyright 1988 by TIF Software * ***************   ofpNuN of 9.NuNN of 9. @p0/ r "op0/ $ fF/fI2< Q SfNu/fI2<QSfNuHEJ*fJg`fa`LNfpCA@"BQ%|%|`HEJga%|LNpAC@2Aw2QBNuNqH0/|=f" oCP fJf z/H0|`43 vLNLOWDESK.INFMEDDESK.INFHIGHDESK.INFDESKTOP.INF@|HA PN|A P??NA`N00.H/N5ZXOp=@Bn yVJhgn yVJhgn yVJhgn yVJhgn 0.ng$?.p?/<Z&pC?NA 0. n@# y nf nRp. y<  g nR"y<Rn` nBHn/<^0N;JPO/<^0/<Z&BgpV?NA =@JnfHnHnN;xPOp=@`N00.H/N5ZXOJngp? nHh6?.N-LPOBg nHh,?.N,ZPOBg n/((Hn/.N&"y^"i, Q Tf nHh,` nHh6/.N;JPO n1n& n1n$N$N%Jy[g,BgBg |^/ / Bg?9[/9^N8By[N^NuNVN)/<OyHnN;xPO09^.@A@p/?NATO-@/<[p?NA\Op?HnpN?NAPOJ@f Gl/<O/ N;JPORG`R/<O/ N;JPO/ / N;JPO/<P/ N;JPOJng/<PHmN;x`(p?p?Hm/.N. /<P/ N;JPOL8N^NuNVH0*n(n p?//N; L0N^NuNVH8 n(PK   B n &PK   BHnHnN;`POL8N^NuNVH0*n(n THh$ UHh$N(PO>JGfp?//N; `0L0N^NuNVH0*n(n THh( UHh(N(PO>JGfp?//N; `0L0N^NuNVH0*n(n dp` fB@` cpL0N^NuNVp?p!?NNXO@gp`B@3]By]N^NuNVp? nHh/<Z&N; B9Z< nHh,/<Z&N;JPO/<P/<Z&N;JPO nHh6/<Z&N;JPO/<P/<Z&N;JPO/<Z&N)XON^NuNV#]/.N;XO3]p?/<N;\O/<]p$?NN\OJ@gN*"J@gp`B@N^NuNVN0/<Jp?N6\O @fp`B@N^NuNV0.  @-h n /.N;XO n1@N^NuNV/ *nH@0 =@H@0n=@H@0 =@H@0n=@H@0 =@H@0n=@Jn g@ n cp`t nb nOcnP`n2.II0.HnA`8 nb n;b n;b4.JJ2.I0.AB=@0.*_N^NuNV/ *n JngBgHn?.N,Z`p?Hn?.N-LPOA-H n  f np0  gJf nRR  gJf nRT  gJf nRR  gJf nRT  gJf nRR  gJf n*_N^NuNVN^NuNVH>.<. n B0@:0@@80@@@@6JFgC` CdCP`Cp?p?Hn?N.~ Hn/. N;xPO/<P"/. N;JPOBgp?Hn?N.~ Hn/. N;JPO/<P$/. N;JPOBgp?Hn?N.~ Hn/. N;JPOLN^NuNVH>.<./<P&HnN;xPO n B0@H:0@@80@@@@6 Fo C opp@JCfv ` C oC p?p?Hn?N.~ Hn/. N;xPO/<P*/. N;JPOBgp?Hn?N.~ Hn/. N;JPO Fg Ff8/<P,/. N;JPOBgp?Hn?N.~ Hn/. N;JPO FoHn/. N;JPOLN^NuNV?.?./. p0./N. N^NuNVH ..*n zp //NJGm2RE0 @fz0RF0@Y p,0RF0@Y 2GSG`0FY B|/<Y N;XOS@>JGm0RF0@2GY SG`0FBL N^NuNVH.. 0. nam nzn H @Pop`HAAp4gB@LN^NuNV/<P.p ?NN\ON^NuNV-|V n JxBn0.nl0.H @Jx0(=@0.H @Jx0.D ?.?.?.N20\O?.0. @D?0. @D??.N1PORn`n?. N4TON^NuNV-|V nBN^NuNV n f n g0. n=@?.?.?.N20\O0. @D=P0. @D=P?.?.?.?.N1PO0. @D=P 0. nnf~N^NuNV0.  @D$-P0.=@0.  @D0@ @ b(H0@> PN` g 0.  @D$0.A$ 0. @A$ "@?80. @A$ 0. @A( "@?80. @A( 0. @A, "@?80. @A,`\ gR0.  @D$0.H"@?8`, g"0.  @D$0."A p/0." @A/N=PO"@J0." @A p/0." @A/N=PO"@J0." @A 0." @A "@?80." @A `` gX0.  @D$0.@ p/0. @@/N=PO"@J0. @@ 0. n ?0.H @Jx/N9\ON^NuNVBn0.nl0.H@/N4XORn`N^NuNV nJg n0(H"@?8 n N^NuNV nf0. H@B@H@"@@ n `/. ?. ?.N9PON^NuNV4 .D-@4/<TgHn8N;xPOBgBgHnH/.4N. D4l0.6H @P/`/<TxHn8N;JPO/<THn8N;JPOHn8p?N6\O .N^NuNV3V0.@ HU-@p=@ nl$ nRH2.H AV0Rn`/9VN=XO09VN^NuNV#VVp#VVt#VVx#VV|#VV#VV#VpVp ?N5TO3VVpN^NuNVp?N5TOpN^NuNV3V# Vp4?N5TON^NuNV#Vp6?N5TO n 0V n0V n0V n0V09VN^NuNV3V3 V3 V3V3V3V3V3V3Vp3?N5TON^NuNV#V3 Vp2?N5TON^NuNV3V3 V3 V3V3V3V3V3VpG?N5TO n0V n0V09VN^NuNVpM?N5TO n0V n 0V n0V n0V09VN^NuNVpO?N5TO n0V n 0V n0V n0VN^NuNV3V# VpN?N5TON^NuNV#V3 V3V3V3V3V3V3V3Vp/?N5TON^NuNV#V3 V3V3V3V3V3Vp*?N5TON^NuNV#V3 Vp,?N5TO n0V n0V09VN^NuNV3V3 Vpp?N5TO n V09VN^NuNV#V3 Vpr?N5TON^NuNV3Vpk?N5TON^Nu o0/BAgJfBNu Nu o"H0/JfSBA gfBNu NuNVH *n0. H=@Jno=n0.n ll0.n>JGmX0nHЍ/0.HЍ/ nNPOJ@o0?.0nHЍ/0.HЍ/N; n`Rn`0.`lL N^NuNVH0*n(n >.JGgH=@0.SGfL0N^Nu"o o JfSfNu"o ofJfHHNu"o o fNu o"Jf S@Nu"o oB2/ gSAfJgQHHNu"o o 2/ g SAgQNuNVH *n>. Bp ?NA\O,:/p ?NA\O0L N^Nu"o`C"/jD$jDA`|J/j JgRJk`JjDNu"o`C"/$A`JNu"o`C$jD"/A`, g J/j Nu"o`C$"/A` NupJfpN∲cd⒒d҂dFN o"`"/ jD$/jDD$@A`" jDNu o"`"/ _$0"@0HAHBЁH@B@ЉNg +-Hm$l +-HjHjHj HjNP +-$l +-$HRHzHjNJ +-HkHzHzHzHzHzHzHzHzHzHz$l +-0*HR+@Hm0*HR+@HmN +-HkHzHzHzHzHzHzHzHzHzHz$l +-0*HR+@Hm *S+@HmN +-HkHzpHz`HztHzpHz\HzHHzDHz@$l +- *+@HmHz* *rN+@HmHjN +-HkHz,N> +-HkApH@` Desk //ApNB-//ApN+H;@HmN8 +-HkHzHzHzHzHzHzHzHkHzHz$l +- *rN+@HmHjN +-HkHzxHzhHzHzHzlHzXHzTHzPHzL$l +-Hj0*HR+@Hm0*H+@HmN +-HkHzBHzHzHzHzHz*HzHz*$l +- *+@HmHzHzHzN +-ApH@//$S R/ R0*Hro "_A NB-//ApNHmHkHzAp+H;@Hma L'm.HmHkHzApH@`--------------------//ApNB-//ApN+H;@Hma'm.HkHk.HzND +-HmHkHzApH@`1//ApNB-//ApN+H;@Hma'm.HmHkHzApH@`2//ApNB-//ApN+H;@Hma@'m.HmHkHzzApH@`3//ApNB-//ApN+H;@Hma'm.HmHkHz,ApH@`4//ApNB-//ApN+H;@Hma'm.HmHkHzApH@`5//ApNB-//ApN+H;@HmaV'm.HmHkHzApH@`6//ApNB-//ApN+H;@Hma'm.$k $&]N]Nu _"l +-LH/N +-` Hk $S R0*H+@HmN> +-Hk $S R0*+H;@HmN8 +-$S R0*+H;@HmApH@B-//ApN+H;@ANV +-S"l +-")N'@Hm"k ~4Ї+@HmN2 +- -R'@$k$Hm"k ~DЇ+@HmN2 +-'m$k ~DЇ+@Hm +Ы+@HmN, +-/+ +S+@HmHzHzHzHzHzHzHk HkHzHk$l +-HjaHm$k ~4Ї+@HmN2 +-'m +rN$kВ+@HmHkN, +-$k ~4Ї+@HmHkN, +-Hm$k ~Ї+@HmN2 +-'m Hm + rN$kВX+@HmN2 +-'mHm +rN$kВX+@HmN2 +- -~g.Hm +rN$kВX+@HmN2 +- -R'@` +R'@/+ +S+@HmHk HzvHzrHzHzfHzbHz$l +- *Ы+@HmHzDHz@Hz +-Hk$S R0*+H;@HmN8 +-Hm$k ~Ї+@HmN2 +-'mHm +rN$kВT+@HmN2 +-'mHm$k ~2Ї+@HmN2 +-'m +$kgNHm +rN"kБ+@HmN2 +-'mHm +rN$kВ+@HmN2 +-'m`/+HkHk Hk$Hk(Hk,Hk0Hk4Hk8HkHz:HkHz2HkHHz*"l +-HiaT/+HkHk Hk$Hk(Hk,Hk0Hk4Hk8Hk"k ~ '@8/+0/+,Hm/+0/+,N& +- -~+@HmN +-`$k'R8'k4<"k, R<~ЇD+@o/+0HkN, +-$l$ +-0*H"k"0*H$S$&]N]Nu _"l +-LH/N +-`,$k"l( +-"$k $l +-4$S $l +-5@Hz$N, +-&]N]Nu _"l +-LH/N +-`-$k"l( +-"$k $l +-4$k $l +-5@$k $l +-5@$S $l +-5@Hz4N, +-$l$ +-0*H"k"&]N]Nu _"l +-LH/N +-`.$k "l( +-"$k $l +-4$k $l +-5@$k $l +-5@$k $l +-5@$k $l +-5@$k $l +-5@ $k $l +-5@ $S $l +-5@Hz*N, +-&]N]Nu _"l +-LH#_ /N +-``/FORM_DO.CODE.ATAB.INIT.NAME D$FORM_DO  D$FORM_DIAL$ D$FORM_ALERT  D$FORM_ERROR D$FORM_CENTERAINTIN"AINTOUADDRIN .ATABS.NAMESFORM_DO0 FORM_DIAL FORM_ALERT FORM_ERROR: FORM_CENTER + + + + + + + +AESIFN +$k"l +-"$S $l +-4Hz2N +-$l +-0H"k"&]N]Nu _"l +-LH/N +-`2$k "l +-2$k 3@$k 3@$k 3@$k 3@$k 3@ $k 3@ $k 3@$S 3@Hz*N +-&]N]Nu _"l +-LH#_ /N +-`| 3$k "l +-2$S"l +-"Hz2N +-$l +-0H"k"&]N]Nu _"l +-LH/N +-`4$S "l +-2HzN +-&]N]Nu _"l +-"/N +-`5$k"l +-"Hz^N +-$l +-0*H"k "0*H$k$$l +-0*H$k$$l +-0*H$S$&]N]Nu _"l +-LH/N +-`6 GRAF_RUBBOX.CODE.ATAB.INIT.NAME D$GRAF_RUBBOX D$GRAF_MBOXD$GRAF_DRAGBOX,D$GRAF_WATCHBOXD$GRAF_SLIDEBOX D$GRAF_HANDLE D$GRAF_MOUSED$GRAF_MKSTATEAINTIN"AINTOUADDRIN .ATABS.NAMES GRAF_RUBBOXR GRAF_MBOX GRAF_DRAGBOXJ GRAF_WATCHBOX GRAF_SLIDEBOX" GRAF_HANDLE GRAF_MOUSE GRAF_MKSTATE4 + + + + + + + + + + +AESIFN +$k "l +-2$k 3@$k 3@$k 3@Hz>N, +-$l$ +-0*H"k"0*H$S$&]N]Nu _"l +-L?H?/N +-`F$k "l +-2$k 3@$k 3@$k 3@$k 3@$S 3@ Hz$N, +-&]N]Nu _"l +-L?H?/N +-`H$k "l +-2$k 3@$k 3@$k 3@$k 3@$k 3@ $k 3@ +$3@HzBN, +-$l$ +-0*H'@(0*H"S"&]N]Nu _"l +-LH#_ /N +-`nG$k "l( +-"$k $l +-5@$k $l +-5@$S $l +-5@Hz2N, +-$l$ +-0H"k"&]N]Nu _"l +-LH/N +-`K$k "l( +-"$k $l +-4$k $l +-5@$S $l +-5@Hz2N, +-$l$ +-0H"k"&]N]Nu _"l +-LH/N +-`LHzlN, +-$l$ +-0*H"k "0*H$k$$l$ +-0*H$k$$l$ +-0*H$S$$l$ +-0H$k$&]N]Nu _"l +-LH/N +-`M$k "l +-2$S"l( +-"Hz"N, +-&]N]Nu _"l +-"#_/N +-`NHz^N, +-$l$ +-0*H"k "0*H$k$$l$ +-0*H$k$$l$ +-0*H$S$&]N]Nu _"l +-LH/N +-`O SCRP_READ.CODE.ATAB.INIT.NAME D$SCRP_READ D$SCRP_WRITEAINTIN"AINTOUADDRIN .ATABS.NAMES SCRP_READ SCRP_WRITEB + + + + +AESIFN +$S"l +-"HzN +-&]N]Nu _"l +-"/N +-`P$S"l +-"HzN +-&]N]Nu _"l +-"/N +-`Q FSEL_INPUT.CODE.ATAB.INIT.NAME D$FSEL_INPUT AINTIN"AINTOUADDRIN .ATABS.NAMES FSEL_INPUT. + + + +AESIFN +$k"l +-"$k#RHz2N +-$l +-0*H"S"&]N]Nu _"l +-LH/N +-`Z WIND_CREATE.CODE.ATAB.INIT.NAME D$WIND_CREATE D$WIND_OPEN D$WIND_CLOSE D$WIND_DELETE D$WIND_GET D$WIND_SET D$WIND_FIND  D$WIND_UPDATE D$WIND_CALC(AINTIN"AINTOUADDRIN .ATABS.NAMES WIND_CREATEN WIND_OPEN WIND_CLOSE WIND_DELETE WIND_GETWIND_SET WIND_FIND2 WIND_UPDATEf WIND_CALC + + + + + + + + + + + +AESIFN +$k "l$ +-2$k 3@$k 3@$k 3@$S 3@Hz2N0 +-$l( +-0H"k"&]N]Nu _"l +-L?H?/N +-`d$k "l$ +-2$k 3@$k 3@$k 3@$S 3@Hz$N0 +-&]N]Nu _"l +-LH/N +-`e$S "l$ +-2HzN0 +-&]N]Nu _"l +-"/N +-`f$S "l$ +-2HzN0 +-&]N]Nu _"l +-"/N +-`g$k "l$ +-2$k 3@Hz^N0 +-$l( +-0*H"k "0*H$k$$l( +-0*H$k$$l( +-0*H$S$&]N]Nu _"l +-L?H?/N +-`h$k "l$ +-2$k 3@$k 3@$k 3@$k 3@$S 3@ Hz$N0 +-&]N]Nu _"l +-L?H?/N +-`i$k "l$ +-2$S 3@Hz2N0 +-$l( +-0H"k"&]N]Nu _"l +-LH/N +-`j$S "l$ +-2HzN0 +-&]N]Nu _"l +-"/N +-`k$k$ "l$ +-2$k 3@$k 3@$k 3@$k 3@$k 3@ HzhN0 +-$l( +-0*H"k "0*H$k$$l( +-0*H$k$$l( +-0*H$S$&]N]Nu _"l +-LH#_ #_$/N +-`Zl RSRC_LOAD.CODE.ATAB.INIT.NAME D$RSRC_LOAD D$RSRC_GADDR  D$RSRC_SADDR  D$RSRC_OBFIXAINTIN"AINTOUADDRIN ACONTR AGLOBA ADDROUCCB.ATABS.NAMES RSRC_LOAD RSRC_FREE: RSRC_GADDRr RSRC_SADDR RSRC_OBFIX + + + + + + + + + + +AESIFN +$S"l +-"HzN, +-&]N]Nu _"l +-"/N +-`nHzN, +-&]N]NuN +-`o$k "l +-2$k 3@Hz,N, +-$l$ +-"S"&]N]Nu _" +-LLLH/N +-`p$k "l +-2$k 3@$S"l +-"Hz$N, +-&]N]Nu _"l +-LH/N +-`q$k"l +-"$S $l +-4Hz"N, +-&]N]Nu _"l +-"#_/N +-`r SHEL_READ.CODE.ATAB.INIT.NAME D$SHEL_READ D$SHEL_FIND D$SHEL_ENVRNAINTIN"AINTOUADDRIN .ATABS.NAMES SHEL_READ SHEL_FINDb SHEL_ENVRN + + + + + +IPEEKN +AESIFN +IADDRN +$k"l +-"$S#RHz"N +-&]N]Nu _"l +-"#_/N +-`x$S"l +-"Hz6N +-$l +-JRVDHH"k"&]N]Nu _"l +-"#_/N +-`|HmHkN$ +-$l +-$"S%QHzN +-~'G $k R0*H+@oV$k R/ + "+ @"_ASAAHH@//HmHkN +- -@ApN +R'@R Sn&]N]Nu _"l +-"#_/N +-`T} GRAF_GROWBOX.CODE.ATAB.INIT.NAMED$GRAF_GROWBOX D$GRAF_SHRINKBOX D$SHEL_WRITE_1AINTIN"AINTOUADDRIN .ATABS.NAMES GRAF_GROWBOX^GRAF_SHRINKBOX SHEL_WRITE_12 + + + + + +AESIFN +$k "l +-2$k 3@$k 3@$k 3@$k 3@$k 3@ $k 3@ $S 3@Hz$N +-&]N]Nu _"l +-LH/N +-`I$k "l +-2$k 3@$k 3@$k 3@$k 3@$k 3@ $k 3@ $S 3@Hz$N +-&]N]Nu _"l +-LH/N +-`J$k "l +-2$k 3@$k 3@$k"l +-"$S#RHz$N +-&]N]Nu _"l +-LH/N +-`y APPL_BVSET.CODE.ATAB.INIT.NAME D$APPL_BVSETD$MENU_UNREGISTER D$FORM_KEYBD D$FORM_BUTTOND$SHEL_WRITE_2 D$SHEL_RDEF D$SHEL_WDEFD$XGRF_STEPCALC, D$XGRF_2BOX$AINTIN"AINTOUADDRIN .ATABS.NAMES APPL_BVSET" APPL_YIELDJMENU_UNREGISTERn FORM_KEYBD FORM_BUTTON: SCRP_CLEARd SHEL_WRITE_2 SHEL_RDEF SHEL_WDEF  XGRF_STEPCALC XGRF_2BOX` + + + + + + + + + + + +AESIFN +$k "l$ +-2$S 3@Hz"N0 +-&]N]Nu _"l +-"#_/N +-`HzN0 +-&]N]NuN +-`$S "l$ +-2HzN0 +-&]N]Nu _"l +-"/N +-`$$k"l, +-"$k $l$ +-4$k $l$ +-5@$k $l$ +-5@Hz>N0 +-$l( +-0*H"k"0*H$S$&]N]Nu _"l +-L?H?/N +-`7$k "l, +-"$k $l$ +-4$k $l$ +-5@Hz2N0 +-$l( +-0*H"S"&]N]Nu _"l +-LH/N +-`8HzN0 +-&]N]NuN +-`R$k "l$ +-2$k 3@$k 3@$k"l, +-"$S#RHz$N0 +-&]N]Nu _"l +-LH/N +-`y$k"l, +-"$S#RHz"N0 +-&]N]Nu _"l +-"#_/N +-`~$k"l, +-"$S#RHz"N0 +-&]N]Nu _"l +-"#_/N +-`$k( "l$ +-2$k$ 3@$k 3@$k 3@$k 3@$k 3@ HzzN0 +-$l( +-0*H"k"0*H$k $$l( +-0*H$k$$l( +-0*H$k$$l( +-0* H$S$&]N]Nu _"l +-LHLH /N +-`H$k "l$ +-2$k 3@$k 3@$S 3@$k 3@$k 3@ $k 3@ $k 3@$k 3@Hz*N0 +-&]N]Nu _"l +-LH#_ /N +-`| F77AES .CODECCB.ATAB.ATABSAESIF+  WX"l +-$Qr 4 4 4 4" . <NBNu V_BIT_IMAGE_1.CODE.ATAB.INIT.NAMED$V_BIT_IMAGE_1 D$VQP_FILMS  D$VQP_STATE D$VSP_STATE D$VSP_SAVE D$VSP_MESSAGE D$VQP_ERROR VDI_CONTROL VDI_INTIN VDI_PTSIN VDI_INTOUT\ VDI_PTSOUTVDIPARM.ATABS.NAMES V_BIT_IMAGE_1 VQP_FILMS VQP_STATE@ VSP_STATEVSP_SAVE( VSP_MESSAGEN VQP_ERROR + + + + + + + + + + + + +VDIESCN +VDIN +ORDN +IADDRN +Hm/NF +-$l0 +-%m"k $l +-4$k $l +-5@~7G$k R0*HH+@oZApH@//$k R/0+2+@"_ASAAN0+HR/Ap@H&$l +-58RkSn~$l +-4"k 5@$k R0*HT$l +-5@|5F /+N: +-Hm$l$ +-HRNF +-$l0 +-%m&]N]Nu _"l +-L?H?/N +-`Hz/+N4 +-~7G$l +-0*H+@oN$S R/0+2+@"_ASAAHH@//0+HS&"l( +-018@ApNRkSn&]N]Nu _"l +-"#_/N +-`t[Hz/+N4 +-$l( +-0H"k"0*H$k$$l( +-0*H$k $$l( +-0*H$k$$l( +-0*H$k$~7G$l +-0*HY+@o*0+H[>+H$l( +-&"S3x8RkSn&]N]Nu _"l +-LH/N +-`J\$k "l +-2$k 3@$k 3@Hm/+N@ +-N N$l +-5@"k 5@Bk~+G0+HZ>+H$S&"l +-3x8RkSn~$l +-4Bj|5Fz]5E /+N: +-&]N]Nu _"l +-LH/N +-`HHz /N4 +-&]N]Nu _"l +-"/N +-`^Hz /N4 +-&]N]Nu _"l +-"/N +-`_Hz2/N4 +-$l( +-0H"k"&]N]Nu _"l +-"#_/N +-`` V_BIT_IMAGE_2.CODE.ATAB.INIT.NAMED$V_BIT_IMAGE_2# D$VQ_SCAND$V_ALPHA_TEXT D$V_SOUND  D$VS_MUTE D$VT_RESOLUTION D$VT_ORIGIN D$VQ_TDIMENSIONS D$VT_ALIGNMENT  D$VSP_FILM D$VQP_FILMNAME D$VSC_EXPOSED$VQT_JUSTIFIED' VDI_CONTROL VDI_INTIN VDI_PTSIN VDI_INTOUT\ VDI_PTSOUTVDIPARM.ATABS.NAMES V_BIT_IMAGE_2VQ_SCAN V_ALPHA_TEXTV_SOUNDVS_MUTE\VT_AXIS VT_RESOLUTION VT_ORIGINLVQ_TDIMENSIONS VT_ALIGNMENTVSP_FILMT VQP_FILMNAME VSC_EXPOSEb VQT_JUSTIFIED + + + + + + + + + + + + + + + + + + +VDIN +IADDRN +Hm/NR +-$lH +-%m"k $l8 +-4$k $l8 +-5@$k $l8 +-5@$k $l8 +-5@$k $l8 +-5@~7G $k R0*HH+@oZA"pH@//$k R/0+ 2+ @"_ASAAN0+ HX/A"p@H&$l8 +-58Rk Sn~$l4 +-4|5F"k Q0)HZ5@z5E /+NL +-Hm$l< +-HRNR +-$lH +-%m&]N]Nu _"l +-LH/N +-`~$l4 +-4BjBj|5F /+NL +-$l@ +-0*H"k"0*H$k $$l@ +-0*H$k$$l@ +-0*H$k$$l@ +-0* H$S$&]N]Nu _"l +-L?H?/N +-`z$S R0*H'@~7G R0*HH+@oApH@//$S R/0+ 2+ @"_ASAANAp//ApH@B-//ApNNf0+ HS'@`00+ HS/Ap@H&$l8 +-58Rk Snp~$l4 +-4Bj +5@|5F "S Q0)H&$l8 +-Br8/+NL +-&]N]Nu _"l +-"#_/N +-`~$l4 +-4Bj|5Fz=5E "k $l8 +-4$S $l8 +-5@/+NL +-&]N]Nu _"l +-LH/N +-`~$l4 +-4Bj|5Fz>5E "S $l8 +-4/+NL +-$l@ +-0H"k"&]N]Nu _"l +-LH/N +-`~Q$l4 +-5G ` ~R$l4 +-5G ~$l4 +-4Bj|5F"k $l8 +-4$k $l8 +-5@/+NL +-$l@ +-0H"k"0*H$S$&]N]Nu _"l +-LH/N +-` _"l +-LH/N +-`h~$l4 +-4Bj|5FzS5E "k $l8 +-4$S $l8 +-5@/+NL +-&]N]Nu _"l +-LH/N +-`~$l4 +-4BjBj|T5F /+NL +-$l@ +-0H"k"0*HN"SAN&]N]Nu _"l +-LH/N +-`~$l4 +-4Bj|5FzU5E "k $l8 +-4$S $l8 +-5@/+NL +-&]N]Nu _"l +-LH/N +-`~$l4 +-4Bj|5Fz[5E "k $l8 +-4$S $l8 +-5@/+NL +-&]N]Nu _"l$ +-LH/N$ +-`~$l4 +-4Bj|5Fz\5E "k $l8 +-4/+NL +-~7G$l4 +-0*H+@oN$S R/0+2+@"_ASAAHH@//0+HS&"l@ +-018@ApNRkSn$l4 +-JjVDHH"k "&]N]Nu _"l( +-LH/N( +-`<~$l4 +-4Bj|5Fz]5E "S $l8 +-4/+NL +-&]N]Nu _"l, +-"#_/N, +-`$k "l8 +-2$k 2$k R0*H'@ ~7G$ R0*HH+@oA&pH@//$k R/0+$2+$@"_ASAANA&p//ApH@B-//ApNNf0+$HS'@ `00+$HS/A&p@H&$l8 +-58Rk$Snn$k "l< +-2$k 3@$k 3@Bi$l4 +-4~5G + T5@Bj Hm/NR +-$lH +-%m/+NL +-Hm$lD +-HRNR +-$lH +-%m&]N]Nu _"l0 +-LH/N0 +-`V_OPNWK.CODE.ATAB.INIT.NAME D$V_OPNWK  D$V_CLSWK D$V_CLSVWK D$V_CLRWK D$V_UPDWKD$VST_LOAD_FONTS D$VST_UNLOAD_FONTS D$VS_CLIP  VDI_CONTROL VDI_INTIN VDI_PTSIN VDI_INTOUT\ VDI_PTSOUTVDIPARM.ATABS.NAMESV_OPNVWKV_OPNWKV_CLSWKFV_CLSVWKtV_CLRWKV_UPDWKVST_LOAD_FONTSVST_UNLOAD_FONTSDVS_CLIP + + + + + + + + + + + + + +VDIN +IADDRN +~$l +-4`~d$l +-4Hm$l +-HRN> +-$l4 +-$Hm/+N> +-$l4 +-%mHm/N> +-$l4 +-%m Hm"SHiZN> +-$l4 +-%m"l +-Bi~ 3G/+N8 +-$l +-0* H"k"Hm$l$ +-HRN> +-$l4 +-%mHm"l, +-HQN> +-$l4 +-%m Hm"l0 +-HQN> +-$l4 +-%mHm"l( +-HQN> +-$l4 +-%m&]N]Nu _"l +-LH/N +-` _"l +-LH/N +-`~$l +-4BjBj/N8 +-&]N]Nu _"l +-"/N +-`~e$l +-4BjBj/N8 +-&]N]Nu _"l +-"/N +-`~$l +-4BjBj/N8 +-&]N]Nu _"l +-"/N +-`~$l +-4BjBj/N8 +-&]N]Nu _"l +-"/N +-`~w$l +-4BjBj/+N8 +-$l, +-0H"k"&]N]Nu _"l +-LH/N +-`~x$l +-4BjBj/+N8 +-&]N]Nu _"l +-"#_/N +-`Hm/N> +-$l4 +-%m"k $l$ +-4$l +-4~5G|5F/+N8 +-Hm$l( +-HRN> +-$l4 +-%m&]N]Nu _"l +-LH/N +-`V_PLINE.CODE.ATAB.INIT.NAME D$V_PLINE  D$V_GTEXT D$V_CELLARRAYD$V_CONTOURFILL D$VR_RECFLD$V_ARC D$V_CIRCLE D$V_ELLARC D$V_ELLIPSED$V_RBOX D$V_RFBOX D$V_JUSTIFIED% VDI_CONTROL VDI_INTIN VDI_PTSIN VDI_INTOUT\ VDI_PTSOUTVDIPARM.ATABS.NAMES V_FILLAREAh V_PMARKERV_PLINEV_GTEXT V_CELLARRAYp V_CONTOURFILLV_BARFVR_RECFL\ V_PIESLICEV_ARCV_CIRCLE|V_ELLPIE V_ELLARC& V_ELLIPSEV_RBOXV_RFBOXh V_JUSTIFIED + + + + + + + + + + + + + + + + + +VDIN +IADDRN +~$l0 +-4`~$l0 +-4`~ $l0 +-4Hm/NN +-$lD +-%m"k $l0 +-5@Bj/+NH +-Hm$l8 +-HRNN +-$lD +-%m&]N]Nu _"l +-LH/N +-` _"l +-LH/N +-`r _"l +-LH/N +-`N$S R0*H7@~7G R0*HH+@oApH@//$S R/0+2+@"_ASAANAp//ApH@B-//ApNNf0+HS7@`00+HS/Ap@H&$l4 +-58RkSnp$k "l8 +-2$k 3@~$l0 +-4|5F5k/+ NH +-&]N]Nu _"l +-LH/N +-`Hm/NN +-$lD +-%mHm/+NN +-$lD +-%m~ "l0 +-2|3F$k "k"N"l0 +-3@ 3@$k 3@$k 3@$k 3@/+NH +-Hm$l4 +-HRNN +-$lD +-%mHm"l8 +-HQNN +-$lD +-%m&]N]Nu _"l +-LH/N +-`6$S "l4 +-2$k $l8 +-4$k $l8 +-5@~g$l0 +-4|5F5F/+ NH +-&]N]Nu _"l +-LH/N +-`~r$l0 +-4`~ $l0 +-4|5F Hm/NN +-$lD +-%m~"l0 +-3GBi/+NH +-Hm$l8 +-HRNN +-$lD +-%m&]N]Nu _"l +-"#_/N +-` _"l +-"#_/N +-`t~$l0 +-5G ` ~$l0 +-5G $k "l8 +-2$k 3@BiBiBiBi $k 3@ Bi$k $l4 +-4$S $l4 +-5@~ $l0 +-4|5Fz5E/+NH +-&]N]Nu _"l +-L?H?/N +-`p _"l +-L?H?/N +-`J$k "l8 +-2$k 3@BiBi$S 3@Bi ~ $l0 +-4|5FBjz5E /+ NH +-&]N]Nu _"l +-LH/N +-`~$l0 +-5G ` ~$l0 +-5G $k "l8 +-2$k 3@$k 3@$k 3@$k $l4 +-4$S $l4 +-5@~ $l0 +-4|5F5F/+NH +-&]N]Nu _"l +-LH/N +-`| _"l +-LH/N +-`V$k "l8 +-2$k 3@$k 3@$S 3@~ $l0 +-4|5FBjz5E /+NH +-&]N]Nu _"l +-LH/N +-`~$l0 +-5G Hm/NN +-$lD +-%m~ "l0 +-2|3FBi/+NH +-Hm$l8 +-HRNN +-$lD +-%m&]N]Nu _"l$ +-"#_/N$ +-`~ $l0 +-5G Hm/NN +-$lD +-%m~ "l0 +-2|3FBi/+NH +-Hm$l8 +-HRNN +-$lD +-%m&]N]Nu _"l( +-"#_/N( +-`$k "l8 +-2$k 3@$k 3@Bi$k $l4 +-4$S $l4 +-5@$k R0*H'@~'G R0*H+@oA$pH@//$k R/ + "+ @"_ASAANA$p//ApH@B-//ApNNf + S'@`. + S/A$p@H&$l4 +-58R Snr~ $l0 +-4|5F +T5@z 5E /+NH +-&]N]Nu _"l, +-LH/N, +-` VSWR_MODE.CODE.ATAB.INIT.NAME D$VSWR_MODE D$VSF_PERIMETER D$VS_COLOR  D$VSL_UDSTY D$VSL_WIDTH  D$VSL_ENDS  D$VSM_HEIGHT  D$VST_HEIGHT D$VST_POINTD$VST_ALIGNMENT D$VSF_UDPAT  VDI_CONTROL VDI_INTIN VDI_PTSIN VDI_INTOUT\ VDI_PTSOUTVDIPARM.ATABS.NAMES VSF_COLOR VSF_STYLE VSF_INTERIOR VST_EFFECTS VST_COLORVST_FONT VST_ROTATION6 VSM_COLORPVSM_TYPEj VSL_COLORVSL_TYPE VSWR_MODE VSF_PERIMETERVS_COLORT VSL_UDSTY VSL_WIDTHVSL_ENDS4 VSM_HEIGHT VST_HEIGHT  VST_POINT VST_ALIGNMENT VSF_UDPATh + + + + + + + + + + + + + + + + +VDIN +IADDRN +~ $l, +-4`n~$l, +-4`b~$l, +-4`X~$l, +-4`N~$l, +-4`D~ $l, +-4`:~$l, +-4`0~$l, +-4`&~j$l, +-4`~$l, +-4`~$l, +-4`~$l, +-4$S "l0 +-2$l, +-Bj~5G/+ND +-&]N]Nu _"l +-LH/N +-` _"l +-LH/N +-` _"l +-LH/N +-`v _"l +-LH/N +-`R _"l +-LH/N +-`. _"l +-LH/N +-` _"l +-LH/N +-` _"l +-LH/N +-` _"l +-LH/N +-` _"l +-LH/N +-`z _"l +-LH/N +-`V _"l +-LH/N +-`0~h$l, +-4"S $l0 +-4$l, +-Bj|5F/+ND +-&]N]Nu _"l +-"#_/N +-`$k "l0 +-2$S3R3j3j~$l, +-4Bj|5F/+ND +-&]N]Nu _"l +-LH/N +-`$S "l0 +-2~q$l, +-4Bj|5F/+ND +-&]N]Nu _"l +-"#_/N +-`$S "l4 +-2Bi~$l, +-4|5FBj/+ND +-$l< +-0H"k"&]N]Nu _"l +-LH/N +-`$k "l0 +-2$S 3@~l$l, +-4Bj|5F/+ND +-&]N]Nu _"l +-LH/N +-`$l4 +-BR"S 5@~$l, +-4|5FBj/+ND +-$l< +-0*H"k"&]N]Nu _"l +-LH/N +-`$l4 +-BR"k 5@~ $l, +-4|5FBj/+ND +-$l< +-0H"k "0*H$k$$l< +-0*H$k$$l< +-0*H$S$&]N]Nu _"l +-L?H?/N +-`$k "l0 +-2~k$l, +-4Bj|5F/+ND +-$l< +-0H"k "0*H$k$$l< +-0*H$k$$l< +-0*H$S$$l8 +-0H$k$&]N]Nu _"l +-LH/N +-`v$k "l0 +-2$k 3@~'$l, +-4Bj|5F/+ND +-$l8 +-0H"k"0*H$S$&]N]Nu _"l$ +-LH/N$ +-`Hm/+NJ +-$l@ +-%m~p"l, +-2Bi$S 3@/+ND +-Hm$l0 +-HRNJ +-$l@ +-%m&]N]Nu _"l( +-LH/N( +-` VRO_CPYFM.CODE.ATAB.INIT.NAME D$VRO_CPYFM D$VR_TRNFM  D$V_GET_PIXEL VDI_CONTROL VDI_INTIN VDI_PTSIN VDI_INTOUT\ VDI_PTSOUTVDIPARM.ATABS.NAMES VRT_CPYFM VRO_CPYFMVR_TRNFM V_GET_PIXELv + + + + + + + + +VDIN +IADDRN +~m$l +-4|5F` $k"l +-3R3j~y$l +-4|5FHm/+N* +-$l +-%mHm/N* +-$l +-%m"k $l +-4Hm/+N* +-$l +-%m~"l +-3G/+N$ +-Hm$l +-HRN* +-$l +-%m&]N]Nu _"l +-#_LH/N +-`H _"l +-LH/N +-`$k"l +-#R$S#R~n2BiBi/+N$ +-&]N]Nu _"l +-LH/N +-`$k "l +-2$k 3@~i$l +-4|5FBj/+N$ +-$l +-0H"k"0*H$S$&]N]Nu _"l +-LH/N +-` VSIN_MODE.CODE.ATAB.INIT.NAME D$VSIN_MODE  D$VRQ_LOCATOR D$VSM_LOCATORD$VRQ_VALUATORD$VSM_VALUATOR D$VRQ_CHOICE  D$VSM_CHOICE  D$VRQ_STRING D$VSM_STRING D$VSC_FORM D$VEX_TIMV D$V_SHOW_C D$V_HIDE_C D$VQ_MOUSE D$VEX_BUTV  D$VQ_KEY_S VDI_CONTROL VDI_INTIN VDI_PTSIN VDI_INTOUT\ VDI_PTSOUTVDIPARM.ATABS.NAMES VSIN_MODE4 VRQ_LOCATOR VSM_LOCATOR VRQ_VALUATOR VSM_VALUATOR VRQ_CHOICE0 VSM_CHOICE VRQ_STRING VSM_STRINGVSC_FORMZVEX_TIMVV_SHOW_CV_HIDE_C"VQ_MOUSE|VEX_CURVVEX_MOTVVEX_BUTV VQ_KEY_SP + + + + + + + + + + + + + + + + + + + + + +VDIN +IADDRN +$k "lD +-2$S 3@~!$l@ +-4Bj|5F/+NX +-&]N]Nu _"l +-LH/N +-`$k "lH +-2$k 3@~$l@ +-4|5FBj/+NX +-$lP +-0H"k"0*H$k$$S RpH@//$lL +-0@ApN&]N]Nu _"l +-L?H?/N +-`x/+/+/+ /+/+$S Rp+H;@Hma$l@ +-0*H>*HЇ"k"&]N]Nu _"l +-LH/N +-`$k "lD +-2~$l@ +-4Bj|5F/+ NX +-$lL +-0H"k"$S RpH@//$lL +-0*@ApN&]N]Nu _"l +-LH/N +-`/+/+ /+$k Rp+H;@Hma$l@ +-0*H"S"&]N]Nu _"l +-LH/N +-`$k "lD +-2~$l@ +-4Bj|5F/+NX +-$lL +-0H"S"&]N]Nu _"l +-LH/N +-`~$l@ +-4BjBj/+NX +-$lL +-0H"S"$l@ +-0*H$k$&]N]Nu _"l +-LH/N +-`$k "lD +-2$k 3@Hm/+N^ +-$lT +-%m~"l@ +-2|3Fz3E/+NX +-~7G$l@ +-0*H+@oN$S R/0+2+@"_ASAAHH@//0+HS&"lL +-018@ApNRkSn$l@ +-0*HR7@"S Q/"@@$_ASAAHH@B-//ApNHm$lH +-HRN^ +-$lT +-%m&]N]Nu _"l +-LH/N +-`/+/+ /+/+$S R0*+H;@Hma$l@ +-0*H"k"&]N]Nu _"l +-L?H?/N +-`Hm/N^ +-$lT +-%m~o"l@ +-2Bi|%3F/+NX +-Hm$lD +-HRN^ +-$lT +-%m&]N]Nu _"l$ +-"#_/N$ +-`$k"l@ +-#R~v2BiBi/+ NX +-$l@ +-"k"$lL +-0H$S$&]N]Nu _"l( +-LH/N( +-`$S "lD +-2~z$l@ +-4Bj|5F/+NX +-&]N]Nu _"l, +-"#_/N, +-`~{$l@ +-4BjBj/NX +-&]N]Nu _"l0 +-"/N0 +-`~|$l@ +-4BjBj/+ NX +-$lL +-0H"k"$lP +-0H$k$$lP +-0*H$S$&]N]Nu _"l4 +-LH/N4 +-`~}$l@ +-4`~~$l@ +-4`~$l@ +-4$k"l@ +-#RBiBi/+NX +-$l@ +-"S"&]N]Nu _"l8 +-LH/N8 +-` _"l8 +-LH/N8 +-` _"l8 +-LH/N8 +-`p$l@ +-4BjBj/+NX +-$lL +-0H"S"&]N]Nu _"l< +-"#_/N< +-`VQ_EXTND.CODE.ATAB.INIT.NAME D$VQ_EXTND  D$VQ_COLORD$VQL_ATTRIBUTESD$VQM_ATTRIBUTESD$VQF_ATTRIBUTESD$VQT_ATTRIBUTES D$VQT_EXTENT D$VQT_WIDTH D$VQT_NAMED$VQ_CELLARRAY  D$VQIN_MODE D$VQT_FONT_INFO VDI_CONTROL VDI_INTIN VDI_PTSIN VDI_INTOUT\ VDI_PTSOUTVDIPARM.ATABS.NAMESVQ_EXTNDVQ_COLOR4VQL_ATTRIBUTESVQM_ATTRIBUTES VQF_ATTRIBUTESlVQT_ATTRIBUTES VQT_EXTENT VQT_WIDTHVQT_NAMEN VQ_CELLARRAY" VQIN_MODEt VQT_FONT_INFO0 + + + + + + + + + + + + + + + + + +VDIN +IADDRN +Hm$l4 +-HRNN +-$lD +-%mHm"l8 +-HQNN +-$lD +-%mHm/NN +-$lD +-%m Hm"SHiZNN +-$lD +-%mHm"l0 +-HQNN +-$lD +-$"k $l4 +-4~f$l0 +-4Bj|5F/+NH +-Hm$l< +-HRNN +-$lD +-%m Hm"l@ +-HQNN +-$lD +-%m&]N]Nu _"l +-LH/N +-`$k "l4 +-2$k 3@~$l0 +-4Bj|5F/+ NH +-$l< +-"S23j3j&]N]Nu _"l +-LH/N +-`Hm/NN +-$lD +-%m ~#"l0 +-2BiBi/+NH +-Hm$l< +-HRNN +-$lD +-%m "l@ +-$S5Q&]N]Nu _"l +-"#_/N +-`Hm/NN +-$lD +-%m ~$"l0 +-2BiBi/+NH +-Hm$l< +-HRNN +-$lD +-%m "l@ +-$S5i&]N]Nu _"l +-"#_/N +-`Hm/NN +-$lD +-%m ~%"l0 +-2BiBi/+NH +-Hm$l< +-HRNN +-$lD +-%m &]N]Nu _"l +-"#_/N +-`Hm/NN +-$lD +-%m Hm"SHi NN +-$lD +-%m~&"l0 +-2BiBi/+NH +-Hm$l< +-HRNN +-$lD +-%m Hm"l@ +-HQNN +-$lD +-%m&]N]Nu _"l +-"#_/N +-`p$k R0*H'@ ~7G R0*HH+@oApH@//$k R/0+2+@"_ASAANAp//ApH@B-//ApNNf0+HS'@ `00+HS/Ap@H&$l4 +-58RkSnnHm/NN +-$lD +-%m~t"l0 +-2Bi + 3@/+NH +-Hm$l@ +-HRNN +-$lD +-%m&]N]Nu _"l +-LH/N +-`$k Rp@H"l4 +-2~u$l0 +-4Bj|5F/+NH +-$l@ +-0H"k"0*H$k$$l@ +-0*H$S$$l< +-0H$k$&]N]Nu _"l +-L?H?/N +-`|$k "l4 +-2$l0 +-4Bj~5G/+NH +-~7G| +F$S R/0+2+@"_ASAAHH@//>+H"l< +-01x@ApNRkSn$l< +-0H"k "&]N]Nu _"l +-LH/N +-`XHm/+NN +-$lD +-%mHm/NN +-$lD +-%m ~"l0 +-2|3FBi$k 3@$k 3@/+NH +-$l0 +-0*H"k "0*H$k$$l0 +-0*H$k$Hm$l8 +-HRNN +-$lD +-%mHm"l< +-HQNN +-$lD +-%m &]N]Nu _"l$ +-LH/N$ +-`.$k "l4 +-2~s$l0 +-4Bj|5F/+NH +-$l< +-0H"S"&]N]Nu _"l( +-LH/N( +-`$l0 +-4BjBj/+NH +-$k RpH@//"l< +-0@ApN"k QpH@//$l< +-0*@ApN"l@ +-0H$k$$k45i5i 5i5i$S45i5i &]N]Nu _"l, +-L?H?/N, +-`DVDIESC.CODE.ATAB.INIT.NAMED$VDIESC D$VQ_CHCELLS  D$V_EXIT_CUR D$V_ENTER_CUR D$V_CURUP D$V_CURDOWN D$V_CURRIGHT D$V_CURLEFT D$V_CURHOMED$V_EEOSD$V_EEOLD$VS_CURADDRESS  D$V_CURTEXTD$V_RVON D$V_RVOFFD$VQ_CURADDRESS D$VQ_TABSTATUS D$V_HARDCOPY D$V_DSPCUR  D$V_RMCUR D$V_FORM_ADVD$V_OUTPUT_WINDOWD$V_CLEAR_DISP_LIST D$VS_PALETTE D$V_META_EXTENTSD$V_WRITE_META D$VM_FILENAME  VDI_CONTROL VDI_INTIN VDI_PTSIN VDI_INTOUT\ VDI_PTSOUTVDIPARM.ATABS.NAMESVDIESC& VQ_CHCELLSd V_EXIT_CUR V_ENTER_CURV_CURUP V_CURDOWN V_CURRIGHT& V_CURLEFTL V_CURHOMErV_EEOSV_EEOL VS_CURADDRESS V_CURTEXTV_RVON.V_RVOFFT VQ_CURADDRESS VQ_TABSTATUS V_HARDCOPYV_DSPCURHV_RMCURp V_FORM_ADVV_OUTPUT_WINDOWV_CLEAR_DISP_LIST$ VS_PALETTExV_META_EXTENTS V_WRITE_META VM_FILENAME0 + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + +VDIN +IADDRN +~$ll +-4BjBj"k 5@ /N +-&]N]Nu _"l +-"#_/N +-`Hz>/+a$lx +-0H"k"0*H$S$&]N]Nu _"l +-LH/N +-`Hz/a&]N]Nu _"l +-"/N +-`Hz /az&]N]Nu _"l +-"/N +-`Hz /aT&]N]Nu _"l +-"/N +-`Hz /a.&]N]Nu _"l +-"/N +-`Hz /a&]N]Nu _"l +-"/N +-`Hz /a&]N]Nu _"l +-"/N +-`Hz /a&]N]Nu _"l +-"/N +-`Hz /a&]N]Nu _"l$ +-"/N$ +-` Hz /ap&]N]Nu _"l( +-"/N( +-` $k "lp +-2$S 3@~$ll +-4Bj|5Fz 5E /+N +-&]N]Nu _"l, +-LH/N, +-`$S R0*H'@~7G R0*HH+@oApH@//$S R/0+ 2+ @"_ASAANAp//ApH@B-//ApNNf0+ HS'@`00+ HS/Ap@H&$lp +-58Rk Snp~$ll +-4Bj +5@| 5F /+N +-&]N]Nu _"l0 +-"#_/N0 +-` Hz /a&]N]Nu _"l4 +-"/N4 +-` Hz /a&]N]Nu _"l8 +-"/N8 +-`Hz@/+a$lx +-0H"k"0*H$S$&]N]Nu _"l< +-LH/N< +-`Hz2/an$lx +-0H"k"&]N]Nu _"l@ +-"#_/N@ +-`Hz /a6&]N]Nu _"lD +-"/ND +-`$k "lt +-2$S 3@~$ll +-4|5FBjz5E /+N +-&]N]Nu _"lH +-LH/NH +-`Hz /a&]N]Nu _"lL +-"/NL +-`Hz /a&]N]Nu _"lP +-"/NP +-`Hm/N +-$l +-%m~"ll +-2|3FBiz3E /+N +-Hm$lt +-HRN +-$l +-%m&]N]Nu _"lT +-"#_/NT +-`Hz /a &]N]Nu _"lX +-"/NX +-`~$ll +-4Bj|5Fz<5E "S $lp +-4/+N +-$lx +-0H"k"&]N]Nu _"l\ +-LH/N\ +-`$k "lt +-2$k 3@$k 3@$S 3@~$ll +-4|5FBjzb5E /+N +-&]N]Nu _"l` +-LH/N` +-`Hm/+N +-$l +-%mHm/N +-$l +-%m~"ll +-2$k 3@$k 3@|c3F /+N +-Hm$lp +-HRN +-$l +-%mHm"lt +-HQN +-$l +-%m&]N]Nu _"ld +-LH/Nd +-`^~7G$S R0*HH+@oXA pH@//$S R/0+2+@"_ASAAN0+HS/A p@H&$lp +-58RkSn~$ll +-4Bj5k|d5F /+N +-&]N]Nu _"lh +-"#_/Nh +-`TF77VDI .CODE.ATABVDIPARM.ATABSVDI+ps", +- A P"o$1B NB.NuD07M.D07M.DPCHKH@C"Q& gdcLNuL)_HpNL/,NuD06M.D06M.DLRCFXm҂lNuSnNuAlNuN/D04MG.D04MG.DSLIN.DENT .DEXITr _;XN _/ P*OؿeJ;X0fN;@0 @+ g @+ gUN+ N+ 0 @&Ig @&lgUN0&tN&INQ*_pN` _BN]NH01M.H01M.FINIO.HINIP.HINIF _B0/H4&l*lNa -+*Oaaa/aB .ML|Nu+_J@gLS@  Vg@S+H  WJ@jB@`SR@";A"Ha+O "m0-a+O mNp` _2XA>RWE`QN ,f l (, @p aJ -+fP*Cpa< -+f"UUApaB`:$B` HBJBf:HBd"H@gJ@f*H@&HBHBHCJCfЃe` JfJkJgDNup`W04M.W04M.WMODU4.WMOD.WDIV.WDIVU JAgHi"NuQ`&JAoHH@J@lANupNBNup `H@NuPJAgH@B@H@JfNuB02M.B02M.BMOD..BMODU@.BDIVU.BDIVHHHg@ @g4HNuP@Ag(HHJfH@NuHHoH@J@lANuQ`p `pNpNuM40MG.M40MGA000A001A002 A003A004A005A006$A007*A0080A0096A00A<A00BBA00CHA00DNA00ETar`Ral`Laf`Fa``@aZ`:aT`4aN`.aH`(aB`"a< `a6 `a0 `a* ` a$ `a/ o0H!_ L| o NH>//$,o0LNuM45MG.M45MGBIOS o0<? QNM _L"NM46MG.M46MGXBIOS o0< ? QNN _L"NM44M.M44M.TIMETIME` -+M24M.M24MIADDRC o"o" _PNM25M.M25MLENGTH o0( PS@ VR@H o _PNM26M.M26MIPEEK1IPEEK2IPEEK4 o PHH` o P0H` o P  o _PNM27M.M27MPOKE4 POKE1POKE2 o"o"Q` o"o"Q2` o"o"Q" _PNM28M.M28MCPEEK o0( P"o"QS@Q _PNM29M.M29MCPOKE o0( P"o"QS@Q _PNM13M.M13M.DATEDATE` -+M18MG.M18MG.DATE?<*NAT _"_"""_"""_"t "NM19MG.M19MG.TIME?<,NAT _"_B"_"?""_"?""_"t "NM21MG.M21MGSYS o0<? QNA _L"NM20M.M20MAFFIRM _"_/2)4VBB O"Q0`Q"ON2RAA _"_"NM17M.M17MIADDR"_  _ NM12M.M12M.RANDRANDOM"_ _/ o)@a -+"_ _/ NM11M.M11M.SEEDD.RAND&,BB"ցՀցՀHA0HЁj)@N/5@N`(g lC82agN?*aH -+5_&,Nla8 -+a4 -+g( lC;r a\g lC"r aLf g" lCra.gB lCr afg+fA -+ Np`A -+Npft`VgX l oJ7@*+g n4Ap -+ Np` n A\ -+ Np g lCjrafg,aA8a0 -+Jf`V lCMraVff/ faB`.aR`$ laNda&g lXXa~YNdpѬNfNP,Nu lanN| laNu lXaXa? laL_V@N|p(N lap,Na lXap)NaNu/pa. -+ _,faxNu0@@a -+ @m @l|(Bl$D@^@@*B,'p `|(9|$|*|'p@)Nu _C r?QN _C,r3QN/,( g, g& g& g2 fXa -+`(p ?NX`an -+`,),*?,$a\ -+`aV -+Nu k g (f` "H gS (fe S`NuE16M.E16M.RRCON.ECLDI.ERFSC.ERAF.EELDI.ERFR.ERFC`p)H9@N0B,B,NdNg B,*atf <Hz`<Hz a -+` ACaXaNgACXaFYNdJ,g$ lJ,gX` ag)HJ,f NfzNP,Nu|HpaB -+L,f. ,(e( ,(b N/Ng. g@a -+N Nu ,(fPa -+`p ?NNu _B`|Hla -+,a -+g paN`NuJ,g ?NB,Nu|, (f&N g@Hla -+,N`` ``B,?<N`N N`N Ng g@HlaF -+, )g fN`Na( -+g ?< NNNuE13M.E13M.EWAF.EWFSC.EWFA)X9PN0NdNg2 l2,SAH@NgNNL`LQ` pa -+Nd ,(g p#?N`a -+NfNPE11M.E11M.EWAST.EWAF.EWFILL.EWFSC.EWFI2.EWFI1.EWFI4p`p`p)H9@N0NdNg|&p N`*pa -+Nd ,(g ,(fa -+` p?N`a NfNP l lngHH`0` fJ,&fp BA,)aj -+`J[ jDA NxA 0< JVJ@jB@R@?@.J/ f,+gR@?@ BA,)@la -+`r?AB@,&oo?@ol a -+`RBo2/op a -+J/ f ,+g p+`p-N2/op0a -+ W2/SA0H@NLQNuE10M.E10M.ECLDI.ERFSC.ERAF.EELDI.ERFI2.ERFI1.ERFI4p`p`p)H9@N0|NdNg<HzTa -+`*pa -+Nd ,(g ,(fa -+`>pa`6aHNdJ,g* l ," lng ti` ti0` Nf~NPra`N|NfB`L gaJrQa^gP ,g Jg graz,+gaN`Jfra`JgD)AN Nu +fNrNu -fNrNuQv0e  bPa2i҃i/N"`@JNura`J,g ?N|Nu$i҂iNu|,arafra,ab -+g raN`JgD)ANuT25M.T25M.RBC.RCA.RCB.COS .COSH.SIN .SINH.CNVLP.RAC.EXP.CCOSa -+ANANa -+a -+Na -+a -+ NANa -+N\Na -+ANa -+ N\` -+T24M.T24M.RBC.RCA.RCB.COS .COSH.SIN .SINH.CNVLP.RAC.EXP.CSINa -+ANa -+ANa -+Na -+a -+ NANa -+N\a -+ANa -+ N\` -+C12M.C12M.CPUSH.CMUL.CLOG.CPOP.CZERO.CLD.CEXP.CEXPCa -+A a -+J,fJ,ga -+a -+a -+ _PNa -+ _P/J,npZNp` -+C07M.C07M.CCMPM .CCMPAa _PNNlgNu/Nt _XNlALOG10.ALOG10.LN.LOG10>[Nxa -+ANLDATAN2.DATAN2.DATAN.DATAN2@ !TD-?!TD-NAN4..,J,fJ,fpZNpNx0,Ȑlm @7o AN`$,QAN`NNa -+JjANJlNNuDPROD.DPROD.DPROD.P oN"_ o/N o N _ QNa"_&gRAJgHNRPX" H@4HC@H@@AHAA [HAXVA⸐ր !NBBXBBNDMOD.DMOD.DINT".DNINT.DMODTNP?@.B9@.q[ÁN@??!TD-?!TD-?!TD-N+PNANPNAJg.Jm/N _N`0P/N _N` \pANpNx/N _NJlD,NuDTAN.DTAN.DTAN,Ał>P?_0mȃ?"ҮKN<,jD,ANm_NANPN,/NDNANPA NNANANPN@N,,ApNl_ANPQNNxap>tvxaf4od HAa\?G~!YaRްGaH?ANNxa2.$a(?l;aM N ANPAN`."_AP/ /!/!NPNNuTOpANpNx_B/PN<,jD,ANkANkANlrNANPQNANPAvNANPA`NANPANANAlNANPAVNN ABNNANPNJlD,NuNt`Rla -+A,NA$N\A$NRl`TAN.TAN.TANNx,jD,/>$cZEK]=NN\"N///<=L[N N\/N\NU/Ng /<NA/N/<@IN\NA/N/<wzN N\NN//N\N///<6.[N\/NN\/<*NN\N\NjD,NuT05M.T05M.ARCTNNxC Qm/0Nl4N/RoX??qqBQ?@?o8 N)A`PJ*g",a l a$)ASlRlJ*gSla\` Nu$҂t҂NuBlr2, A la9Aa(agJ*gDlNu, fNg`",+fa`p00e btNutNuE09M.E09M.EFMT.ESUNRW.ESCNF.EINITL.ERESF.EWAST<.EWAF`.ETWFH.EIWF .EWFILLD.EWFSCl.EPRNTp`pa -+,a -+NdBk7|$Ng7|Q$NNda -+NNPN0NdNfpa NdNNPa -+,(g eg  g6  gp  gNN`Jf,+gaP -+`?<N`x"l 2,VRSA 'g?N2Q?<N`NSA 'gS)I 9AV`r"l R2,VSAt,)BeʕlVSB?N4Q)I `@Jg:TNuNup*BA,)?ANSonNuBA,)f2, lSAp llH@NLQNuE08M.E08M.EFMT.ESUNRW.ESCNF.EINITL.ERESF.ETRF@.EIRF.ERFSC`.ERAFpa -+,a -+NdBkNNda -++g+p)@|N NPN0NdNfpaNdNPa -+,(g eg  g  g"?<NTNuJg`Jf,+g a` -+N `?<`r,)glg eNSAf2,`r,)"l4,NgSBSAf` QNuE07M.E07M.ESUTEn.EINIT.FJVXFFF.EIUTE(.ESUNRW.FJVXFFU.FJVXFVFx.ESUNFP0.FJVIFd.FJVXFVU.EINITL.EIFCAF.ESUNAU.ELUFL:r)A@H tA)H|)lB,BN&,Nua,fa8g&RNuJjr`r2`r3?NNu l )@Nuak nrNurEEjWJAj" Nuak nag&R Nug4afag&Ra`^,g,g @fz`. @fp`$f lEGa8NlAnNpa<` lE ,fE&Ra$+g?< NNu J0<BQ5@Nu$'J4)JNu lA'H A&'l)KNuNNlNNXN"l Y0  V (ga8a&)Hx9@T)H 9@VB,9|XBlZNu0,Zg 9@\r0,h`rA lx)H 9lTVlV,+NuNR$OSlXgENZNu l 0,V|(ahfvB*9|X,+gaaHg2<aaa:f*aa,+aJ*faf ,+falJ*gBA*aT|(+`,(  g  g ga+)H 9@V`F+`SR@Nu46gRQNutCC.NuQQBA*t0e&  b PBi06Ci*Ci&Ci"Aia`JfJ*ft5BNu4<`JfPa`|' *.fa^BA,)jmj*Nuaj`|Nu+ ,g8 :g /g )g,+frNu| (`| (` a`a+BNuJ*f 9j$,N+NuC**a|Nua<aNua+|(9jXaaJ*gazNuB,)Nuar<ax5| *.fajBA,)jmj&Nuav`<aFaNu<`<a4a* Efa"a<j'Nu<`,+ga Nu+A(9jXaa aNu2</??N0 _NuR, ,e a|aBA,AC\3 Af9jZCh$x3NuC*aCaNuaa+Nu+a| (NuaaaVNua| (Nua`+Nua| (Nua,F+Nu| (aaaNuP2*a`4aaNua4 Ng Zg|Nu+`+,+Nua Pg Sga+`+`a Lg4 RghazaTk*nSA"k 'I4+*A7BaaR`a*"k4+Ak*o"k 4+*'I7Ba(`daa,2*NuQaaa `F"k4+AlJ*g,f'I7BaNuaNuaDj* Pg pg|NuJ@gS@  gANur)`J*gaNu2<`BA, Al|(NuAC\CSQn S,+NuCh21 lx0,TANu ,(Nu,g2+$kko7ANu joa,j)NuaXa.J*fanNuJ*faNuJjf |5|Nud)/*-<'J(V:b\nHTXS^P"B,IVFEDGLA&F07MG.F07MG.FSTATI/Ng @g`Np`p&NuPLINITG.ENTRY.CSTART.NAME.INIT.LWT.ATAB.EXTRA.INOUT .CEND.DSLIN.DENT.DEXIT.MAIN.FINDPRL.INITE.ATABE.HGMENVP.INITS.NAMES.ATABSN-++--++- -+$-+ (+-,Prospero2.108 <>Execution error: bad command pgm not openednot executableload failure wrong version out of memory init. failure no parent pgm stdio failure memory shrink linking order  -+-+:Bgp NNuG.k +f <,kagNAXJNu// ab/?<ANA\"_ _JNuNuNuv`vaB?/?<=NAPJm @pNua(Bg/?<ANA>`&```R``$B`F`4`+`n`*`!l`>`#`$`<``Z`` `` 2`#Z``,`(`,J`|```"`'`-"`"6`` n``!`&f`,*` ``2`~``` ```'&`&T``*`` `!`#`'``J`6`F`T` T`+L`+:`"``6`2```R```D`` ` D` `F`(``"l` >``` ``0`D`+t`+`B``` :```"` ```,B`)`#`*`'D`'`!`f`!``&` `,8```2`,`<`b``'N`)F`<` `$`&` `"`)`*``&`(V``&`@`` `^`~`&``````'`!``D`%p`N` L`(F`*`(`)```2`"```"```` `$`)``!`* `D`` h`B```r`(n`` ``%`p`p`~``b````!`&@```>``v``` D````b`H`~````&R`:`)p`)``)`)`)`$``)` `%"```(`(`)`)`````z```````(l`v`z` ```N```````"``H> N<)OMN.l l(f. _Skg + g2+ Hӫ`NuC.+`C++HC!WJ@k"_1N 0"N I0<5B`QA0<1|Q#N#k #k#k(I)|<A)HA)H)J)KNu,* N .nNu m PNgۘY` mTݘ]`ACfpX"҈"QCfaNu0,*PA` A`A0)_Hzb?pNs`p`p"l Q`p`p"l i)W/?2,,g Ag"tALC!QRl,0 _@2)H.Nup`aj)K.L Nu,2 fa`0 fa g / &l.+g+fa"N&_Sl,gA4C.rQNu"_ _/ / "HBXS@HaL&l.+fRQQ&_Nu _/Jg g ?paF0A `A `LTrueFalseJ@fpap"_?< O/ a$ _XNJ@f0/Aa _B0RNаPor aS@`T`aQNu _aNH瀀 l.AaLNu&a'Cfa*axL NuN N N N $N (N dN +fL`$fa$L`aLH 'zNupNNNuNupaBNu +jaNu k"k&4+*agaf `Nu k"k&4+*af R, +0,lR0Nu +'@,aga f Nu0na`'@,raf Nugah +0maNa`R,aXNuNug a> +aNu`fga& +0lat` +Ra`a+g'k0`Nu kB2+*Daf S,aaNu2< ` 2<`2< )_H L _?//a Jg `` Wg$ W g> pa v7_NL L lNA8p``)_H L0^@/7/7a ZJfpa 0aL L lPNA0C8rag _2RANAp`a`H0&l.`a,a\a`:a`H0&l.`aaN`a`aa +`a`aa+f `padp`a`aat| N| N`a\` H0&l.`ana k&`a@aa"+fa``ba a| N| N`@A."_)WH0&PN l` lX` _)W"o.H0&Qa fN _`L Nu+ g` +g+fNu+fjN +gd+ g@ g gNu@`+g + g| | Nu+gNu+gp`Nu+fp`Nup`p`+gaDJkfaN k'HSkNu"k T4+$YBkg kaf Nu'k T0+$Y@7@+wNuSkba kX'HNu k"k T'I4+$YBafR7A"kSA  Wf "k 2Nu0 @g @f 0|< a""kB0+  Tk` @fBazJfBk`"k7|``+gJ+f@+f6?| N| N0` l+af~Nu +??<>NAXJkNu`daL+g +f`B2+*ӫ&kfaNu+f"k 4+$k ka@f`aNNug, k"+ &$D+f B0+ap"k a k"k 4+$ag @fJAf 2+$7ANuB2+*ӫ&kba'k &Nu+g?aN0`a` k+g+fS'H`'HSkf(+f"k 4+$k kaNf `aNNu+gR0Nug, k"+ $D+f B0+ap"k aaNu k"k 4+$ag @fJAf 2+$'k 7ANuSkba+g| Nu kX'HNua^ k+g*+f"B2+*$DafL"k&anf@`n4+*"k&aZf,NNu'k &`'k 7k$+wNu k+afNu ka afAaaNuJ fp0+$Hk a+f k*g'k &Nu+f~aaA8+gJ+g(+f afg @frA8a\fh`(`*BkaNg" @fNA8p`.a>f>N'Hah+g kaNuC0`Cj` C(`C>+fNNu kBNu+f"A k*gA&0+$k*bAa(Nu+f+fa`gkA8p`Nu+g+g +fS?a:0+f&g kaNJf+fA8aHNu'zNuN k,'H X'H7|NuJg"+g:+f| af|a^Nu k,// <a _ fB,B0NuJkf k g @a kX'HSkNuNuNu+gaJkf k P faaX k'HSkNuY/ <a _B|J,f'H,`"k0"'H0Nu$%'-@{}~!#_` ./JA $OBjS@k|T  VgpSrK g  g~ ,gx /gr :f< jg" jf\HW0<2a\LfFB@`HSrPaLf0RjS@[j` J* gp.J"R2$j JNup` RT0*J* f @f (:gaa,J* fa`J@f` @m (:fTUNuRS@NuJ@gj Bo .fRoan onN`F \f on>a`Jof4.?@r\a?Ag W0/S@aR0/o` W0/ Nu`>.?@r.a?Ag W0/S@ra R0/ora` W0/raNua fB@Nu`J@g4An0`"rZa.g$ 0e 9cCt Wf QB@NuR`pNu Ae߲d ae  erNurNu?S@kWfWD@`p2TNu o g &l" gg&k`4fB _PNaaL o'H4 /g n @ga`aX`a,p`p` gf TfpNupNuaa`NuAa7|$7|*A'H& NuAza7|$7|*A'H& Nu7@$7@*AdapNuN7|NuafNuAnp`aPp` @NuNNNNNNNNNN\NNNNNhNNNNNTFCA chain corruptedH$C82 "ARPa".$$$L$Nu kr alfr adNuYCatf /r2+*a'@0p0+*a"XJNuA&'l)KNu ,g&@$k4/+pN fNu/ <YHWa2&_&Nu K0<MBXQ'zNuNC 0<"QNuC :"""" "NuC ""XX""Nu g / <arNu gA"g"Af pNuA"fpNu _2FA0<aQN WXN WXNu$jD&gjD"Ba& jDNupO`pJapNu @&HCJCf $B@H@60H@"B4È0H@Nu4RBHC€H@B@H@H&4HAHA҂cS`NuPL/ a _"_"QNNq` _"_/" JjD&gljDan& kD NuJn pa@pNu"@JjD/aF& kD$Jl҂ Nu$jD&jDoA$HBHBJBfЂeBAJf $kJjDNupOapNu$a"_" jDNP _"_ N _ Q BN$a"_" lBiN/ /J,f.p a$BNuaLA,a,ja _PNAaVk`ZAaHj`L/aB$HB06HC$46$HC0H@$6gRAA\od`a `HB`N @ilJog$"C ։ՀgRAVASofJAk AlA!!1 oap _\"_Na` Aa..AJfNuCJg 0Y@0HAC" $>&HA,HBHFBЁ݂HF"BAHAH@B@ހ݁a Bރ݁ IC&a ևӆ"",.J,jD,`^/a _a` a Aa`a` Aa..AJf pZa bN LCJg0P@0H,. "NHF:HG<HGAʀ0HA00HA00B@04<HB4BF6A,("HF HB*҅Bх.҇хHAHBH@܄хH@FHABFHFц2HAB@H@( 6HBBCHCփւa B(֐ӄL0C`a`L/H`aD,`D,a`D,L/H`aJ,fNuAJg l0,2Pm@g0 @8l VaBAC,,k щщ`jD,PD@`D@ @8lAa`AJg 0@m @l0"B ҂!NuAJg X"B !Nua Aa aA/a*a NuArJgnjDD0 B` a ~ /a`AJgH2X$gF&YrPAgWJf>JAg 㸐ԀA0k Xl NupXa ` ܓ $gB`Rf`"$a !Nug$BNu&໖ԃNuC`C$ "/`C`C "H@f Jf###Nu$vB##BT@J3NuC` QA/C&!$!2!Bրd RgRAJfJgCX B!AQAHB!NuP oaf"_N oa _PQNP oaF"_ o //N o az _ QN026Ac6SCm VfANu&2 _/SAm 4Ao@d 0p aNug4X"H@A`QNu0Nu"o6J@gDS@o on86@m224o 2` SIQA 6"o`00Q`p aV"WO 6RCNaB/20JAg AmvSAH@ VLg RCRHQv  W.BNaXH`aP//206Ac6SCm VfA _._NО?@Bo oTJjD-RoSo. /AaԸA0< JVSJ@jB@"WJog$0RoSoQ o0 _PN//p aXX`&42/JBofAnbHk^@SBAo04a&R@B4UOA"HRAgRB4R@dS@/ Q"_` QRI.I?/Nu0<TOa/Nua"20<QJAgbQ Ao2a2Q0V@/ a"_>2<0S@m RAQ0S@"Bt RARBQ2VA QRI.I/Nu&B2AlaD0QJj/Nu&2Ala(Ag 4RR@RAHIAH Oax"OQ/NuH/p a& "/4V@VAA0"H2RA1!Q?W"O/L._Nu"_B0"RAN & O2VA"OB4VBԉ/Nua/" Important parts of the syntax are: character-string characters between apostrophes ('String') integer-constant a constant with an integer value (123, -1, 'c') qualifier naming a source file ('LOGFILE':), subroutine or function (XSUB:, IFUNC:) variable a variable of the program under test (i, ia(1, j)) value number, boolean, enumerated, char, set or string constant, or variable value (12, 17.3E2, true, v) break-watch-specifier source line or range, variable, variable with condition, or nothing at all. These are defined on the next screen. Definitions of syntactic terms used in the commands: break-watch-specifier = [ qualifier ] < [lines] | variable [op value]> qualifier = file-name : | routine-name : value = variable | constant lines = integer-constant [ .. integer-constant] line-count = integer-constant constant = integer-constant | real-constant | double-precision-constant | complex-constant | character-string variable = identifier | identifier ( value { , value } ) op = = | <> | < | >= | > | <= routine-name = identifier file-name = character-string character-string = ' { character } ' The form of identifiers, and the various number constants is as in Fortran. ASSIGN [qualifier] variable = value The value of the given variable is changed as specified. The variable identified is that which would be referred to by the name when used at the current (or given) point in the source program. Array variables may only be altered element by element. examples A count=3 A size(I, 3)=25.3 BREAK [break-watch-specifier] | - | ? break-watch-specifier = [qualifier] <[lines]|variable [op value]> The executing program will be interrupted each time the specified event occurs. The qualifier identifies a source file or subroutine/function. Execution is interrupted at given source line(s), on changes in a given variable, or on a variable being greater, equal or less than a given value. The break is added to existing breaks, any one of which will cause interruption of execution. "B -" removes, and "B ?" lists all current breaks. With "B" alone, a break occurs on all source lines. Specifying just a start line number gives a single line. Where a subroutine is specified, execution of any source line in the subroutine causes a break. examples B ReadItem: B size<=0 CALLS The nest of active subroutine or function calls leading to the current execution point is displayed, starting with the currently active source line and working outwards to the main program. The names of the active routines are displayed. Their variables can be inspected by using these names as qualifiers to the display command. example C DISPLAY [ qualifier ] [ variable ] If a variable is named, the current value of the variable is displayed. Whole arrays may be displayed in this way. Where only a qualifier is given, parameters and local variables of the routine are named and displayed. Where only a source file is given, variables of the main program in that file are displayed. Where no parameter is given, parameters and variables of the currently active subroutine, function or program are named and displayed. Pressing RETURN curtails display of an array; any other key terminates all display and returns to the PROBE command prompt. examples DISPLAY ReadItem: D SORT:a(176) ECHO The subsequent console dialogue with PROBE will also be copied to the disk file PROBE.LOG. If logging is already on, it will be switched off. example: ECHO E GO [break-watch-specifier] break-watch-specifier = [qualifier] <[lines]|variable [op value]> Execution of the subject program is resumed, with current Watch and Break conditions active. A break-watch specifier may be given, in which case this is added to the list of active break conditions, but will not remain active when execution of the program is next suspended. example GO g 20 G ilim>0 HELP [ Assign | Break | Calls | Display | Echo | Go | Help | Key | List | Output | Profile | Quit | Route | Step | Trace | View | Watch | X ] Information regarding the specified command is given, or if no command is specified, a general description of Probe facilities is displayed. Commands about which information is requested may be abbreviated when used as parameters to HELP, in the same way as when using the commands themselves. examples HELP H W HELP BREAK KEY Probe's facility to interrupt a running program by striking a key is switched on or off (reversing its current setting). A message is displayed confirming its new setting. The command is only useful when the program under test itself tests the keyboard. Unless Probe's use of keyboard interrupts is disabled, it is not possible to exercise the keyboard checking in the program under test. example K LIST [ qualifier ] [ lines ] The specified source lines are displayed. If no source file is specified then the source file for the current execution point is assumed. If no source line is specified, then lines in the vicinity of the current program execution point are displayed. Subsequent list commands without parameters will display lines following on from the preceding list command. If the qualifier gives a subroutine name, it must be currently in execution. The source file containing the subroutine will be listed. example L L moveto:15..30 OUTPUT (to alternate screens) The OUTPUT command has no parameters, and is used to enable or disable screen switching between Probe output and user output. If switching was disabled (the default on startup) then it will be enabled, and the user program's display area will be cleared to a GEM type background. If it was enabled it will be turned off, and user and probe output will be interleaved on the same screen area. This option is particularly useful for debugging GEM type applications, but also may be useful for debugging text output. example O PROFILE The profiling option is switched on/off. A message displays the new setting (ON or OFF). A 'profile' of a program shows how frequently each line is executed. When profiling is selected, execution counts of all source lines are maintained. When a LIST command is subsequently executed, the execution counts are displayed on screen in addition to the line numbers. The ECHO command can be used to retain a copy of the counts for analysis or printing. example PROFILE QUIT Object program and Probe execution are terminated. This command must be entered in full in order to take effect; abbreviations will be rejected. Only the ECHO file (if any) will be closed. Any files of the program under test will not be closed. Information still buffered in the runtime library will not have been written to disc. example QUIT ROUTE The most recently executed few source lines are displayed. There are no parameters. The lines are displayed in the order in which their execution started. Lines containing a subroutine or function call may still be in course of execution if the function has not yet returned. These lines will also appear in a CALLS command display. example ROUTE STEP [ line-count ] The object program's execution is resumed for the specified number of lines. If no line-count is specified, a single line is executed. Note that only lines on which an executable statement starts are counted. These are marked in the source listing by an asterisk following the line number. S 5 TRACE The object program's execution is resumed for the next source line. If a debugging program such as SID is active, it is first entered at the start of the object code for the current source line. The debugger's single step command can then be used to step through the object program instructions. If the debugger's 'GO' command (or equivalent) is used, Probe will interrupt the program under test at the end of the current source line. In order to use this facility, use a Probe command such as X SID TEST.PRG, then use the G command to re-enter Probe immediately prior to execution of the first source line. Note that if this command is used when no debugger is present, it may cause a crash (9 Atari bombs). example T VIEW If the screen switching to separate Probe output from program output is in use (see the OUTPUT command), the VIEW command will allow the contents of the test program's screen to be inspected. Press any key to return to Probe. example V WATCH [break-watch-specifier] | - | ? break-watch-specifier = [qualifier] <[lines]|variable [op value])> When the given condition holds during program execution, source line, (and variable value) are displayed. When the source text is not available, only the source file name, subroutine name and line number are displayed. Subroutine and file name are suppressed if they have not changed since the previous displayed values. Several watch and break requests can be active at the same time. In this case, the overall display will reflect the combination of all the current requests. examples W W dosort:120..150 W a(I)<=34.2E9 X The argument of the X command is the name of a program to be executed. If this is a Prospero program compiled with the N option, (or itself executes such a program) and no other program is being tested, then execution will be halted and control passed to Probe immediately before execution of the first source statement. However it is also possible (memory permitting) to execute any other .PRG file, such as the Workbench or even another copy of Probe. It is not possible for one copy of Probe to be used to debug two user programs at once. Any text supplied after the filename is passed to the program as a parameter suitable for use by the GETCOM subroutine. examples X F-BENCH X PROBE ANOTHER x sid myprog.prg PLEND.CEND.INIT.ATAB.CEND.INITE.ATABE. g .. g PROFOR ERR gPROFOR1 OVL gPROFOR2 OVL g>PROLINK OVL &gUXREF OVL +g/:PROBE PRG /g>001Name too long 002No path: statement can never be executed 003Illegal STOP/PAUSE string 005Procedure call: varying number of arguments 006Type already specified 007DO loop has zero iteration count 008COMMON: character and non-character items mixed 009EQUIVALENCE: character and non-character items mixed 010DATA: non-character item with character constant 011Array declared with more than 7 dimensions 012IMPLICIT: same letter specified again 013Continuation line: first 5 columns not blank 014Underscore not allowed 098Undeclared variable 099Prospero Fortran extension to ANSI Standard 100Non-Fortran source character encountered 101Statement type recognized but mis-spelt 102Invalid character in label field 103Logical constant mis-spelt 104ASSIGN statement: 'TO' mis-spelt 105Unlabelled FORMAT statement 106Missing digit(s) in format descriptor 107Improper zero in format descriptor 108Unsigned number required 109Illegal descriptor after scale factor 110Repeat specification not allowed 111FORMAT: parenthesis nesting depth exceeds 7 112Attempted EQUIVALENCE of items in COMMON 114Item recurs in EQUIVALENCE group 115Continuation line illegally positioned 119Illegal "*" type 122IMPLICIT: range of letters not sensible 125Range error 130More than one main program encountered 201Item declared in COMMON more than once 202Common-block/procedure name clash 203DATA: item is in COMMON 204DATA: item is not in named COMMON 205Illegal program or ENTRY name 206Nested DOs with same control variable 207Illegal type of DO loop control variable 208Illegal type of DO expression 211DO increment must be non-zero 212Bracketed i/o list has no implied DO 213Statement not permitted as DO terminator 214DO-loop unterminated at END statement 215DATA/EQUIVALENCE: subscript count wrong 217EQUIVALENCE group only has one element 218Integer constant outside INTEGER*1 range 219Integer constant outside INTEGER*2 range 220Integer constant outside INTEGER*4 range 221Floating-point constant out of range 222Illegal type with // operator 223Illegal type mixture with COMPLEX 224COMPLEX expression in arithmetic IF 225COMPLEX operand in relational expression 226Statement label referenced but undefined 227Statement label already defined 228Statement label was not on FORMAT statement 229Statement label was not on executable statement 230Statement label was on specification statement 231Statement label and statement type are inconsistent 232Type of variable must be INTEGER*4 233Type of variable must be LOGICAL*4 234Variable or array-element expected 235Illegal use of logical type 236Illegal use of arithmetic type 237Adjustable dimension is not integer type 238Statement function: duplicate dummy argument name 239Statement function call: wrong number of arguments 240Control-list item illegal in this context 241OPEN, READ etc: control-list item specified twice 242OPEN etc: invalid character constant 243CHARACTER expression expected 244External procedure reference invalid 245Illegal argument type for intrinsic function 246Illegal occurrence of unsubscripted array name 247Illegal occurrence of Hollerith constant 248Variable or array has unknown type 249Character constant has zero length 250Character constant expression longer than 1327 characters 251Character expression longer than 32767 characters 253Block IF: missing ENDIF 255Arithmetic expression expected 256Constant expression expected 257Error in specification of intrinsic function 258Integer-type expression required here 259Illegal constant substring expression 260Substring not permitted here 261Illegal use of CHARACTER*(*) 262ENTRY: dummy argument has already been referenced 263ENTRY has wrong type 264RETURN not allowed in main program 265CALL: name previously used as function 266Function name previously used as subroutine 267Alternate return specifier only allowed for subroutines 268Attempt to access assumed-size dimension 269ENTRY name has already been referenced 270Illegally positioned ENTRY statement 272Too many COMMON blocks 273Alignment error 300Character expected but not found 301Invalid operator beginning with '.' 302Operator not preceded by an operand 303DATA: implied DO variable expected 304DATA: invalid repeat count 305DATA: error in constants list 306DATA: too few constants in list 307DATA: too many constants in list 308Logical IF: illegal dependent statement 309Block IF: ENDIF/ELSE has no matching IF 310Block IF: nesting depth exceeds 16 311DO statement: label already defined 312DO-type statement does not start with DO 313Illegal expression type with relational operator 314Arithmetic expression expected 316Logical expression expected 318Exponent expected, beginning with D or E 319Bad exponent in floating-point constant 320Error in COMPLEX constant 321Character constant longer than 255 characters 322Character constant not terminated 323Array declarator: invalid array name 324Adjustable/assumed-size declarator: array is not dummy 325Array element: too few subscripts 326Array element: too many subscripts 327Array element not allowed here 328Function call not allowed here 329Function call: missing '(' 331Improper dummy argument name 332Variable name missing 333Variable/array/procedure name missing 334Non-dummy variable/array name required 335Improper name for statement function 336Unidentifiable statement type 337Statement type not allowed in BLOCK DATA 338Statement incorrectly terminated 339Statement type out of sequence 341Expression incorrectly terminated 342Statement label expected 343Statement label has more than 5 digits 344CALL: invalid subroutine name 345Illegal actual argument 346Illegal character in format specifier 347Missing '(' in format specifier 348Missing ')' in format specifier 349In nH (Hollerith) descriptor, n not in range 1 thru 255 351Unit specifier missing or incorrect 352Format specifier missing or incorrect 353OPEN, READ etc: control-list keyword expected 354READ etc: incorrect DO-implied list 355READ: illegal item in i/o list 358IMPLICIT: INTEGER etc. expected 359IMPLICIT: letter expected but not found 361INCLUDE: filename invalid or not found 362Too deep nesting of source file INCLUDE statements 369Duplicate SUBROUTINE/FUNCTION/ENTRY name 370Code for program unit exceeds 32K bytes 380INTEGER*4 range exceeded 400Compiler internal error 402End-of-file encountered on source input 403Compiler stack size insufficient 404Compiler workfile contents invalid 405Compiler workspace insufficient 406Disk/DOS error during compilation `@N^DDD bDProspero2.10 Execution error: bad command pgm not openednot executableload failure wrong version out of memory init. failure no parent pgm stdio failure memory shrink linking order  :Bgp NNuG.k +f <,kag-H3x'@;@|AFm -:-HЅx Є+@` -:-HЅx0+@RmS-d'm J$l.A "lF"$l6A #@$l:A #@ $l>A #@$lBA #@$k J j>#h&]N]N N&]N]NuN;k0-km 0+HS;@0-H~;ЇrBN@ n7k `-HS@H&7s8 &]N]NuN$m BJ 2gD+k .B-$m0*k f"m "~G` - 2f~G`+RJ-g&]N]N Na*~/N&]N]NuN~ $UGLCLAMNF$]N]NuNN~ pNTA NpNN$Ua2- HCAd$HB`QQCLAlrH0`Q~G!$]N]N RNU+ &l+ '+ $0- @]DJg J+ 'g0- @,m p |N`B0+ R7@ 0- @mB0+ R7@ B+ 0+ @f0- @l$k JANAp NNApPNANNJgHkBANNHkpNHkpNHkpNHkN@H Jg:NHkNHmpPNk-~Hn"| -HH/X-HR@@`+5| WD+5z0WDJgxD `TxD ~G ~G@-HH/3x| gB-R-S-dB- Jg~ ?aR&]N]NuNJ+ g$$l"*HH+@JoHkHjHmN$l"B*&]N]NuNB+ $ Jgp _D - ~_DJgB'N - Nz`b|N+m < _D - _DJgB'N`~N-Nz-Nz-Nz-Nz&]N]N NJ+ gJ 2g+k .B-B-+mNTHkN$m0*H@B@H@/pN~ pNTNj-|*fzE` J-gz+ENTHkN-pNTpNTN* o&NTHkNApHN*HS@NNNHkNN - 2fzE`"m+QJ-g$B 2&]N]NuNB+ $ Jg|a0+ k c:B0+ RB>+ f <Nz`<Nz0+ H@B@H@/a7k  J+ g"- fHmaJg ~*$mG- Nz&]N]N N-a\/- a&]N]N N-a>B+ $ Jg- Nt&]N]N N-/-a/- aL&]N]N N0+HR7@$m 4&]N]N N~V0- H/ab&]N]N N/-a$m?a~0- H/a6B+ $ Jg0p2- @m&;A;@>-H$m2xNzRmSmd&]N]N NBkBkBkBkBk&]N]NuNNTHkNN/C$_AN NXN0+HR7@&]N]NuN0+m oVHk0-HNHkN/0- HD$_5@HkN/0+HSD$_5@HkNLHk0+HN&]N]N NB+ $ Jg;m -Nz-Nz&]N]N N+m ?-a?-a&]N]N NC A /-a/-a&]N]N N~r- @H/a&]N]N NB-Jo <$m "@o~G` -D$m "@l~GJ-g ?<a` -В$&]N]N N$mBJgB - jD/ - jD"<@N"@n -"- N$`?<a&]N]N N$m Jf ?<ad` -"N$&]N]N NA NNpA2N o?<a*$mB`A NN$m$&]N]N ONA NNA2N(m a,$mB`A NNT$mAN&]N]N G3NANNNANNNHmNANNTav$m $&]N]N NANNNANNNHmNANPNTa($m $&]N]N NANNN$m ANNNA~$m4`T~$m4`J~$m4`@~$m4`6~$m4`,~$m4`"` S@r N&]N]N N$m CAN+m -D/Hma -R$m$&]N]N N~+GJ gp+m $m* fZ+j JgN$mJ*WDJ*WDJg$Hm/-Hm/-a`/-al+m`B$m+R`$m$&]N]N NHmHm/- aZ/-Hm$m ?*al0-H/a$m$&]N]N N$mB0+m fC ANWD&]N]N N+ ~Yf2J+ )g,|b?aN~ pNTANpNNB+ )&]N]NuN+- gm ?<,a>&]N]N N0+HR7@k $B+ $<H/0+H/ap2+@m(A@B-3xNzR-S-dm $J+ gNHkNANpNN$m 4&]N]N N+m$m BJg^$m $"m+i$mCANd "m+i`.0kg "m+i`CANf`` "m+i`$m$&]N]N Np _D - ~_DJg |$m4`6 < _D - _DJg |$m4`|$m4&]N]N N0- @\D0- ~ G_D$m&]N]N N0- @\D0- @_D$m&]N]N N0- @\D0- @_D$m&]N]N NJm ]D0- ~ GWD$m&]N]N NHm?- aJ-g ~ $m`|0- aX~$m`j$mB`b~$m`X~$m`N~$m`D~$m`:~$m`0~$m`&~$m`S@r N&]N]N N+k :$mJjf. jB(&5s87jJkf?<a&]N]NuN$k :j7j7j'j+ f C A&N &]N]NuNa~7G| 7F'm 0+HD7@a&]N]N N'm :J :gXax+-WD0+ @_DJg&Jkl0+ @WD0+ @WDJg~;G`~;G+k fJg $m0*kf 0*mf`+R`JfLHmp Nl+m$m$ f5k5k5m'm f7m~7G0+HD7@a$m0*HD;@`Z;kJko 0-HR;@0+ @m 0-HR;@0+ @m 0-HR;@0+ @m 0-HR;@Jkn7k`*0+ @f~7G`0+ @f~7G`~7G$k :5k jCA2RAQ0+HR7@NHkNANpNN;k7m'k0- HD7@+ f7m`0+HRD7@a$k :+j Jg2~ 7GB-B-$mA+H"m f"|F0+HT7@0+HRD7@`CAA+H"maP$mCA`P~G0+HR7@0+HB-ІRD7@`&+|'m`@rNN $mJf7m`0+HB-ЇB-ІRD7@aJ-g $m/*aJ-g $m/*a|$m+R`$k :'R :`&]N]N N+ fHm/+ |Hma`Jg?<a~G+k :$mG|5F 0*zEfx~5DHma0m$m%H`"0* @gk $B+ $?<am $`+ g?<at&]N]NuN0+km7k` 0+HR7@>+Hwsx&]N]NuNB+ B+ J+ *g kB+ *`a+~ g+|!f00+ @o&af0+H_rBNH2+H@~AЇ7@`p0+SD+~9SDJg |F `+|ATD+zZSDJg`p+xaTD+~zSDJgB+DHІ@`>+~_f`2~G ` $Ap NRB+N:f~d?ak&]N]NuN0- HR@-HS@@-HHux _D-|.WD-z\WDJg m ]D-WDJg$mN`$mNB&]N]N FNUJ+ &laa:+~'f~0+HR;@;k0-HR;@>-Hw3x|'WD0-k\DJg>-Hw3xf0-H2-H;@R`?<Ba`?<ia0-R~@Gn;mR<-HwChAN?Jm^D-~ WDJgHm|? N`HmQANp@NajJ-Qf ANApNNApLNCAZ2RAQAZNN@@H Jg-~:gv`INCLUDE=ApNpNHmXNnJmX^DB- Jg8-~\VD@p;|?AXNN@@WJf0-X@V@U`@S@@VmWUJfB-`>B-VY5XfB-`$-V WD-[z:WDJgB-B-VB-EH8-HЄ~LnpAXN?-V@N AZpLNJ-gAZNp\?NAZpLNAZNANNAZpLNAZNN@HmX?-U@N`J-g+ lp+ HR@@ HHrNN&A8v+HN$mNHRBAZNNHRpNC0ANGkMk La~G aVp ||N`?<ja 0-HS7@?<ia&]N]NuNBma0-HR;@>-HxB- A\D+ Jg7m&]N]N Naj- a8&]N]N N0- aHmA NpNa$m&]N]N NBBp~G@aJ+ g6- f ?<Wa ` B+~0G? -r N<HІ+@`` R-S-dJfJ- g?<Va` +k ZJg$m *f``+R`Jf:Hmp Nl+m$m$ ZB*m %mHj a0'm Z`$m*- gJ- g*at- a?<aF`,?<a<`"?<a2`@U@rNN `H- f?<a`4- f?<a` $mm `@S@rN$m$&]N]N NB++aJ~ G`p~G`fad+~*f|F`G|F *B+ F zE`4a2+~/f| F`G|F *B+ F zE`~G`~G`~G`~G`~G`a+~Af|FzNaD~Da<`N+|Ef8zQa&a+~.f|FzE *`+|VfzE` +zGf*aZ+~Ef| F`+|Tfz E`+xLf*a&+~Ef| F`+|TfzE`+~Nf^a+~Ef6a+~.f|FzE *`+|QfzExVaB`+|OfzExTa(`:+~Of~G~Ra` +~Xf~G~Oa~RaJ+f?<-a׀~.a`B+~ f|F`0r N((H))R**++,,*--..\//::4==>&]N]NuN~)aaa\&]N]NuNB+~0G@ +( ]D +( WD- _DJg +(r N-HHІ'@(`< +" l$ +"r N-HHІ'@"0+ HS7@ 0+HR7@J+g 0+HS7@a.B+  JgD&]N]NuN0+HD7@&J@f?<a*Bk(B*&]N]NuN~Ga+~'fa+~'gB-+| WD-Jg ?<BaB-$m $]N]N Na2~GB+|7F&B(arJ+ gB+~0G@`:pA+SD+~FSDJgB+|AFHz Ѕ@`|FJ-m( +( n +(-HHЇ'@(`~GJ-lxJ+g?<a$U*~-f +(D'@(Hm/+(a7m&$]N]NuNB-B+B+BkBk~ Ga+~'fh|FHmaJ-g:0+ @l&AN+~?NA <N`?<Aaf`B+.a+~ fa`+~+WD+|-WDJg+ ,+ %Jg ka``+~.faJ+ g~.G|F *B+ F `+~TWD+|FWDJg-z g?<:aӬ+~Tf-Hx+~_f|Fa&J+ gJ-g~?aמ0-+HAo~?a,+H;@7m`~GB+B-BkBk B"|7F&B(+z.ga+~HfaN-~ VD +( ^DJg?<]aѬp"+(m:;A;@a*+~ f?<Baф>-HxRmSmd +(;@7m~G.a a`+~.fXa J+ g ~Ga`BJ+ g ~G`x`0+~Ef|F`+|Dgz.ExD *D `FB+  Jg6+~Df|F`+|Eg?<>aв~GBmB-apB+  Jg+~-f|F`Z+|+gPJ+WD+zQVDJg?<?aPa+~Vf|F`|F *z.aB+`aB+  Jg?<?a B+0- @ l B+~0G?0-| :HЅ;@`a aB+  JgJ-g 0-HD;@0+H>-HЇ7@J+g+k(J-g +"NDNHmHm?+ NhJ-Nq~7G& -NDANA(NHmHk(?+NhB- Jgar-~-fA(NNA(N`V~7G& -NA(NHmHk(?+NbB- Jga-~-fA(NNA(N`4Jkg?<aΤ-~-f +(D'@(Hm/+(ar7m&+~,WD-+ %Jg+ WD0+& @WDHm?+&a-JgfJ-g60+& @f+k(` +(NN~ 7G&'m('m,a`(0+& @f+k(` +(NN~G``?<@a` J+fa+ f7k&B+ %&]N]NuN/- pNl$m R+H"mB#k :B~3G 3GB)&]N]N NB+m Hm?+a0m+H$m j+h +jJgJg$m+j"m+i -D/Hma۰Hm/-/-a /-Hma۔$m+j -D/HmazHm/- -R/a+m$m+R` ?<a̎` $m+R`^JgJg?<al$m0* ~GgJkl0* HS/Hma+ WD$mJWDJg?<a$m0*~Gf 0+HD5@0*j m0*H2* HRD7@`?<a`?<a$m$&]N]N N$mB0- @o0- @g -Jg~&]N]N NHm/+?-aJ-g +R'@$m$ +Э '@&]N]N NB+ $ JgLHm?- aߞ +2-H'@Hm/+?- aHJ-g +S'@ +䰫l'k&]N]N N+ mBg ~?B+N:gaf+k :$m0*~Gfhk $B+ $a$mBj0* @f?<apHm/+ :aߺJf?<DaV$mHj?*Hm/+ :a&/-am $a0&]N]NuN~G 7k +aB+ 7k& C&A 0Jk lRJ+ g+ ~ g?<aJ f4Hk 0+ HDNl0+ HD"C$k A$HB`QQ`+ f~G Jkl~/+0+H/a`$0+ @n~/+a՞` ~/+aՐ0+ @WD0+ @WDJg~ a``@S@rNxx&]N]NuN?- a~/+a0~Hm?- a-a6~/+a &]N]N N$m J*f$JRl JjfJg/*0*HDNDB&]N]N N~GHm/- aV7m&'m (a4&]N]N N/- aa<&]N]N N~/a0- HD/a~Qa~G 7m &]N]N NHm?+ a m+ a|A +HJk l\;k $mJjf(Hm/*0+ HD?aԢ~W0-H/a`~W0*H/aHk a?-aH`Hm?+ a*J-g$m*@H+@~G` $m+j~-aӠ-aB+ $ Jg -Nz` -?a2`|/-aX`p$mANNTab`Z$mCA/-a$$mCA/-a` `@r Npp`8?<aƄ`.Jk m ~-a``@rN| N ~G &]N]NuN~G|7F7G'm a&]N]N N0+ @o&?+ a~/+aD?+ a~Raќ`?<a&]N]NuN~G0+ @nH` C$l*A 0Jkg2+HCA$HB`QQHmN\0-@J-\D0+~GWDJg6|$k :FBjz}5E-HHrN&"k 18HH%@`J- g?<aa&]N]N N+m $m4k *kk $~G $&]N]N N$m CAN7mm *mm $&]N]N N$m BJklHma~aZ+~:fHma~(G|$m `|F *k+k :ANApN/<Lz?pN^aEHHk ankm'm :aCA2RAQHma~(G-|fz$m &]N]N NHk F0+HTNlAN$k FApNHk :p*Nl+k :"mBBBB Bi~3GB#k FBi|FB $UJf $m $ :`.$j jCANd%k :`%k :"m i :$m %k :$]N]N N+ d`B+ )+ fHm/+ lHmaNJg$m* f?<aHm/+ |Hma"Jg 'm :`Hk |$Ma0++HAo0+@+k :~"mG0+ @f ?<ahBk0+HS7@$m5@Hma<0+H/0-H/a`J+ +g~G`~G+ j-DmBA@Hm-HH& d/38HmaHJg'm :`@S-S-d~G )-HH dHsh$Ma0++HAo0+@aے+ f>+~(f4+ |g*+ m HmaB- Jg B'apaJ&]N]NuNaX+ fa+ d?<Ma&]N]NuNJ+ (g?<4a&]N]NuNJ+ fJk cNNN`Unit ApNp NANpNNANApNCA2RAQHk aJ<0+ H/a̶CA2RAQJ+ g(7kaͦJ+ #g~7G`~ 7G7k aͨ- ~f&aJ+ g?<Qa+ l~G `- + l ?<Sa`- + f+ f?<Sa`+ _D- \DJg|F aC'k+ _D- \DJgxJ+ g- f?<Qa^`PJ+ #g J+ g~w0+H/aˈ~~a`*~a+k RJg$m?* a$m+R`'k'km B+ ( JgJ bf6J+ "g,+ l"+ ~ g+ |gJ- oz?a`+k b$mJ*g?<a~$mGB+  Jg+ |f* f?<a`~$mG`V+ z WD- _DJgJ*g?<a&~$mG`* f?<a~$mG?* a- mB+  Jg<aɆ'k&]N]N NrAF //N$l"B*B*HmNV'mHmNP'm B+ ~G Bk Bk Bk B+|7FBkBk+zYWD@ +WD@ + xNWD@ +WD+ @ + WD@ J+ g~G`~G~GB+ B+ Bk Bk BkBkB fHk .pPNl$k .B'k . 6B 2B |~G'| '|` '| &]N]NuNB+ B+ B+ B+ B+ B+ "~G #B+ *`.MAINCAr0`QBkB >BB'kB+ G jB+ BkBkB ZB RB VB JpA|F@B-Ax+HpI-SD-~NSDJg+ |Yf z$m4`z$m4`|$m4B*R-S-dB lB t~G&]N]NuNNHkNN&]N]Nu*****************************************NNHkNAp)N0+H~ ЇNN&]N]NuN$m CAN NTHkNAp NpN~ pNTN&]N]N N$m CANNTHkNApNpN~ pNTN&]N]N N- ~ l- H|0F@`- H|AFH@NTHkN-pNTN&]N]N N0- H@B@H@aB0- @a&]N]N NNTHkNANpN~ +HH2-HTNTN+m -a4-@?az-@?alNTHkN` (ApNpN/- pN~)pNTN&]N]N & DummyNJ g+m $m/*a$m jCA2RAQNTHkNANpN~ +HH2+HTNTN*a` Constant Hza`` Variable Hza`` Array Hza`` Stmnt funcHzaj`$m0*~}Gf` Intrinsic HzaD`z0*|~Ff` External Hza"`X0* @fF0*z Ef` SubroutineHza`$Jjg` Function Hza`Hza`Hza``@S@rN ":R$m0* @f.NTHkN`C*(*) ApNpNN`FJjl\0*HD/HmpNNTHkN`C*ApNpNANpN~ p2-HNTN`0*a`Log*1Hza<``Log*2Hza(``Log*4Hza``Int*1Hza``Int*2Hza`x`Int*4Hza`d`Real Hza`R`Doub Hza`@`Comp Hza`.` Hza`S@r N:Nbv$m* c* SD0* @_DJgjJjo"NTHkNApNpNN`@Jjf `DataApNpN/*a` j hNpN/*a`@* WD0* @WDJg NTHkNA"pNpNNa$m/*a&]N]N NJ g>+m $m/*a$mJg jNpN/*a a$m/*a&]N]N Nada`aNHkN`* Unit ApNpNANpN` *ApNpNNaRaNHkN`NameApNpN`KindApN+HT@N` Type AreaAp NpN`OffsetApN+HX@NNa/+ laazavNHkN`Sizes:-ApNpNNaH`DataApNpN/+aa&/+ |a`a&]N]NuN+ VD+ VD0+ @WDJg?<Naj&]N]NuNa|+ fa4ap&]N]NuNHma$aHmaN&]N]NuNHma/- ~?pN^a4Hma &]N]N N+ g?<La0+ @g?<aa&]N]NuN$m CAN J-f /-a `/-aNa&]N]N N$m CANJ-fHmHmaz/-a `- fHma`?< a>&]N]N N/- ~?pN^a36a&]N]N N/- ~?pN^a3Hm?+ axB- Jg?<a&]N]N N/- ~?pN^aJ+ g?<a&]N]N N + ]D + ʰ ^DJg?<at~'G &]N]N N+k :Hm/+ :aƤ+mJg /-a`B~G$k :+j Jg,/-aB- Jg~%aB-$m+R`'m :a&]N]NuN0- @f*$U'j :aa~|/a~|a`0- HD/aR$]N]N N~G */-|?pN^alJ+ fP$U0*HD/aJ- g&$U0*H2*H 5@J@m?<a<` + S$U>*HЇ5@a+~Yf|/a$U?*a"~da$]N]N N+k :aJk l(0+ @WD0+ @WDJg~ ah+~(f+ l B+ $?<Ga+ fB$k :+j B-Hm/+ :aT+mJWD@~aHm?+a0m+HJf?<Fa0Jg:J-g /-a`*~aHm/-Hm/-a/-a"+m/<D~?pN^aa+~Yf*$m* gHja$mHja~daT$mHjaJ-g ~$a:`/-a2~a(-HR@@+m$m+R+~,gJg?<EaDJ-gh- o~%a~#a-HS@@`Ba$m0* @f ?<$Ma`Hm?*af0-H/a~a'm :a~G 7k a֐Jk l;k ;k k +~(ftab+~:f |/a2`/<|?pN^B'$Maa2+~)f ?-$Maj`/<@|?pN^z$Maa~Qa`<|/a?-$Ma.- fJ- g'm :a~%a~Qam 7m &]N]N NHmaB-aˎ+~:g*|F */<Lz?pN^a+~g|FHma~(GJ-g^B/<D~?pN^aHmpNl$mB%k Jf"m Q!m`"m"+m+~ga+~(fB- Jg?<aa+~:f$m R|1F `6|F */<z?pN^a/<a$m R/ + "_3@ ap+~)g6|F */<@z?pN^a/<a$m R/ + "_3@a0&]N]N N$m +jJg$m+R/-pND+m`&]N]N NHm?+ aJ-g$Hm?- aòB- Jg?<a`lHm?- aÎJ-g ?<a`PHm?+ aJ-g$Hm?- aB- Jg?<a`Hm?- aJ-g?<at&]N]N N0+ İm g6Hm?- a¨J-g"J+ fA +H0- a$mB0+ @f HmANNTa$m%m`"0+ @f%j` *NAN`0+ ~ Gf$mANNAN`80+ @f$mANNAN`$m *NDAN`*0+ ~ Gf $m%j`B0+ @f$Hm$mANNTa<$m%m`$m *NAN`0+ ~ GfHm$m/*a$m%m`^0+ @f0HmHm$mANNTa/-az$m%m`$0+ @fHm$m/*aT$m%mHm$m/*at0-m o0- @f ?<aj`?<a``_@rN(<$m4 `~Hm?- aJ-a7m &]N]N NHm?+ afJ-gJ+ f?- aa?- a`a&]N]N N~=avC A 0Hm?+ aJ-g&~RaV/<~?pN^a^~Ta:`4/<~?pN^a(?-aP~Hm?-ar-a?-a2&]N]NuN/-~?pN^aHm?+ a|B- Jg?<a Jm g@0+ İm g60- @WDHm?+ al-@H Jg?<a&]N]N N/- ~?pN^a+ f ~Gat` B-Hk a/- ~?pN^a>Hm?+ aPB- Jg?<aPJ-g~Sa&]N]N N~b0-H@B@H@/ah$m 0*H/a$m +R/- pND+m B0-S;@J@f&]N]N NHmaalHmaB-J-gJ+f+~f|Fp+SD+ SDJk\DJgB-`:~G $/-|?pN^a&vHm?+ a<mHk a܊Hma`J-gV+ f a /-~?pN^a~Sa`/-~?pN^a&J+ fa~ 7G ?a`/-~?pN^a%J+ WD@+ WD--Hm?+ a- UD- JgLa܂Hm?+ aJ-g~7G `Hm?+ aJ-g~7G B- Jg?+ a>&]N]N N+ l B+ $?<Ha/- ~?/<@?N"ApNX/- ?/<D?N"ApNX+k :+ WD0+|}FWDJgB- +@z(aJ-~ WD-|/WDJgB/-z?pN^aP;k -~ f0-| Ffz0E`+|gB-`mApNR-HHN4g|nBa\-~;f/-|?pN^B'B'aHm?+ aB- Jg~G~az~,ah/-~?pN^B'B'aHm?+ aB- Jg~G~ a4`/-|?pN^Bga(;k Hm?-aJ-gR~;G`ApNR-HHN4g"-|fzE-zfxD`|F`z0- @f^`aApNR-HHN4g2- f~ G-~=f| F-|>fzE`~G`0- @f`eApNR-HHN4gh/<~?-HHN4g-H|F@-|8fz:E- fz!E-z=fxD-x>f~'G`~G`r0-~ Gf``! ApNR-HHN4g6?<|?-HHN4g-Hz-E@-z=fx6D`|F`|F`A2ApNR-HHN4gN-~/f|za`|Hm?-aX-a~,a/-~?pN^?-a-~/f|zal`|Hm?-a -aR~r-HH/a"` ApNR-HHN4g~7G `X`ApNR-HHN4g~7G `.`ApNR-HHN4g~7G `~ 7G ~|Hm?+ a^-a`,` Ap NR-HHN4gv/-|?pN^aH-~<f |1a`J-|Df zUa`6z,az/-~?pN^ap}-HA@m-aV`/-|?pN^BgaJ;k Hm?-aJ-gh~;G` +, Ap NR-HHN4g2-| fzE-zJfxKD-xPf~QG`|F`0- @fR`  TAp NR-HHN4g"-~Jf|NF-|PfzTE`~G`0- @f``  !Ap NR-HHN4g2-~ f| F-|JfzOE-zPfxUD`~G`>0-~ Gf.`  Ap NR-HHN4g`|F`|FJ-g ?<aB-` ?Ap NR-HHN4g0-~"f|?aV~,a^/-~?pN^?-a^-~Pm6|*a@+~f /-|?pN^?-a,~*a``-|Jm4z)a+~f /-|?pN^?-a~)a``R-a0~,a`B~?a~%a`0~?a~?aӺ``rN ""EE` Ap NR-HHN4g ~;G`` `Ap NR-HHN4g~;G`T`  Ap NR-HHN4g~;G`&J-f~ ;G`-~Ef|;F`|;F?-a7m J-g?<a~G a`BmBmBBa;k~n|/a+~f0+| FgRz;E?-al~/+a+kJml$0- @o ?-aJ`?<ax~ ?ap~aa4+~)g|F *0-HR;@a+~*f|$m0*| Ff`Hmza+mHmpNlJf+m+m$mB"m5i Jg$m$+mB0-R;@`?< a`v|F *ar+ SD+~WDJg+ WDJk]D+.JgVa /<D~?B+N:g2A +@+mHm/-?+a&~W0-H/an`?<a`/-|?pN^zB'a$~a`+ fa0+~}Gf:` ?Ap NR +NFg ?<Ya` |v/+a`D0+|~Ffzu/+a`,0+ @fz/+a~|a`?<Ya^~|a`?<YaH+~,ga `0+| Fg?<Ia$'m :a+ f$0-$k :j g?<a~o/+a6`d$k :0* ~Gf5m `0-j g|?a0+~~Gf|q/+a`$0+ @f|s/+z/a$`?<a0+~ Gf&Jmc||za?-/-a(~ 7G `*|F+ jH@7@'maJml?-a&]N]N N'k J NHk JpNl+k J$m$ NBHja$mHj a$mB &]N]NuN/<~?pN^a0+ @]D0+ @^DJg?<a$]N]NuN;kHm?-am+ fD0+ @\D0+ @_DJg~?a~/+aa`?<a,`?<La" +Y'@'k J NJ Ng&+k N$m * :f?<a$m'R N`+k J$m%k :a?-a~jHm?-a-a~,aPa?-a+~,f@aJ+ f40+ @fArNA Nf?<af`J f?<aV`|/aJ+ gB-?-aJ-g~k$m0* H/ah`DHm$m j?(Hm/*a/-az~/-a6~l$m0* H/a"$m?*a&]N]NuN$k J'R N/+ JpND'k N J&]N]NuN+k J~m$m0*H/a$m?* aJ +X'@a&]N]NuNHm?+ aJ-g&0- k o0+ @f ?<a2`?- a&]N]N N$mCAN Hm?-aZHm?+ aN--JgZJ-fA +H-~'fV$m+j - jD+@CA 00+ @n|%FJl /Hma `v0+ @f%|?Jl/$]N]NuN$UaB+A rN@gkJ+ WDB+ $ Jgj~GC A 0Hma$UaC A 0CA 0HmaJ+ ga¾?-aVJ-ga¬`B-a¢C A 0$Ua:-~f|%F`|&FHm--aJ`$]N]NuNaB-B-J+WD+~ WD+|WDJgzE+WD@a֨$UaJ-gHm?+ aJJ-gJ+ fJ-gA +H0+ a$mANNANANNAN`l$mANNAN`R$mANNAN`8$m *D%@Hm/*a:$m47R `_@rNn`a$J-g~+a` ?<:NB+A rN@gkJ+ WDB+ $ Jgj~GC A 0Hmaì$UabC A 0CA 0HmaòJ+ ga?-aJ-gan`B-adC A 0$Ua-~ f|#F`|$FHm--a `$]N]NuN$Ua+~ fJ+ fZC A 0Hma$UaC A 0CA 0HmaJ-g a~Sa\` a~SaNC A 0$Ua,J-gazHm?-a\Hm?+ aP--Jg0m+H D+@0k +H D+@Э+@J-f /nxHm -Nl"-$mC$mA$HB`QQ -R/"-&C8$k AH$HB`QQHk a -D7@ 7@ 'm Bk ` ?<NHma`8Jm]DJk ]DJg -D o -D7@ `7| ` ?<NR`8$]N]NuNA +H~$m4"U)a$U"mj`$UB* "m@`v$U"mj`f$U*׀*"m@`R$U*׀*@H "m@`4$UB* "m@`@]@rNvN $]N]NuN~$UGa6J+WD+ WDJg~Ga`B-p+SD+ SDJk\DJg`fB+ $ JgXHma$UaHmaJ+ f Hk a0`2+ f(B+A rN@gHm?+ aJ-ga$UaB+A rN@gB*C A 0kHmaj$UaVHmaC A 0CA 0+ WDHm?+ a-Jg ~Sa` J+ ga?-aJ-gaC A 0CA 0+ WDHm?+ a-Jga$UaHm?-aJ-gHm?+ aJ-gfJ-fA +H?-a0+ a$mANANlWDANANlWD@`$mANAN]D@ANANWD@`l$mANANl]D@ANANlWD@`6 -$mİ]D@ -WD@`_@rNf.$MaH`8J+ f?-aat?-a B-]~2Ї@m-a0+ ~ Gf- g- g ?<N,` ?<N `dHm?-aJ-gFHm?+ aJ-g&J-fA +H0-HD;@$m0HD;@2-@Ao;m`;mB-B-p2-ʒ@mz;A;@0-аmn>-H$mrx`~ G0-аmn$m j>-Hpx`~ G-Ӱ-c`"-Ӱ-d~G`RmSmd~GHma\Hk aT$Ma`6+ f ~Sa`aB-]~2Ї@m-a` ?<N` ?<9N~7G J-gHm?+ aXJ-g$J+ fB+ @ ` az~Ca&`HHm?+ aB+  -Jg J+ f + F'@ ` a<~>a` ?<+j Jg2$mHjav$mHjaj$m+R/-pND+m`$m+R/-p*ND+m`t&]N]N NaJ+f +~f$Ua\` ?<MNr`ah+ WD+ WDJgaa$k :+j J+ gBJf ?<Nr8`."m i`.BLANKNApNNf ?<Nr`Jg ?<Nq$UHjaP$UJf%j`"j"%j+~(fHjB- a`8+ VD+~=VDB- Jg ?<NNqv+~g$]N]N N/-~?pN^a|$m $ $]N]N NHmaaLJ+f+~f$Ua`8+ VD+~=VDJg+ faa B'a+~g+ WD+|=WDJgHm $zE +a~$k :G|5F5F +k :B+ +/<z?pN^Hma /<D~?pN^Hma+~,f/<@|?pN^Hma`|+FB+ $ + JgHma+m -D/HmN~/-HmN~Jg/-HmN\` ?<NoJlB$m%m"Jo0Hma~$Ua/-"mHi"N~J -S+@`Hmaa@a`B+ $?</No^B+$]N]NuN$UJg"j'i :N:$U"jJfHm/+ :Nr -$U5@`~5GHm/*a/-HkN}$U5kHm?*NV$U5m5k%k"j%Q/*ab$U/*pND%j` ?<3Nn$]N]NuN+ o ~a`~azk ~G |@;FBB~G jB tB+ ,B'$Ma~/N+~ f|F */+ ta~G jG ,Bm~;Ga&+~f`a+ WDHm?+Nf-J(^D +( _DJg +(;@a` ?<0NmJ+WD+~(WDJg |F %aaX+ g ?<1Nm^Jmf$Ma~Ga"Jk lJmm ~ ?Nr`?-a 0-mg~B0-H/Ny;m;m;m0- @RD0- @WDJg+m0-mUDJVDJg$m'j :JfHm/+ :N+m`~+G - o`xNtHm/-a+m0+ڰmg`RJk l(Hm?+N0m+H 2-Ho;H` 0+mg`B0-R;@$m+R`20-mc;mJk l>0+ HD+@0- @_D - _DJg~G`~G`^Hm?+ NJ-g ?-a$` 7m 7m Hm?+ N0-@ f~G`- f~G0- @f~G`0- @f~ G`~0G~-H-HFH/NwPHm?+ NJ-g+ @H+@`+k -a -Nz` -?Nx`/-Ny`0+ @fA NNTNy` +k /-Nx+k /-Nx`p- f -Nz` -?Nxnp"-Ēm&;A;@B>-$k 2xNzRmSmd`HS@rN6DTbN -~g 0-?Nx -~ f;m`|;FpB2-쒀mp;A;@Jmf$MaZ/-Nw- f 0-Nz`- f ?-Nw0-H/HmNx&B0-S;@RmSmd-~0f@Hm0-H/B0-S/NxV/-HmNwB0-SB2-@;@B0-B2-ꐁ;@J@bHk a*+~gJVDJmVDJg ?<2Nh~/NTB-+~ g(Nj+~ f|F`+|,gzE *J-gm &]N]NuN$m CAN /-a2-H$mCA~$HB`QQ0-H^~ &w8|7FB+ */<z?pN^aHm?+ NpB- Jg ?<Ng&]N]N N +D+@~}/-Ns&]N]NuN~aB+  JgfJ+ #g~zNs$`?+Nt8J+ gBa ~{|Ns?+Nt~zNrJ Rg+k R$m?* Ns<$m0*H/0* H/NsBm$m+jJgB0-R;@$m+R`Jmg~x0-H@B@H@/Nr$m+jJg$$m'j :N/+Np$m+R`J >gPHm$k >?*NTJ-g0+$k >jg ?<NfL`Hm?+N&J-g ?<Nf,J+ gV$mJf~w0+H/NrT`:~w0+H/Nr@NsL~ 7G$m7j0+HD7@NsJ~yB|/NrR$m+jJg$m+j"m) f+i Jg$m* fHja~|Nq$m* ffHja$m* f"/*aa,~$Np~0Np` *S+@Jg/-a~$Np~|NqT$m+R`V$m+R`"~\$m0* H/Nq$m+R/+ RpND'm R`nJ Jg$k J'j ^?<NdaϾ`J+ o ?<Ndt'k Z ^J ^g6$k ^B* Jg ?<NdL$k ^+R/+ ^p ND'm ^`</+Npla\J+ gaJ+ g8;k/+ l~?+N~n/+ l~?+N~\?+?-Nq/+ la|+k |Jg$m%m +R`&]N]NuN~a~(NBmaNaHma$m$ VJmf~G'm V+~(f Hm|a~B0-R;@+~,ga 0- @d ?<Nc$+~,gz&]N]NuN~aaJ- gN`+ f ~a` ?<Nb+~,g&]N]N N$U0*HR5@+ ~f 0+HR7@0*"j Qo ?<\Nb$U>*H"jqx*| f ?<\Nb^$]N]NuN$Ua*~ g*|!f`+ zfVNg~ $U<*H"jh0+H_rBNHr@m(A@$Ua8~ <*H"jhR-S-d`p0$U*SD*~9SDJg|F`6B*pa*SD*|zSDJgB*zaEHxAЄ@$]N]NuN$U0*HS5@+ ~f 0+HS7@$]N]NuN$UBB*$U$RaJ*gH~"UG ) n$B*|0F? )r N:HЅ"U#@`?<N`$UB$U$RB* Jg"UJ)g JfB- Jg ~k?N`` ~j?N`$]N]N N$U*HR@@ o ~o?N`xB-B-$Ua*~+WD*|-WDJg zEaJ*ga~$Ma$U*~PfvB- Jg |j?N`$Ua` Ap NRB*N:VD*JgaX`*~,g*|)g zm?N_`J-g |l?N_J-g@Jf ~k?N_` Ap NR$UB*N:g ~n?N_T` Ap NR$UB*N:g2*~\fNd$Ua*~,g*|)ga`n*a$UjB'$Ma"U)~.f |$Ma`G?<,N^-~Dg-|Fg$U*zEfB'$MaN`B'$MaB"U)~.f |$Ma,`B'$Ma `$UaJ*g aB'$Ma`pB-$Ua~*~'fap*~'g|FJ-gaa`6J-g>$U*~Hf0 - nJo$Ua$ -S+@`` ?<]N]` ~j?N]$Uad`$UaZ*~Lg*|Rga"B'$MaH`$Ua0*~PWD*|SWDJga `$Ua*~NWD*|ZWDJga` ?<ZN](`L$Uaa`@?<ZN]`4r N''((AABBDGHHIIvLLSS|TTRXX` Ap NR$UB*N:ga:`*~,g*|)g ?<ZN\$U*~)f *HS@@$]N]NuNBmB-$Ma-~(g ?<[N\H$Ma-~)g $Ma$Ma"m 2&]N]N N~aJ bf ~i?N[~(NR>+HwAx +@+m0+HS7@;@H2+H@;@/-Hma>~0-H/Ng7mp2-@m";A;@Nz+NzRmSmdNz2&]N]NuNHmpNl$U"j$m$%k :#m$]N]NuN+ ~fXJ JVDJ+ VDJ+ WD+ #Jg ?<NZ~aNHmNqJ >f~ 7G`>B+ #HkNgjHkNg`NANApN~a;k + g ?<NZtHmpNl+m$m$ RB5mHj Nf$mHj Nf+ m$m?* Nf'm R0+~ Ggna+ f0+~Gg ?< NY$Ma` ?<NY+ ~g$k :5k'k : >|(Np``|$k :5F"k >%i+~(fNxb+~)g|F *NxJ+~*f"|F 0+z Eg ?< NYVNx `H|F *Nda$Bg,~?B+N:gJkn ?<NY$Ma` ?<KNY+~,g|N$m+jJgB$m'j :"k :0)~Gf Hi|?+HH/a4~$k :5G$m+R`&]N]NuNNw`J+ g~(No$BmBBHm~N}+mHmpNlJf+m+m$mB"m5i Jg$m$+mB0-R;@+~,gN+~,g|F */<|?pN^aa?-/-aB+ "`~G *J+ g.Hm|N|X+m~\$m0* H/Nc`N+~(f |F *z,E+ faHaaf~|Nc~aNb+~g8|,Nm~(N{Hm~N{+m+~,gNB+ ( @ "@ &&]N]NuNB-B~$m 4Nu+~(fLNu+~*f$m 4|)Nz` |F */<@z?pN^a+k NuH`(J+ g|7F&B(B+NL+k(`|F$m 0~Gf.J^D - _DJg -D4`|FJ-g |w?NV&]N]N NNt+~*f B-$m 0|Ff2/- a+~,VD+ |WDJgzE *`N[Ntf+~1f"$m 0 @l 0HSS4`|F`~+|2f$m 0 @l 0HS4`zE`T+z4f$m 0 @mxD`6+x8f&$m 0 @f 0HR4`0~ Gg~G`~GJ-g ~w?NT`"+ |Yf$m 0 @fz4Nq~G *&]N]N NNsv$m +~AUD+|ZRDJg ?<gNTtNs>&]N]N NB-B-@mJA@B-Ax+H$mJ*g ~ ?NT $m4 ~GR-S-d$]N]N N~aNr+~NfPHm`ONEApNpNNx:J-gNY.~A|ZBgaDNrr`D?<fNS`|F *BmNrR+~CfNr@+~Hf2Hm`ARACTERApNpNNwJ-g~;G`8+|Of.Hm`MPLEXApNpNNwJ-g~ ;G`+|Df:Hm`OUBLEPRECISIONApNpNNw/<~?pN^a^+ VD+ VDJg ?<cNJX/<~?pN^B'B'a`~ NUHm?+ NcJ-gJ+ !g|`|`J+ !gp0+ aJ~|G`^~}G`V~~G`N~yG`F~zG`>~{G`6~G`.|`&|``S@r N`PHm?+ N^0-a"|`4|`,|`$|``S@rNm$U* c"J+ !g-H~ G@` -HZ@@m-NW+~,g6J- g ?<NHJ- gNq$]N]N NB+ !HmNNg+~(f|FzNl+~=gANp*|?Ngx- WD- WDJgVHmNp~G $Ng/<D~?pN^aBHk NhHm?+ N`J-g+~fB-`B-HmNBJ-g Nf- f ?<`NGB-B-~GHmN~Nk+~=fN|Fa>B+ $Hm`UNITApNpNN]J-g $Ma`Hm`FMTApNpNN]lJ-g $Ma@`Hm`FILEApNpNN]-H$k 2x| f S;@`- f-~ fHm`OLDApNp N$Ma`Hm`NEWApNp N$Ma@--Hm`SCRATCHApNp N$Ma-Hm`UNKNOWNApNp N$Ma-@`-z fDHmAp Np N$MaHmApNp N$Ma--@`-xfBHmAbp Np N$MafHmARp Np N$MaL--@`V-~fLHm`NULLApNp N$MaHm`ZEROApNp N$Ma--@`b- fX-~ fNHm`KEEPApNp N$MaHm`DELETEApNp N$Ma--@J-g ?<N@Hk Nw/`(/-~?-@HBg/NLN"ApNX-a8-HR@@+~,g B-/-|?Bgz?N(BgN.f"- fx -f~G`xD`- fx -g~G/-?Bg ?N(BgN.g"~-VDB+ ! JgxD~-g/-??<,?N(BgN.gxDJ-g ?<N<~)NSN[`p~G- WD- WDJg- f|a$Ma`(Bg|?B- N:g$Ma` z(NS(-a- al~pG`~qG`v~rG`l~sG`b~mG`Z~nG`RJ+ !g~tG`~vG`-Hpx`~ G>-H"mxRmSmdHk Nq0$m4Bj%m` ?<N9$mJjfHj/*0-HD?NFC $mA N ` ?<N9+~gNNbP&]N]NuNJ+ #g ?<N9`NX*+~ f|\0+H/NE`B|F */<z?pN^NNq~{|NEr~\0+H/NEBB+ ( @ "@ &&]N]NuN~NwNW+~ gh|F *NW+~/f6Nc+ f ?<LN8~/NO.+~ gNWH`|F *Nw,N+~,g&]N]NuNNW+~ f J- g <NF` <NF`|F *J+ gzN\ap2+@mLA@`ApNR-HHB3xN:f ~?N7` R-S-dN]~GNaT7k&B+.NmfNo~ ?NnzHk Nn`>/<z?pN^B'B'avHm?+ NP2B- Jg ?<N70~ NBJ- g <NE` <NEB+ ( @ &- @ "&]N]N NJ+ g ?<QN6~NuB'k7kNux+ VD0+~GVDJg ?<ON6HmNMN~$k :G|5F NP&;k+k :~;G ++HH'@+@|(NL~G jB t|F +NT+~)g|F *Na.Hm/+ tHk :NMbJfTHm/+ lHk :NMJJg&NO$k :;j0- @f ?<N5`BmNr$k :5m` ?<N5+ g ?<KN5 ++HH'@~$k :5G%@0-HR;@+|,g: +䰫l'kN^$m5m B+ +~G HmNAJ+ gP;k$m5kNBT~ 7G7m +D7@0+HD7@NBL~w0-H/NA?-NA<0-H/0-H/NA.~|$m5G0m%H|y +D/z/NA<N@~G7m|7F'mNj(Jk l*~ N?0+ @o ?+ Nk` ?<N4a:~zN?aFJ+ g.;k/+ t~$m?*NN^$m?*?-NA/+ taz~G |F j&]N]NuN7m HkaݮJ+ fHmNnHm`FUNCTIONApNpNNWJ-ghN^+ fX+~fNN^n+ WDJ+WD+~WDJgHmNn:~NWa`HmNnNq~NqJkg ~?N27k$k :5k+~(faHm?+NKJ-g"+~*f+k :Hma۪$m5m+~,g` Nq6pJg&]N]N N+~Nf:HkvBA4NA0pNNNHkvB <NHkvpN+|YfF$lHjBA4N*<+AXpNNNHjpN+f HjpNJ+ g` CArVf `TMP=ApNpNHmNn`CAr0`QJmg.>-H5x|\gAN z?NAp@NHk~/AN,<*Ahp NNNHk/ <NHk NJ+ g0HkBA4N.<*AxpNNNHkpNJ+ gHk~ /A4N,<*PAhpNNNHk NHk N@7|z7EN=HkBA4N.<*AxpNNNHkpNJ+ g0HkBA4N.<)AxpNNNHkpN&]N]NuNNHSpvNp2@m&A@+HHB3xSxR+S-dHmN-J-g~/NNqaDN5NsB+ &B+ (B+ *B+ )B+ 'B+ $Bk+  f J+ WD+ Jg` ` ?<N/V+  f~s?N/B~G ~7G0+ @f(C0>+HwAxNG0+H~HЇ7@`&C6>+HwAxNA0+H~BЇ7@N5 +  VD0+ @/\DJg7k~ <+HwhBk|.F}HmB'NS6'm b~ G}0+ @g|f?N.j~7GB+ +B+ ,B+ %B+ $7k~G 'B+B+B+B+B+|F NL+~=f*J+f|FJ+gF`NY"`|F`+|'fzE *NY`+z f xD``ApNRB+N:g+x)f+HS@@NLX`h+~(f+HR@@~G`6J+f0+~,fJ+g ~GG`B+ Jg~GB+ JgNX@B+  Jg~G`NKJ+g7kB+ *B+ 'J+gtJ+g~NkHm`DOApNpNNQ,B- Jg ?<8N,NkalHm~NQ0$k J%m j J(g ?<7N,f+~,g|F *Nx~=NBa~G &`NjNE~G+ g+|(fHmNg`mJ+g~NjNBH7kNx|+ f ?<N+`*+ VD+ VDJg ?<MN+B'N{+ f ?<N+N`a`2~NOx0+ @f+~ fJR\hRN `+HApNR+ HHN4g`f``dHm`IF(ApNpNNJ-g0+ ~ Gf ?<N&.+ ~ f ?<RJ-g0Nd|7k~G '|NIB+ '0+ @WD+~ WDJgaHm`THENApNpNN;XJ-gJ+ l8+ ~m ?<6N%+ HR@@ HH& Bs8~G &+ HH& Hs8N1z~]+ HH& 038H/N0``+ ~ f ?<RN$7kHkN10~]0+H/N0~G (`?<PN$XB+ '+~ gNC`B+ "+~ g ?<RN$*Jkg?+N0BkJ bg8J Jg2$k J j ("k bg`V`J+ &g ?<N#a6`N.v`4N.l<N/n$l"J*gB'N`~G `N.@<NzN-DJk c(+ ~NfHkNJ+ gHkNHkNHm~?0+ ?NJ-gN"N!Jk c@NNNT0+ H@B@H@/pNNJk f$NT` WARNINGApNpNN`,NT` COMPILATION ERRORApNpNN0+ @cNT~SpNTNN.<@5@5m< 5m: 5m85m6-4@5@5m25m05m.5m, -$"<NH5@ -$"<N5@"m(A $l$/<N$l"m 2"m20*"m20*"m2"m2 "m 2 0"mH2&]N]N @N$mA "l"$l45m5m5m5m5m /<*N&]N]N N$mA "l"$l45m5m5m /<+N$l"m2&]N]N N$mA "l"$l45m5m5m5m5m 0-5@ - @5@/</N&]N]N N$mA "l"$l4 /<2N$l"m2&]N]N A"l$Qr 4 4 4 4" . <NBNu  _/"H0`QBNu  _/ JfRCBAg!RA`2NuN\N,t`t`t _p/ ld(mx?Ba ldNuD(p@Nup(R@@ mNhNuABS ACOS AIMAG AINT ALOG ALOG10AMAX0 MAMAX1 NAMIN0 SAMIN1 TAMOD ANINT ASIN ATAN ATAN2 CABS 0CCOS 4CEXP 5CHAR ECLOG 6CMPLX /CONJG 1COS COSH CSIN 3CSQRT 2DABS DACOS *DASIN )DATAN DATAN2+DBLE CDCOS DCOSH -DDIM %DEXP DIM DINT #DLOG DLOG10'DMAX1 ODMIN1 UDMOD !DNINT &DPROD "DSIGN $DSIN DSINH ,DSQRT DTAN (DTANH .EXP FLOAT AIABS ICHAR DIDIM IDINT 9IDNINT:IFIX 7INDEX ;INT ?ISIGN LEN MAX JMAX0 KMAX1 LMIN PMIN0 QMIN1 RMOD NINT 8REAL @SIGN SIN SINH SNGL BSQRT TAN TANH ASSIBACKBLOCCALLCHARCLOSCOMMCOMPCONTDATADIME"DOUB*ELSEENDF8ENDI>ENTRBEQUIFEXTEPFORMVFUNCZGOTOIMPL`INCLfINQUlINTErINTRxLOGIOPENPARAPAUSPRINPROGREADREALRETUREWISAVESTOPSUBRWRITGNSPACEKDATAACTEREONLEXINUENSION LEPRECISIONILEFYVALENCERNALATTIONICITUDEIREGERINSICCALMETERTRAMRNNDOUTINEEtvpT"lr`EFtvp'"lnr(AH*, . JV"FegRE2`SE8 Adz"_ _0NA`A "_ _ N lC 0/a"o2g`Q _$N _;XN _/ P*OؿeJ;X0fN;@0 @+ g @+ gUN+ N+ 0 @&Ig @&lgUN0&tN&INQ*_pN` _BN]N _B0/H4&l*lNa8&HdBg"O@H`  Q?"CNN|2RA`0N|2JAlp Np"_HdBgHd? `/ Q?Na I `a I03 Q _#NA26RCK"HNu`N^ffffProspero2.10 Execution error: bad command pgm not openednot executableload failure wrong version out of memory init. failure no parent pgm stdio failure memory shrink linking order  4ގ:Bgp NNuG.k +f <,kag-H3x'@;@|AFm -:-HЅx Є+@` -:-HЅx0+@RmS-d'm$lA "l"$lA #@$lA #@ $lA #@$lA #@$k j>#h&]N] _NNU+ &l&]N]NuNUn+ &lJ+fNNN` LINE ERRORApNpNNNNB+0- @lZ$kANAp NNApPNANN|Jg&Hk|BANNHk|pN~GBk~G$lj0H/HmpPN0- H/HmpN0- @l p0~?ANNApN`CAt2RAQNT$lj0H/pNXANp NNJ+g0+m mHk|pNBkNHk|NHmpN-aP~jB'N~"|N~jB'N`@U@rN``@rNjB- x&]N] _NNU+ &lm &]N] _NNU+ &l- d~$lB-h`&Bg ~?B-Ng?<a~$lm-a~@|N-- az`- -c0$lRB~"|N$l~B-h- f~@|N` ~@|N`\~@|N-- a`B~@|N`4?<a>`*@rNHdd&]N] _NNU+ &l-al~$l|Fz@Hm- a-NB-B3x&]N] _NNU+ &l~$l|F- dz"lB- H`z"lmz@Hm- a4-NB-r N~&88&]N] _NNU+ &l- -g- d~$lB-sh`~$l|Fm- d~"lB- h`~"lm ~@|NB- r N/B-r N&8C8&8A8r Q&]N] _NNU+ &l'kBm0-H~cЇ2- H@o4$k+RJfHma$k$'m0-H~cЇ;@`0- H2-H@0- ko7m &]N] _NNU+ &l?- ad+HH$kAx+H"l&aN$l^"m"`X$m "l^5@7j(`@$m "l^>*Hǰg?<aT$m7j(`HS@rNN~$mG"l& f?- N p~ G@-aR-S-d&]N] _NNU+ &l?- a+HH$kAx+H"m'Q +2)H'@"i&&]N] _NNU+ &l0- HT@HmHHNlC $mA2RAQHmp Nl+m +"m2Bi#m#k'm&]N] _"NNU+ &l'kJg$k0m f` `'j`Jf ?<a`$k jC$lfA2RAQ&]N] _NNU+ &l&]N]NuNU+ $k'j+k$m'j "J"g"k"7QJ*f *7@` *7@$]N]NuNU+ &l$l&aX+k$m4J*f 0k%H`0k%H+ka$m%k`2ad`,$lZ "kЩ$aN`HS@rNN&]N]NuNU+ &l +7@| +7@~ +?a +$k5@&]N]NuNU+ &lHk"pNl$k"B+k"mJ f#k" `"+i $mJg+j`$m%k"&]N]NuNU+ &lHmp Nl$m5k|4~B+k"mJf#m`"+i$mJg+j`$m%m&]N]NuNU+ &l$l& f "k"2`"k"'i"J"g"k"7Q&]N]NuNU+ &l~?N?+N?-0N?-.N0- @H?Np-m$A@-HH5x NR-S-d-HHJgB'N~?N&]N] _&NNU+ &l$lRBA4NAp Np:~?ANN@@Jg Hm?HNp\~?ANN@@Jg Hm?HNJ-f?+BgANp Na&]N]NuNU+ &l+ f;k`;k|$l& o.?-a($k?*"lR D?$lfANp Na~&]N]NuNU+ &l'k&*J*g$k*0m f`'j *`&]N] _NNU+ &l +?aJ*fPHk*pNl+k* +$m4BjBjH?a$k"m#ja$m%k& Bj'k*&&]N]NuNU+ &l +?aHJ*g$k*Jjg?*a0J*f ?<a@`$k*"m2"m 2&]N] _NNU+ &l+k Jg $m* f+jJg$m?*a$k+j+m"m+iJghJg8$m?*a$k j/"m$_ANf?<qa$m+j`$m+jBJg$m* f+j`+k&Jg0$m j/"m$_ANf $m"m3R$m+j `$m+j`$m+j`B+0+k&Jgj$mJjfT~G0+j+j Jg<$mJjf&Jjf j/"m$_ANf $m"m3R$m+j `$m+j `&]N]NuNU+ &l'kJg$k0m f`'j `&]N] _NNU+ &lHkpNl+k +$m4 +?a$k"m#jaD$mBBj B +kJf'k`"+k$mJ g+j `$m%k &]N]NuNU+ &l +?a*Jf ?<a` +$ko%k&]N]NuNU+ &lJm f$k"m2`*?- aJf?<aF$mBR` $k"m2 &]N] _NNU+ &l~;G;| - a+|IABS`F;|`<~R;G`2;|`(+|SQRT`+|SIN `+|COS `+|EXP `+|LN `+|ARCT;|N `~;G`~!;G`+|AIMA;|G `~3;G`;|`~s;G`;|`+|LOG1;|0 `z+|TAN `n+|ASIN`b+|ACOS`V+|ATAN;|2 `D+|SINH`8+|COSH`,+|TANH` +|QSQR;|T `+|DSIN`+|DCOS`+|DEXP`+|DLN `+|DATA;|N `;|`+|DMOD`+|DPRO;|D `+|DINT`;|`+|DDIM`+|DNIN;|T `p+|DLOG;|10`^+|DTAN`R+|DASI;|N `@+|DACO;|S `.+|DATA;|N2`+|DSIN;|H ` +|DCOS;|H `+|DTAN;|H `+|CMPL;|X `+|CABS`+|CONJ;|G `+|CSQR;|T `+|CSIN`+|CCOS`+|CEXP`+|CLOG`t;|`j~};G``~2;G`V~ ;G`L+|INDE;|X `:+|LEN `.~f;G`$+|EOPE;|N `+|EINQ;|R `+|EPRN;|T `+|EB `+|EE `+|ER `+|ECLO;|S `+|EIRF`+|EIWF`+|EIRU`+|EIWU`~{;G`~+|ERFI;|1 `l+|ERFI;|2 `Z+|ERFI;|4 `H+|ERFL;|1 `6+|ERFL;|2 `$+|ERFL;|4 `+|ERFR`+|ERFD`+|ERFC`+|ERFA`+|EWFI;|1 `+|EWFI;|2 `+|EWFI;|4 `+|EWFL;|1 `+|EWFL;|2 `+|EWFL;|4 `v+|EWFR`j+|EWFD`^+|EWFC`R+|EWFA`F+|ERU1`:+|ERU2`.+|ERU4`"+|ERU8`+|ERUA` +|EWU1`+|EWU2`+|EWU4`+|EWU8`+|EWUA`+|ETRF`+|ETWF`+|ETRU`+|ETWU`+|STOP`+|STOP;|S `+|PAUS;|E `n+|PAUS;|S `\?<a `P@S@"<N$0JVbt~$6HZlx.@R^jv .:FR^p*6BNZfr~0-~Gf$+m;mC$lfAr0`Q`7mz&]N] _NNU+ &l~;G;| - aBm`+|HINI;|F `~p;G`~;G`;|`+|DSLI;|N `+|DENT`+|DEXI;|T `+|GCGT`;|`z~ ;G`p;|`f~;G`\~&;G`R;|`H~ ;G`>~T;G`4;|`*~J;G` +|DLRC;|F `~i;G`~u;G`~";G`+|BDIV`+|WDIV`~d;G`~F;G`+|LEXP`~B;G`;|`~l;G`;|`;|`~C;G`|;|`r~ ;G`h~;G`^~~;G`T;|`J~ ;G`@~m;G`6~;G`,;|`";|`;|`~S;G`;|`~j;G`;|`;|`;|`~6;G`;|`;|`+|REXP;|I `+|REXP;|R `;|`~;;G`|;|`r~n;G`h;|`^~o;G`T~D;G`J;|`@;|`6~U;G`,~q;G`"~v;G`;|`;|`~';G`~ ;G`;|`~;G`;|`~G;G`;|`~H;G`~;G`~r;G`~;G`~w;G`~`;G`~);G`x;|`n~#;G`d;|`Z~9;G`P+|QEXP;|I `>+|QEXP;|Q `,;|`"~W;G`~x;G`~a;G`~I;G`+|CLD `+|CST `+|CPUS;|H `+|CDUP`+|CPAR;|M `+|CPOP`+|CADD`+|CADD;|M `+|CSUB`|+|CSUB;|M `j+|CSUB;|R `X+|CSBR;|M `F+|CCMP`:+|CCMP;|M `(+|CMUL`+|CMUL;|M ` +|CDIV`+|CDIV;|M `+|CDIV;|R `+|CDVR;|M `+|CNEG`+|CRL `+|CRLA`+|CRLT`+|CEXP;|I `+|CEXP;|C `t?<a`h@S@"<N`hz$.8JT^ht",6@JT^hr|",6@JT^hr|,6@JT^jv0H2x| f HR?pN`p.z?ANNAp N&]N]NuNU+ &lJ-g~$l|F5m `~ $l5m ~=B'Na8~aݐJ-g&~ a݂p~G@-anR-S-d&]N] _NNU+ &lB- A.rNVD~B- b?3haFAHpN- @HBg/NNAHpN&]N] _NNU+ &l`ApNB- NWD@B- ArNVD-B- "?3xaA pN- @HBg/NNA pN&]N] _NNU+ &lm B-b03xHT;@B-A.rNgb~|a~ $l0-HY%@|aܢ~|N~$l|F5mzxN~|a`N~ $l5m|"lzEx@~N~ $l|%Fz"lxD~gNAHpN-@HBg/NNAHpN&]N] _NNU+ &l~$l|Fz=B'N-N- NB'aD~a<&]N] _NNU+ &l-+f ~ $m `Zp ~G@B-r N&8A8+H$m f*-f "m `S-S-d~$m &]N] _NNU+ &l-Hmah-~g-- a`-HR@+H@m*A@-Hma(-~g` R-S-d~$lm- aڒ-HS@-HDA@m(A@~@|N$lm S-S-dB- r N&8A8+H~$mm|F.&]N] _NNU+ &l~ $lHm?-a$l5m~"lm |@zNB- r N&8A8+H~$m5m&]N] _NNU+ &l$mCArQ"m ArQ--f-ap -WD$m`t -WD$m`` -WD--WD$m`< -WD0-mWD$m`@rN N`"mB&]N] _ NNU+ &l$mCArQp~G@B-r N&8A8+H$m f HmHmHjaJ-g $m `R-S-d~$m &]N] _NNU+ J gF~$l"Ui| $lJ l - D%@zN`%m z xN$]N] _NNU+ +mm $U*~f - ]D - ^DJg m`p|F@B-r N&8A8+H$m f2+j -~xЇ"-@l -"-@o "Um`-Hǰf|$m"m `` H;@R-S-d&]N] _NNU+ &l$m CAr#Q"mBJ-WD- UDJgJ^D -~ ]D&]N] _NNU+ &l~$lB*B'a4&]N]NuNU+ &l$l:JgTJ- g~G|F` ~G|F"lFJg -a`"~$l|5F-zN~a&]N] _NNU+ $l2Jg- av$Uj $]N] _NNU+ &l- SD- TDJgR-~a- a&~ea `4<a`*~ea <a`@]@rNN`-aB'- ad`- a$~$Ma6`.~$Ma*`"B'- a8`@rN`- a$~$Ma`.~$Ma`"B'- a`@rNj`b- aL~|a~B'a`J~|a~|a`0~$Ma|`$~$Map``@rN`- a,~7a^~- ab`4`2<a`(<a`@r N`- a<~9a ~- a`D~gad`:`8~|a~|a`@r NNN`>- d<a~- a`@r N,p t&]N] _NNU+ &l+m$mJ*fa- aP$m `h$m *NAN~%m`H$m *NDAN~%m%m `"@r NN`^- f($mANNAN~%m%m `*`(~Z?a`@r N<<<<<&]N] _NNU+ &l+m $m* fax$m*aʆ`~Pa`~qa`~<a~`rB'~aV~|aJ`Z$mB*R~a2$m*~a"`2`0@rN""""N$mB*`R* f$* fJ*g*~aɾ$mB** fJ* g* ~aɚ$mB* &]N] _NNU+ &l+m $m* f?<~?BNgB-`|fzE`zEaj-$maz`~Sa6`~~ta*`r<a `h~|aJB'~a@`P-~a2B-R~a `0@rN"""""N~$mGm`n* f&B* JgB'~aȺ~$mG B* * f4* f*B* Jg~|a~~$mG|F&]N] _NNU+ &l+kJg.Hm$mHjaJ-g$mHja` $m+R`&]N]NuNU+ &laJ+ gHmHkaJ-gHka&]N]NuNU+ &laJ+ gHmHkaXJ-gHka&]N]NuNU+ &l$l~ f ?<aF`nB- f*- WD@B- JgD- d?<a~$lm |>B'NB- r N~&88&]N] _NNU+ &l$m B"lFJgv$l*~ f< f|$m $lBj`  fJjm0* @]D$m `**| f  fJjl0*zE\D$m &]N] _NNU+ &l+m $ma.~$m|5F`:`8$m0*HX5@`&?<a`@W@rN&]N] _NNU+ &l?<~?B-NgX$l| f ?<a`BJ+g?<a- fB-`HmamB- Jg~a-a $l~ f /*B'a`-B'- a` J-g~ $l0*a`~Na`J-g~$l0*a`~oa`<a`~a$lHRa~B'aV`$l~ fB|a`r~|za&``~B'|a$lHRa*~|za`6?<a>`,@rN>dp&]N] _NNU+ &l$l~ f?<a?<~?B- NgTJ+g?<a$lC$lA 0- fB-`HmamB- Jg~a` |$lB*- a~@|N`~@|N`~@|N`J-g~$l0*a`~Oa0`J-g~$l0*a`~pa `<a`~a$lHRa~a`~$l|Fz@xN`d~@|N~$lG"lHQaZ~@|N`6?<ar`,@rN ,Rx&]N] _NNU+ &l$mCAr#Q- ~g&- aHmHmadJ-g Hm- a&]N] _NNU+ &lHm/-aB- Jga$+m?<~?$mBNgB-`|fzE`zE-|fF` /-Hmav-~f\?<|?$mBNVDJ*WDJg /-aJ`/-"lHQa/--a$m- a@`"--a- d -- a~$mG|Fm&]N] _NNU+ &l$m R- d~G* d/- -a`*B* Jg/- a- f B'~a&]N] _NNU+ &l$m* d /-aJ`B* Jg/-a$m- a- d$m e B*~ax$m &]N] _NNU+ &lHka+k/<~?B+Ng Hk+a&]N]NuNU+ $l^+RHk"lHQa~@Hm+a>-N?<~?B+Ngp$lHRa $lHRa$l WD~ WDJg"l^ 2*H@5@+| fz@xN` z@xNHkaJ~$UG$]N]NuNU+ J f*$UC$lA 0~"Hm+ap-N`6~ $l%m "UC$lA 0|@Hm+a8-N$]N] _NNU+ HkHma$U/*$Mal?<~?B+NgHma$U/*$MaDHkav~$UG$]N]NuNU+ &lHka)B-+ c+İ+g?<a+~fD+ dHk$lHRa~a,Hk$lHRa~avHka~GB- Jg@J+f:+ UDJWD+~ WDJgBB$MaB- Jg?<`~?B+NgHkHma-~fTJ+WD+ UDJg8 + ]D + \DJgHma/+-a-~g,+ d -+a-a-a$MaB- Jg+ d Hk+an+İ+f+a~G+a<+k`R+k`JCA pJg+m+m+m`$B-`@r NJ-g$Maf`.Hk$lHRa$Ma ``@rNjN-+/@H Jg+ WD+ WDJg+ f~azHk$lHRa~$l|Fz@N~$l|F$MahaHmHkaHJ-gkHk~a`(HmHka"J-gHk~a`~aB- Jgj+ c Hka` Hk+a*Hk$lHRa+aZHka+ d"HmHkaJ-gkHkB'a&]N]NuNU+ &l?- a(-~f@+|qWDB+& JgzE`$l^  ^D@`B-$l& fJ-g |/N`|/N`"l^ <+(HІ"+@+@ +"+@J+&gz^D@` - ]D@z$l -5@J-g@ @f xIB'N` -xNJ-g0+(HX7@(` 0+(HT7@(`b - jD l -xNJ-g 0+(HT7@(`0-f xG~=B'N -U/N`?<ra&]N] _NNU+ &l+ d^+ f(Hk$lHRa~nHm+a.-N`"Hk~a~$lB*|nNB'~a+˰-gJ+a(~G`:~G`2~G`*~G`"~G`@rN N`D+a(~G`6~G`.~G`&~G`~G`@rN-?- aV&]N] _NNU+ &lJ+gJ+a(~[G`:~aG`2~dG`*~YG`"~XG`@rN N`D+a(~\G`6~bG`.~cG`&~ZG`~WG`@rN~$lB*-B'N~G|N~G|FGB+zE8B+&]N]NuNU+ &l+m- ~g- B'a<`$m*ab$m/*B'a`h/-B'a/-$lHRaۘ$mB'+*a`>$mB* Jg /-ax` *B'a`@rNN~$mG|FB*B'+*af&]N] _NNU+ $mCAr#Q"UB) JgfJ-f` - ]D - ^DJg< -~ ]DJ^D@H Jg/- a/-$m a$]N] _NNU+ - +*a$UJ* g- ~a~ab`- aX$]N] _NNU+ $m CAr#QB+, "U) Jg~G`HmaHm-aV--+*a0-a$]N] _NNU+ &lHk+*aHk+*aHkHmaLHkHma@J-f~G|FB+HmHkahJ-gjHk-av-~fHkHm$Ma2-~g -$Ma`,Hk$lHRa*+İ+*VD- Jg Hk$Ma`z+ f++*WD-~VD+,JgJ-fHma--a*mHk-a-~fHkHm$Mav-~g -$Ma`,Hk$lHRanJ- g+~+*a~a\`6Hk$lHRa@+~+*axHk-a4~$lG`Hk-a-~g -$Mar`:Hk$lHRa++*VDB+, - Jg Hk$MazB+, Jga4~:B'N$l*ala?<~?B+6Ng++*ck*&]N] _NNU+ &l+ UD+ UD@+6 dB'aP`~aF+6a~NB- Jg+* WDa`~e|NB- Jg+* WDaf`~|N`~K|N`~~#|N`n+* f ~DB'N` ~EB'N~a`D~Fa`:~Ga`0~8|N`"@r NL|N&]N]NuNU+ &l+6 dB'a$`+6 c~a+6a~|NJ+*WDap`~e|NJ+*WDaR`|~|N`l~K|N`^~#|N`P~G*a`D~Ba `:~Ca`0~8|N`"@r NbN&]N]NuNU+ ~#|N~$l|5F- Na~~@|N$]N] _NNU+ &l+ UD+ UD@+6 dB'a`~a+6a~|NB- Jg~a`~e|NB- Jg~a`~|N`~K|N`~#|N`t~Jaʴ`h~Kaʪ`^~Laʠ`T~8|N`F~a`<~a`2~Mat`(@r N0V|N&]N]NuNU+ &l$m  bL d&/- a~$m ~a߰~$m /- a,+* f ~fa`<a`$+*g+* f <a`<aɾ&]N] _NNU+ &lB-B-HmHkaJ-gB-`+ f~G`~GHmHkaۨB- Jg B-R@+ f B-R@++*f+İ+*f-aTHka>~G`f~G`^Hka&~GG`JHka~G`:~GG`.Hka`$`"@r NN`Z-a6Hk+*a,~G`@++*a~G`,Hk+*a`@r N`-aHk+*a~GG`HkaBHk+*a~G`Hka(HmHka@J-gHka>k- f~GHk~a\Hka- f~GHkaZ`RHk+*a.~GG`:HkaHka0`(Hka&`@r N$$>$\\B+, -JgB- RR@ J-ghJ-g(J+f Hka`Hk$lHRaRHka&`&HkaJ+f Hka`Hk$lHRa"~aLB- R@ - aƲ&]N] _NNU+ &lHk~a޶Hk~a$+ d,HmaB'-a*HkaHka߄-B'a- aF&]N] _NNU+ &lHk~aJ+6~ WD+ UDJg |haX`Hk|a+6aH~TG`h~VG``~ZG`X~^G`P~`G`H~jG`@~lG`8Hka~iG`(@r NN+ UD+ UDJg Hk+*a-a&]N]NuNU+ &lHk~aL+6~ WD+ UDJg <aZ`Hk|a+6aH~uG`h~wG``~{G`X~G`P|`H|`@|`8Hka|`(@r NN-a&]N]NuNU+ &lHk~az+6~ WD+ UDJg <a`|Hk|aB+6a8|`X|`P|`H|`@|`8Hka|`(@r NN-a&]N]NuNU+ &larJ+fHJ\DBg ~?B+NVDJg Bg?B+Ng B+R@J+fHJ\DBg ~?B+NVDJg Bg?B+Ng B+R@B++ Jg+İ+dk`km*+* dBg~?B+6Ng-dG*`|F*?<?B+6Ng|F*`ApNB+Ngr+*aR`h+İ+g~G*`VBg~?B+NVDBg?B+NVDJg|F*`@rN N+6 f"+~2WD+|3WD@,`?<-~?B+6NVD@,+*a$a`~G6a+a~G`&~G`~G``@rN&]N]NuNU+ &lHm~/aѺJ-gaB+B+B`Hm/<aђBg ~?B+NVD-Jgaaf~Ga&`B-;G0- @]DB- Jg,Hm0-H/a$J-g~G` 0-H;@`J-g4a0a0-HS/aa~Hm+a-N` ~G6af&]N]NuNU+ &lB-J++g+* UD@` + UD+ UD@J-grHmHmaЬmJ-gZJ-f~G`LBg ~?B+Ng6Hk|a~ $l-HH%@a<~ |N~GJ-ga(` ~G6a&]N]NuNU+ +~,f0B'ava~@$U*N~$l|5FzN$]N]NuNU+ &laHm+*am+ah$MaB'a~G-NB'a+*+f~aЖ`ZB'a~G-NB'a`@~dan`6<ad`,<aZ`"@r NNk*+* d+*a&]N]NuNU+ &la+*aB'~aB'aRa~DB'N~a\`xB'~a^B'~a~Ja`X~Qa~^a`F~ra~a`4<a<a`"@r NxxxNk*&]N]NuNU+ &laj+a4aZ`NHkad`DHkaZ~ a`2HkaH~ a` @rNN&]N]NuNU+ &lJ+f +r'@`P+ fB+ @`6aHka~ $l|%Fat~8Hm+aH-N&]N]NuNU+ &lJ+f +F'@Hm/+aZm`.adHkaj$lBa~JHm+a-N&]N]NuNU+ &lJ+WDJ+WD@J-gx+a, ++@`D ++@`6 +"+̳+@`&@@:r NNav'mHm/-am`D+a~G6`2~G6`*~G6`"@@:r Na+~<fa`+|Afa*&]N]NuNU+ &l+ UDHmBaˠ-JgaӰHmHka J-g Hka`J+fHma/+-a`fHkHmaƌ- fHma~-a6`:-~g -a`Hk$lHRa~nHm+a-Na` ~G6a&]N]NuNU+ &lHm/+am&]N]NuNU+ &lJ+ ghJ+ g>Jf Hmp(Nl`+k$m'RC$mAr#Q$'m+ faCAr Qk  ~G &]N]NuNU+ &lap~GB|FB+B+A+H$m a@$m%k"`L$m%k`@$m%k +@`,$m%k +5@`@rN N&]N] _NNU+ &la$mCAr#QJ- gJ+g ka&]N] _NNU+ &laB+'m a`&]N] _NNU+ &lahkB+a$l~CA &]N]NuNU+ &lB+~Gmm &]N] _NNU+ &lk  J+ gJCAr QJg0+k$mCAr#Q'R$'m~G `B+ &]N]NuNU+ &lCAr QCAr QCAr Q&]N]NuNU+ &l~G|F+ dB+a4&]N]NuNU+ &lJ l - D$m"@]D@` < $m"@^D@J-g"l& f ?<|N$m Э $&]N] _NNU+ &l$m B&]N] _NNU+ &l/-aHkHma„ap-~f8 - ]D - \DJgHma/--a$m &]N] _NNU+ &lHk$lHRal~$l|Fz@Hm- a-N&]N] _NNU+ &lJf(~$l|Fz"Hm- a~-N`D/-Hma-~g-- a-- ad`/-a- a@aT&]N] _NNU+ N"$l~ @@"U3@0)N$]N]NuNU+ $Ua0*@a-H@H>*HЇ5@$]N]NuNU+ $Uaa* fa` * fa$]N]NuNU+ &lB+- Jg~?N~G- +NJf N(Hm$lz ?a?-N`* +rN@ +@a$Ma`$Ma `$Ma$Ma`$Ma$Ma$Ma$Ma`r$Map2-@m;A;@$MaRmSmd`F$Map2-@m;A;@$MazRmSmd`HS@rNblvN-a@$Ma`J$Malp2-@m;A;@$MaRmSmd` $MaB$Mal`HS@rN&]N]NuNU+ &l+m $m~g |2?N$m* f<jJ-gj~GB*GB|FmJ-gm&]N] _NNU+ &lHkat+ f~J+WDJ+WDJgTan+?~WD+?| WDJgzE `&CA zEBECA `~GHkal` ~6?N&]N]NuNU+ &lHkaJ+ftA+H$maH$m *Э %@`N$m *Э %@`<$m *Э %@`*$m *Э %@`@rN N` +Э '@&]N] _NNU+ $m BJ+fJWD@`B-J+fJWD@`B-J-ga*$m `,J-gaHaxa`aJ+fJWD$m $]N] _NNU+ a$UCAr Q~G*|F+aCA J-gFa- f"m~GB+B+CA `~G|FmazA+H~$mkk$]N]NuNU+ &lHmHma>mCAr QaJ-f+|$kA+H"mJ)f) f+| -"-N+@BJ+f + jDl +kBJ+f + jDl -+@B -"-N+@HmaB- JgB-J-g+ fHmHkamJ+gB-J-g0N+?~WD+?|WDJg J-oB-J-g.A+H~$mkmCArQ`$MaaJ+ftA+H$maH$m *Э%@`N$m *Э%@`<$m *Э%@`*$m *Э%@`@rN N` +Э'@` HmaB- Jg$Ma(a &]N]NuNU+ &l- b Hk- a + d*+ WD- WDJg ~GG - aJ+f/+- a`>+ WD+İ- WDJg - aT`Hk- aHkaØ`rHk~a~RaV`\Hk~a~sa@`FHk~a<a*`0HkaPHkaD`@r NNNNNNa&]N] _NNU+ &l~$l|FJ+ g8Hk"lHQa+~f|$lzE|@zNB+ `0J+f Hka`Hka,Hk$lHRa- B'NaH&]N] _NNU+ &l+~ WD+WDJg|$a"a`\B-` ApNB+NVDJ+WDJga2+~ f|FFJ+fBa+aPB-`jBg ~?B+Ng|F`|F`DBg ~?B+Ng|F`G` @@2rNN-`ApNB+NVDa&]N]NuNU+ &lJobJ+ g\~$l +T5@ +Jg 0*HR5@0* @l| zN`0*HT5@| zN?+ap"+m";A;@N"$l~ NRmSmd +JgB'N&]N]NuNU+ &lJ+fCAr Q +S;@;@aa a>0-H/aHk$lHRaV~aÀ~N(J-f -2-H/B'NBm`Hm$lHRa-B'~aNJmg0-H/Npa|~e|NN`aX~G*B+,|a~NaB~:B'N~N~a2a.B+B+HkaHk$lHRaz~a¤~/N~N~e|N~NVa~e|N~Nt~|N~ G|FzEB+&]N]NuNU+ &lB'~N.B'N~jB'NB'N&]N]NuNU+ &l~GGB+GB|FGzE&]N]NuNU+ &lN +? fN~+?~Vf,+HHr N&8"380- HVD@`|FJ-g| ?- aΠB+ &]N] _NNU+ &lB' +?aa&]N]NuNU+ +adJl $U%k`Jf$U%k$UB*B*`PHk$lHRa~n- N`4Hka~B'N~n- N`@rNN$]N] _NNU+ &lN($lz+R +VD@ +VD@-Jg+a`~$Ma `t~$Ma`f~$Ma`Z+ f ~$Ma`HkaƼ~na`2Hkaƪ<ar` @rNNJ-g~B'a~ +?aΐJ-gB'B'a~ +?at -?aa&]N]NuNU+ &lHk~aƌ~a$l^+R +?Np"+m0;A;@N($lz ?a +"?NRmSmda~&]N]NuNU+ &lJ+f~G'k`B+J+g$HmprNlC$mArqQ'm`B~GkCAr QaaaCAr Qa&]N]NuNU+ &l+kCAr QaJ+WD+@J-gJ^D +^DJ]D +]DJgB`(+kHm +D/a* -"-NR+@Jf$l& f ~?NrZB-/-a`J+gHHk~aļ -l +/ajan` -o -/aLa`HJ+f +Э'@~G`B-Hk~aa B- Jg /-aa -~fa` - g /-aalHkB'aa~GaXa>a:J-ga0`~B'aap&]N]NuNU+ &lCAr QabkaaaHk~aa^Hk~aaHk~aa+~ad~GHkB'aa~GaŦa~B'aVa&]N]NuNU+ &l+ dHk$lHRaJ+f& + ]D + ^D@`~GJ-g,kk*HkHmaHk-arB'N|hHk$lHRaL~Hm+Ny-N`2HkB'aHk~aHk~aa޸aIJaa~/N|rHk$lHRa~e|Na~|a4aJfB+`"+k$mCArqQ/-prND&]N]NuNU+ &l$l& f$a&+~qf |/N`|/N`HmHmahJmgD+~qf|?-aǤ`*?-NB'aPHk$lHRa~a:a`F+~qf&| $l5mz=B'N0+(HT7@(`| $l5mza+~qf"p| F@-Nz0R-S-d`a:~G|FzExD&]N]NuNU+ &l~ +?ap~ G@-NyR-S-d&]N]NuNU+ &l~aPHk$lHRa~NzL~@|N~$l|Fz=B'NNyp~ G@-NyZR-S-daN&]N]NuNU+ ~;G;GG0-$Uj]D-JgJ0-HR/>-H 2xX&8f"0-HR;@0-H>-HЇR;@`B-`~"l|F0- @lz;Ex@D`2z $l0m%HxB~N~ $l0m%H|BF~$l| F"U )5@J@fz-zN0-HR$U2*Hm4;A;@0-H2-H>-H$U&%x8RmSmd$U0*H2-H5@$]N]NuNU+ &l +;@J@o~|NBg~ aTBmJmoPN(0-HS;@0-HR;@$lz>-H+xJmfJmo$Ma0`` @f$Ma `~|N~R~G&]N]NuNU+ ~$l|"lz E+n4x D~@~NJ+g~ | N~` Bg~ a`x D~@~N$]N]NuNU+ &l$l& f +|,`4+HH03xH+HH23hHP+@ -"<N+@"<N"-@+@"l*Jg+~~f;k`$lR ;@N~$l| F5Gz=B'N -D?N0-HX?N+ fBgN`$lj?N$lj7Ra` - _D$lFJgB+ n&~ -DajHmBgN?-N`~ -DaD`.~$l| Fz $l -D%@x?B'Na~NsJg ~aF -D?N0+(H]7@(B+~G &]N]NuNU+ &l$l& fJ+ g ?<Ni~G $kB*"l& l $l^"k#RGBk$lR 7@N$~a0+H\?Na&]N]NuNU+ &l +@ ++HH7xa~$l& f+ fN`N&]N]NuNU+ &l~$l| Fz"l+nx D`x Dx@~N$l*Jg~"l| F3Fz=B'N`~"l| FzoB'N+HH0sx+HHm/-NqmJf~SB'N`J-WD$lFJg~  -a`\~|Nz/-Nt~Ns- b~|N` ~N~$l|Fz<B'NB+ &]N]NuNU+ &lak~G+| fB+`zE+xf~G`B+&]N]NuNU+ $mCAr#Q"m Ar#Q"mB--fbJ-f -WD`L-Ȱ-fBJ-fHmHmHma8$m`" -ʰfHmHmHma$m$]N] _ NNU+ &lJ+WDJ+WD$kJ* WDJgN+ka߶+ka߬$l& f* +̰]D +̰^DJg ~}?Ne`HmHkaHmHka--Jgv+kJgl+mHm$mHj.HkaJ-g@HmHj HkazJ-g** UD"l^  ]DJg`h+m+R`HmpRNl+m$mB~G|FBCA r#QCA.r#QJf'm`"m"$mJ*f~Gada`Hk~a $l& l "l^ X"`N"m )$l^"@o ?<rNdJ~$l"m )$l^$l5@|zN~No~No` ~a`a+ fHkaހHk$lHRa~a>~B'Nsp~G|FzEB+`vk*~G+`fa΀`^a`VaD`Nab`FaH`>Hm~/aJ-g a.a*` ~ G6aʎ`~ G6aʀ`~ G6ar`a,`aӴ`~/a,`~/a `~GNp``a`aԾ`aT`a`a``a`~#aa؈~G`x~"aaran`da`\ +7@Ng@+? fNg0+? g2 +?Nsj~G p| F@-NjR-S-d` +?NtB'a֎` +?a`a,`~ +?a>a`a`Hka~$l|Fz<B'NB+ aג`a`a`xa`pa`haR``a`Xa`PaP`Ha$`@a +@m-a`"a``a` +aa"~G|FB+` +7@`a`a\`a`Hk+a|a`a`aJ$l& f0 +Jg +R'@ ++HH7x+ fNu`\aX`T~G`J~$kG`JV &.6BN``````hhhhphhhhx 6DLbj .:BJRfnH^nvNe+ f&]N]NuNU+ $U0*HR5@?*"lfANp NN~ $l"U5i|<B'N$]N]NuNU+ &l$k ?Npj$lfANpPNN$lfC$lbA2RAQ~?`.CODEApNp NN~?`.ATABApNp NN~?`.INITApNp NN~?`.NAMEApNp NN~;G+k Jgh$mJoR?No0-HS;@?-`D$ApN$lfANNp NN?-N$m/*N$m+j`+kJgF0-HS;@?-$m jNp NN?-N$m/*N$m+j `~?`.ATABSApNp NN~?`.NAMESApNp NN~;G+k Jg+m$mJ*f&`.MAINApNp N/*~?N`X* fN+jJgB$m?*NnF$m?Nmv$lfANp N/+"~?N$m+j`$m+j`^~?N~;G+k Jg4$mJo"lV 5@0-HS;@?-N$m+j`$lV 7@+kJg.$lV "m3@ 0-HS;@?-N$m+j `J+0g^+k&JgR$mJjWDJjWDJg* jC$lfA2RAQ"lV $m5@$MaP$m+j `p|@B-AHrNg\-NtB-A.rNg0+zHB-b7x`$N$lV B-b7x$MaR-S-dp|@B-A rNg\-N|B-ArNg0+zHB-"7x`$N0$lV B-"7x$MaFR-S-d~?N&]N]NuNU+ &l$lN Jg~?NB'NBgNN&]N]NuNU+ &l` CArVgCAr0`Q``TMP=ApNpNHmNJmg.>-H5x|\gAN z?NApANHkx~/AN,aJ+ghNNNT+HH/pNX` COMPILATION ERRORApNpNN+ oNT~SpNTNNNNNN`Name:ApNpN$lbANpNNN~ pNT`Lines:ApNpN"lj0H/pNXNNpNT`Code:ApNpN"l^ $lVВ/pNXNNpNT`Data:ApNpN"lZ/pNXNHkxNdNPN+HH/N&]N]NuNU+ &l~$lR4&]N]NuNU+ &l$lR0a:$l& Э $`>$l Э $`0$l Э $`"$l Э $``X@rN\&]N] _NNU+ &l$l fNT"lHQNN NXN&]N] _NNU+ &l<a- a&]N] _NNU+ &l- f- a`- a|&]N] _NNU+ &l;m -aX-aP&]N] _NNU+ &l+m -a,-a$-a-a&]N] _NNU+ &l0- ap2- @m"A@-HH5x aR-S-d&]N] _RNNU+ &l0- 2<DA@m&A@-HH5x | g` S-S-d-atp-m"A@-HH5x aRR-S-d&]N] _"NNU+ &l$l f - a~~/a&]N] _NNU+ &l$l f;m -aF-a>~/aj&]N] _NNU+ &l$l f&+m -a-a-a-a~/a&]N] _NNU+ &l~aA NhpPNaN&]N] _RNNU+ &l~avA NhpPNa&]N] _RNNU+ &l~aF/- a&]N] _NNU+ &l~a ?- aj$lR4 &]N] _NNU+ &l~a/- ah&]N] _NNU+ &l~aANhp Na/-a0?- a&]N] _(NNU+ &l~a/-a-a<-a4?- a<a$&]N] _ NNU+ &l~aF/-a-a~+a?-ax~-a?- ah<a&]N] _ NNU+ &l~a?-.a:A Nhp Na&]N] _$NNU+ &l~a?- a&]N] _NNU+ &l~a&]N]NuNU+ &l-- g?<NV&]N] _NNU+ &l -]D - ^DJg?<NV&]N] _ NNU+ &l fB0+~@Ї7@` fB0+7@&]N]NuNU+ &l - ~^D - ]DJg?<NV - +@ +@ B-Э ?a@&]N] _NNU+ - ?a$$U *a0B'a$U * a`.$U * ?a` $U/* a0``SrN\$]N] _NNU+ &l$mBArNtf?<NVBg~?$mBNngB0+B*ІQ7@aB0+$mB*Ї/$Ma*` f?<NVB0+P/$Ma`B0+~Ї/$Ma`B0+~Ї/$Ma`B0+~ Ї/$Ma`B0+~(Ї/$Ma"m?)a`nB0+~0Ї/$Ma"m)0)H/a `DB0+~:Ї/$Mab"m0)HU?a`B0+~;Ї/$Ma:"m)0)HU/a`B0+~<Ї?aB fB'a$m *a`$ f$m/*aP`$m *?a`B0+~9Ї?aB~ |+$m?*a~/aj`hB0+~(ЇX?a$m0*H/~ |?z?a~/a2`0?<NV`&@S@r N\&J`v,&]N] _NNU+ &l WD$lN~ WD"lJ WD * ^D * ]DJg$B)@|pІa$lN *a`X+|Af za|$lJaN$lJB*7@``~@7G`X7|`P7|`H7|`@7|@`87|`0?<NV`&@S@r N\Bg~?$lJBNngB*Q"<NB<+І7@f0+@07@`2 f0+@ 7@`f ?<NV` 0+@7@$lNHR?<~?pNBBa$lJ f ?*a` f*0*H/a&]N]NuNU+ &l$lN~ fN"lJ f?<NV f7|H`7|H$lJHR?<~?pN/"lN/)aJ`H f?<NV f7|L`7|L$lNHR?<~?pN/"lJ/)a&]N]NuNU+ &l -7@J- ga$lNJf "lJHQBg~?pNBBa`HRBg~?pNBBa&]N] _NNU+ &lB+~ GH|`І+@$lJ0*HU+@ f -a -a` -aB'a -?a&]N]NuNU+ &l$lN~aB+~'GHP;@$lJ0*HU;@0-H"lNB)І?a?-a&]N]NuNU+ &l$lNJRD@"lJ f0+@7@H@B@H@B)Ї7@B- JgB0+7@`p| f:/*z/x/a$lN *%@"<NB>+Ї7@`. fB0+z Ѕ/B*П7@`?<NVa0+?a`XJ-g(~ VD * VDJg?<NV0+@7@$lJHRBg~?pNBBa&]N]NuNU+ &l$lN fR f?<NV$lNB*@XB+Ї|7@"lJHQBgz?pNBBa`~ fB+|FH7@J]D * ^D"lJ VD *z^D WDJg?<NV$lJHRBg~?pN|/"lN/)av`?<NV&]N]NuNU+ &l$lN"lJf>J-g& f -P+@` g?<NV` g?<NV`?<NV$lN*@"lJ)@ WD WDJg-HQ@@-HQ@@-HЭ-HHЇ7@J- ga0+?aX&]N] _NNU+ &l$lJ~a$lJB*B>+Ї7@"lNHQ?<~?pNBBa2&]N]NuNU+ + WD+~eWD$lNJ^D *| ]D"m $]N] _NNU+ + d7|P`7|Q$lN *%@"<NB>+Ї7@a|$lJHRBg~?pNBBap$]N]NuNU+ + WD+~8WD+|KWDJg?<NV$U *7@@7@ f 0+@7@"lJB)Q"<NB>+Ї7@"lNHQ?<~?pNBBa$]N]NuNU+ $U * 7@a f~;G` f~;G` f~;G$lJHRBg~?pN0-H/"lN/)aV$]N]NuNU+ $U *7@a*$lN WD"lJ VD+~8WDJg>0+@7@B*B<+І7@HQBg|?pNBBa`F g?<NV$lJB*B>+Ї7@"lNHQ?<~?pNBBa$]N]NuNU+ &l`@ApNzB+Nng $Ma`+ WD+~$WD+|fWDJg $Ma`+ WD+zhWDJga`j$lJ WD"lN VDJg$MaR`>x WDHmaz-Jga`"lN~ f$Ma`$Ma,&]N] _NNU+ &l$l& Jg?<NVm a~``>" @ApNzB+Nng?<NV``x"ApNzB+Nng?<NV`v`pApNzB+Nng?<NV`D+~ UD+|RDJg?<NV`@rN\08j Nb+aL/<~B'a`$/</<a`/<Ba`B/<a`BBa`/<~a`/</<a``B/<aP`7|a`7|a`7|a`7|a`ta`la `d$lJ~a$lJB*A7@"lNHQ?<~?pNBBa>`/<B~a4` /</< a`/<Ba`/<B'~a`B/< ah`a`7|aP`7|aB`/</< a0`B/< a `|$lN fd"lJ fB*@B)Ї7@`6 f&B)Q"<NB*Ї7@`?<NV` ft"lJ f*B*Q"<N"lJB)Ї7@`: f*B)Q"<NH/B*QП7@`?<NV`?<NV0+?af`z$lN~a f7|H`7|HB0+$lNB*Ї?a&`:+~<f7|N`7|N$lJHR?<|?pNBBa"`$lJ~a$lJB*Q"<NA7@"lNHQ?<~?pNBBa`$lN~aJ$lNB*NPQ?av$lJ/*/<BaF$lJ *?aT`ha``a`X$lN~ a$lJ~a$lN/*~/|/aa` 7|a`7|a`/<HB'a`/<D~a `/<@~a`?@5@5m< 5m: 5m85m6-4@5@5m25m05m.5m, -$"<NH5@ -$"<N5@"m(A $l$/<N$l"m 2"m20*"m20*"m2"m2 "m 2 0"mH2&]N]N @N$mA "l"$l45m5m5m5m5m /<*N&]N]N N$mA "l"$l45m5m5m /<+N$l"m2&]N]N N$mA "l"$l45m5m5m5m5m 0-5@ - @5@/</N&]N]N N$mA "l"$l4 /<2N$l"m2&]N]N A"l$Qr 4 4 4 4" . <NBNu  _/"H0`QBNu  _/ JfRCBAg!RA`2Nu la@Nu lp((r(d hBaP(h@H@Nu l(S(dajvCe@aHH`&S(jaJvCe @aH`@a"l"Nu laNHH` la^H` la|"l"NuSPd///N"  _SPt1B(NuRh4(0 Nu(g(hath@HNu(g(haat@NuaHaNua?aH@0H@Nu lC 0/a6"o2g`Q _$N _;XN _/ P*OؿeJ;X0fN;@0 @+ g @+ gUN+ N+ 0 @&Ig @&lgUN0&tN&INQ*_pN` _BN]N _B0/H4&l*lNa&HdBg"O@H`  Q?"CNN|2RA`0N|2JAlp Np"_HdBgHd? `/ Q?Na I `a I03 Q _#NA26RCK"HNu`UND^4Prospero2.10 Execution error: bad command pgm not openednot executableload failure wrong version out of memory init. failure no parent pgm stdio failure memory shrink linking order  QvP:Bgp NNuG.k +f <,kag-H$m 2x|\VD2xVDJg S;@`0H2-H;@~ Go;G HR/"m Q/2-H$_C&$m A8H$HB`QQ"m/z ?x??)?)?)?) Nt&]N]N N+kJ$mBHm~"?|???B'BgBgBgBgB'BgBgBgBgHm/- HmHmHmHmHmHmNn;m0-@J@gbHm$m/Bg~??-?-Nh0- @WD$m@J*g /~?Bg?*?*?*?* ?Nb$m"m&]N]N N+kJp~G;@$m R/0-H\rN&"_A8 +H0-HrJN&"m ;q80-HrJN/"m Q/2-H$_C&$m A8H$HB`QQ"m Q/0-HR&$_B28RmS-dh$m/~?|??*?*?*?* Nt$mJ* gVHm/BgN\;m0- @WD$m@/?-Bg?*?*?*?* Bg~Nb$m"m`Hm/<a$m&]N]N N$mBBp~G;@ -+@>-H$m 2x@;@|AFm -:-HЅx Є+@` -:-HЅx0+@RmS-d'mJ$l"A "l:"$l*A #@$l.A #@ $l2A #@$l6A #@$kJ j>#h&]N]N N&]N]NuNa~/N&]N]NuNUz+ &lC A2RAQBm~GBmBm^JgD`File ApN$kANNApPNANApHN~GJgh`Module ApN$k jNNApPN-HHrJN/ANN&A8pHN-HR@@ANBgNgV`Name ApNANNApPN-HHrJN/ANN&A8pHNHmHmadJ-ga&]N]N 4NA Np2Nap |:FN&]N]N 4NBBBkA Np2NaH&]N]N 4NBBBkA Np2Na&]N]N 4NA$NpPNa<&]N]NuNHkfa&]N]NuN-aApNp2Na,`ApNp2Na`N~ p NT-pNT` at ApNpN/-pNzNNp NT$mANpNNA\pNp2Na`@@DrNPPh&]N]N N0+koj+|HSHkHmNVJf$J+g ~G`h`ApNp2Na,Hm~/aJ-ga -S7@Bk'k>+Hsx0+HR7@ +R'@B+&]N]NuN - +@ +а gvJ\D -2+H_DJg -7@`J - +@HS/-NP+|HSHkHmNV -S7@ - 7@'m'm &]N]N NakakC$m A&]N]N NHmaHma'm&]N]NuNHk0- /NJ&]N]N NB0- &$kBB28rN&H+s80- kd?- aHk/-/<ND`ALpNp2Na\&]N]N NB>-$kBAx+H"mJfApNp2Na$mBrN&H+s80-kd(J- g?-a Hk/-/<N>~G`ApNp2Na$mBrN&F78~GB&]N]N N~GB0+Sr@m>;A;@B0-&$kBJ28g?--aB-`~GRmSmd~7GH&]N]NuN0+HkFcaB0+HrN&FA8+H$m0 @g ?~a$m4 B0- /0+H&"kB8@HR7@H&]N]N N - ;@ - r ;@keAhpNp2NaxB>-$kBAx+H"mJfR?-a,$mJ*g ?-a`6BrN&H+s8"mBB)$mA"<Q$mBrN&H s8>-Hx&]N]N N;m-/- a- - R/a&]N]N N+m?-/- a?- - T/a&]N]N NJ+g4$lHRNJgA 0.`NHk <NJg($m;j0-kf`&`Jmf``+R`A^pNp2Na$m'j &]N]NuN'k J g$k jCANf`P'R `aHk pNl+k $mB%kBB BB*B*0++HAo0+@J+gHHmpNl$k Jf "m"` j"m" j %mBBB #k&]N]NuN+k6Jg($m;j0-kf`&`Jmf``+R`ApNp2Na$m"m "&]N]N N$m $2$m Jg< R+h "mANd R$`"m0kf ANf` R$`&]N]N NB$m $2$m JgB+R R+h "mANd R$` "m0kfANf` R$`J+g*`Cannot find externalApNp2Naa/- pNl$m R+H"mBBBBB#k B)0++HAo0+@Jf'R2`$$m j CANd"m $`"m %Q&]N]N N$m +j BJg"$m *"ml`+m+i`Jf $m %m ` $m%m$m%m&]N]N NaJ~G B+mb;A;@a,J-gF+~ fB-`60-GcAp(Np2Nat+B>-x7mRmSmd&]N]NuNa+@;@~ GcA-xRmSmd&]N]NuN$k +j+m$m+R$m *f` -fApNp2Na$m $&]N]N NJ+g.J+g+ +~Ї/a`ApNp2NaB +R'@&]N]NuN+k>Jg$mBjB+R`+k6Jg$mBjB+R`+kB:BB+B+~GaVJ+g` &B++ f a8+ fa*`k/< ~?B+Ng"J:g++Jg +$k:%@+at -TgA4p'Np2Na:ajJ+gJ+gabJ+g`|`RJ+gLa,HkpNl+k$mB%k%k%m Jf'kJg"k"'k`aFpB+@mA@a.R-S-d`ApNp2Na`HkaLJkmA&pNp2Na`B+ JgaJ+g+ f~G`~G$k J*fm`4*-g*NANpNNAFpNp2Na$k B* Jg&Jf'k Jg"k" 'k ~GHma'm:$k: *Ъ'@+ WD@`azB+ Jg$k: *Ы'@`a aPHkaJ+g4J+g*HmaJg$mB* Jg ~G`p`J+gHma$mJ*gA߈p"Np2Na~$mG%kJkoAzpNp2Na`.Jkg(az$m%k Hma+m/-/-aN`a~akB-@BmBmB-B-a+ f ~G`NkHkaJ+g8B-B-Jkl2a$k * f~GHma"+m$m+j`ZJkf+k`LHma$mJ*g0+jJg"m) f~G`~G+j` ~GB-~+f: +Э'@B- Jg 0-HR;@J-g 0-HR;@`X-|-f: +'@B- Jg 0-HS;@J-g 0-HS;@`Ap'Np2NaJ-gJ+g-gApNp2Na-g +'@0-HS;@J-g`lJmfJmgAHp#Np2Na|`J0- @f,Bg~?0-HNfAp#Np2NaF`Ap#Np2Na0-VD@-VD@-aB- Jg + lApNp2NaJ-gJlApNp2NaJ-g +~oApNp2Na + oAܸpNp2Nax + +~Ї/a +R'@`B- Jg + lAfpNp2Na&J-gJlAFpNp2NaJ-g + oA pNp2Na + oApNp2Na +? +~Ї/a +T'@`H/+ +~Ї/a +X'@`*Ahp'Np2Nan`HS@rNV ` +-HHЇ'@`Hka aB+ Jg$JklaHB+k>Jg,+m$m;j0-Ұkf`@`Jmf`,+R`Hmp Nl$mBJf'm>`"m"$m5k$m%k `JkoHmaFB+k6Jg,+m$m;j0-Ұkf`@`Jmf`,+R`Hmp Nl$mBJf'm6`"m"$m5k$m%m`ApNp2Na`L`JApNp2Na`4@S@rNBZ`\Z`a4+~f&]N]NuN+k$mCAf2RAQ*F WD@*F WD@HS~/AfNNHSpN~7GJ+g N| pNTAfNpNNaBB+J+gL++Jg(B+~G+kaB+J+g/-a`~GJ+gaJ+g`2Jf`*$k *g`/* aab$k'RpJg&]N]NuNB+ Jg0NT`Stack size (in hex) - ApNpNNN@H $lHRN~ WDJgHRND`NJg|FNN`bB-B$lHRN/`~~ApNN"_BNg~GHRNP-@p0-SD-|9SDJg-Hz0E@`J-Hz E@pA-SD-xFSDJg-H~AG@`-H~aG@ - n --HHЇ+@`B-HRND` N@H JgB-NNJ-g'm`4J+gAzpNp2Na`NA`pNpNNJ-g&]N]NuNJ+g6aA԰pNpNaJ+fApNp2Naݚ`NT`Executable file name - ApNpNNNHk <N%kB+j+m$m+R$m *o+j -f`%k$m+j+m$m+R+m$m* f "m#k`"Hka&$m%k +Ъ'@B$m+j JgJ&f'm&J*g "k*#mJg"$m *"mЩ%@'m*+j` -fX$m* f%m +Э'@` +%@ 'R `&]N]NuNU+ &lp|;@>-HB5xRmS-dB0+Sr@m;A;@B>-$kBAx+HJmfk`B- @B-"mJg?--aL~G$mB* Jg&J-g?-a٘HkHm/<N>~GRmSmdp&]N]NuN$m *~.VD+"m&]N]N NpB- @mFA@B-$mRnB-rx`~ GNT-pNTNR-S-d&]N]N Np~G@ - @-HHxHH"- @+@ rN+@ S-S-dp~G@-HHux-| nNT-Hz0EpNTN` NT-HzAEHx pNTNR-S-d&]N]N N$U0* H>+$HЇ| Іr@m$A@NT~=pNTNR-S-dNN$]N]NuNNNNN$MaN`| ApNpNA NpN` MAP OF ApNpNA$NpN` |ApNpNN$Ma*NN&]N]N NN` SectionAp NpN~ B+![NT`"Start Stop Size CombineAp"NpNN&]N]NuNNT~ pNTN$k /*+!a\NT~ pNTN/-aNT~ pNTNJ fNTpNTN` -Э S/ahNT~ pNTN/- aNNT~ pNTN$k j- f$NT`SECTIONApNpNN`*- f NT`COMMONApNpNNNN&]N]N N`MODULEApNpNaN`ModuleApNpNNa.'kJgNNN$k jNpNN'k J gh+k Hm$m/*aJ-gB$m+j+m$m+R+m$m *f /*/*a -f$m'R `$k'R`X&]N]NuNJ g+m $m/$UaHm"m/) a$m*-Jg"UJ)gNN"UB)/* +"a$m/*abNT~ pNT`| ApNpNN$U%k*Hm$U"j/) aB- Jg$U"j%i`$U+j"m/) +"a$m/*a$m'j*NN$m/*$Ua$]N]N N`SYMBOLApNpNaN`Alphabetic orderingApNpN~ B+"| FNT`| Address orderingApNpNNNB+"z ENTx|pNTNN`SymbolApNpNB+"]NT`AddrApNpNpNT` | SymbolAp NpNB+"]NT`AddrApNpNN~G'k&*/+2$Ma&]N]NuNNANpNNNNaNN'k J g@+k $m*- f"Hm/*a|J-g$m/*/* a $m'R `&]N]N TN`SECTIONApNpNa`SECTIONsApNpPN~a8NN`COMMONsApNpPN~a&]N]NuNJ g+m $m/$Ua"mB) JgB+ Jg@NNN`Unsatisfied external(s):ApNpNN~G "m/) +"axB+R@+ e NNB+J+g<`Unsatisfied external: ApN$m j NNp2Nah$m/*$Ua$]N]N NB+ B+pRB+"N@ /+2$MaJ+gNN&]N]NuNrA͒ //N~GB+B+B+B+B+B+ B+B+B+B+G B+B+B+Bk|7FBB'FBBBBBBBB&B*B>B6B.B2B+B+z E!E"&]N]NuNB+~GBk|7F +zЅP'@Hk/<A$NNHk <N +"<N7@ @cApNp2Na˶HkBB0+NlB0+Sr@m0;A;@B>-$kBAx+H"mBB)RmSmdN"<N;@ @eB0-Y;@`AĨpNp2Na,0- @c;|7mF0+Fkc7kFpB2+FmDA@B-rN&FA8+H$mHj <Nl4R-S-d~7GH&]N]NuNNaHk <N+ ~ WDJk VDJgHk |? N`0+ @]DHmHk a-Jg~/NHk ~?pNG#a0B+#k o~G `,pJg&@$lHjBA>p NNHjpNB+ JgNNN`&Prolink Link Editor - Version mmg 2.1Ap%NpNNN`&Copyright (C) 1987 Prospero SoftwareAp%NpNNNNJ+ ga`B+#3x |^WD3x z@WDJg^xDD R@#BgpNaѨ+ f"$lHRBAfNNHRpNaD`ARpNp2NaJ+ g 0+ HR@#a+ ~.f+ o +HT@@!+ o +HT@@"a8J+ gdB+ JgVB+ JgHNNNT`More input filesApNpNNHmaJ-gax`ZaR + oApNp2Na&a'k'kJga$k'R`~`Ba~|/a/+~/a +~f'|/+| /aB +Q/aͲB +Y/aͤa+++JgJ+gFHkfA$Np@NAdpNpNat$lHjBAfNNHjpNJ+gaVJ+ga`J+ga0NNJ+gB+ Jg$lHjpNJ+ gavNNNT`Preset size ApNpNN/+aNNNT`COMMON size ApNpNN/+afNNNT`Stack size ApNpNN/+a.NNNNN`Executable file ApNpNA$NpNN+ @H/N~/N&]N]NuNU+ &lHm~??/-N?$m /"mA /N$m $&]N] _ NNU+ &lHm~B?/- /-N?BgN - g,`Linker internal errorApN p2NN&]N] _NNU+ &lHm~??/-N?/- $mA /N+m &]N] _ NNU+ &lHm~B?/- /-N?BgN+m - gHm~B?B/-N?|?N+m - l2Hm~@?/-N?/<A /N -Э+@`Hm~B?B/-N?|?N - g,`Linker internal errorApN p2NN&]N] _NNU+ &lHm~@?/-N?/- $mA /N+m &]N] _ NN0-F$l45mD0-B5@0-@5@->@5@5m< 5m: 5m85m6-4@5@5m25m05m.5m, -$"<NH5@ -$"<N5@"m(A $l"$/<N&$l"m 2"m20*"m20*"m2"m2 "m 2 0"mH2&]N]N @N,$mA "l<"$l445m5m5m5m5m /<*N@&]N]N NF$mA "lV"$lN45m5m5m /<+NZ$lR"m2&]N]N NF$mA "lV"$lN45m5m5m5m5m 0-5@ - @5@/</NZ&]N]N N`$mA "lp"$lh4 /<2Nt$ll"m2&]N]N A"lz$Qr 4 4 4 4" . <NBNu  _/"H0`QBNu  _/ JfRCBAg!RA`2Nu//// ?/?/NA _ "_"N?/?/// ?/NA _ "_"N _;XN _/ P*OؿeJ;X0fN;@0 @+ g @+ gUN+ N+ 0 @&Ig @&lgUN0&tN&INQ*_pN` _BN]N _B0/H4&l*lNa8&HdBg"O@H`  Q?"CNN|2RA`0N|2JAlp Np"_HdBgHd? `/ Q?Na I `a I03 Q _#NA26RCK"HNu`:r N$^ Prospero2.10 Execution error: bad command pgm not openednot executableload failure wrong version out of memory init. failure no parent pgm stdio failure memory shrink linking order  6(5:Bgp NNuG.k +f <,kag~ pNTANpNNNN0- |dFfNpNT+pNTN0- @fHNTpNTNJ gNT$k /*pN>N`NTz0pNTNNN0- @,fNpNT+pNTN0+kfz;ExH;D`4B0+B2+rBN^;@HzAЅ;@NTpNTN0-2-@m0;A;@NT>-H3xpNTNRmSmdNN0- @o*N~ 0-H_rBNH\NT|^pNTN0- @m$0- @lp |%Nz` p |%Nz0- @,m p |%DNz&]N]N NN~ p NT-pNT` at ApNpN/-pN>NNp NT$mANpNN-a;|`*;|`";|`@@DrNh?-a&]N]N N$mB0+pm fC ApNWD&]N]N N+- gm ?<,a:&]N]N NHk pNl$k 5kBj&]N]NuN$m RJhf R1k`a$m R"k " R $ &]N]N NB+k JgZ+m$m+j "mApNd+j`2"m0kpg+j`ApNfHjad``+j`a.Hk 0+pHTNlApN$k ApNHmpNl+m"mBBB#k  #k $k $ Jf'm `*$m j CApNd%m`%m"k "'m &]N]NuNU+ &l+ g B0+R7@B+~G+ HHrNN&A8+H$mHRNJg |F`NHRNHm <N+Hsx&]N]NuN+~ ga`&]N]NuNB+ B+ J+ g kB+ `a+~ g+|!f,0+ @o"0+H_rBNH2+H@zAЅ7@`p0+SD+z9SDJg xD `+xATD+~ZSDJg`t+~aTD+~zSDJgB+~aGHЄ@`>+~_f`2~G ` $Ap NB+Nf~d?ak&]N]NuN0- HR@-HS@@-HHux _D-|.WD-z\WDJg m ]D-WDJg$mN`$mNB&]N]N FN>+H3x| fHk?+pN`HmANp@Na6J-f ANAXpNNAp@NANNP$m &]N]N NUJ+ &la+~'f~0+HR;@;k0-HR;@>-H3x|'WD0-k\DJg>-H3xf0-H2-H;@R`?<Ba4`?<ia*0-R~@Gn;mR<-HChAN?Jm^D-~ WDJgHm|? N`HmQANp@NaJ-Qf ANApNNApLNCAZ2RAQAZNNP@@H Jg-~:gv`INCLUDE=ApNpNHmXN2JmX^DB- Jg8-~\VD@p;|?AXNN@@WJf0-X@V@U`@S@@VmWUJfB-`>B-VY5XfB-`$-V WD-[z:WDJgB-B-VB-EH8-HЄ~LnpAXN?-V@N AZpLNJ-gAZNp\?NAZpLNAZNANNAZpLNAZNNP@HmX?-U@N`J-g+  lr+ HR@@ HHrNN&A8+HN$mNHRBAZNNHRpNCvANGkMkL~Gap |Nz`?<jaZ0-HS7@?<iaF&]N]NuNBma40-HR;@>-HqxB- A\D+ Jg7mp&]N]N Na- a&]N]N N0- aHmA NpNa.$m&]N]N NB B;kp~G@a- faJ+ g6- f ?<WaZ` B+~0G? -r N<HІ+@`` R-S-dJg'k BJ g4$k  *f Hja`b` *o`` +k 'R `aHmp Nl+m$m$ %m%k "k " Jf'm `$m$&]N]NuN~Gm+a:~Gm`L~Gm`B~Gm`8~Gm`.aT+~Af|NaP~DaH`+|Ef zQa2a +~.f|F `+zGfa`+xLfa`+~NfLa+~Ef*a+~.f|F `+|QfzVa`+|OfzTa`.+~Of ~Ra`+~Xf~Oaz~Rar~.aj`.+~ f|Fm`rNn(()),,..==&]N]NuNBra +r l B+~0G? +rr N<HІ'@rB+  Jg&]N]NuN~Gat+~'faf+~'gB-+| WD-Jg ?<BaB-$m $]N]N NB+mB+nBkpah+~'f(|FnHmazJ-g`+~ fa:`r+~+WD+|-WDJg`N+z.faJ+ g~.G|F B+ F `+~TWD+|FWDJg+f6Hm`RUE.ApNpNaB- Jg~g?a`6Hm`ALSE.ApNpNaB- Jg~g?aL~GnaD`z.ExD D `j`B+  Jg+x$f:~GnapA+SD+~FSD+ @H Jg`B+  Jg|~GnBm0- @l0-HR;@>-Hqx0- @fa$aJ+ g0-~Go|?ah~;G7mpB+  Jgaz`~Gn+|.ga+~HfN +r o?<]ap"+rm(;A;@a+~ f?<BaRmSmda`+~.fLaJ+ ga`aXaVB+  Jgz+~-gT+|+gJJ+mWD+zQVDJg?<?a a +~Vf|Fm`|F z.a`"aB+  Jg?<?aB+maJ+mfa*&]N]NuNa0+m f&]N]NuNa+m faa+m f?<Ran+m f&]N]NuNa+m faaBgd~?B+mNg&]N]NuN+m $m4k k~G &]N]N N$m CA7mm mB+ &]N]N *************************************NNAp%N0+LH\NN&]N]NuNJ+ gB+ `NNT`, ApNpNNB+ T@ + c NNNT~ p NTN| F 0- H@B@H@/Hmp NNTANpNNB+ >-HЇ@ &]N]N N+ ~ dNT|  B+ ANTNG NT` : ApNpNN'm $|F $k $'R $$k $?*a$k $Jjg?*a + $ fNN&]N]N NJ gb+m $m/*a$mJg> j CAp2RAQNTApNpNN0+pHV@ /*a$m/*a&]N]N NrA //NVHmN,'mD~dG BkB+ |FBkBkBkB+ &]N]NuNB+ B+ `.MAINCALr0`QB+B B &]N]NuNa+~Tg |h?a`a+~Og|h?aa&]N]NuNNN/+ aNN'k J g4$k Jg NT/*pN>N~ G /*a$k 'R `NN'k J g$k +R/+ p ND'm `+k Jg8$m+j Jg/-"m0HTND+R/-pND+m`&]N]NuN+ ~gaApNALpNaF&]N]NuNaJ+ g~(aa4+~,ga`J~G J+ ga`8a6+m g*~,aH~(aa+~,g|)a*a~&]N]NuNHkp?+ppN&]N]NuNaV~G J+ ga`a$]N]NuNa0~G +|(faB-Hma~a+~=fB+ a|Hm`UNITApNpNaLJ-gal`Hm`FMTApNpNa J-gaB`XHm`ERRApNpNaJ-ga`.Hm`ENDApNpNaJ-ga`a`Hma@J-fa`a-HR@@+~,g|)a`<- WD- WDJga`- bav`ata&]N]N Na+~*f0a+~(fa`J+ g aj~G `|w?a|`|F J+fHma>Hm`FUNCTIONApNpNalJ-g^a+n fP+m fFa+n WDJ+nWD+m WDJgHma~aa`Hmaa &]N]NuNN@H $lHRN~ WDJgHRND`&]N]NuNJS^D+~ WDJgHS|? N`&]N]NuNNNNAp NpNNNNNT`Source filename - ApNpNNa2NHkp@N+HAxNG0+H~HЇ7@`&C|>+HAxNA0+H~BЇ7@a>+ VD0+ @/\DJg7k~ <+HhBk|.Fa~ G0+ @g|f?aݢ~7GB+ 7k~G B+>B+?B+@B+BB+A|F ap+~=f(J+>f|F@J+AgF?`a`|F?`+|'fzE a`+z f xD?``ApNB+Ng+x)f+>HS@@>a`f+~(f+>HR@@>~GA`6J+>f0+~,fJ+@g ~G?GB`B+@ Jg~G?B+? JgaB+  Jg~G?`aTJ+?g7kB+ B+ J+@gTJ+BgFHm`DOApNpNa>B- Jg?<8aaX+~,g|F a4`~a0+p @f+u~ f4aLHm`ENDApNpNaJ-ga` `$l"$rHmN&0-@ Jm'kDHHHrN&$kD028HЫH'@H$kHJRg*HmANpNa\B- Jg~e?a+ aa`4B'a`*a+n fApNALpN`*`.BDATACALr0`QJ+ng?<aڶ`a`a`~ad`a`a`a`a`a`a`~a 0+p @f``z`r~a `fa<`^a`Vax`Nap`Fa`>a`6a`.a`&a4`~a`a*` a,`a`~a`a`a`~ax`a,+n fApNALpN`?<aـ`~a>`a`a`~a"`|a`ta`na$`h~a`^Hr(Nh$.~ "*2:FNV^jrzRNt`Hm`IF(ApNpNa2J-ga7ka7kJ+ g2p~G@Ca+C l~,aR+CS-d``f~G |aB+ 0+p @WD+v~ WDJg*aHm`THENApNpNaۊJ-g`&7k`d?<PaB+ +~ ga`+~ g?<RaJ+fJa*N`* ApNpNALNpN` *ApNpNNa~G``&]N]NuABS ACOS AIMAG AINT ALOG ALOG10AMAX0 MAMAX1 NAMIN0 SAMIN1 TAMOD ANINT ASIN ATAN ATAN2 CABS 0CCOS 4CEXP 5CHAR ECLOG 6CMPLX /CONJG 1COS COSH CSIN 3CSQRT 2DABS DACOS *DASIN )DATAN DATAN2+DBLE CDCOS DCOSH -DDIM %DEXP DIM DINT #DLOG DLOG10'DMAX1 ODMIN1 UDMOD !DNINT &DPROD "DSIGN $DSIN DSINH ,DSQRT DTAN (DTANH .EXP FLOAT AIABS ICHAR DIDIM IDINT 9IDNINT:IFIX 7INDEX ;INT ?ISIGN LEN MAX JMAX0 KMAX1 LMIN PMIN0 QMIN1 RMOD NINT 8REAL @SIGN SIN SINH SNGL BSQRT TAN TANH ASSIBACKBLOCCALLCHARCLOSCOMMCOMPCONTDATADIME"DOUB*ELSEENDF8ENDI>ENTRBEQUIFEXTEPFORMVFUNCZGOTOIMPL`INCLfINQUlINTErINTRxLOGIOPENPARAPAUSPRINPROGREADREALRETUREWISAVESTOPSUBRWRITGNSPACEKDATAACTEREONLEXINUENSION LEPRECISIONILEFYVALENCERNALATTIONICITUDEIREGERINSICCALMETERTRAMRNNDOUTINEEtvpT"l`EFtvp'"lr(AH*, . JV"FegRE2`SE8 Adz"_ _0NA`A "_ _ N lC 0/a"o2g`Q _$N _;XN _/ P*OؿeJ;X0fN;@0 @+ g @+ gUN+ N+ 0 @&Ig @&lgUN0&tN&INQ*_pN` _BN]N _B0/H4&l*lNa&HdBg"O@H`  Q?"CNN|2RA`0N|2JAlp Np"_HdBgHd? `/ Q?Na I `a I03 Q _#NA26RCK"HNu`(N^*Prospero2.10 Execution error: bad command pgm not openednot executableload failure wrong version out of memory init. failure no parent pgm stdio failure memory shrink linking order  :Bgp NNuG.k +f <,kagNu,f?<6aXNuaf'H&,`'j,f7|$` +ffT 7|$`7k*$|Nu+Nu k"k U4+$TBa >fUAT Af g 'I7A7A*Nua*g @g a|NuaNu?<a"k 2+$` +0arf$`4+*SBa fQR0 +,0bBJNuf@H k  g 0g 1g +g &ga`a`ar a`r a LNur ar ka fNuaNuJ@f k  pag aS@g k"k R4a fNuaNu k"k 4afa* f`0+`a,4+*7B"k 'IajfR,NuaVNu?</axNu +,0d`N4+$k&e4+&7Bg"k 'I ka fNu?<(a6Nup(J+k kaf.AafAB"k 'I7BgafNua(frNuagNua,NuagNu?<$aNu",gS)Ar2+$7Aҫ 'A 'ArNu",g l` l r2,f'@ 7A$7A*NuNuBJkkg k'HSkJNu?<aNp`aJ _g g ,g /gTTTTNpkNuBka2f2g0+$7@*0+* k 'H7@S@ QNu'k 7k$p aNu'k 7|~kB+NuB+'k 7k$Nut+"k kaf\Nu k+afJ+af<B"k af,Nur a&"k 4+*azfR, +0,d'k,0Nu +,0ma`afNur2+*a)" kaNu@)R@ko NNNu0+$kS@gp aNu _/Jkg k'HSkapNuaf,fp?apNutff`tp+gg l oS'@,`fpp Jg +gb`+fX*g*p ,g+f<`.+g(`$Jg,g`NNu?aNu"_0+BA,)@o27AA?N"_2kNpaaXa@gNup ?aa2g l " g7@Nu,fNuX,gB,L tNu,Nu l,fNu l,fNu.l|/` @fp;`D@?aNuH`FCaP"_.JNNR$O$0*H%@aTaafC~aC,H1CaCka O/*/pa/xaC[a&,ff CMat` Caj` O/,/p a/:aZ jc0*@D@Hapa4 j l$pa& gBk"RENZ _Npa)@Nu ,Sg)@ l)HJNuH t)l&l&SNu,Nu0+$kko7@Nu*,_Jkf N/M :NHHN````0`D`L`R`X`^Q`,0Q`$Ha/ *O+ 0&t`Ha/ *O+ NM N _M N/Hz4`/Hz5`/Hz+`/Hz,NAXJNu// ab/?<ANA\"_ _JNuNuNuv`vaB?/?<=NAPJm @pNua(Bg/?<ANA> laf Nu lafNu"X4` la fNu|` Za "_ O/ a(NuraRfz`zVAaHgzk8RANu/ BPCa&fEa(`Ea a,ag EaE8a$_Nu @Nu$ Nu4P`QNuDt H@0B@H@QVPNur H@J@g&H@4B@H@ HB4HB0 H@HB0QH@J@g H@B@QNuB0QNuProgram Option string Too long: Standard input fileStandard output file?  Stmt: Status:  Unit: InternalREADWRITEPRINTOPENCLOSEINQUIRE BACKSPACEENDFILEREWIND $.6Address/Bus errorIllegal instructionPrivilege violationOperating System error - Disk full on YyNnError at address File at line address ContinueP(not documented)ACjSg?HeANuAAALAQAXAZF F (I/O statement already active)AJAOATZY (missing routine called)ABAKAFHSAPTB (set bounds error)AWACARDFFN (illegal filename)D (illegal for SCR)F (illegal element size)F (file not found)D (Append error)IJF (at eof) F (at eof)F (no rewrite) F (no reset)F (no reset/rewrite)F (read/write nesting too deep)AGAUDC`CגeNup`$- - "<Ҁk Ѝԍ/a ,/H")Aaj lA)HNu l&g)Pg"lgaH`Nu/"<pЗ≰m"a f Ё/aB` ag`pXJNuC" A"gb$"_/ "gP"v֬gPJge P` "B/ aNu)W`RQdBP"l Q&f lA`2f"f "lC)I`P"( k!A`:"Hf/ 0b <8af `X,f,g |"_  _ Npa)WRQdBP$ _// C"Q& g(bcE"J$Q& gbg `*$_$/ /pa _$_Nf)I Ъ!@")҉f"ѩ`"!@$_Nu`` `)`$`\```"`f`T`)`*`)` (`P`"`#`8``V`B` ```"``*`'D`+````B`&J`+` `` j```%"`*` ``R```~` ```%`%``)`` ` b`"N`&``*`V`&`4` ^`*`)`!t````x``r````\` ` @` ``'``!(` :``` ````*0`*@`B``f` 6``t`!V`@`8``*`'`"p`)`&`%` ~`"` b``%|` `*`````L`\`t` `& `(`N` `#F`%R`@`B`'`)r``%r`'``%``R`` `~`:`&``````&` `d`$,`N` H`'`(`&`(``R`!``0`!|`````#`(`N``(``` d`b`6``x`'*```$`$`,``P`H````` d`$`\` `^`:```Z```:```h`^````%``(,`(P`0`(Z`(`(`#``'` `#```'P`'`(^`(`````Z```````'(`v`z` ```.`````````H> N<)OMN.l l(f. +aNu`fga& +0lat` +Ra`a+g'k0`Nu kB2+*Daf S,aaNu2< ` 2<`2< )_H L _?//a Jg `` Wg$ W g> pa L7_NL L lNA8p`d)_H L0^@/7/7a Jfpa aL L lPNA0C8rag _2RANAp`a`H0&l.`a,a\a`:a`H0&l.`aaN`a`aa +`a`aa+f `pahp`a`aat| N| N`a\` H0&l.`ana k&`a@aa"+fa``ba a| N| N`@A."_)WH0&PN l` lX` _)W"o.H0&QafN _`L Nu+ g` +g+fNu+fjN +gd+ g@ g gNu@`+g + g| | Nu+gNu+gp`Nu+fp`Nup`p`+ga\+Jko k'HSk fa$NNum g gfpa|`"k T4<kg kafFNu'k T7|+wNuSkna kX'HNu k"k T'I4<a fL7ASA  Wf "k 2Nu0 @g @f 0|< a"k  Tk` @fBaxJfBk`"k7|``+g+f +f?| N| N0` l+afNAXJkNu`"a` k+g+fS'H`'HSkf(+f"k 4+$k ka0f`aNNu+gR0Nug, k"+ $D+f B0+aZ"k a k"k 4+$axg @fdJAf 2+$'k 7ANuSkna+g| Nu kX'HNuab k+g*+f"2+*H$Daf"k&aTf`n4+*"k&a@fNNu'k 7k$+wNu k+afNu kaafAaaNu+f|aA8+gJ+g(+f afg @fVA8a\fL`(`*BkaNg" @f2A8p`@a>f"N'HaZ+g ka*NuCT`C` CL`Cb+fNNu kBNu+fA k*nAaNu+f+fa>gkA8p`Nu+g+g +fS?a0+f&g kaJf+fA8azNu'zNuN k,'H X'H7|NuJg"+g:+f| af|a^Nu k,// <a _ fB,B0NuJkf k g @a kX'HSkNuNuNu+gaJJkf k P faaX k'HSkNuY/ <a _B|J,f'H,`"k0"'H0Nu$%'-@{}~!#_` ./JA $OBjS@kNT  VgBSrK gX  gR ,gL /gF :f jg jf0RjS@[j` J* gp.J"R2$j JNup` RT0*J* f @f (:f S@2a`aa6J* fa`J@f` @m (:f rPafTUNu`RS@NuJ@gj Bo .fRoan onN`F \f on>a`Jof4.?@r\a?Ag W0/S@aR0/o` W0/ Nu`*.?@r.a?Ag W0/S@ra R0/ora` W0/raNuJ@g4An0`"rZa.g$ 0e 9cC8t Wf QB@NuR`` Ae߲d ae  erNurNu?S@kWfWD@`p2TNu o g &l" gg&k`4fB _PNaaL o'H4 /g n @ga`aZ`a,p`p` gf TfpNupNuaadNuAa7|$a47|*A'H& NuAa7|$7|*A'H& p0+$Hk aNu7@$7@*Alada'k &NuN7|NuafNuAZp`ap` @NuN NNNNNN*NNNxNN(NNNFCA chain corruptedH$C82 "ARPa".$$$L$Nu kr a޸fr aްNuYCaf /r2+*a '@0p0+*a"XJNuA&'l)KNu ,g&@$k4/+pN fNu/ <YHWat&_&Nu K0<MBXQ'zNuNnC 0<"QNuC :"""" "NuC ""#hNu g / <aNu gA"g"Af pNuA"fpNu _2FA0<aQN WXN WXNu$jD&gjD"Ba& jDNupO`pJapNu @&HCJCf $B@H@60H@"B4È0H@Nu4RBHC€H@B@H@H&4HAHA҂cS`NuPL/ a _"_"QNNq` _"_/" JjD&gljDan& kD NuJn papNu"@JjD/aF& kD$Jl҂ Nu$jD&jDoA$HBHBJBfЂeBAJf $kJjDNupOapNu$a"_" jDNP _"_ N _ Q BN$a"_" lBiN/ /J,f.p a$BNuaLA,a,ja _PNAaVk`ZAaHj`L/aB$HB06HC$46$HC0H@$6gRAA\od`a `HB`N @ilJog$"C ։ՀgRAVASofJAk AlA!!1 oap _\"_Na` Aa..AJfNuCJg 0Y@0HAC" $>&HA,HBHFBЁ݂HF"BAHAH@B@ހ݁a Bރ݁ IC&a ևӆ"",.J,jD,`^/a _a` a Aa`a` Aa..AJf pZa bN LCJg0P@0H,. "NHF:HG<HGAʀ0HA00HA00B@04<HB4BF6A,("HF HB*҅Bх.҇хHAHBH@܄хH@FHABFHFц2HAB@H@( 6HBBCHCփւa B(֐ӄL0C`a`L/H`aD,`D,a`D,L/H`aJ,fNuAJg l0,2Pm@g0 @8l VaBAC,,k щщ`jD,PD@`D@ @8lAa`AJg 0@m @l0"B ҂!NuAJg X"B !Nua Aa aA/a*a NuArJgnjDD0 B` a ~ /a`AJgH2X$gF&YrPAgWJf>JAg 㸐ԀA0k Xl NupXa ` ܓ $gB`Rf`"$a !Nug$BNu&໖ԃNuC`C$ "/`C`C "H@f Jf###Nu$vB##BT@J3NuC` QA/C&!$!2!Bրd RgRAJfJgCX B!AQAHB!NuP oaf"_N oa _PQNP oaF"_ o //N o az _ QN026Ac6SCm VfANu&2 _/SAm 4Ao@d 0p aNug4X"H@A`QNu0Nu"o6J@gDS@o on86@m224o 2` SIQA 6"o`00Q`p a"WO 6RCNaB/20JAg AmvSAH@ VLg RCRHQv  W.BNaXH`aP//206Ac6SCm VfA _._NО?@Bo oTJjD-RoSo. /AaA0< JVSJ@jB@"WJog$0RoSoQ o0 _PN//p aߜX`&42/JBofAnbHk^@SBAo04a&R@B4UOA"HRAgRB4R@dS@/ Q"_` QRI.I?/Nu0<TOa/Nua"20<QJAgbQ Ao2a2Q0V@/ aF"_>2<0S@m RAQ0S@"Bt RARBQ2VA QRI.I/Nu&B2AlaD0QJj/Nu&2Ala(Ag 4RR@RAHIAH Oa׼"OQ/NuH/p aD& "/4V@VAA0"H2RA1!Q?W"O/L._Nu"_B0"RAN & O2VA"OB4VBԉ/Nua/= 2^31+ or - not followed by a numeric constantError in complex constantString not terminatedIllegally terminated hex constantMult errorIllegal use of left parenthesis= expectedValue not terminated properlyVariable expectedFilename expectedSyntax errorInvalid file nameIncorrectly terminated commandListing file not availableSYM file not availableprocedure not activeno source program active from that filename not recognisedNAM file not availablevariable requiredname is not a variable or constant heretoo many array subscriptstoo few array subscriptsarray subscript out of rangeinteger value requiredvalue or variable expectedanother symbol required hereunrecognised commandvalue out of range'QUIT' must be typed in fullvariable is not a recordname requiredvariable is not a pointernot allowed for this data itemvariable not allowed hereincompatible data types']' expectedOnly first 8 values acceptedScreen switching not enabledSet too large to alter (> 2039 elements)Unable to execute programDebugger may not be present - type Y to confirm Probe errorNo program to debugN$m BHmNf -VD+Jg ~$m `xNT$lHjNAjp0NpNNHmN``ApNB-Ng~G$m `N$lHjNN&]N]N N+m B-$m$&]N]N N+m -"<NH"-@+@$m$&]N]N N&]N]N NJ+dgf +T`g\/+`NZ'k`TNT$lHjN~pNT|jpNTpNTzYpNTx9pNT~ pNTN&]N]NuNJ+dg@ +TXg6/+XNZ'kXTNT$lHjN~pNT|kpNTN&]N]NuN+k$m*, VD*%Jg`Hj.N@H Jg,NHj.N/- <N*2Ї;@2- @AUD -B>*4WDJgB0-B2*25@&Hj..-/2x6N$m0*&m d$Ma"mB0)&SB2)2NHJf"mHi.N@H Jg"m0)4~GfRBi4|+F$mB0*4R5@4B0*4.-&%x686 -T+@~oB0*2B<*2І5@2$mB0*4R5@4B0*4/Hj.N&%86`(`$m0*&m d$Ma`$mHj.N@H Jg*NHj.N/- <N+H3x|\VD>+H3xz:VDJg ~?Hkx@?0+HRNAN$m ANNNJg&~"mANANNAp@N`NT"lHiN~'pNTANpN` ' is not in Ap NpNNANBgNf>NT"lHiN`the default directoryApNpNN`,NT"lHiN| pNTANpNNN"lHiN|.pNTNNT$lHjN`Which directory is it in? ApNpNN~a`N$lHRNHkp@N+H3x| SDJgHk?+pN`Jko`$]N]N NU + &lp2-@mJA@B-5x|aTD5xzzSDJgB5xFHxAЄxR-S-d- ap`PRNCAr0`Q`l`NAMCAr0`Q`P`SYMCAr0`Q`4`HLPCAr0`Q`@rN NB- +sxB-B- Jg(JfHm <Nl+mC$mA2RAQCA2RAQm ,ANp.~?NANNAp@NB*%Hj( <Nl |@$m j(B-BxR-S-dHmHmaJ-g~$mG%k$- gHj.BANNHj.pN5G2Bj4J- fJA6+H$mHj.N"m"Hm/-Hma;mJmg$m5m&"mBi`Hj.N%@65G&`4Hj.| /ANNHj. NHj.N0(GWD@2`$mB*%B- $xB- 'x~G`R+mC$mANWD@CANWD-- *,WDJg~G`+R`$m$&]N]N No help is available on this.NHm`PROBEApNpN~ap+m$mJ*%gHm/-~?a+m$mB*~AGHR;@J@l|;F|;FBm~;G/-a0-HR;@0-HR;@~;GG0-m _D0-$mR_DJg">-H5x ,2hgB- HR;@`*~.WDB- Jgt0-H<-HІ;@Jm^D*WDJg@$m*~.g/-a0-HR;@`/- <NDJmf(N$lHjNAZpNpNN`LJm f0-HR;@0-H2-H;@Hm/-0-HR>-HЇ?a.+mp2-@m>;A;@N$lHjN"mANpNN/-aRmSmd0- @oN$lHjNNNHjN`:. . . press RETURN to continue; SPACE to leave HELP . . .Ap9NpNNHmNTm-~ f|;F0-HS;@J@f/- <ND`$N"lHiNApNpNN&]N]N NHmNNJ-ga2~aHmN`mB+ JgFN$lHjNNNHjN`***interrupted!ApNpNN~ap;|u0;@RmSmd~G-| f$m `z$m ` B+$m B&]N]N N+m ~aTB-$m *gDNT"lHiN` ApNpN jNpNN'j~G  gVNT"lHiN` (source file: ApNpN RNpN~)pNTN'R |FJ-gN"lHiNNHm RNpNB'a+mHm/-$mHjB'a:+mB-~G$m*~[f*N"lHiNANpNN|F`.J+g` CAr0`Q"m7iJ-gB$m j(B+Jhg j( phB++pXJg/-HmpNp z?ANNApN0- @l p ~?ANNApN`B-AN/-?<p NN$lHjN"mANpNNHm/-/-a;m$m*~+VD@J-g/- <ND"m AN &]N]N NB$l&+j~GHm/-a4+m -$l&WD@ -l* Ї|Mo$Ra:$]N]N N$mJfBNT"lHiN` not used by the programApNpNN`v R+H0-a0$m~ TD|~SDJg(p'z??Np'?NAp N`F@H/Hmp N`chr(ApNANNp)z?NAp N0-?$MaNT"lHiNAN0- NN`~?$Ma"m c0NT"lHiN` ???ApN0- NN`"NT"lHiN"m0- NLN`&~?$Ma4"m) c0NT"lHiN` ???ApN0- NN`$NT"lHiN"m)0- NLN`~?$Ma"m) c0NT"lHiN` ???ApN0- NN`$NT"lHiN"m)0- NLN`F~?$MaTNT"lHiN"m/0- ?NxN`~?$Ma"NT"lHiN"mANNT0- ?N~N`~ ?$MaNT"lHiN~(pNT"m/|?Nx`, ApNpN"m/)?Nxz)pNTN`t~?$MaNT"lHiN"mHH/0- NrN`>~?$MaLNT"lHiN"m@H/0- NrN`~?$MaNT"lHiN"m0H/0- NrN`~?$MaNT"lHiN"m0H@B@H@/0- NrN`~ ?$MaNT"lHiN"m/0- NrN`j~?$MazNT"lHiN` ?ApNpN"m/B0- UNrN`$S@r NhL D+HHB>- Ї@$]N]N N+m $m0a2NT$lHjN`ARRAY ApNpNN`JNT$lHjN`STRING ApNpNN`NT$lHjN`SET ApNpNN`NT$lHjN`POINTER ApNpNN`NT$lHjN`RECORD ApNpNN`NT$lHjN`FILE ApNpNN`PNT$lHjN`ENUMER ApNpNN`$m0* @f0NT"lHiN`CHAR*(*)ApNpNN`.NT"lHiN`CHAR *n ApNpNN`NT$lHjN`CHAR *n ApNpNN`|NT$lHjN`????????ApNpNN`Jr N`.( #@@$]N]N any CHAR LOG*1 LOG*2 LOG*4 INT*1 UNSBYTE INT*2 UNSWORD INT*4 UNSLONG REAL*4 REAL*8 COMPLEX HOLRTH STRUCT any CHAR BOOLEAN BOOL*2 BOOL*4 INTEGER1BYTE INTEGER2WORD INTEGER UNSLONG REAL LONGREALCOMPLEX STRING STRUCT NNT$lHjN` (ApNpNNJm l?- Hm$UaHma$`?<~?0- HNf|;F 0- HR@J+8g6NTHjNAx <N-@?pN pNN`4NTHjNA <N-@?pN pNNNT$lHjN`) ApNpNN+H~ G@$]N]N N+m $mJf:NT"lHiN`NILApNpNN+H~G@`RNT"lHiN~^pNTN+HR@@"mJio?)/-| ?$Ua` ?)$UaB$]N]N N+m +m$mJjl?*Hm$UaD~G`B-NT$lHjN~[pNTN+H;@+HR@@@B-"m )Sr@m`;A;@J-gJmfB-`?-Hm$UaB0-$mA"<NgJ-g6+HT@@NT"lHiN`, ApNpNN`~GJ-gHm~$Ua`"m0) @WD0-~ GTDJg*p'|?0-?Np'?NAp N`0-H@B@H@/Hmp N+HH<-HІzMo$UajNT$lHjNANpNN+HH>-HЇ@RmSmdNT$lHjN~]pNTN+HR@@0-@$]N]N N+H;@+m $m0@;jHmHma;mNT"lHiN~'pNTN+HR@@@|;F0-mbHmHm?-?-am-~ UD-|RDJg@-@H/HmpNp'z?ANNp'?NApN`-z?ApN+HH8-HЄ~Mo$Ua+HH>-HЇ@NT$lHjNANpNNB0-R;@`NT$lHjN~'pNTN+HR@@0-@$]N]N NBm0-B-A]DJm VDJg"?- Hm$Uaz;m 0-HR;@`0-B-Gf?- Hm$UaJHma\`F+H|F@NT$lHjN`? ApNpN @H/p NrN$]N]N N$m0aH$m "m?) $Ua$`N/-/- $Uat`>/-/- $UaH`./-/- $Ua``@rN$]N]N NJml?-Hm$UabHm/- af`?-Hm ~?$Ua$]N]N N0- a<~$m`V~$m`L~$m`B~$m`8~$m`.~$m`$S@r N$]N]N N - Y+@$m$$]N]N N$l&+j -"m B>ЇY+@$m$$]N]N NHm/- a+m -$m>*HЇ+@$m$$]N]N N$l&+jHm"m/)a+m -"mB>)Ї+@Jm l 0- HD;@ >- H$m"m"x$]N]N N&l$mJjcHm/-aF+mHm/-a+m -\+@ -\+@;jHmaB- Jg4NT$lHjN`called from: Ap NpNN$]N]N N+ - gApNp2N$Ua$]N]N NB0+2+FHldB0+R7@B>+Gsx+~{f:B0+R7@>+FGWDB<+G3hz}WDJg$Ua`~ G$]N]NuN$Uat+~.WDB0+2+FH]DB0+R&G38WDJgB0+R7@|~F$]N]NuNB+B+J+g kB+`$Uaxp0+SD+~9SDJg|F`l+|ATD+zZSD+x_WDJg`:+~aTD+~zSDJgB+~aGHІ@`~Gk$]N]NuN$Ua6+~ g$]N]NuN++@H Jg$Ua`~G$]N]NuN$m^BBm$Ua0-HR;@+>-Hǰ5x g` m \D+Jg|"m^$]N]N VN+~ f$UaRB+ +a~G `R~G `H~ G `>$Ua`+~>f| F `&+|=fzE `zEB+Ex D `$Ua+~=f|F `|FB+FzE `~G `~G `~G `~G `~ G `$Ua+~.f|F `|FB+FzE `j~G `b~G `Z~G `R+~ f|F `@rN((p))z,,--..::<<==>>@??[[]]^^~~$]N]NuN~G$Ua+~'fa+~'gB-+| WD-JgAdžpNp2NaB-"m $]N]N N~G |7FBkHm$Ua|J-g00+ @l$AN+~?NA <N`0+ @f ~7Gk$]N]NuNB+~0G@ + ]D + WD- _DJg +r N-HHІ'@`>$U * l$ *r N-HHІ%@0*HS5@0*HR5@$UJ*g 0*HS5@$RaB+ Jg>$]N]NuN~G $UB*| 7FB$U$Ra\J+gB+~0G@`:pA+SD+~FSDJgB+|AFHz Ѕ@`|FJ-m* + n +-HHЇ'@`~"UGJ-lr"UJ)gApNp2Nap"U)~-f +D'@$]N]NuNB-B+ B+ BkBk~ G$Ua:+~'fa`+~+WD+|-WDJg ka+~$f $Ma`+~.fX$UaJ+g~.G|FB+F`2-~ gAPp)Np2Na~.G|FF`~`B+ JgJ+g-| g mzE`-| gAp)Np2N$Ua.B+ Jg,AN+~?NA <N$Ua>`~G `TRUEANApNNf|F 7GF`.`FALSEANApNNf|F 7GB+`~G B-B-BmBmB| 7FB+z.g;k`~~ApNB+Ng$Ua`7m~G+|hWD+zHWDJg$Ma$Ua:`` $Ua.$Ma+~.fV$UaJ+g~G$Ma`~GBmB-$UarB+ JgV+~-f|F`+|+gAjpNp2Naa0B+ JgADpNp2NaB+ 0- @ l B+~0G?0-| :HЅ;@`ApNp2N$Ua݂$UaB+ JgJ-g 0-HD;@0-H>-HЇ;@J-g+kJ-g -NDNHmHm?-N6J-Nq~ 7G -NDANANHmHk?-N6B- JgARpNp2N$Ua-~-fANNAN`h~ 7G -NANHmHk?-N0B- JgApNp2N$UaV-~-fANNAN`0JmgApNp2N$Ua-~-f +D'@+~,WD-+Jg+ WD0+| FWDJg\J-gD+kz 7E'm'm+x)gAtpNp2N$Uaێ$Uaa*`+kzE`(`A@pNp2N$UaZ`$Ua+ f7kB+$]N]NuN$mBJg> <"-N"- @n -"- N$`A"p Np2N$Ua$]N]N N~$mHm?- ap-H@m2A@B-$m2x,"m1hg$mBR-S-d$]N]N N$m 0a\~$m$`~$m 0*H@B@H@"m"`f$m *^rN"m"`N~$m$`DAp Np2N$Ua`,rN@@$]N]N N~+GJmlHm0-HD?$Uaږ+m"m0aHm$m0*H2*HR//-$UaX+m"m;i`Hm$m *R//-$Ua&+m"m;i`tApNp2N$Ua4`\$m0~Gf /-HkFaHm/-Hm/-$Ua/-a+mBm`rN8p #/-p ND`Jmo*HmHm?-a-HH//-$Uah+m$m$$]N]N N+H fjJkFo6B+HHm?+Fa-HH$kJCAJ$HB`QQ`.?+FHm$Uaؖ0-~Gf HmHkFa0-a$kJRJB+O~7GP|FNB+H`$kJCAJ~7GP|FNB+OB+H`HmHm$Ua6+m - oAfpNp2NaגHm <Nl"-"kJ$mA$HB`QQ'mJ0-@N~GO -7@PGH`4A"pNp2N$Ua.`@rN2\\\\$]N]NuN$m CAN J-fCA ` "mAN0-ab-@H$m$`l-HH$m$`\0m$m$`P0-H@B@H@$m$`>$m$`4AzpNp2N$Uar`S@r N$]N]N NHm/- a.+mHm$mANpN~aV'm,Hm$mANpNB'a4'm4Hm$mANpN~a'm0$k0j28$]N]N NHm/-$Ua+mB+|0- a0~+G|+F`2+|+|` +|`B`[@rN -]D -^DJgApNp2N$Ua$]N]N N+m0-$mڰRg?<~?0-HNg?<?0HNg?<?0HNgHm/-$Ua"m#m~ 2$m0~ GfANNAN| 4?<|?0-HNgx0z Ef^A*Ї'@$$k$CA$`$m'j$ +$"m >)HЇ'@$0)HD$m"*@m +$~Ї'@$`ZB$`TA '@$$m'j`>Ap Np2N$Ua`&rN@@$m/*a0 @WD0 @WDJg"k$A$$]N]N N$m0mgH0HR>-Hǰf "m /a`,JRo"m / <NDHm/+, ?a$m $$m4$]N]N N~;G$m 0* HD;@"mBJmgZHm?-$Uaư+m"m;i 0)?HmHmaDC$mANf"m"Bm` /-p ND`Jmo/- <ND$]N]N N+k($k,B*% JgApNp2N$UaBJg+m~;G$m0*HD/0*HD"@mr;A;@0-?Hm$Ua`0-~ G_D0-H"m<) HІJWDJg$0-?HmHmaDC$mANf`,RmSmd$m+R`RApNp2N$Ua|/- <ND0- @l~GH7mFHm/-$Uav'k$JJkFlf?+FHmaĘ`ApN0-HNVDJm]DJg?-Hm$UaZ`0-~Gf$kJ0*7@P'RJB+O`ALp'Np2N$Uaú$]N]NuN+ a8B+H7kFCAJ `2$Ua`*ApNp2N$Uat`@S@rN$]N]NuN?- Hm$UaðHm/+(aj+k$0-a4$mHH"m"`6$m0R"m"`($m"m"`$mB`[@rN$]N]N N+m $m0az$mB`~$m$`$m"m"`Hm$m?*$Ua<"m"`b$m0j"m"`R$m"m"`DA2p Np2N$UaV`,@rN~$]N]N N+m $m0a~$mB0*S"m"`$m0*H@B@H@"m"`$m0j"m"`n$m"m"``Hm$m?*$UaVHm/- a -ЭS"m"`0@rNz"""""""N$]N]N N;kFCFA B~+GJmmApNp2N$Ua?-Hm$Uat~G0-aD~ ;G`h~ ;GB-`\~;G`T~;G`L;m`DAxpNp2N$Ua`,@rNHmHm$Ua+mHmHmaR+ma?-BgaVHmHkFaH+m -ܰ]D -ܰ^DJgApNp2Na -ܐ+@J-g&Hm/- -ԐR/a -Э+@`FHm/-/-a -Э+@ - lHm/- -ԐR/ah+m;m+ gRB- Raתa"J+ gApNp2NaZCAF 7mF'kJ$Hm/-Hm?-Hk$aB/-a/-a.'k$J$]N]N NU+ ArBXQ$UaݠJ+ g."m ?)BgaHkF~?BgaB0+J"m oApNp2Na+ f;kJaBJ+ g"m ?)BgaxHkF~?Bga`;kJB0-"m oApNp2NaFA <N0-H@B@H@Bg/0-H@B@H@/NNA <N`ApNp2Na`2A <N0+JH@B@H@Bg/NNA <N+ g+ gAp Np2Naa>HkJ <NlHm/- a"-C$kJA$HB`QQ~GOHm/- $Ua -7@P~GN|FH$]N]N NB+HCAJ 7kF$]N]NuNJml?-Hm$UaX+ a+ fh0-~ GgApNp2N$Ua~G$Ua`+ VD0+~ GVDJgApNp2Na~`aR`N+ fDJml>0-~Gf4 - oAp(Np2N$Ua:` Hm$Ua&7mF`aHkF?-?- $Ua`Jml0-~Gf>HmHm$Ua+mJg$B+H"m )@J~7GF/-p ND`0-~GWD`NILANApNNWDJga\BJ7mF`H$UaaHaHkF?-?- aJ`*Ap Np2N$UaB`@rNN,$]N]N NB+OBg~?B+ Ng+ a^+ $Ua`pCFA JkFl?+FHm$Ua6`ApNp2N$Ua0-~@GgA,pNp2NaaB+ gA"p Np2NavHmHma\+mJfApNp2NaJCAF "m7iF'kJ$/)a:'k$J/-p ND`?+FHm$Uaj0-~GgApNp2Na'kJ$"k$A$'k$J7mFalJ+ gApNp2Na` @S@rNN`b$]N]NuN$m0* HD;@BmJmgt0-?Hm$Ua -B2-찁m -R;@0-HD;@`:Jmg4 -B2-찁l -;@0-HD;@J@g ?Hm$UaR``$m0* ;@Jmg0-?Hm$Ua* -B2-찁m:NT"lHiN`...variant fieldsApNpNN`H+m -Э+@Hma?-/-aDaV0-HD;@J@g ?Hma`Z$]N]N N$U *Ъ%@"j0~Gf.0) HD?Hj$Ra`"U )0)HD?a̜`0|FWD *z^D * ]DJg*p'x? *?Np'?NAp N`/*Hjp NNT"lHiNANpNN+HH8*HЄ@NT$lHjN`, ApNpNN+HT@@+H"U3@k$]N]NuNHm/-$Ua+mHm/-a+mB+m -r@m+A+@$m0~ GWD0|"FWD0z#EWD0x!DWDJgJHm/- /-$Ua" -Э+@ - lHm/- -R/a+m`&Hm/- -R/$Ua -Э+@"mJil$Ma"m?)Hm$Ua>0-~Gf HmHkFa0-aHm/-/-/-$Ua`'m$Hm/-HmHm$Ua/-aD/-aHm/+$a`d'm$Hm/-HmHm$Ua/-a /-aNHm/+$a`*rNl #l@@ N0-@$Ua`J'm$Hm/-Hm?)a-HH/aِ/-aJf~GGBm`*B-Hm/-/+$"m?)a٬B- @B- Jg B0-R;@ -찭WD-JmRDJgl0- @cVNT"lHiN` (ApNpN0-H@B@H@/pNr` elements)Ap NpNN0-@a+k$J-g"$Ma"m?)Hk$~?$Ua~;GRSd$mJjm0-@$Ua$]N]N NJmo?-Hm ~?$Ua4`|?-Hm$Ua0-aLHm/- B~/$Ua@`PHm/- $Ua`@0-~Gf HmHkFaHm/- $Uat`rN #@@$]N]N NHm$UaJ-Nq+ f\aa+H faaF+H gApNp2Na?+F/+JaN"lHiNN`nJ+ WD+ ~WDJg?+:0+D?a|+ ~gApNp2NadHk:aH`Ap Np2NaF$]N]NuN$m Jg+R R$"m). f\/<~?B)HNgF"mC8AN/- <ND"m)L| gC0AN/- <ND/-pdND`x$]N]N NHm$Uam+ f+ ~gApNp2NaCJA `ANpNp2Na0+F;@~Gc;GAFN|?0-N ApN`B- + ~WDJg0J- g"ApNp2Na J  |,N"m f~bG`~wG+QJg+m$m*.aNT$lHjN-pNT` 'ApNpN"mANpN`':ApNpNN`NT$lHjN-pNT~ pNT"mANpN|:pNTN`PNT$mANNpNN`4NT$lHjN-pNTN`@S@rNr$m*. WD*. WDJgNT"lHiN~ pNT0*0H@B@H@/pNrN0*2j0cXNT"lHiN`..ApNpNN0*2 @d&NT"lHiN0*2H@B@H@/pNrNN"lHiNN+R`"``B- + |WDJ+ WD+ zWDJgl/-a+ ~fJ- g``B+`FaN+ ~VDJ+ VD- JgA6pNp2Nal J  |N`"B- JgApNp2Na:$m'Rf/-pdNl R/Cf$_ANc$]N]N N$l&"RANAjp(N$]N]NuNBNT$lHjN`Active line: Ap NpNNA> //a$]N]NuNB+ @J+gDN$lHjN`keyboard interrupts enabled.ApNpNN`DN$lHjN`keyboard interrupts disabled.ApNpNN$]N]NuNJ+dg/+XNZN$lHjN~pNT|kpNTpNTzEpNTNNHjN` screen switching disabled ApNpNN/+\ <NDB+d`ZHk\ <NlHmN*'mXHm/+\a'm`$kXC$k`A"<|Q/+`NZ$kXBCA"<Q|CANN~UGCANN|@C@AANNCA"<voQNT"lHiN|pNTzHpNTpNTxjpNTpNT~YpNT~9pNT~ pNTNN"lHiN`screen switching enabledApNpNN~GdGR$]N]NuNN$lHjN`Last ApNpN+EHH/pNr` starred lines:ApNpNNB+E<Dm@A@+DH-HAHRr NHr N&Hs8aS-S-d$]N]NuN&l$mJjchHm/-a+mHm/-a+mCj$mANf2"mCAj2RAQ0+ @f "m7i~"UG$]N]N NHm$UaJ-g+ f~7G"l&0) @c B0)[7@0+Gd7G$QANAjp(N7k0+ @fB0+~ Ї7@J fHmAjNpNB'a'm $k B*% JgA&pNp2N$Ua-HJxg j(/0x <NDRmS-d$m/*( <ND/- <ND`$`$`,$]N]N NJ+o +HS@@p~G@B-HsxaR-S-d~a4$]N]NuN+HR@@$l&B*"$]N]NuNB+B+B+B+BkB+B+B+` ANApNNc0`X ApNANNAF <NBk`J+gHkN@H Jg NHkNHkF <N>ApNpNN~aN$lHRNHkF <NA@$m jDB-0x,2h7gzE jD(hH7R-S-d`ZpB2*JmNA@$m j8/ jDB-0x,"_1hgzE j8/ jD("_hHR-S-dJ-g$m*L~ gnJj@o"Hm jDHP*LHj0?*@am`F*H|f"Hm jDHP*LHj0z?am`HmHjD*LHj0aHmJ-g:NLJ-g ~$l&G!B+ Jg$Ua~GN NT$lHjN~ p"m2)NHNT|'pNT"mANNpN`' ApNpNN+HzE@"mJi@lD?)@Hm$Ua0-~Gf|;F0- @f "m;iJHm"m/)Da`?)@HiDx?$UaN"lHiNNB+B+"l&B)! JgB'N~ `@rNf N$m+R `$]N]N NJ(g'k($k('R(/+pND`$]N]NuN$m BB+ Jg`"l&J)"g)" f a``)" fa6B+` PROBE.SYSAp NNJglHkB` PROBE.SYSAp NNHkpN~GN} N}$MaaB+ +JgJ+g B'N|``)" fB+B)"JkcB0+S7@J@fB+++JgHmaVJ-gB+B+$l& *~ %@Jg /+$MaJg /+$Ma$l&J*!gB+Jg /+$MaB+ $l&*!Jg>~N|N| B $l&HRa$l&B*!J+g B'N{`HkaJ+g` $Maa`N|PJ+g$l&7j +g&'RHm"kANpNB'N'm$k j(B+'pxJfJHk <Nlp|;@>-H$kBxRmS-d$k j(B+!xB+"k 1hR#h+DHR@Hr NH@DHHr N/$l&C&A8N +E~ l +EHR@@E&]N]N N~G$l&G HmNf'mBkB+B+dHmN*'mXB BB+B+B+B+BBBB+p~G@B-BxR-S-d$l'jHkB` PROBE.LOGAp NNHkpNHkpNB+B+BB&]N]NuNNB'Nya ~NyN$lHjN~pNT|EpNTpNTzvpNTNNHjN(*Oaaa/aB .ML|Nu+_J@gLS@  Vg@S+H  WJ@jB@`SR@";A"Ha+O "m0-a+O mNp` _2XA>RWE`QN ,f l (, @p afP*Cpaf"UUApa<0N<.Nplr2+Ao0@` ?<0N0Qa`?,RW0+aN[ _XNNSJk gJkfp/+N`A NNpANJk [/<Nn BlBl`D'|?UHWHk?+DWN\TANAN(ANa /,a`Sl?+ ?+aN[ _PNNS0+f/+pN`Q@dpP@7@A NJ,]NpAN/<Nm BlBl`JaA ?UHW/pk?N\TANAN(ANa/,aSlp J,gp-N?<0+_@a<ENp+Jllp-DlN0,H t0BH@B/NNN[ _\N0HNLNuH0/g,BAA`t0Pl0RAaQ"HAQ2`QL _TNBJ@oS@RCtMCNuJ@fpNp _"/?@C// p N0/Wd0ANNu0  bNu iԀi iHHԁNu)_H L _&PN8f$+f+fJg`` ApNL L lN Echo error)_H LX _&PN8faL L lNA pN` Close errorNata<AJg B0+<SJf+L NuLHNa."/ aJ+/ @BkN L LN+f:+g2+f*Nu kBN,fNu kNPfNu @fNuA`A pNNote/Point file errorNote/Point usage errorAa&g Ia` p`Aa _2RANr`r"lC0NNuAag0B1?<Bg/ ?<CNA @fp`]@BNXJ/g.4NhaN WB/\Nu+f + g /B0+$NNu/Ng @g`Np`p&Nu"_ `"_ "mZA// b\&PPPo6B40Ԉֈg(" OCN|C"OJ2QK`BYQ A"_"$(RQNpN"_XN@`HH"_4Jk"扲Bl7NѰ@N@`HHJk$抴Al0 Nu@NuaHACa J$_"_.HNaaD`An.gBSCJaVf`2!`Vg.TT2 FAaVgpNuCBSCJ`VgؐÐôB`pNupNuaVc3T604`2YQf^ J`da4$Id`0XQJU`B0YQ`Ba$Im 6`0F@YQ`,"_ O/ / X04JC2&KE@Nu5!QE J$_"_ON&4"OJ@`S@Wf`JVg.I/pNNuBQ.I"CNN|2m>&HdBg"O@H`  Q?"CNN|2RA`0N|2JAlp Np"_HdBgHd? `/ Q?Na I `a I03 Q _#NA26RCK"HNu. g:y.. g:AESCOMM FOR;gzGEMCONSTFOR@g{GEMFUNCSFORDgCVDICOMM FORGg* AES INTERFACE COMMON AREAS FOR PROSPERO FORTRAN-77 * 15th April 1986 * This file may be included in Fortran source programs * The array sizes may be increased if required INTEGER AES_addrin, AES_addrout INTEGER*2 AES_control, AES_global, AES_intin, AES_intout COMMON /ACONTR/ AES_control(0:4) COMMON /AGLOBA/ AES_global(0:15) COMMON /AINTIN/ AES_intin(0:16) COMMON /AINTOU/ AES_intout(0:7) COMMON /ADDRIN/ AES_addrin(0:2) COMMON /ADDROU/ AES_addrout(0:1) INTEGER pcontrol, pglobal, pintin, pintout, paddrin, paddrout COMMON /CCB/ pcontrol, pglobal, pintin, pintout, + paddrin, paddrout * Prospero Fortran GEM constants * 6 Aug 1987 * {GEM messages} INTEGER*4 MN_SELECTED, WM_REDRAW, WM_TOPPED, WM_CLOSED, - WM_FULLED, WM_ARROWED, WM_HSLID, WM_VSLID, WM_SIZED, - WM_MOVED, WM_NEWTOP, WM_UNTOPPED, AC_OPEN, AC_CLOSE PARAMETER (MN_SELECTED = 10) PARAMETER (WM_REDRAW = 20) PARAMETER (WM_TOPPED = 21) PARAMETER (WM_CLOSED = 22) PARAMETER (WM_FULLED = 23) PARAMETER (WM_ARROWED = 24) PARAMETER (WM_HSLID = 25) PARAMETER (WM_VSLID = 26) PARAMETER (WM_SIZED = 27) PARAMETER (WM_MOVED = 28) PARAMETER (WM_NEWTOP = 29) PARAMETER (WM_UNTOPPED = 30) ! { Not applicable to GEM 1.1 } PARAMETER (AC_OPEN = 40) PARAMETER (AC_CLOSE = 41) * {Event types for evnt_multi (bit significant values) } INTEGER*4 MU_KEYBD, MU_BUTTON, MU_M1, MU_M2, MU_MESAG, MU_TIMER = 0020h) PARAMETER (MU_KEYBD = $0001) PARAMETER (MU_BUTTON = $0002) PARAMETER (MU_M1 = $0004) PARAMETER (MU_M2 = $0008) PARAMETER (MU_MESAG = $0010) PARAMETER (MU_TIMER = $0020) * {Bit significant values for ob_state word} INTEGER*4 NORMAL, SELECTED, CROSSED, CHECKED, DISABLED, - OUTLINED, SHADOWED, DRAW3D, WHITEBAK PARAMETER (NORMAL = $0000) ! { Useful for all bitmaps } PARAMETER (SELECTED = $0001) PARAMETER (CROSSED = $0002) PARAMETER (CHECKED = $0004) PARAMETER (DISABLED = $0008) PARAMETER (OUTLINED = $0010) PARAMETER (SHADOWED = $0020) PARAMETER (DRAW3D = $0040) ! { Not applicable to GEM 1.1 } PARAMETER (WHITEBAK = $0080) ! { Not applicable to GEM 1.1 } * {Bit significant values for ob_flags word} INTEGER*4 NONE, SELECTABLE, DEFAULT, EXIT, EDITABLE, RBUTTON, - LASTOB, TOUCHEXIT, HIDETREE, INDIRECT PARAMETER (NONE = $0000) PARAMETER (SELECTABLE = $0001) PARAMETER (DEFAULT = $0002) PARAMETER (EXIT = $0004) PARAMETER (EDITABLE = $0008) PARAMETER (RBUTTON = $0010) PARAMETER (LASTOB = $0020) PARAMETER (TOUCHEXIT = $0040) PARAMETER (HIDETREE = $0080) PARAMETER (INDIRECT = $0100) * {Object types} INTEGER*4 G_BOX, G_TEXT, G_BOXTEXT, G_IMAGE, G_PROGDEF, G_IBOX, - G_BUTTON, G_BOXCHAR, G_STRING, G_FTEXT, G_FBOXTEXT, - G_ICON, G_TITLE PARAMETER (G_BOX = 20) PARAMETER (G_TEXT = 21) PARAMETER (G_BOXTEXT = 22) PARAMETER (G_IMAGE = 23) PARAMETER (G_PROGDEF = 24) PARAMETER (G_IBOX = 25) PARAMETER (G_BUTTON = 26) PARAMETER (G_BOXCHAR = 27) PARAMETER (G_STRING = 28) PARAMETER (G_FTEXT = 29) PARAMETER (G_FBOXTEXT = 30) PARAMETER (G_ICON = 31) PARAMETER (G_TITLE = 32) * {Object header offsets} INTEGER*4 ob_next, ob_head, ob_tail, ob_type, ob_flags, ob_state, - ob_spec, ob_x, ob_y, ob_width, ob_height PARAMETER (ob_next = 0) PARAMETER (ob_head = 2) PARAMETER (ob_tail = 4) PARAMETER (ob_type = 6) PARAMETER (ob_flags = 8) PARAMETER (ob_state = 10) PARAMETER (ob_spec = 12) PARAMETER (ob_x = 16) PARAMETER (ob_y = 18) PARAMETER (ob_width = 20) PARAMETER (ob_height = 22) * {Function codes for objc_edit} INTEGER*4 ED_START, ED_INIT, ED_CHAR, ED_END PARAMETER (ED_START = 0) PARAMETER (ED_INIT = 1) PARAMETER (ED_CHAR = 2) PARAMETER (ED_END = 3) * {Function codes for form_dial} INTEGER*4 FMD_START, FMD_GROW, FMD_SHRINK, FMD_FINISH PARAMETER (FMD_START = 0) PARAMETER (FMD_GROW = 1) ! { Not applicable to GEM 2.0 } PARAMETER (FMD_SHRINK = 2) ! { Not applicable to GEM 2.0 } PARAMETER (FMD_FINISH = 3) * {Bit significant values for window components} INTEGER*4 NAME, CLOSER, FULL, MOVER, INFO, SIZE, UPARROW, - DNARROW, VSLIDE, LFARROW, RTARROW, HSLIDE PARAMETER (NAME = $0001) PARAMETER (CLOSER = $0002) ! { Known as CLOSE in 'C' } PARAMETER (FULL = $0004) PARAMETER (MOVER = $0008) ! { Known as MOVE in 'C' } PARAMETER (INFO = $0010) PARAMETER (SIZE = $0020) PARAMETER (UPARROW = $0040) PARAMETER (DNARROW = $0080) PARAMETER (VSLIDE = $0100) PARAMETER (LFARROW = $0200) PARAMETER (RTARROW = $0400) PARAMETER (HSLIDE = $0800) * {Window get/set function codes} INTEGER*4 WF_KIND, WF_NAME, WF_INFO, WF_WXYWH, WF_CXYWH, - WF_PXYWH, WF_FXYWH, WF_HSLIDE, WF_VSLIDE, WF_TOP, - WF_FIRSTXYWH, WF_NEXTXYWH, WF_NEWDESK, WF_HSLSIZE, - WF_VSLSIZE, WF_SCREEN, WF_TATTRB, WF_SIZTOP PARAMETER (WF_KIND = 1) PARAMETER (WF_NAME = 2) PARAMETER (WF_INFO = 3) PARAMETER (WF_WXYWH = 4) ! { Known as WF_WORKXYWH in GEM 1.1 } PARAMETER (WF_CXYWH = 5) ! { Known as WF_CURRXYWH in GEM 1.1 } PARAMETER (WF_PXYWH = 6) ! { Known as WF_PREVXYWH in GEM 1.1 } PARAMETER (WF_FXYWH = 7) ! { Known as WF_FULLXYWH in GEM 1.1 } PARAMETER (WF_HSLIDE = 8) PARAMETER (WF_VSLIDE = 9) PARAMETER (WF_TOP = 10) PARAMETER (WF_FIRSTXYWH= 11) PARAMETER (WF_NEXTXYWH = 12) PARAMETER (WF_NEWDESK = 14) PARAMETER (WF_HSLSIZE = 15) PARAMETER (WF_VSLSIZE = 16) PARAMETER (WF_SCREEN = 17) PARAMETER (WF_TATTRB = 18) ! { Not provided in GEM 1.1 } PARAMETER (WF_SIZTOP = 19) ! { Not provided in GEM 1.1 } * {Function codes for wind_update} INTEGER*4 END_UPDATE, BEG_UPDATE, END_MCTRL, BEG_MCTRL PARAMETER (END_UPDATE = 0) PARAMETER (BEG_UPDATE = 1) PARAMETER (END_MCTRL = 2) PARAMETER (BEG_MCTRL = 3) * Prospero Fortran AES functions LOGICAL*4 graf_watchbox, shel_find INTEGER*4 AESret, appl_find, evnt_multi, menu_register, - menu_create, menu_title, menu_item, objc_find, - objc_state, objc_flags, objc_create, objc_item, - form_do, form_alert, graf_slidebox, graf_handle, - wind_create, wind_find * Prospero Fortran VDI functions LOGICAL*4 vsm_choice, vq_tabstatus, vqp_filmname INTEGER*4 vst_load_fonts, vswr_mode, vsl_type, vsl_width, - vsl_color, vsm_type, vsm_height, vsm_color, - vst_point, vst_rotation, vst_font, vst_color, - vst_effects, vsf_interior, vsf_style, vsf_color, - vsm_locator, vsm_string, vqt_width, vqt_name, - vs_palette, vs_mute * VDI interface common areas for Prospero FORTRAN-77 * 6 June 1987 * This file can be included in source Fortran programs * The array sizes can be increased if required INTEGER*2 VDI_control,VDI_intin,VDI_intout,VDI_ptsin,VDI_ptsout COMMON /VDI_control/ VDI_control(0:11) COMMON /VDI_intin/ VDI_intin(0:80) COMMON /VDI_ptsin/ VDI_ptsin(0:12) COMMON /VDI_intout/ VDI_intout(0:45) COMMON /VDI_ptsout/ VDI_ptsout(0:12) INTEGER*4 addr_control, addr_intin, addr_ptsin INTEGER*4 addr_intout, addr_ptsout COMMON /VDIparm/ addr_control, addr_intin, addr_ptsin, + addr_intout, addr_ptsout . gK.. gKCLOCKDA FORLg3DIALDEMOFORPgDOODLE FORSg3XLINEA FORYg MAZES FOR \gMENUDEMOFORbgPRIME FOR fgPRINTF FOR ig.TOSDEMO FOR mgI XBIOS FORpgGEMDEMO FORtg PROBE LOGxg*--------------------------------------------------------------------* * A sample desk accessory for Prospero Fortran * * This accessory displays an analogue clock face * * * * Do NOT run CLOCKDA.PRG from the Workbench or the GEM Desktop - * * once linked it should be renamed CLOCKDA.ACC, and copied to a * * boot disk. Next time the Atari is booted using that disk, this * * accessory will install itself, and can be run by selecting the * * item "Analog clock" from the Desk menu * * * * See also the note in READ.ME about debugging Desk accessories * * * * Author: R K Chapman * * Date : 28 August 1987 * *--------------------------------------------------------------------* PROGRAM clockda IMPLICIT none INTEGER*4 ap_id, m_id INTEGER*2 work_in(0:10), work_out(0:56), message(0:7) CHARACTER*20 my_menu_item ! must be in a variable CHARACTER*10 my_window_title ! ditto INTEGER*4 cx, cy, cw, ch ! Window's total area LOGICAL*1 on_screen ! is the window open ? INTEGER*4 event, events INTEGER*4 i, dummy COMMON /workstation/ my_window, workstation, aspect, - wx, wy, ww, wh INTEGER*4 my_window ! Window handle INTEGER*4 workstation ! Workstation handle INTEGER*4 wx, wy, ww, wh ! Window's work area REAL*4 aspect INCLUDE 'GEMFUNCS' INCLUDE 'GEMCONST' CALL appl_init ap_id = AESret() workstation = graf_handle(dummy, dummy, dummy, dummy) DO 10 i = 0, 8 10 work_in(i) = 1 work_in(9) = 0 ! fill colour is 0 (white) work_in(10) = 2 ! raster coords CALL v_opnvwk(work_in, workstation, work_out) aspect = float(work_out(3))/work_out(4) my_menu_item = ' Analog clock'//char(0) m_id = menu_register(ap_id, my_menu_item) events = MU_MESAG on_screen = .false. cx = 20 cy = 40 cw = 100 ch = nint(100*aspect) ! Initial window work area position/size CALL wind_calc(.false., NAME .OR. CLOSER .OR. MOVER, - cx, cy, cw, ch, cx, cy, cw, ch) 20 CONTINUE event = evnt_multi(events, - 1, 1, 1, - .false., 0, 0, 0, 0, - .false., 0, 0, 0, 0, - message, 1950, - dummy, dummy, dummy, dummy, dummy, dummy) IF ((event .AND. MU_MESAG) .ne. 0) THEN IF ((message(0) .eq. WM_TOPPED) .OR. - (message(0) .eq. AC_OPEN)) THEN IF (on_screen) THEN * Move window to top CALL wind_set(my_window, WF_TOP, 0, 0, 0, 0) CALL graf_mouse(0, 0) ELSE * Open a window CALL graf_mouse(0, 0) my_window = wind_create(CLOSER .OR. NAME .OR. MOVER, - cx, cy, cw, ch) IF (my_window .gt. 0) THEN my_window_title = 'Clock'//char(0) CALL wind_title(my_window, my_window_title) CALL wind_open(my_window, cx, cy, cw, ch) CALL wind_get(my_window, WF_WXYWH, wx, wy, ww, wh) on_screen = .true. END IF END IF ELSE IF (message(0) .eq. AC_CLOSE) THEN * window handle no longer valid on_screen = .false. ELSE IF (message(0) .eq. WM_CLOSED) THEN IF (on_screen) THEN * Close window CALL wind_close(my_window) CALL wind_delete(my_window) on_screen = .false. END IF ELSE IF (message(0) .eq. WM_MOVED) THEN * Move the window IF (message(3) .eq. my_window) THEN cx = message(4) cy = message(5) cw = message(6) ch = message(7) CALL wind_set(my_window, WF_CXYWH, - cx, cy, cw, ch) CALL wind_get(my_window, WF_WXYWH, - wx, wy, ww, wh) END IF ELSE IF (message(0) .eq. WM_REDRAW) THEN IF (message(3) .eq. my_window) CALL redraw END IF END IF IF ((events .AND. MU_TIMER) .ne. 0) THEN IF (on_screen) CALL redraw END IF IF (on_screen) THEN events = MU_TIMER .OR. MU_MESAG ELSE events = MU_MESAG END IF GOTO 20 ! Repeat indefinitely END *------------------------------------------------------------- * redraw draws the clock face to the visible portion of the * window *------------------------------------------------------------- SUBROUTINE redraw IMPLICIT none INTEGER*2 rect(0:3) INTEGER*4 rx, ry, rw, rh INTEGER*4 hours, mins, secs, huns COMMON /workstation/ my_window, workstation, aspect, - wx, wy, ww, wh INTEGER*4 my_window, workstation, wx, wy, ww, wh REAL*4 aspect INCLUDE 'GEMCONST' CALL wind_update(beg_update) CALL wind_get(my_window, WF_FIRSTXYWH, rx, ry, rw, rh) 10 CONTINUE IF (rw+rh .ne. 0) THEN rect(0) = rx rect(1) = ry rect(2) = rx+rw-1 rect(3) = ry+rh-1 CALL vs_clip(workstation, .true., rect) CALL time(hours, mins, secs, huns) CALL graf_mouse(256, 0) ! hide mouse CALL vr_recfl(workstation, rect) CALL v_arc(workstation, wx + ww/2, wy + wh/2, ww/2, 0, 3600) rect(0) = wx + ww/2 rect(1) = wy + wh/2 CALL plot_polar(rect, mod(hours, 12)*300 + mins*5, 30) CALL plot_polar(rect, mins*60 + secs, 40) CALL plot_polar(rect, secs*60, 50) CALL graf_mouse(257, 0) ! Show mouse CALL wind_get(my_window, WF_NEXTXYWH, rx, ry, rw, rh) GOTO 10 END IF CALL wind_update(end_update) END *--------------------------------------------------------- * plot_polar draws a line from the cetre of the window's * work area, with the given angle and length *--------------------------------------------------------- SUBROUTINE plot_polar(rect, angle, radius) IMPLICIT none INTEGER*4 angle, radius INTEGER*2 rect(0:3) REAL*4 rangle COMMON /workstation/ my_window, workstation, aspect, - wx, wy, ww, wh INTEGER*4 my_window, workstation, wx, wy, ww, wh REAL*4 aspect angle = 900 - angle IF (angle .lt. 0) angle = angle+3600 rangle = angle * 3.1415927/1800 rect(2) = rect(0) + nint(radius*cos(rangle)) rect(3) = rect(1) - nint(radius*sin(rangle)*aspect) CALL v_pline(workstation, 2, rect) END PROGRAM tdialog IMPLICIT none INCLUDE 'gemconst' INTEGER*4 my_form, x, y, w, h, ret INTEGER*4 cancel, okbutt, etnumber INTEGER*4 AESret, form_do, form_alert, objc_create, objc_item CALL appl_init IF (AESret .ne. -1) THEN my_form = objc_create(10, 10, 10, 30, 20) cancel = objc_item(my_form, 0, G_BUTTON, - EXIT .OR. DEFAULT .OR. SELECTABLE, 0, - 20, 15, 8, 1, 0, 0) CALL objc_newtext(my_form, cancel, 'Cancel'//char(0)) okbutt = objc_item(my_form, 0, G_BUTTON, - EXIT .OR. SELECTABLE, 0, - 10, 15, 8, 1, 0, 0) CALL objc_newtext(my_form, okbutt, 'Ok'//char(0)) etnumber = objc_item(my_form, 0, G_FTEXT, EDITABLE, 0, - 3, 10, 20, 1, 0, $0180) CALL objc_tedinfo(my_form, etnumber, '12'//char(0), - 'Enter number _____'//char(0), - '99999'//char(0), 3, 0) CALL form_center(my_form, x, y, w, h) CALL form_dial(fmd_start, 0, 0, 0, 0, x, y, w, h) CALL objc_draw(my_form, 0, 2, x, y, w, h) ret = form_do(my_form, etnumber) CALL form_dial(fmd_finish, 0, 0, 0, 0, x, y, w, h) IF (ret .eq. okbutt) THEN ret = form_alert(1,'[1][OK][OK]'//char(0)) ELSE IF (ret .eq. cancel) THEN ret = form_alert(1,'[1][CANCEL][CANCEL]'//char(0)) ELSE ret = form_alert(1,'[1][??????][???????]'//char(0)) END IF CALL appl_exit END IF END * This is a fairly simple GEM application which illustrates many * of the main features of the GEM AES and VDI bindings, as well * as other features of the Prospero Fortran system. * * Author : R K Chapman * Date : 29 October 1987 * * Copyright (C) 1987 Prospero Software Ltd PROGRAM doodle_demo IMPLICIT none INTEGER*4 AESret CALL appl_init IF (AESret .ge. 0) THEN CALL initialise CALL doodle CALL terminate CALL appl_exit END IF END SUBROUTINE newmem(p, size) IMPLICIT none INTEGER*4 p, size, sys INTEGER*2 parmarray(0:2) INTEGER*2 funcno INTEGER*4 bytes EQUIVALENCE (funcno, parmarray(0)), (bytes, parmarray(1)) funcno = $48 ! GEMDOS function number bytes = size ! Number of bytes required p = sys(parmarray) ! Address of memory allocated END LOGICAL*4 FUNCTION intersect(x1, y1, w1, h1, x2, y2, w2, h2) IMPLICIT none INTEGER*4 x1, y1, w1, h1, x2, y2, w2, h2 w1 = min0(w1+x1, w2+x2)-1 h1 = min0(h1+y1, h2+y2)-1 x1 = max0(x1, x2) y1 = max0(y1, y2) * Note w1,h1 are returned as coords rather than width/height intersect = ((w1 .ge. x1) .AND. (h1 .ge. y1)) END !------------------------------------------------------------------- ! SUBROUTINE redraw - redraw the portions of the given rectangle ! which correspond to visible areas of TheWindow !------------------------------------------------------------------- SUBROUTINE redraw(x, y, w, h) IMPLICIT none INTEGER*2 rect(0:7) INTEGER*4 x, y, w, h, rx, ry, rw, rh LOGICAL*4 intersect INCLUDE 'GEMCONST' COMMON /TheWindow/ TheWindow, fx, fy, fw, fh, wx, wy, ww, wh, - WorkRect INTEGER*4 TheWindow, fx, fy, fw, fh, wx, wy, ww, wh INTEGER*2 WorkRect(0:3) COMMON /TheBuffer/ TheBuffer, topleft_x, topleft_y INTEGER*2 TheBuffer(0:9) INTEGER*4 topleft_x, topleft_y COMMON /workstation/ Workstation, work_in, work_out, extend_out INTEGER*4 Workstation INTEGER*2 work_in(0:10), work_out(0:56), extend_out(0:56) * Get first visible area CALL wind_get(TheWindow, WF_FIRSTXYWH, rx, ry, rw, rh) 10 CONTINUE IF ((rw+rh) .ne. 0) THEN IF (intersect(rx, ry, rw, rh, x, y, w, h)) THEN rect(0) = rx - wx + topleft_x ! Source x1 rect(1) = ry - wy + topleft_y ! Source y1 rect(2) = rw - wx + topleft_x ! Source x2 rect(3) = rh - wy + topleft_y ! Source y2 rect(4) = rx ! Dest x1 rect(5) = ry ! Dest y1 rect(6) = rw ! Dest x2 rect(7) = rh ! Dest y2 CALL graf_mouse(256, 0) ! hide mouse CALL vro_cpyfm(workstation, 3, rect, TheBuffer, 0) CALL graf_mouse(257, 0) ! Show mouse END IF * Get next visible area CALL wind_get(TheWindow, WF_NEXTXYWH, rx, ry, rw, rh) GOTO 10 END IF END !------------------------------------------------------------------- ! SUBROUTINE set_sliders - set the position and size of the sliders !------------------------------------------------------------------- SUBROUTINE set_sliders IMPLICIT none INCLUDE 'GEMCONST' COMMON /TheWindow/ TheWindow, fx, fy, fw, fh, wx, wy, ww, wh, - WorkRect INTEGER*4 TheWindow, fx, fy, fw, fh, wx, wy, ww, wh INTEGER*2 WorkRect(0:3) COMMON /TheBuffer/ TheBuffer, topleft_x, topleft_y INTEGER*2 TheBuffer(0:9) INTEGER*4 topleft_x, topleft_y CALL wind_set(TheWindow, WF_HSLIDE, - topleft_x * 1000 / (640 - ww), 0, 0, 0) CALL wind_set(TheWindow, WF_VSLIDE, - topleft_y * 1000 / (400 - wh), 0, 0, 0) CALL wind_set(TheWindow, WF_HSLSIZE, - ww * 1000 / 640, 0, 0, 0) CALL wind_set(TheWindow, WF_VSLSIZE, - wh * 1000 / 400, 0, 0, 0) END !-------------------------------------------------------------------- ! SUBROUTINE do_shape_title - handle menu selections from Shape title !-------------------------------------------------------------------- SUBROUTINE do_shape_title(item) IMPLICIT none INTEGER*4 item COMMON /TheMenu/ TheMenu, FileTitle, ShapeTitle, ColourTitle, - QuitItem, RectItem, OvalItem, FilledItem, - ColourItem INTEGER*4 TheMenu, FileTitle, ShapeTitle, ColourTitle, - QuitItem, RectItem, OvalItem, FilledItem INTEGER*4 ColourItem(0:7) COMMON /settings/ Filling, TheColour, TheShape LOGICAL*4 Filling INTEGER*4 TheColour, TheShape IF (item .eq. FilledItem) THEN filling = .NOT. filling CALL menu_icheck(TheMenu, FilledItem, filling) ELSE CALL menu_icheck(TheMenu, TheShape, .false.) TheShape = item CALL menu_icheck(TheMenu, TheShape, .true.) END IF END !------------------------------------------------------------------- ! SUBROUTINE do_colour_title - handle selections from Colour title !------------------------------------------------------------------- SUBROUTINE do_colour_title(item) IMPLICIT none INTEGER*4 item, dummy, vsl_color COMMON /TheMenu/ TheMenu, FileTitle, ShapeTitle, ColourTitle, - QuitItem, RectItem, OvalItem, FilledItem, - ColourItem INTEGER*4 TheMenu, FileTitle, ShapeTitle, ColourTitle, - QuitItem, RectItem, OvalItem, FilledItem INTEGER*4 ColourItem(0:7) COMMON /settings/ Filling, TheColour, TheShape LOGICAL*4 Filling INTEGER*4 TheColour, TheShape COMMON /workstation/ Workstation, work_in, work_out, extend_out INTEGER*4 Workstation INTEGER*2 work_in(0:10), work_out(0:56), extend_out(0:56) CALL menu_icheck(TheMenu, ColourItem(TheColour), .false.) CALL menu_icheck(TheMenu, item, .true.) TheColour = item - ColourItem(0) dummy = vsl_color(workstation, TheColour) END !-------------------------------------------------------------------- ! SUBROUTINE draw_shape - draw the current shape !-------------------------------------------------------------------- SUBROUTINE draw_shape(x, y) IMPLICIT none INTEGER*4 x, y, w, h, xcen, ycen, xrad, yrad, dummy INTEGER*2 copyrect(0:7) INCLUDE 'GEMFUNCS' COMMON /TheMenu/ TheMenu, FileTitle, ShapeTitle, ColourTitle, - QuitItem, RectItem, OvalItem, FilledItem, - ColourItem INTEGER*4 TheMenu, FileTitle, ShapeTitle, ColourTitle, - QuitItem, RectItem, OvalItem, FilledItem INTEGER*4 ColourItem(0:7) COMMON /settings/ Filling, TheColour, TheShape LOGICAL*4 Filling INTEGER*4 TheColour, TheShape COMMON /TheWindow/ TheWindow, fx, fy, fw, fh, wx, wy, ww, wh, - WorkRect INTEGER*4 TheWindow, fx, fy, fw, fh, wx, wy, ww, wh INTEGER*2 WorkRect(0:3) COMMON /TheBuffer/ TheBuffer, topleft_x, topleft_y INTEGER*2 TheBuffer(0:9) INTEGER*4 topleft_x, topleft_y COMMON /workstation/ Workstation, work_in, work_out, extend_out INTEGER*4 Workstation INTEGER*2 work_in(0:10), work_out(0:56), extend_out(0:56) CALL graf_rubbox(x, y, 5, 5, w, h) ! Get a rectangle dummy = vsf_interior(workstation, 1) ! select solid fill dummy = vsf_color(workstation, TheColour) ! .. in this colour dummy = vsl_color(workstation, TheColour) ! .. and border CALL vsf_perimeter(workstation, .true.) ! .. and perimeter CALL graf_mouse(256,0) ! Hide mouse * Define the part of TheBuffer to be updated copyrect(0) = x copyrect(1) = y copyrect(2) = x+w copyrect(3) = y+h copyrect(4) = copyrect(0) - wx + topleft_x copyrect(5) = copyrect(1) - wy + topleft_y copyrect(6) = copyrect(2) - wx + topleft_x copyrect(7) = copyrect(3) - wy + topleft_y * Draw the shape IF (TheShape .eq. RectItem) THEN IF (filling) THEN CALL v_rfbox(workstation, copyrect) ELSE CALL v_rbox(workstation, copyrect) END IF ELSE IF (TheShape .eq. OvalItem) THEN xrad = w / 2 yrad = h / 2 xcen = x+xrad ycen = y+yrad IF (filling) THEN CALL v_ellipse(workstation, xcen, ycen, xrad, yrad) ELSE CALL v_ellarc(workstation, xcen, ycen, xrad, yrad, 0, 3600) END IF END IF * Now update TheBuffer CALL vro_cpyfm(workstation, 3, copyrect, 0, TheBuffer) CALL graf_mouse(257, 0) ! Show mouse END !-------------------------------------------------------------------- ! SUBROUTINE doodle - the main event processing loop !-------------------------------------------------------------------- SUBROUTINE doodle IMPLICIT none INTEGER*2 message(0:7) INTEGER*4 dummy, event, mask, mx, my INTEGER*4 x, y, w, h INTEGER*4 title, item LOGICAL*4 inside, quitting INCLUDE 'GEMCONST' INCLUDE 'GEMFUNCS' COMMON /TheMenu/ TheMenu, FileTitle, ShapeTitle, ColourTitle, - QuitItem, RectItem, OvalItem, FilledItem, - ColourItem INTEGER*4 TheMenu, FileTitle, ShapeTitle, ColourTitle, - QuitItem, RectItem, OvalItem, FilledItem INTEGER*4 ColourItem(0:7) COMMON /TheWindow/ TheWindow, fx, fy, fw, fh, wx, wy, ww, wh, - WorkRect INTEGER*4 TheWindow, fx, fy, fw, fh, wx, wy, ww, wh INTEGER*2 WorkRect(0:3) COMMON /TheBuffer/ TheBuffer, topleft_x, topleft_y INTEGER*2 TheBuffer(0:9) INTEGER*4 topleft_x, topleft_y COMMON /workstation/ Workstation, work_in, work_out, extend_out INTEGER*4 Workstation INTEGER*2 work_in(0:10), work_out(0:56), extend_out(0:56) quitting = .false. inside = .false. CALL graf_mouse(0, 0) mask = MU_M1 .OR. MU_MESAG 10 CONTINUE event = evnt_multi(mask, 1, 1, 1, - inside, wx, wy, ww, wh, - .false., 0, 0, 0, 0, - message, 0, mx, my, - dummy, dummy, dummy, dummy) CALL wind_update(BEG_UPDATE) IF ((event .AND. MU_M1) .ne. 0) THEN inside = .NOT. inside IF (inside) THEN mask = MU_M1 .OR. MU_BUTTON .OR. MU_MESAG CALL graf_mouse(5, 0) ! Cross hair inside window ELSE mask = MU_M1 .OR. MU_MESAG ! Don't accept clicks CALL graf_mouse(0, 0) ! Arrow outside window END IF END IF IF ((event .AND. MU_MESAG) .ne. 0) THEN IF (message(0) .eq. MN_SELECTED) THEN title = message(3) item = message(4) IF (title .eq. FileTitle) THEN quitting = .true. ELSE IF (title .eq. ShapeTitle) THEN CALL do_shape_title(item) ELSE IF (title .eq. ColourTitle) THEN CALL do_colour_title(item) ELSE ! Must have selected About .. dummy = form_alert(1, '[0][Prospero Fortran Doodle demo' - // ' | ][ OK ]' // char(0)) END IF CALL menu_tnormal(TheMenu, title, .true.) ELSE IF (message(0) .eq. WM_CLOSED) THEN quitting = .true. ELSE IF ((message(0) .eq. WM_MOVED) .OR. - (message(0) .eq. WM_SIZED)) THEN x = message(4) y = message(5) ! Extend coords to 4 bytes w = message(6) ! Probably unneccessary here h = message(7) ! as only 2 bytes used by wind_set CALL wind_set(TheWindow, WF_CXYWH, x, y, w, h) CALL wind_get(TheWindow, WF_WXYWH, wx, wy, ww, wh) CALL set_sliders WorkRect(0) = wx WorkRect(1) = wy WorkRect(2) = wx+ww-1 WorkRect(3) = wy+wh-1 CALL vs_clip(workstation, .true., WorkRect) ELSE IF (message(0) .eq. WM_REDRAW) THEN x = message(4) y = message(5) w = message(6) h = message(7) ! Extend coordinates up to 4 bytes CALL redraw(x, y, w, h) ELSE IF (message(0) .eq. WM_VSLID) THEN topleft_y = (400 - wh) * message(4) / 1000 CALL set_sliders CALL redraw(wx, wy, ww, wh) ELSE IF (message(0) .eq. WM_HSLID) THEN topleft_x = (640 - ww) * message(4) / 1000 CALL set_sliders CALL redraw(wx, wy, ww, wh) ELSE IF (message(0) .eq. WM_ARROWED) THEN GOTO (21, 22, 23, 24, 25, 26, 27), message(4) topleft_y = topleft_y - 50 ! page up GOTO 30 21 topleft_y = topleft_y + 50 ! page down GOTO 30 22 topleft_y = topleft_y - 5 ! row up GOTO 30 23 topleft_y = topleft_y + 5 ! row down GOTO 30 24 topleft_x = topleft_x - 50 ! page left GOTO 30 25 topleft_x = topleft_x + 50 ! page right GOTO 30 26 topleft_x = topleft_x - 5 ! column left GOTO 30 27 topleft_x = topleft_x + 5 ! column right 30 CONTINUE IF (topleft_x .lt. 0) topleft_x = 0 IF (topleft_y .lt. 0) topleft_y = 0 IF (topleft_x .gt. 640 - ww) topleft_x = 640 - ww IF (topleft_y .gt. 400 - wh) topleft_y = 400 - wh CALL set_sliders CALL redraw(wx, wy, ww, wh) ELSE IF (message(0) .eq. WM_TOPPED) THEN CALL wind_set(TheWindow, WF_TOP, 0, 0, 0, 0) ELSE IF (message(0) .eq. WM_FULLED) THEN CALL wind_get(TheWindow, WF_CXYWH, wx, wy, ww, wh) IF ((wx .eq. fx) .AND. (wy .eq. fy) .AND. - (ww .eq. fw) .AND. (wh .eq. fh)) THEN CALL wind_get(TheWindow, WF_PXYWH, wx, wy, ww, wh) ELSE CALL wind_get(TheWindow, WF_FXYWH, wx, wy, ww, wh) END IF CALL wind_set(TheWindow, WF_CXYWH, wx, wy, ww, wh) CALL wind_get(TheWindow, WF_WXYWH, wx, wy, ww, wh) CALL set_sliders WorkRect(0) = wx WorkRect(1) = wy WorkRect(2) = wx+ww-1 WorkRect(3) = wy+wh-1 CALL vs_clip(workstation, .true., WorkRect) END IF END IF IF ((event .AND. MU_BUTTON) .ne. 0) THEN CALL draw_shape(mx, my) END IF CALL wind_update(END_UPDATE) IF (.NOT. quitting) GOTO 10 END !------------------------------------------------------------------- ! SUBROUTINE initialise - set up the workstation, menu etc !------------------------------------------------------------------- SUBROUTINE initialise IMPLICIT none INTEGER*4 i, dummy, tempitem INTEGER*2 copyrect(0:3) CHARACTER*20 TheTitle INCLUDE 'GEMCONST' INCLUDE 'GEMFUNCS' COMMON /TheMenu/ TheMenu, FileTitle, ShapeTitle, ColourTitle, - QuitItem, RectItem, OvalItem, FilledItem, - ColourItem INTEGER*4 TheMenu, FileTitle, ShapeTitle, ColourTitle, - QuitItem, RectItem, OvalItem, FilledItem INTEGER*4 ColourItem(0:7) COMMON /settings/ Filling, TheColour, TheShape LOGICAL*4 Filling INTEGER*4 TheColour, TheShape COMMON /TheWindow/ TheWindow, fx, fy, fw, fh, wx, wy, ww, wh, - WorkRect INTEGER*4 TheWindow, fx, fy, fw, fh, wx, wy, ww, wh INTEGER*2 WorkRect(0:3) COMMON /TheBuffer/ TheBuffer, topleft_x, topleft_y INTEGER*2 TheBuffer(0:9) INTEGER*4 topleft_x, topleft_y COMMON /workstation/ Workstation, work_in, work_out, extend_out INTEGER*4 Workstation INTEGER*2 work_in(0:10), work_out(0:56), extend_out(0:56) * Open a virtual screen workstation workstation = graf_handle(dummy, dummy, dummy, dummy) DO 10 i = 0, 9 10 work_in(i) = 1 ! Set initial attributes work_in(10) = 2 ! Raster coordinates CALL v_opnvwk(work_in, workstation, work_out) * Prepare TheBuffer memory form, where image is stored CALL vq_extnd(workstation, .true., extend_out) TheBuffer(2) = 640 TheBuffer(3) = 400 TheBuffer(4) = 40 TheBuffer(5) = 0 TheBuffer(6) = extend_out(4) CALL newmem(TheBuffer(0), 400*80*extend_out(4)) * Clear TheBuffer copyrect(0) = 0 copyrect(0) = 0 copyrect(2) = 640 copyrect(3) = 400 copyrect(4) = 0 copyrect(5) = 0 copyrect(6) = 640 copyrect(7) = 400 CALL vro_cpyfm(workstation, 0, copyrect, TheBuffer, TheBuffer) * Create the menu bar TheMenu = menu_create(3, 13, ' About doodle ... '//char(0)) FileTitle = menu_title(TheMenu, ' File '//char(0)) ShapeTitle = menu_title(TheMenu, ' Shape '//char(0)) ColourTitle = menu_title(TheMenu, ' Colour '//char(0)) QuitItem = menu_item(TheMenu, FileTitle, ' Quit '//char(0)) RectItem = menu_item(TheMenu, ShapeTitle, ' Rectangle '// - char(0)) OvalItem = menu_item(TheMenu, ShapeTitle, ' Oval '//char(0)) tempitem = menu_item(TheMenu, ShapeTitle, '------------'// - char(0)) CALL menu_ienable(TheMenu, tempitem, .false.) filledItem = menu_item(TheMenu, ShapeTitle, ' Filled '//char(0)) ColourItem(0) = menu_item(TheMenu, ColourTitle, ' White '// - char(0)) ColourItem(1) = menu_item(TheMenu, ColourTitle, ' Black '// - char(0)) ColourItem(2) = menu_item(TheMenu, ColourTitle, ' Red '// - char(0)) ColourItem(3) = menu_item(TheMenu, ColourTitle, ' Green '// - char(0)) ColourItem(4) = menu_item(TheMenu, ColourTitle, ' Blue '// - char(0)) ColourItem(5) = menu_item(TheMenu, ColourTitle, ' Cyan '// - char(0)) ColourItem(6) = menu_item(TheMenu, ColourTitle, ' Yellow '// - char(0)) ColourItem(7) = menu_item(TheMenu, ColourTitle, ' Magenta '// - char(0)) * Set initial shape etc, and indicate settings on menu bar filling = .false. TheColour = 1 ! Black CALL menu_icheck(TheMenu, ColourItem(1), .true.) TheShape = RectItem CALL menu_icheck(TheMenu, TheShape, .true.) CALL menu_bar(TheMenu, .true.) ! Display menu bar * Create and open a window CALL graf_mouse(256, 0) ! Hide mouse CALL wind_get(0, WF_WXYWH, fx, fy, fw, fh) ! Get desktop work area TheWindow = wind_create($fef, fx, fy, fw, fh) ! No info line TheTitle = 'Doodle'//char(0) CALL wind_title(TheWindow, TheTitle) ! Must set before opening CALL wind_open(TheWindow, fx, fy, fw, fh) ! Clip to work area CALL wind_get(TheWindow, WF_WXYWH, wx, wy, ww, wh) WorkRect(0) = wx WorkRect(1) = wy WorkRect(2) = wx+ww-1 WorkRect(3) = wy+wh-1 topleft_x = 0 topleft_y = 0 CALL vs_clip(workstation, .true., WorkRect) CALL set_sliders ! Set the window sliders CALL graf_mouse(257, 0) ! Show mouse END !------------------------------------------------------------------- ! SUBROUTINE terminate - clean up ready to terminate !------------------------------------------------------------------- SUBROUTINE terminate IMPLICIT none COMMON /TheMenu/ TheMenu, FileTitle, ShapeTitle, ColourTitle, - QuitItem, RectItem, OvalItem, FilledItem, - ColourItem INTEGER*4 TheMenu, FileTitle, ShapeTitle, ColourTitle, - QuitItem, RectItem, OvalItem, FilledItem INTEGER*4 ColourItem(0:7) COMMON /TheWindow/ TheWindow, fx, fy, fw, fh, wx, wy, ww, wh, - WorkRect INTEGER*4 TheWindow, fx, fy, fw, fh, wx, wy, ww, wh INTEGER*2 WorkRect(0:3) COMMON /workstation/ Workstation, work_in, work_out, extend_out INTEGER*4 Workstation INTEGER*2 work_in(0:10), work_out(0:56), extend_out(0:56) CALL wind_close(TheWindow) ! Remove window from screen CALL wind_delete(TheWindow) ! and free its handle CALL menu_bar(TheMenu, .false.) ! Remove menu bar CALL v_clsvwk(workstation) ! Close virtual workstation END * This demonstrates the use of the line A routines to draw simple * lines, without the complexity of the GEM VDI * * Date: 29 Oct 1987 * Copyright (c) 1987 Prospero Software * PROGRAM lineAdemo INTEGER*2 fillpattern(0:7) CALL line(100,100,100,200) CALL line(100,200,200,200) CALL line(200,200,200,100) CALL line(200,100,100,100) fillpattern(0) = $0101 DO 10 i = 1,7 fillpattern(i) = fillpattern(i-1) * 2 10 CONTINUE CALL rect(101, 101, 199, 199, fillpattern, 7) CALL point(50, 50, 1) END *------------------------------------------------------------------- * * SUBROUTINE line uses the A003 trap to draw a line * *------------------------------------------------------------------- SUBROUTINE line(x1, y1, x2, y2) INTEGER x1, x2, y1, y2 INTEGER*4 regs(0:14), ptr EQUIVALENCE (ptr, regs(8)) CALL a000(regs) ! Initialise Line A * Set up values in Line A variable area CALL poke2(ptr+38, x1) CALL poke2(ptr+40, y1) CALL poke2(ptr+42, x2) CALL poke2(ptr+44, y2) CALL a003(regs) ! Draw a line END *------------------------------------------------------------------- * * SUBROUTINE rect uses the A005 trap to draw a rectangle, using * the fill pattern given by the array maskarray, which contains * repeat number of INTEGER*2 values * *------------------------------------------------------------------- SUBROUTINE rect(x1, y1, x2, y2, maskarray, repeat) INTEGER x1, x2, y1, y2, repeat INTEGER*2 maskarray(0:repeat) INTEGER*4 regs(0:14), ptr EQUIVALENCE (ptr, regs(8)) CALL a000(regs) ! Initialise Line A * Set up values in Line A variable area CALL poke2(ptr+38, x1) ! _X1 field CALL poke2(ptr+40, y1) ! _Y1 CALL poke2(ptr+42, x2) ! _X2 CALL poke2(ptr+44, y2) ! _Y2 CALL poke4(ptr+46, iaddr(maskarray)) ! _patptr CALL poke2(ptr+50, repeat) ! _patmsk CALL a005(regs) ! Draw a rectangle END *------------------------------------------------------------------- * * SUBROUTINE point uses the A001 trap to plot a pixel to a given * colour * *------------------------------------------------------------------- SUBROUTINE point(x, y, colour) INTEGER x, y, intin, ptsin, colour INTEGER*4 regs(0:14), ptr EQUIVALENCE (ptr, regs(8)) CALL a000(regs) ! Initialise Line A intin = ipeek4(ptr+8) ptsin = ipeek4(ptr+12) CALL poke2(ptsin, x) CALL poke2(ptsin+2, y) CALL poke2(intin, colour) CALL A001 END PROGRAM MAZES C PROGRAM TO GENERATE RANDOM MAZES (WITH UNIQUE SOLUTIONS) C ORIGINAL (BASIC): JACK HAUBER, LOOMIS SCHOOL, WINDSOR, CONNECTICUT C MODIFIED (BASIC): D J LEIGH - DECEMBER 1976 C REWRITTEN (FORTRAN-77): M S OAKES - JANUARY 1986 C DATE LAST EDITED: 1 AUGUST 1987 INTEGER I,ILIM,J,JLIM,JSTART,MAXSIZ PARAMETER (MAXSIZ = 25) INTEGER WALLS(MAXSIZ,MAXSIZ) INTEGER CHOICE,WAYS,COUNT,SIZE LOGICAL AFFIRM LOGICAL LEFT,RIGHT,UP,DOWN,EXIT LOGICAL OK LOGICAL*1 BEENTO(MAXSIZ,MAXSIZ) CHARACTER*3 ROW(MAXSIZ),PATRN1,PATRN2,PATRN3,PATRN4 C PATTERNS FOR PRINTING MAZE DATA PATRN1,PATRN2/'--:',' :'/ DATA PATRN3,PATRN4/' ',' I'/ C STATEMENT FUNCTIONS C INPUT VALIDATION OK(WAYS) = (1.LE.WAYS) .AND. (WAYS.LE.MAXSIZ) C RANDOM MULTI-WAY BRANCH GENERATOR CHOICE(WAYS) = 1 + INT(RANDOM(0) * WAYS) C START OF EXECUTION PRINT *,' This program will print out a different maze every' PRINT *,' time it is run and guarantees only one path through.' PRINT *,' You can choose the dimensions of the maze, i.e. the' PRINT *,' number of squares long and the number of squares' PRINT *,' wide. A 25 by 25 maze is the maximum, and any' PRINT *,' dimensions up to these limits are O.K.' C START OF EACH MAZE 100 CONTINUE PRINT * PRINT *,' Length: ' READ *, ILIM PRINT *,' Width: ' READ *, JLIM IF (.NOT. OK(ILIM) .OR. .NOT. OK(JLIM)) THEN PRINT *,' Meaningless dimensions - try again' GOTO 100 ENDIF PRINT * C INITIALIZATION SIZE = ILIM * JLIM EXIT = .FALSE. DO 220 I = 1,ILIM DO 210 J = 1,JLIM BEENTO(I,J) = .FALSE. WALLS(I,J) = 0 210 CONTINUE 220 CONTINUE C PICK THE STARTING SQUARE AND PRINT THE TOP BOUNDARY JSTART = CHOICE(JLIM) DO 300 J = 1,JLIM IF (J .EQ. JSTART) THEN ROW(J) = PATRN2 ELSE ROW(J) = PATRN1 ENDIF 300 CONTINUE PRINT *, PATRN2,(ROW(J),J=1,JLIM) I = 1 J = JSTART BEENTO(I,J) = .TRUE. COUNT = 1 C START OF MAIN PROCESSING LOOP 400 IF (COUNT.GE.SIZE) GOTO 2000 IF (J.GT.1) THEN LEFT = .NOT. BEENTO(I,J-1) ELSE LEFT = .FALSE. ENDIF IF (J.LT.JLIM) THEN RIGHT = .NOT. BEENTO(I,J+1) ELSE RIGHT = .FALSE. ENDIF IF (I.GT.1) THEN UP = .NOT. BEENTO(I-1,J) ELSE UP = .FALSE. ENDIF IF (I.LT.ILIM) THEN DOWN = .NOT. BEENTO(I+1,J) ELSE DOWN = .NOT. EXIT ENDIF IF (LEFT) THEN IF (UP) THEN IF (RIGHT) THEN GOTO (1100,1200,1300), CHOICE(3) ELSE C MUSN'T GO RIGHT IF (DOWN) GOTO (1100,1200,1400), CHOICE(3) GOTO (1100,1200), CHOICE(2) ENDIF ELSE C MUSN'T GO UP IF (RIGHT) THEN IF (DOWN) GOTO (1100,1300,1400), CHOICE(3) GOTO (1100,1300), CHOICE(2) ELSE C MUSN'T GO UP OR RIGHT IF (DOWN) GOTO (1100,1400), CHOICE(2) GOTO 1100 ENDIF ENDIF ELSE C MUSN'T GO LEFT IF (UP) THEN IF (RIGHT) THEN IF (DOWN) GOTO (1200,1300,1400), CHOICE(3) GOTO (1200, 1300), CHOICE(2) ELSE C MUSN'T GO LEFT OR RIGHT IF (DOWN) GOTO (1200,1400), CHOICE(2) GOTO 1200 ENDIF ELSE C MUSN'T GO LEFT OR UP IF (RIGHT) THEN IF (DOWN) GOTO (1300,1400), CHOICE(2) GOTO 1300 ELSE C MUSN'T GO LEFT OR UP OR RIGHT IF (DOWN) GOTO 1400 C CAN'T GO ANYWHERE, SO GROW A NEW BRANCH GOTO 1800 ENDIF ENDIF ENDIF C GO LEFT 1100 J = J - 1 WALLS(I,J) = 2 GOTO 1600 C GO UP 1200 I = I - 1 WALLS(I,J) = 1 GOTO 1600 C GO RIGHT 1300 IF (WALLS(I,J).EQ.0) THEN WALLS(I,J) = 2 ELSE WALLS(I,J) = 3 ENDIF J = J + 1 GOTO 1600 C GO DOWN 1400 IF (WALLS(I,J).EQ.0) THEN WALLS(I,J) = 1 ELSE WALLS(I,J) = 3 ENDIF IF (I.EQ.ILIM) GOTO 1700 I = I + 1 C MARK THE LOCATION AS "VISITED" 1600 COUNT = COUNT + 1 BEENTO(I,J) = .TRUE. GOTO 400 C CREATE AN EXIT, THEN START SCANNING IN TOP-LEFT CORNER 1700 EXIT = .TRUE. I = ILIM J = JLIM C GROW A NEW BRANCH 1800 IF (J.EQ.JLIM) THEN IF (I.EQ.ILIM) THEN I = 1 ELSE I = I + 1 ENDIF J = 1 ELSE J = J + 1 ENDIF IF (BEENTO(I,J)) GOTO 400 GOTO 1800 C CHECK THAT AN EXIT HAS BEEN MADE 2000 IF (.NOT. EXIT) THEN J = CHOICE(JLIM) WALLS(ILIM,J) = WALLS(ILIM,J) + 1 ENDIF C PRINT OUT THE MAZE DO 2300 I = 1,ILIM DO 2100 J = 1,JLIM IF (WALLS(I,J).LT.2) THEN ROW(J) = PATRN4 ELSE ROW(J) = PATRN3 ENDIF 2100 CONTINUE PRINT*, PATRN4,(ROW(J),J=1,JLIM) DO 2200 J = 1,JLIM IF ((WALLS(I,J).EQ.0).OR.(WALLS(I,J).EQ.2)) THEN ROW(J) = PATRN1 ELSE ROW(J) = PATRN2 ENDIF 2200 CONTINUE PRINT *, PATRN2,(ROW(J),J=1,JLIM) 2300 CONTINUE PRINT * PRINT * C POSSIBLY RETURN FOR ANOTHER GO IF (AFFIRM('Another maze')) GOTO 100 END * A demonstration program to illustrate the dynamic creation of * a menu bar from Prospero Fortran * * Author : R K Chapman * Date : 5 August 1987 * PROGRAM tmenu IMPLICIT none INTEGER*4 menu_create, menu_title, menu_item, AESret, form_alert INTEGER*4 my_menu_bar, title_1, title_2 INTEGER*4 opt1, opt2, opt3, opt4, opt5, dummy INTEGER*4 title, item INTEGER*2 buffer(0:7) CHARACTER*4 quote INCLUDE 'gemconst' CALL appl_init IF (AESret() .lt. 0) GOTO 999 my_menu_bar = menu_create(5, 5, ' Desk '//char(0)) title_1 = menu_title(my_menu_bar, ' File '//char(0)) title_2 = menu_title(my_menu_bar, ' Test '//char(0)) opt1 = menu_item(my_menu_bar, title_1,' Open '//char(0)) opt2 = menu_item(my_menu_bar, title_1,' Quit'//char(0)) opt3 = menu_item(my_menu_bar, title_2,' Test '//char(0)) opt4 = menu_item(my_menu_bar, title_2,'-----------'//char(0)) opt5 = menu_item(my_menu_bar, title_2,' Mode ... '//char(0)) CALL menu_ienable(my_menu_bar, opt4, .FALSE.) CALL menu_bar(my_menu_bar, .TRUE.) 10 CONTINUE CALL evnt_mesag(buffer) title = buffer(3) item = buffer(4) IF (buffer(0) .eq. MN_SELECTED) THEN IF (item .eq. opt2) THEN GOTO 20 ELSE IF (item .eq. opt1) THEN quote = 'Open' ELSE IF (item .eq. opt3) THEN quote = 'Test' ELSE IF (item .eq. opt5) THEN quote = 'Mode' ELSE IF (title .eq. 3) THEN quote = 'Desk' END IF dummy = form_alert(1, '[1][You selected ' // quote // - '][ OK ]' // char(0)) 20 CONTINUE CALL menu_tnormal(my_menu_bar, title, .TRUE.) IF (item .ne. opt2) GOTO 10 END IF CALL appl_exit 999 CONTINUE END PROGRAM PRIME C C Repeatedly asks for input of a number and prints C out its smallest factor, or says it is prime C INTEGER*2 FACTOR,MAXFAC INTEGER NUMBER C Start of main loop 10 WRITE(*,900) 900 FORMAT(' Input a positive number', - ' less than a thousand million: ') READ (*,*) NUMBER IF (NUMBER) 10, 10, 20 20 WRITE (*,920) NUMBER 920 FORMAT(' Smallest factor of ',I9,' is :') C Is it divisible by 2? FACTOR = 2 IF (MOD(NUMBER,2)) 30, 60, 30 C Number is odd, so try all odd divisors up to sqrt(number) 30 MAXFAC = SQRT(FLOAT(NUMBER)) + 1 DO 40 FACTOR = 3,MAXFAC,2 IF (MOD(NUMBER,FACTOR)) 40, 60, 40 40 CONTINUE C Number is prime 50 WRITE (*,940) 940 FORMAT(6H Prime/) GOTO 10 C Number is composite, provided "factor" is not "number" 60 IF (FACTOR.GE.NUMBER) GOTO 50 WRITE (*,960) FACTOR 960 FORMAT(I6/) GOTO 10 END  program printf * * Utility program to copy a variable-length formatted * file from disc (where the first character of each line * has not been interpreted as carriage-control) * to the printer (with carriage-control interpretation) * * To print a disc file, install the executable file PRINTF.PRG * as a TOS-takes-parameters application (or alternatively rename * the executable file as PRINTF.TTP), and, after executing the * program by double-clicking, type the name of the disc file to * be printed in the Parameters line of the OPEN APPLICATION box * parameter (maxlen = 200) character fname*65, pname*4, text1*12, text*78, line*(maxlen) parameter (text1 = 'Cannot open ') parameter (pname = 'PRN:') integer funit, punit, ind parameter (funit = 5, punit = 6) * Get the filename from the command line call getcom(fname) * Open the disc file open (funit, file = fname, status = 'old', err = 90) * Open the printer open (punit, file = pname, status = 'new', err = 91) * Main loop to read each line from the disc file, and then * send it to the printer, having removed trailing blanks 10 read (funit, 80, err = 92, end = 100) line do 20 ind = maxlen, 1, -1 if (line(ind:ind) .ne. ' ') goto 30 20 continue 30 if (ind .lt. 1) ind = 1 write (punit, 80, err = 93) line(1:ind) goto 10 * Format 80 format(A) * Errors 90 text = text1//fname goto 99 91 text = text1//pname goto 99 92 text = 'Cannot read '//fname goto 99 93 text = 'Cannot write '//pname 99 print *, text * Terminate 100 end  Program Tos c c Examples of use of SYS function c Call ex1 Call ex2 c End Subroutine ex1 c c Write a string to std. o/p with function 09. c This requires a 3-word parameter block, containing:- c word 1: function code, c words 2-3: address of null-terminated string. c The variables needed to declare the parameter block are:- c Integer*2 pb(3) Integer*4 pbp Equivalence (pbp,pb(2)) c c We shall need to build the null-terminated string somewhere c and obtain its address with the 'iaddr' function. However, c in the case of a character expression, 'iaddr' will not give c the expected result (it gives the address of a descriptor of c the character expression). As characters are stored one per c byte in consecutive locations, we can equivalence an integer c array with the character array and take the address of the c former (which does not involve any descriptor). Thus we have:- c Character str*32, cs*33 Integer*1 ics(33) Equivalence (ics,cs) c c N.B. The preceding equivalence statement will cause a warning c message to be generated at compilation time. c Now declare the SYS function and its result code. c Integer*4 sys, rc c Print * Print *,'SYS example 1' 10 Print *,'Enter a string (in quotes) <= 32 chars: ' Read (*,*,err=10) str c c Now build the parameter block and call SYS. c pb(1) = $09 cs = str // char(0) pbp = iaddr(ics) c rc = sys(pb) c c N.B. This particular function code returns nothing useful c in 'rc', but normally one would now examine 'rc' to check c for possible errors etc. c End Subroutine ex2 c c Get system version number with function 30. c This requires a one-word parameter block containing the c function code. Also declare SYS and its result code. c Integer*2 pb(1) Integer*4 sys, rc c c Now the actual result is in the l.s. half of 'rc', with c the major version in the l.s. byte and the minor version c in the other byte. c Integer*1 brc(4), majorv, minorv Equivalence (brc,rc), (majorv,brc(4)), (minorv,brc(3)) c Print * Print *, 'SYS example 2' pb(1) = $30 rc = sys(pb) c Print 100, majorv, minorv 100 Format(' Majorv=',i3,', Minorv=',i3) End * This program demonstartes how the Atari XBIOS and BIOS routines * can be accessed from Prospero Fortran * * Date: 29 Oct 1987 * Copyright (c) 1987 Prospero Software * PROGRAM xBiosDemo INTEGER*2 parmblock(0:2) INTEGER*4 xbios, bios INTEGER oldvals, dummy parmblock(0) = 35 ! XBIOS keyboard repeat function parmblock(1) = -1 ! Get old keyboard repeats parmblock(2) = -1 oldvals = xbios(parmblock) parmblock(1) = 1 ! delay before first repeat parmblock(2) = 1 ! delay before re-repeat dummy = xbios(parmblock) ! set new values print *, 'Try typing something' read (*,*,err=10) i 10 CONTINUE * Restore old keyboard repeat values parmblock(0) = 35 parmblock(1) = (oldvals .AND. $FF00)/256 parmblock(2) = oldvals .AND. $FF oldvals = xbios(parmblock) ! Put it back to normal END PROGRAM gemdemo * * Date: 5 June 1987 * * This simple GEM program displays an alert, and then * draws a graph in a window. It illustrates the most * basic use of GEM. Normal use of GEM would require * event-handling and redraw logic, and a resource file. * (Such a program is normally a thousand or more lines * long.) * IMPLICIT NONE INTEGER*4 handle, desk_x, desk_y, desk_w, desk_h INTEGER*4 wx, wy, ww, wh, my_window, dummy * Clip rectangle: INTEGER*2 clip_rect(0:3) * Variable used for setting the window's title: CHARACTER*17 my_title * Variables used to calculate graph points: REAL a, b, x_scale, y_scale * VDI parameter arrays: INTEGER*2 points(0:200), work_in(0:10), work_out(0:56) * DO loops: INTEGER*4 I INCLUDE '\PRO_COMM\GEMCONST' INCLUDE '\PRO_COMM\GEMFUNCS' * Initialise AES CALL appl_init * Open virtual workstation handle = graf_handle(dummy, dummy, dummy, dummy) DO 1 I = 0, 9 1 work_in(I) = 1 work_in(3) = 3 ! Marker style 3 work_in(7) = 0 ! Fill interior hollow work_in(10) = 2 ! RC coordinate system CALL v_opnvwk(work_in, handle, work_out) IF (handle .eq. 0) GOTO 999 ! open failed * Display an alert, with button 1 as default dummy = form_alert(1, +'[1][This program draws|a graph in a window.][ OK ]'//char(0)) * Determine desktop window work area size CALL wind_get(0, WF_WXYWH, desk_x, desk_y,desk_w, desk_h) * Determine my window work area size ww = desk_w/2 wh = desk_h/2 wx = desk_x+ww/2 wy = desk_y+wh/2 * Create window half size my_window = wind_create(1, wx, wy, ww, wh) * Set the window's name my_title = 'y=sin(ax)exp(bx)'//CHAR(0) CALL wind_title(my_window, my_title) * Open the window CALL wind_open(my_window, wx, wy, ww, wh) * Set clip rectangle to work area of window CALL wind_get(my_window, WF_WXYWH, wx, wy, ww, wh) clip_rect(0) = wx clip_rect(1) = wy clip_rect(2) = wx+ww clip_rect(3) = wy+wh CALL vs_clip(handle, 1, clip_rect) * Hide mouse while drawing CALL graf_mouse(256, 0) * Fill rectangle with background (white) CALL vr_recfl(handle, clip_rect) * Calculate the points on the curve a = 0.3 b = 0.02 x_scale = ww/100.0 y_scale = wh/10.0 DO 5 I=0, 198, 2 points(I) = wx + I*x_scale 5 points(I+1) = wy+wh/2 - SIN(a*I)*EXP(b*I)*y_scale * Draw the curve CALL v_pline(handle, 100, points) * Mark every fifth point DO 10 I = 0, 38, 2 points(I) = points(I*5) 10 points(I+1) = points(I*5+1) CALL v_pmarker(handle, 20, points) * Show mouse after update CALL graf_mouse(0, 0) CALL graf_mouse(257, 0) * Wait for any key before closing window CALL evnt_keybd CALL wind_close(my_window) * Application exit CALL v_clsvwk(handle) 999 CALL appl_exit END MMMMMNN6N9NYN{N~NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNOOOO O O OOOOOOO&O6O=ODOTO[O^''   " " !" "#$% "&'( ")*+ ",-. "/01 "234 "EFG MNOPQRSTUVWX YZ[\]^_`abcdefghij/ (  &   C  A   @% @ @ @" @@" @!@!@ !@ !@ !@ !@ !@!@!  @$ @@@@/. 5!6"7#8$9 %: &;'<(=)>*?+@,A -B .CD05 1@ 2QH3QI4QJ5QK /L  "  " ""    Ck al 6FSELV60.RSC[3][ |Printer is not online !| |Please check printer| ][ OK |CANCEL][3][ |Print directory ? | ][ PRINT |CANCEL] ________.___ _______ __ __ __^^ ^ ^^^^^ version 3.0 ITEM SELECTOR Directory:____________________________________________________________________________PSelection:@S234567890________.___FOKCANCEL FILENAME.EXT PT?@12345678~901~~~~~~~~~~~~~~~~~~_ _______________________________xF@22345678~901~~~~~~~~~~~~~~~~~~_ _______________________________xF@32345678~901~~~~~~~~~~~~~~~~~~_ _______________________________xF@42345678~901~~~~~~~~~~~~~~~~~~_ _______________________________xF@52345678~901~~~~~~~~~~~~~~~~~~_ _______________________________xF@62345678~901~~~~~~~~~~~~~~~~~~_ _______________________________xF@72345678~901~~~~~~~~~~~~~~~~~~_ _______________________________xF@82345678~901~~~~~~~~~~~~~~~~~~_ _______________________________xF@92345678~901~~~~~~~~~~~~~~~~~~_ _______________________________xFABCDEFGHIJKLMNOP SORT BY NMEXDTSZUNSORTEDNew File Name:@filenam~ex________.___FFFFFFFFFFF R/O HiddenSystemArchive050352Date: __-__-__999999120000Time: __:__:__999999OKCANCELinstalled A:\*.* Volume in Drive A is Volume in Drive A has No Label Directory of Files bytes free A:\*.*\*.*... . -- am::4  4  | |Unassigned error number|QQQQQQRRR*R@RNR_RoRRRRRPjPjPjPjPjPjPjPjPjPjPjPjPjPjRS SS2SGSZPjSnSPjPjPjPjPjSPjSSPjPjPjPjPjPjPjPjPjPjPjPjPjPjSTTT6 | |No error| | |Fundamental error| | |Drive not ready| | |Unknown command| | |CRC error| | |Bad request| | |Seek error| | |Unknown media| | |Sector not found| | |No paper| | |Write fault| | |Read fault| | |General error| | |Write protect| | |Media change| | |Unknown device| | |Bad sectors on format| | |Insert other disk| | |Invalid function number| | |File not found| | |Path not found| | |No handles left| | |Access denied| | |Invalid handle| | |Insufficient memory| | |Invalid memory block address| | |Invalid drive specified| | |Cross disk rename| | |No more files| | |Range error| | |Internal error| | |Invalid program load format| | |Setblock failure due to|growth restrictions|[3][TOS ERROR #- | |INVALID ERROR NUMBER| ][ CANCEL ] "  :                     $    , V  (       2N$ "$  (   "     $<      "      " "$&                         4  $                $B    8                  $                               ,              0"                Z0   (,2f   <&   d  (& "8 ," n  @,$         &,*   .               \    TN 0"=r64 | Reset code 5 27 77 27 87 49 | Horizontal spacing: 6 cpi 5 27 103 27 87 49 | 7.5 cpi 2 27 80 | 10 cpi 2 27 77 | 12 cpi 2 27 103 | 15 cpi 4 27 80 27 15 | 17 cpi 4 27 77 27 15 | 20 cpi 3 27 51 45 | Vertical spacing: 4 lpi 2 27 50 | 6 lpi 2 27 48 | 8 lpi 3 27 108 0 | Left margin: 0 chars 3 27 108 3 | 3 chars 3 27 108 6 | 6 chars 3 27 108 9 | 9 chars 3 27 108 12 | 12 chars 3 27 108 18 | 18 chars 3 27 108 24 | 24 chars 3 27 67 22 | Paper length: 22 lines 3 27 67 33 | 33 lines 3 27 67 44 | 44 lines 3 27 67 66 | 66 lines 3 27 67 88 | 88 lines 3 27 120 48 | Quality: draft 3 27 120 49 | final 2 27 53 | Slant: upright 2 27 52 | italic 2 27 79 | Per`1D6 o"h#1z#1~#1,Oc.N//Bg?<JNA BbBy1NNV?.?<NMN^ _TNNV?.?. ?<NMN^ _XNNV?.?<>NAN^ _TNNV?./. ?<"n N./ ?0.=@0.N^,_ _PN/,HNVA-HN.0. A8JHp?pNHy6N* n p0Hy>pBgN,rAm n 0R@0p=@`0.rA60CWRn noAXP"Op"QHnN n 0N.Hn??<3N&Hz?<N&XN^,_Nu J.A.W. ARROWS move, SPACE changes, RETURN exits Better Mousetrap Accessory Loader/,HNVA,-HNrAW3?Bdp34<w3`4p//?<Np32<3t36<`3HyNNNBgN@?<NNTAC?  p QAC?< p QAC?. p Qp3?AbC@A@R"O2r"QHy>pNHy>pNpNHy6NHy>pBgNrAg`HyHyA?pNHy>pN&rAW3?BdN.Hy??pN$Hy>pBgNrAl:p3?t3?A\C?A?CAD2v"QA?C@N2v"Q09@eHy?<PHyAN*N(XHyANp9ArAl`t9Av:CfN.HyA? NA@NR"O2p"QHy=NHy=N`rAW3?AAR"O2p"Q?N`09?89?D@dAAC@2p"QN.HyAD?pN"Hy>pBgNrAfp=@` 0.rA60C>Rn noA>P"Op"QHy@N?NNrAg`A@R"O2p"Q?N`HyN%`N.Hz?<N.Hy??pN.Hy>pN=@09?@e2?<A0O"OpQ?<N?<N#6N^,_Nu Press any key to continue... A:\ does not exist ! Drive A:\*.*AW_BOOT.INF/,HNVA-Hp32<w3t36<389?zEf|//BgN09?rAgHyN?<NBgN&NB09?rAf(?< ?<NdHy4HzD?<N&X`"?< A,O"OtQBgN?<?<NN^,_NuBooting up. Wait, please...Ah#1A1C!It0B BA4Bt0B  A0B BNNNNNHyN%Hy4N%BgNAH.ar fSfr?/L.NuH.ar fSfr?/L.NuH.ar fSf`U?/L.NuH.ahr fSf`S?/L.NuH.aBr fSf`R?/L.NuH.ar fSf`T?/L.Nu#J _  g "_Jjp` 0C-p" g $_Jjr` 2E-rg\HBG.e$4SBkQ$SpQ C.` $SkQ$SrQE.LBJfpC$I/9JNuB9N`PNBy1x _0g$_jp"_// HPN%LPBtJ@fL)J9Nf f8| i f(Bi ` f|Ji f 3| `4<gG BQB) @e *:f&Jrt `e QG$tWJBkG$3 J9Nf fpBi `\ f3| p`J g( f*3| H@?3| NAXNu/")x itg$H@//?) ?<@NA LJof _Nu _4` _t6 Bo r aSB`2aNH?l _r ar a/L?lNu _r aN _4` _t"x0HgJJjDxvCìzp cRЀ`|e W0R"f`6 _4` _t2xJAjDAxvCìp0 2H@0RJAfJg<-RBlCSBr aQSCaQN _"_v` _"_60`JfQ$ItRJf` _4v` _46"_JBjtJCkgCe4` BSCr axQSBkalQN _6kfv2_t Cc"4YBv` _6kfv"_t Cc4QBvSBkr a(QSCC" A0 9c^a JgYC`NH \"oA/ N'L \Nu(_"_/ A) g  f$)Jtf&H //?) ?<@NA LJovfNu$ix&i|fa`pRgf#Jx`H")x it#Hxg$H`//?) ?<@NA LJofLNu )f NuHy(` Hy(X0< LN0REWRITE required prior to WRITE or PUTDisk or directory full _$_"Wp i e)H/ N*L4NH/ N*Lp)` _"WJ9îf*J)f i e)H/ N*L i d)J)fJg i dB9îJ)fBiNz`z _$_"WptvH/ HyìaB29ìXL- -fJf^p`4  fJg*`N0eH  bBԂi\(؄iV؄iRԄiNԁRCJ)f  g i e) 0e 9c~Jg&JgDJf 6Höf4N$NHy*~0<`Hzh0<N0 _$_0"Wt&JRJ)f:H/ Hyìar29ìXL i d J)Pîf RBBe`Be`N Bad digit in number encounteredOverflow during READ of number(_ _/ C (g ( fXJ(fF$($IJtflH / /?( ?<?NA LJo*fJg  f"J` g  Wf NuJg Jh g J(fPNu!|NuH$hx&h|gpR@@gf!JxL`H &ht!KxJh f(aZLEJ@g *f` R@Bh` / /<?( ?<?NA LJlp!K|JfvL`rH@Hsp/Bg?<?NA LRA3 f@ AgUH@Hzp 3 dp` SAH@Hzp/?<?<@NA L` fSA` fSAH@Hzp` f H@Hzp `~ f4SA`(H@Hzp 3 dp/?<?<@NA LQ`* d,-59@-5HHzpp/?<?<@NA L AfH@HzFp/?<?<@NA L NuHzR0<`Hz$0< LN0  p Exit q C^AReset required prior to Read or GetAttempt to read past end-of-fileH`?<,NAT24HAI<Ёr jЂLNu&_4"_jtE  SB*(y1/,,/  HyUBkQBBg?<KNANHð _0"_jp&y1r+t$IS@k,RB  WfSBkBkG$I0(K Vg RQBg`?</LðNuHP _0"_e /LPNuHy0N0/B9x/|xNuHP _0 @f0"|NNp` "_J@jpExr4@ BbBS@kQ/LPNuHP _4SBkt82$_rAbd0 @f0"|NNp` "_J@jp6ADb6CG0IS@k$eQ/LPNuHP _4k2SAk0"_p6B@bE0)CS@kQ/LPNuHP _2$_r0 @f0"|NNp` "_J@jp@kS@kv&J$IRC4(K Vg RQBg`?/LPNuHP _4kF2SAk>0 @f0"|NNp` "_J@jpJBg@b6B@oCExSBkQ/LPNuString overflow _(N _0/Ho |031xJy1vfXNX/#x"|1Da "_a"|1KaJy1g yx9BgNA/ ?< NA\Nu091vNu091xBy1xNu _31vNBy1xNu *** *** Copyright 1986, CCD and OSS, Inc.,~ D hH ~2 &4$   b @ \<|B 2 l 2 0  .B   (  R   &(  4  n .      & 6 8           $           $         " 6l  ^(       "$" BBb42J ^ (*  vb"L  ( *@ B @ (,  ?.?.?.?. NDN^,_ _O N/,HNVNL"n0. =i0.N^,_ _\N/,HNVNL"n0.3n N^,_ _PN/,HNVrNL-nv=n=n=n` **O# .|*(*m - ЭЭ// ??<JNA Ja 9N yV09TJgS@fYa  NqNq~A Taaf9 l<8g lA ja` lA baa.A raJfa6Aan/< ?<NA\?</< ?<NNAPJ@f?</< ?<=NAPJ@kt3 *| ,-/< (/??<?NA JkHa,Jk>~,| ("<01.10fE@IK"r$<0&<0|CbaCaECaEA JgC aE ` -,CBaECzaECaE-,AJ.gC|3aEA J.g$C"BC|1aE A A J.gPCZBC|0aE CBC|C|P |aXE |1|9 |)|)ABaVaJf|A aB?</< ?<a"k8aA 4aaBgNA.y `?9 ?<>NAXJNu IazG6aPJfza4a@JgaV` Ma-, Ia~ANatNu Kal LafNuxajg@߰<Yg<NfxNu MaBAFa8Nuz IGRa(a@0aaJgxa`ag< gJg@߰<1m<9bNuH@ r IaE BRGXa°< g@0g KaG^ a< g 0@a&a0JgaB`zx < g*<m< bL`H6<OA `aNQLNu <fNuHB?< NA\# LNuH/9 ?< NA\LNu/?< NA\NuB# /<NAXJf 9 <gJNuA`A` aAaajaf`pY*8 Wrong version of MEGMATIC.PRG!!!qpY*; MEGMATIC.PRG not found!!!!qpY*/ READ or WRITE disk error!!qY)CCorrect ?Y)C j No j Yes k qj j pY(/1) Do you want the disk write VERIFY off :pY)/2) Do you want the RAM DISK installed :pY*/3) Do you want the SCREENSAVER installed :pY+/4) Do you want the SCREENSAVER to flip :pY,/5) Do you want the PRNTSPOOLER installed :pY-/6) Do you want the MEMORYCHECK installed :pY./7) Do you want the AUTO DESK installed :pY0/10) # of minutes for ScreenSaver off/on <3-9>:pY1/11) Print Spooler size (in 16k blocks) <1-9>:pY2/12) Re-setable RamDisk size (64k blocks) <2-32>:pY3/13) Re-setable Ram Disk drive letter :Y64Is everything entered correctly : Y%=Loading: MEGMATIC.PRGpY%=Saving: MEGMATIC.PRGqqY%= All Done!!!! qEEpvY wYo Y oqY!9p********* MEGA-MATIC *********qY"9pConfiguration Program (v1.19)Y#<(c) 1987 by TIF Softwareqmegmatic.prg`  (" $&2$H "><R `2" IDNu/,HNVrNL?<MHnHn~HnvHnrN:z"n2"n2"n2"n 2=n~0.N^,_ _ON/,HNV0NL0. rAg p=@2` Hn0Hn0Hn0Hn0Nl=@pd=@2=n p=@ n n0.@rA1Rn`p=@?.2Bg?< BgHnHnHndHnLHn4BgN;=n0.N^,_ _TN/,HNVN;=@?.N;=n ?<fBg?<BgHnHn"n/ Hn"n/ BgN;?.N;N^,_ _O N/,HNV*************************************** * ATARI ST/STE/MEGA STE/TT/FALCON * * * * - MIDI * * - MUZYCZNE * * - UZYTKI, DTP * * - GRAPHISC * * - GRY * * - DEMOSY, KODY ZRODLOWE * * i co ci na mysl przyjdzie * * prosto z Holandii * * * * KRATA & PASKUD * * Katowice sobota: Dom zwiazkow L1,L2 * * niedziela: Baildon 70,71 * * tel. (katowice) 87-94-32 * *************************************** `0No^Prospero2.10 Execution error: bad command pgm not openednot executableload failure wrong version out of memory init. failure no parent pgm stdio failure memory shrink linking order  *z:Bgp NNuG.k +f <,kagNAXJNu// ab/?<ANA\"_ _JNuNuNuv`vaB?/?<=NAPJm @pNua(Bg/?<ANA>`&```R``$B`F`4`+`n`*`!l`>`#`$`<``Z`` `` 2`#Z``,`(`,J`|```"`'`-"`"6`` n``!`&f`,*` ``2`~``` ```'&`&T``*`` `!`#`'``J`6`F`T` T`+L`+:`"``6`2```R```D`` ` D` `F`(``"l` >``` ``0`D`+t`+`B``` :```"` ```,B`)`#`*`'D`'`!`f`!``&` `,8```2`,`<`b``'N`)F`<` `$`&` `"`)`*``&`(V``&`@`` `^`~`&``````'`!``D`%p`N` L`(F`*`(`)```2`"```"```` `$`)``!`* `D`` h`B```r`(n`` ``%`p`p`~``b````!`&@```>``v``` D````b`H`~````&R`:`)p`)``)`)`)`$``)` `%"```(`(`)`)`````z```````(l`v`z` ```N```````"``H> N<)OMN.l l(f. _Skg + g2+ Hӫ`NuC.+`C++HC!WJ@k"_1N 0"N I0<5B`QA0<1|Q#N#k #k#k(I)|<A)HA)H)J)KNu,* N .nNu m PNgۘY` mTݘ]`ACfpX"҈"QCfaNu0,*PA` A`A0)_Hzb?pNs`p`p"l Q`p`p"l i)W/?2,,g Ag"tALC!QRl,0 _@2)H.Nup`aj)K.L Nu,2 fa`0 fa g / &l.+g+fa"N&_Sl,gA4C.rQNu"_ _/ / "HBXS@HaL&l.+fRQQ&_Nu _/Jg g ?paF0A `A `LTrueFalseJ@fpap"_?< O/ a$ _XNJ@f0/Aa _B0RNаPor aS@`T`aQNu _aNH瀀 l.AaLNu&a'Cfa*axL NuN N N N $N (N dN +fL`$fa$L`aLH 'zNupNNNuNupaBNu +jaNu k"k&4+*agaf `Nu k"k&4+*af R, +0,lR0Nu +'@,aga f Nu0na`'@,raf Nugah +0maNa`R,aXNuNug a> +aNu`fga& +0lat` +Ra`a+g'k0`Nu kB2+*Daf S,aaNu2< ` 2<`2< )_H L _?//a Jg `` Wg$ W g> pa v7_NL L lNA8p``)_H L0^@/7/7a ZJfpa 0aL L lPNA0C8rag _2RANAp`a`H0&l.`a,a\a`:a`H0&l.`aaN`a`aa +`a`aa+f `padp`a`aat| N| N`a\` H0&l.`ana k&`a@aa"+fa``ba a| N| N`@A."_)WH0&PN l` lX` _)W"o.H0&Qa fN _`L Nu+ g` +g+fNu+fjN +gd+ g@ g gNu@`+g + g| | Nu+gNu+gp`Nu+fp`Nup`p`+gaDJkfaN k'HSkNu"k T4+$YBkg kaf Nu'k T0+$Y@7@+wNuSkba kX'HNu k"k T'I4+$YBafR7A"kSA  Wf "k 2Nu0 @g @f 0|< a""kB0+  Tk` @fBazJfBk`"k7|``+gJ+f@+f6?| N| N0` l+af~Nu +??<>NAXJkNu`daL+g +f`B2+*ӫ&kfaNu+f"k 4+$k ka@f`aNNug, k"+ &$D+f B0+ap"k a k"k 4+$ag @fJAf 2+$7ANuB2+*ӫ&kba'k &Nu+g?aN0`a` k+g+fS'H`'HSkf(+f"k 4+$k kaNf `aNNu+gR0Nug, k"+ $D+f B0+ap"k aaNu k"k 4+$ag @fJAf 2+$'k 7ANuSkba+g| Nu kX'HNua^ k+g*+f"B2+*$DafL"k&anf@`n4+*"k&aZf,NNu'k &`'k 7k$+wNu k+afNu ka afAaaNuJ fp0+$Hk a+f k*g'k &Nu+f~aaA8+gJ+g(+f afg @frA8a\fh`(`*BkaNg" @fNA8p`.a>f>N'Hah+g kaNuC0`Cj` C(`C>+fNNu kBNu+f"A k*gA&0+$k*bAa(Nu+f+fa`gkA8p`Nu+g+g +fS?a:0+f&g kaNJf+fA8aHNu'zNuN k,'H X'H7|NuJg"+g:+f| af|a^Nu k,// <a _ fB,B0NuJkf k g @a kX'HSkNuNuNu+gaJkf k P faaX k'HSkNuY/ <a _B|J,f'H,`"k0"'H0Nu$%'-@{}~!#_` ./JA $OBjS@k|T  VgpSrK g  g~ ,gx /gr :f< jg" jf\HW0<2a\LfFB@`HSrPaLf0RjS@[j` J* gp.J"R2$j JNup` RT0*J* f @f (:gaa,J* fa`J@f` @m (:fTUNuRS@NuJ@gj Bo .fRoan onN`F \f on>a`Jof4.?@r\a?Ag W0/S@aR0/o` W0/ Nu`>.?@r.a?Ag W0/S@ra R0/ora` W0/raNua fB@Nu`J@g4An0`"rZa.g$ 0e 9cCt Wf QB@NuR`pNu Ae߲d ae  erNurNu?S@kWfWD@`p2TNu o g &l" gg&k`4fB _PNaaL o'H4 /g n @ga`aX`a,p`p` gf TfpNupNuaa`NuAa7|$7|*A'H& NuAza7|$7|*A'H& Nu7@$7@*AdapNuN7|NuafNuAnp`aPp` @NuNNNNNNNNNN\NNNNNhNNNNNTFCA chain corruptedH$C82 "ARPa".$$$L$Nu kr alfr adNuYCatf /r2+*a'@0p0+*a"XJNuA&'l)KNu ,g&@$k4/+pN fNu/ <YHWa2&_&Nu K0<MBXQ'zNuNC 0<"QNuC :"""" "NuC ""XX""Nu g / <arNu gA"g"Af pNuA"fpNu _2FA0<aQN WXN WXNu$jD&gjD"Ba& jDNupO`pJapNu @&HCJCf $B@H@60H@"B4È0H@Nu4RBHC€H@B@H@H&4HAHA҂cS`NuPL/ a _"_"QNNq` _"_/" JjD&gljDan& kD NuJn pa@pNu"@JjD/aF& kD$Jl҂ Nu$jD&jDoA$HBHBJBfЂeBAJf $kJjDNupOapNu$a"_" jDNP _"_ N _ Q BN$a"_" lBiN/ /J,f.p a$BNuaLA,a,ja _PNAaVk`ZAaHj`L/aB$HB06HC$46$HC0H@$6gRAA\od`a `HB`N @ilJog$"C ։ՀgRAVASofJAk AlA!!1 oap _\"_Na` Aa..AJfNuCJg 0Y@0HAC" $>&HA,HBHFBЁ݂HF"BAHAH@B@ހ݁a Bރ݁ IC&a ևӆ"",.J,jD,`^/a _a` a Aa`a` Aa..AJf pZa bN LCJg0P@0H,. "NHF:HG<HGAʀ0HA00HA00B@04<HB4BF6A,("HF HB*҅Bх.҇хHAHBH@܄хH@FHABFHFц2HAB@H@( 6HBBCHCփւa B(֐ӄL0C`a`L/H`aD,`D,a`D,L/H`aJ,fNuAJg l0,2Pm@g0 @8l VaBAC,,k щщ`jD,PD@`D@ @8lAa`AJg 0@m @l0"B ҂!NuAJg X"B !Nua Aa aA/a*a NuArJgnjDD0 B` a ~ /a`AJgH2X$gF&YrPAgWJf>JAg 㸐ԀA0k Xl NupXa ` ܓ $gB`Rf`"$a !Nug$BNu&໖ԃNuC`C$ "/`C`C "H@f Jf###Nu$vB##BT@J3NuC` QA/C&!$!2!Bրd RgRAJfJgCX B!AQAHB!NuP oaf"_N oa _PQNP oaF"_ o //N o az _ QN026Ac6SCm VfANu&2 _/SAm 4Ao@d 0p aNug4X"H@A`QNu0Nu"o6J@gDS@o on86@m224o 2` SIQA 6"o`00Q`p aV"WO 6RCNaB/20JAg AmvSAH@ VLg RCRHQv  W.BNaXH`aP//206Ac6SCm VfA _._NО?@Bo oTJjD-RoSo. /AaԸA0< JVSJ@jB@"WJog$0RoSoQ o0 _PN//p aXX`&42/JBofAnbHk^@SBAo04a&R@B4UOA"HRAgRB4R@dS@/ Q"_` QRI.I?/Nu0<TOa/Nua"20<QJAgbQ Ao2a2Q0V@/ a"_>2<0S@m RAQ0S@"Bt RARBQ2VA QRI.I/Nu&B2AlaD0QJj/Nu&2Ala(Ag 4RR@RAHIAH Oax"OQ/NuH/p a& "/4V@VAA0"H2RA1!Q?W"O/L._Nu"_B0"RAN & O2VA"OB4VBԉ/Nua/+Hsx R7@ +R'@J+g(>+Hx0+HR7@ @oa$B+&]N]NuNa<ka2kC$m A&]N]N NHmaHma'm&]N]NuNJ+g,$lHRNJgBk`NHk <NJ-^DB++k]DB++R&38WD@`B-B- JgV-HR@@~ n8A NvHmB++3haf-~?NA p NB++R@+J-g&]N]NuNB+kBJgF+m$m+j"mA Nd+R` "m0k fA Nf`|+j`Hk.0+ HTNlC $k.A2RAQHmp Nl+m"mBB#k.Jf'mB` $m jCA Nd$`%m$m'j.&]N]NuN~GB>B-aA NvBgNgaaB++k]DB++3x|-WD@Hmp Nl+m$mB%k.B*m J>f 'm>`~+k>$mJg+R`$m$-* JgTNAp N|pN jNvpN~-pNT"k.ANvpNpNTNp |!NpA NvBgNfJ-g@NA6p N|pN$m jNvpN~-pNTNp |!hNpB++k^DB++3x|]VDJgBNAp N|pN` missing ']'Ap N|pNNp | NpB++R@+&]N]NuNB+k>B-B-Jg+m--$mB* Jg~G j/C $_ANf"B- -$m@J*g~G$mj j+m+R`|&]N]NuNJ+g`NHk <N- x7m RmSmd&]N]NuNa+@;@~ GcA|p(N|p2Na7m pB+m*;A;@aF+B>- xRmSmd&]N]NuN$kN+j+m$m+R$m *2f` -fApN|p2Na0$m $&]N]N N+k^Jg$mBjB+R`+kBJBB+~GaJ+g``B++ f:ah+ f +R'@`k+a -TgAp'N|p2Na|aJ+gJ+gaJ+g``Va0+ +HAo0+ @Hk2pNl+k2$mB%k.J6f'k26J:g"k:"2'k2:`tapB+@mA@aR-S-d`JafJJg $kJ%kBJ'k`(HkaJkmApN|p2NaB+ JgJJg $kJ%ka+ f~G`~G$kNJ*fm`4*-g*NA NvpNNApN|p2Na$kNB* Jg(JVf'kNVJZg "kZ#kN'kNZ~GHmaV'mJ$kJ'j`.aJ +Ы'@`aa2HkaJ+g2J+g*HmaZJg$mB* Jg ~G``Hma/-~az`aaB+Ы'@B-a+ f~G`HkanJ-g`tHka\a B+ JgJklaB+k^Jg,+m$m;j0-ްkf`@`Jmf`,+R`Hmp Nl$mBJf'm^`"m"$m5k$m%kN+kNHmp Nl"mJf $m$` i$m$ i #mB%k2`.JkoHmab/-B'a2`APpN|p2Na`\JJg $kJ%k`JA>pN|p2Na`4@S@rNdp` +R'@+~f&]N]NuNHSpN~7GB++Jg,B+~GB++kaB+J+g/-a`~GJ+g k aJ+g&]N]NuN$m *~.VD+"m&]N]N NpB- @mFA@B-$mRnB-rx`~ GNT-pNTNR-S-d&]N]N N$U0* H>+,HЇ|Іr@m$A@NT~=pNTNR-S-dNN$]N]NuNNNNN$MaN`| ApN|pNA NvpN` LISTING OF Ap N|pNA,NvpN` |ApN|pNN$Ma&NN&]N]N NB+&R@&+'eNNB+&B+"&]N]Nu***************************************************NJg&+m$m/- $UaHm"m/)aJ-g$m+j +m$m+R$m *2f*- fJ+&fJ+"gpNNJ- g.NT`Public:ApN|pN~ pNTN`.NT` External:Ap N|pN~ pNTNB+"`NT~ p NTN"m/)+*aHa` -f,$m/*- $Ua$]N]N NJ g+m $m/$UaHm"m/) aJ-g$m+j+m$m+R$m *2frJ+"g.NT`Section:ApN|pN~ pNTN`NT~ p NTNB+""m/) +)ahN$m/*pN.N` -fn$m/*$Ua$]N]N N`MODULEApN|pNa'k62J2g(NNNAhp3N|+H~ GNNNT` * Module Ap N|pNN$k2/*+aN` *ApN|pNNNAp3N|+H~ GNNNN|F"/+R$Ma2pBB+*N@'B+&~G"/+F$MaJ+&gNNB+&~G"/+FB'$MaJ+&gNNNNNN"k2'Q2`NN&]N]NuNJ g^+m $m/$UaHm"m/)axJ-g,$m+j "mB) Jg/*+*ara$m/*$Ua$]N]N N`UNSATISFIED REFERENCESApN|pNapOB+*N@'B+&/+F$MaBJ+&gNNNN&]N]Nu------------------------NJ gf+m $m/$UaHm"m/)aJ-g0$m/*B+*Ta~G&G"$m+j +m$m+R$mJ*gF j+h"m0 @n/-~ a>` N"mANvpNNB+&B+"` -fNT~ p NTN$m+j $m+R$mB* JgNJ+&WDB+" Jg NT~ B+*| FNTNzE& j/(+(aa -fJ+&gNN$m/*$Ua$]N]N NJ g+m $m/$UaHm"m/) a J-g$m/* B+)TaB+&~G"$m+j+m$m+RJ+&WDB+" JgNT~ B+)TNTN$m j/(+(aa -fJ+&gNN$m/*$Ua&$]N]N N`CROSS-REFERENCEApN|pNaN`Public/External namesApN|pNNNA*pN|pNNNNN`NameApN|pN~ B+*UNT`Defined ReferencedApN|pNNNNpCB+*AHB+(NR@'/+F$MaNNN`Section/Common namesApN|pNNNARpN|pNNNNN`NameApN|pN~ B+)UNT`OccursApN|pNNNNpMB+)AHB+(N@'/+R$MaXNN&]N]NuNrA //NLB+#B+$B+%B+B+B+~GB+B+ B+!B+B+B+B+B+Bk|7FBkB6B:B>BVBZB^BBBFBRB+B+ B+ &]N]NuN^NNNNAنp(N|pNNN`(Copyright (C) 1986 Prospero SoftwareAp(N|pNNNNaHk <NR~G+aގB++koaV`fB++3x|^WDB++3xz@WDJgd~GB++R@+B'a+ f"$lHRBANvNHRpNa`NApN|pNN``~aߔCA,2RAQJ+f~G!`~G aݬB++k_DB++3x|/WDJgB++R@+B+B++k_DB+ JgB++3xa0~G``~G#`XB+`R~G$`J~G%`B`@~G`8r Nj //DDMMNNUUXXddmmnnuuxxB+ Jg B++R@+`HaܮB++knHB++3x|=f~G!B++R@+`NAFp"N|pNN`~`(J+!gNA,pN|pNN`Z`B+ Hk~?B++SNG+GJ+!gJ+ gTHknA,Nvp@NA֤pN|pNaLHk ~/AnNvNHk / <N:Hk N~aj+ f&N` Reading:Ap N|pNN+ fB+HS~/ANvNN| pNTANvpNNB+B+a.B++klB++3x|/fB++R@+aB++k_D`ApNB++B3xNVDJg~G`\N~/pNTB++3hpNT`" is incorrect and has been ignoredAp"N|pNNB++R@+`&B++3xz[fB++R@+adB++knB++sx`~ Ga>~a۠`d+ f@NANvpN` not foundAp N|pNN~Ga `J+g B+ Jg+~.ga`J+ g&aעCnA,NgHk ~/A,NvN4`DA,NvNFJgHS~/A,NvNan`NA"pN|pNN`+#+%+$JgJ+g|A,NvBgNf$` $$$$$$$$.PRNCAr 0`Q`&HkA,Nvp@NAFpN|pNa$lHjBANvNHjpN+ o+HT@@(`~ G(+ o+ HT@@)`~ G)+ o+ HT@@*`~ G*J+#gaJ+%gapJ+$ga+@H/NX~/NX&]N]NuNHm~??/-N?$m /"mA /N$m $&]N]N NHm~B?/- /-N?BgN - g,`Linker internal errorApNp2NN&]N]N NHm~??/-N?/- $mA /N+m &]N]N NHm~B?/- /-N?BgN - g,`Linker internal errorApNp2NN&]N]N NHm~@?/-N?/- $mA /N+m &]N]N //// ?/?/NA _ "_"N?/?/// ?/NA _ "_"N _;XN _/ P*OؿeJ;X0fN;@0 @+ g @+ gUN+ N+ 0 @&Ig @&lgUN0&tN&INQ*_pN` _BN]N _B0/H4&l*lNa&HdBg"O@H`  Q?"CNN|2RA`0N|2JAlp Np"_HdBgHd? `/ Q?Na I `a I03 Q _#NA26RCK"HNu`(N ^    V Prospero2.10 Execution error: bad command pgm not openednot executableload failure wrong version out of memory init. failure no parent pgm stdio failure memory shrink linking order  #:Bgp NNuG.k +f <,kagNN N"N@NN@N2NN%N&N%bN%N'4N&N&N!N$N!N .N \N!N N N |N!8N(tN(:N'N'N(f NN t~NZ NZ NZ NZ NNZ NZ NZ NNZ NZ NNZN NZ NZ t~NZN  N  N  N  N  N NN N N*NN(tN(:N'N(f NN N*NnNN\N'N(f N'N(f FBENCHMENuNq``2<4<NuJ-g&,g C|" _N"lВ B MgR ( @`BB M$`/( ( @ QHa LQNuJ(gP"l(0(21@og?A/ Ca^"_CaVaF"l(CaFCa@0(Hr tv a@JgCa& /rtv0a aNuHaLNuHa LNuHHC6SCHB?B@H@40H@?0HBH@fCr /?a 4&"HA_`r0_ A9o^A?a v4QLNu @mP @nJNu @bBNu @b:NuH@jR@`H@J@f(H@NuXBm AnNuXBbAeNuXmnNuH@//@p a _ NeNuiNu _Hp/p a _LNJ,mgpa)WB|&,)C nm"_"/ ` fr)AC#Nu+Nu+g0+g+faga-+g*f ka $a.g?<Za+fA8a Nu*f+fA8+fj,g +f`jag" f A8af<` f4?<aNu'H+g@a-\g:/ ka k ?<5a~NuaLNu,f?<6afNuaf'H&,`'j,f7|$` +ffT 7|$`7k*$|Nu+Nu k"k U4+$TBa PfUAT Af g 'I7A7A*Nua+g @g aNuaNu?<a"k 2+$` +0arf$`4+*SBa fQR0 +,0bBJNuf@H k  g 0g 1g +g &ga`a`ar a`r a LNur ar ka 4fNuaNuJ@f k  pag aS@g k"k R4a fNuaNu k"k 4afa+nf`0+`a,4+*7B"k 'IaxfR,NuadNu?</aNu +,0d`N4+$k&e4+&7Bg"k 'I ka.f"Nu?<(aDNup(J+k kaf.AafAB"k 'I7BgafNua* frNuagNua:NuagNu?<$aNu",gS)Ar2+$7Aҫ 'A 'ArNu",g l` l r2,f'@ 7A$7A*NuNuBJkkg k'HSkJNu?<a\p`aJ _g g ,g /gTTTTNpkNuBka@f2g0+$7@*0+* k 'H7@S@ QNu'k 7k$p aNu'k 7|~kB+NuB+'k 7k$Nut+"k kafjNu k+afX+afJB"k af:Nur a&"k 4+*afR, +0,d'k,0Nu +,0ma`afNur2+*a*" kaNu@)R@ko NNNu0+$kS@gp aNu _/Jkg k'HSkapNuaf,fp?apNutff`tp+gg l oS'@,`f~p Jg +gp`+ff*g8p ,g+fJ`<+g`2`$Jg,g`NNu?aNu"_0+BA,)@o27AA?N"_2kNpaaXa@gNup ?aa2g l " g7@Nu,fNuX,gB,L tNu,Nu l,fNu l,fNu.l|/` @fp;`D@?aNuH`RCa\"_.JNNR$O$0*H%@aTaafCaC,H1CaC}a O/*/pa0aCma&,ff C_at` Caj` O/,/p a0aZ jc0*@D@HapaF j l$pa8 gBk"RENZ _Npa)@Nu ,Sg)@ l)HJNuH t)l&l&SNu,Nu0+$kko7@Nu*,_Jkf N/M LNHHN````0`D`L`R`X`^Q`,0Q`$Ha/ *O+ 0&t`Ha/ *O+ NM N _M N/Hz66`/Hz6f`/Hz-P`/Hz-M J@kANuANu/?<HNA\Jg @BNupNuBNu??<>NAXJNu// ab/?<ANA\"_ _JNuNuNuv`vaB?/?<=NAPJm @pNua(Bg/?<ANA>`&```R``$B`F`4`+`n`*`!l`>`#`$`<``Z`` `` 2`#Z``,`(`,J`|```"`'`-"`"6`` n``!`&f`,*` ``2`~``` ```'&`&T``*`` `!`#`'``J`6`F`T` T`+L`+:`"``6`2```R```D`` ` D` `F`(``"l` >``` ``0`D`+t`+`B``` :```"` ```,B`)`#`*`'D`'`!`f`!``&` `,8```2`,`<`b``'N`)F`<` `$`&` `"`)`*``&`(V``&`@`` `^`~`&``````'`!``D`%p`N` L`(F`*`(`)```2`"```"```` `$`)``!`* `D`` h`B```r`(n`` ``%`p`p`~``b````!`&@```>``v``` D````b`H`~````&R`:`)p`)``)`)`)`$``)` `%"```(`(`)`)`````z```````(l`v`z` ```N```````"``H> N<)OMN.l l(f. _Skg + g2+ Hӫ`NuC.+`C++HC!WJ@k"_1N 0"N I0<5B`QA0<1|Q#N#k #k#k(I)|<A)HA)H)J)KNu,* N .nNu m PNgۘY` mTݘ]`ACfpX"҈"QCfaNu0,*PA` A`A0)_Hzb?pNs`p`p"l Q`p`p"l i)W/?2,,g Ag"tALC!QRl,0 _@2)H.Nup`aj)K.L Nu,2 fa`0 fa g / &l.+g+fa"N&_Sl,gA4C.rQNu"_ _/ / "HBXS@HaL&l.+fRQQ&_Nu _/Jg g ?paF0A `A `LTrueFalseJ@fpap"_?< O/ a$ _XNJ@f0/Aa _B0RNаPor aS@`T`aQNu _aNH瀀 l.AaLNu&a'Cfa*axL NuN N N N $N (N dN +fL`$fa$L`aLH 'zNupNNNuNupaBNu +jaNu k"k&4+*agaf `Nu k"k&4+*af R, +0,lR0Nu +'@,aga f Nu0na`'@,raf Nugah +0maNa`R,aXNuNug a> +aNu`fga& +0lat` +Ra`a+g'k0`Nu kB2+*Daf S,aaNu2< ` 2<`2< )_H L _?//a Jg `` Wg$ W g> pa v7_NL L lNA8p``)_H L0^@/7/7a ZJfpa 0aL L lPNA0C8rag _2RANAp`a`H0&l.`a,a\a`:a`H0&l.`aaN`a`aa +`a`aa+f `padp`a`aat| N| N`a\` H0&l.`ana k&`a@aa"+fa``ba a| N| N`@A."_)WH0&PN l` lX` _)W"o.H0&Qa fN _`L Nu+ g` +g+fNu+fjN +gd+ g@ g gNu@`+g + g| | Nu+gNu+gp`Nu+fp`Nup`p`+gaDJkfaN k'HSkNu"k T4+$YBkg kaf Nu'k T0+$Y@7@+wNuSkba kX'HNu k"k T'I4+$YBafR7A"kSA  Wf "k 2Nu0 @g @f 0|< a""kB0+  Tk` @fBazJfBk`"k7|``+gJ+f@+f6?| N| N0` l+af~Nu +??<>NAXJkNu`daL+g +f`B2+*ӫ&kfaNu+f"k 4+$k ka@f`aNNug, k"+ &$D+f B0+ap"k a k"k 4+$ag @fJAf 2+$7ANuB2+*ӫ&kba'k &Nu+g?aN0`a` k+g+fS'H`'HSkf(+f"k 4+$k kaNf `aNNu+gR0Nug, k"+ $D+f B0+ap"k aaNu k"k 4+$ag @fJAf 2+$'k 7ANuSkba+g| Nu kX'HNua^ k+g*+f"B2+*$DafL"k&anf@`n4+*"k&aZf,NNu'k &`'k 7k$+wNu k+afNu ka afAaaNuJ fp0+$Hk a+f k*g'k &Nu+f~aaA8+gJ+g(+f afg @frA8a\fh`(`*BkaNg" @fNA8p`.a>f>N'Hah+g kaNuC0`Cj` C(`C>+fNNu kBNu+f"A k*gA&0+$k*bAa(Nu+f+fa`gkA8p`Nu+g+g +fS?a:0+f&g kaNJf+fA8aHNu'zNuN k,'H X'H7|NuJg"+g:+f| af|a^Nu k,// <a _ fB,B0NuJkf k g @a kX'HSkNuNuNu+gaJkf k P faaX k'HSkNuY/ <a _B|J,f'H,`"k0"'H0Nu$%'-@{}~!#_` ./JA $OBjS@k|T  VgpSrK g  g~ ,gx /gr :f< jg" jf\HW0<2a\LfFB@`HSrPaLf0RjS@[j` J* gp.J"R2$j JNup` RT0*J* f @f (:gaa,J* fa`J@f` @m (:fTUNuRS@NuJ@gj Bo .fRoan onN`F \f on>a`Jof4.?@r\a?Ag W0/S@aR0/o` W0/ Nu`>.?@r.a?Ag W0/S@ra R0/ora` W0/raNua fB@Nu`J@g4An0`"rZa.g$ 0e 9cCt Wf QB@NuR`pNu Ae߲d ae  erNurNu?S@kWfWD@`p2TNu o g &l" gg&k`4fB _PNaaL o'H4 /g n @ga`aX`a,p`p` gf TfpNupNuaa`NuAa7|$7|*A'H& NuAza7|$7|*A'H& Nu7@$7@*AdapNuN7|NuafNuAnp`aPp` @NuNNNNNNNNNN\NNNNNhNNNNNTFCA chain corruptedH$C82 "ARPa".$$$L$Nu kr alfr adNuYCatf /r2+*a'@0p0+*a"XJNuA&'l)KNu ,g&@$k4/+pN fNu/ <YHWa2&_&Nu K0<MBXQ'zNuNC 0<"QNuC :"""" "NuC ""XX""Nu g / <arNu gA"g"Af pNuA"fpNu _2FA0<aQN WXN WXNu$jD&gjD"Ba& jDNupO`pJapNu @&HCJCf $B@H@60H@"B4È0H@Nu4RBHC€H@B@H@H&4HAHA҂cS`NuPL/ a _"_"QNNq` _"_/" JjD&gljDan& kD NuJn pa@pNu"@JjD/aF& kD$Jl҂ Nu$jD&jDoA$HBHBJBfЂeBAJf $kJjDNupOapNu$a"_" jDNP _"_ N _ Q BN$a"_" lBiN/ /J,f.p a$BNuaLA,a,ja _PNAaVk`ZAaHj`L/aB$HB06HC$46$HC0H@$6gRAA\od`a `HB`N @ilJog$"C ։ՀgRAVASofJAk AlA!!1 oap _\"_Na` Aa..AJfNuCJg 0Y@0HAC" $>&HA,HBHFBЁ݂HF"BAHAH@B@ހ݁a Bރ݁ IC&a ևӆ"",.J,jD,`^/a _a` a Aa`a` Aa..AJf pZa bN LCJg0P@0H,. "NHF:HG<HGAʀ0HA00HA00B@04<HB4BF6A,("HF HB*҅Bх.҇хHAHBH@܄хH@FHABFHFц2HAB@H@( 6HBBCHCփւa B(֐ӄL0C`a`L/H`aD,`D,a`D,L/H`aJ,fNuAJg l0,2Pm@g0 @8l VaBAC,,k щщ`jD,PD@`D@ @8lAa`AJg 0@m @l0"B ҂!NuAJg X"B !Nua Aa aA/a*a NuArJgnjDD0 B` a ~ /a`AJgH2X$gF&YrPAgWJf>JAg 㸐ԀA0k Xl NupXa ` ܓ $gB`Rf`"$a !Nug$BNu&໖ԃNuC`C$ "/`C`C "H@f Jf###Nu$vB##BT@J3NuC` QA/C&!$!2!Bրd RgRAJfJgCX B!AQAHB!NuP oaf"_N oa _PQNP oaF"_ o //N o az _ QN026Ac6SCm VfANu&2 _/SAm 4Ao@d 0p aNug4X"H@A`QNu0Nu"o6J@gDS@o on86@m224o 2` SIQA 6"o`00Q`p aV"WO 6RCNaB/20JAg AmvSAH@ VLg RCRHQv  W.BNaXH`aP//206Ac6SCm VfA _._NО?@Bo oTJjD-RoSo. /AaԸA0< JVSJ@jB@"WJog$0RoSoQ o0 _PN//p aXX`&42/JBofAnbHk^@SBAo04a&R@B4UOA"HRAgRB4R@dS@/ Q"_` QRI.I?/Nu0<TOa/Nua"20<QJAgbQ Ao2a2Q0V@/ a"_>2<0S@m RAQ0S@"Bt RARBQ2VA QRI.I/Nu&B2AlaD0QJj/Nu&2Ala(Ag 4RR@RAHIAH Oax"OQ/NuH/p a& "/4V@VAA0"H2RA1!Q?W"O/L._Nu"_B0"RAN & O2VA"OB4VBԉ/Nua/$m^&]N]N VN`File not found :-|ApNA NNpPNa^&]N]N RN`Invalid file name :-|ApNA NNpPNa&]N]N RNHmN-/- N$m 0 @oANp\~?NAp N&]N]N N0- @oHm ?- pNA NpLNNHmNJ-WD$m.&]N]N &Np.~?$mANN@;@J@f ;R"m BQ`NAN?-0H2-HRN "m ApN/-?-0H2-HRN0-HS;@>-H$m2x|\VD2xz:VDJG^DJg S;@`JmoHAN0-HR?0H2-HN "mAp NAN~?0-N Ap N`"AN"mAp N"l2A2RAQHmANp Nat$mAN"mANN"m ANNN>-Jg(/-a$mC$l6A2RAQ~"m`$AN"mANNpPNan$mB&]N]N NaJ$lvJgBav$mANp*~?N"m ANNAp N"mA2RAQJmVD`.*"m ANApNNVDJg AN"m ANNAp NHmHmHmNHmNJmf4$mB`Insufficient memoryApNpPNa``a@J-gL0-;@B>-5x|\g S;@`AN~?0-N Ap NANANNN>HmANp Nax-JgC$mA2RAQC$mA2RAQp.~?ANN@;@J@gDAN0-?H2H@RN "m ApNAN?B0-SN Ap N`.*"m ANApNNf"m BQ`"ANANNpPNaB-$m&]N]N NBg?-HmN/-HmHmHmHmNJ-g$lJ+R$mB*"lf>*$HЇ2-H@]D0-H>-HЇ/B*U2HN<*$HІ"@^DJg(0-H"lf2H;@$m0*H5@`zBgBgBgBgBg?-?-?-?-N/-?-~??-?-?-?-Na$lvJgBaHm/-BgN;m0-HrN/0-HrN&$m028 H@B@H@&58 "m2~?BgBgBgBg?-?-?-?-NJ- g?-?-?-?-a&]N]N NHm?-?-B'- a@$m4&]N]N NHm?-?- ~a$m4&]N]N N0-HrN&$mA8+HJ- g"m0) @3@ `"m0) ~G3@ &]N]N N0-HrN&$mA8+HJ- g"m0)@3@`"m0)@3@&]N]N N0-HrN&$mA8+HJ- g"m0)@3@`"m0)~G3@&]N]N N0- HrN&$mA8+H"mB0) @$m&]N]N N0-HrN&$m r8 +H"m Q/$m C$_AHN!$m A /N$m *~@fBR&]N]N N0- HR;@A /N0-^HrN&$m`A8+H"m0)~Gf( i /2-H$_CA H$HB`QQ`0 i +H$m R/2-H$_CA H$HB`QQ&]N]N XNU+ &la$mB/+v~?B- a/+v~?B- a/+v~?- a/+v~ ?B- a/+v~ ?- aHm~?Bg|a0- @fla/+v~?HmaPANBgNgF~$m"l>Jf Hip"NlC$l>$jA2RAQJ- g/+v| ?Hma$l>J f Hj p"NlC$j A2RAQHm/+v~?a~J-g $l>B*`,Hm/+v~?a^J-g ~$l>G` ~$l>G~$l>m Hm/+v|?a$J-g $l>B*` ~$l>GHm/+v~ ?aJ-g $l>B*`,Hm/+v~ ?aJ-g ~$l>G` ~$l>G&]N]N NA N`.RSCApNNA pPN$l2HRaA NpRNNHmNJmf:`Unable to load Resource fileApNpPNa$m^B`~$m^&]N]N VN$l>BBg~?HkvN/+v~ ?|a/+v~?|a/+v~?|a/+v~?BgpPNaR/+v~ ?BgpPNa>&]N]Nu N$m 0H~ ЇrN"m"&]N]N NJ g +m $mBRHmHRa -$m@&]N]N N$lJ+RHm/- a -;@H$m>*FHЇ o$ jBHP?<a$m jB%PB jBBBjF jB/0*FH&"_A8 +@0*FH>-HЇ5@FC$mA R/"m $_A2RAQ&]N]N N+m~ $m G"m) c"B)S"CA$HB`QQ"mB)R/0HS"&C8$mAH$HB`QQ0HB*ІS;@C$m A&]N]N NB-B-R&$m 28~ WDB-R]DJgB-R@`B-Rf-|?A <N`:-|?ANB-R?0HB-N NA <N&]N]N N+m $mB* R"m2&]N]N N+m $mB* B*ЇR"m2&]N]N N$lJ+R"mJf $mB`rHm/) a|0-m c&$m j %h Hm/* aX0-m b`(Hm$m/* ad0-m d$m j %P `$m"m" &]N]N N$lJ+RHm?- aN$m%m j +HB0- S"<NH&"m$m$8 &]N]N NHm?- a+m+m$m0HSB*Ї"m2&]N]N N$lJ+R0-HS"lj2HN"m>)"HЇ;@0- $lj>-HЇS;@0-HU$lf2HN"m<)$HІR;@0<-HІS;@0-HS$lj2HN"m:)"HЅ;@0- :-HЅS;@0-HU$lf2HN"m8)$HЄR;@08-HЄS;@BBa$lV?~?HmHmHmNa&]N]N N$lJ+R?-?-?- ~??"m?)a&]N]N N$lJ+R?-?-~??-?-?- a|&]N]N N$lJ+R0- "lj$m>*"HЇ;@0*>*"HЇS;@0-HU$lf2HN"m>)$HЇR;@H>HЇS;@a$lV?HmNa&]N]N N$lJ+R0-"lj$m>*"HЇ;@0- >*"HЇS;@0-HU$lf2HN"m>)$HЇR;@H>HЇS;@Hm$lV?|?N;mHm$lV?~?N;ma $lV?HmNaHm$lV?~?N;mHm$lV?BgN;m&]N]N Np2- @m6;A;@0-HS/>-H5x @&$l58RmSmd$l45m~"l2|3F3m ?-N&]N] _NN$lJ+R"m 0$mjo"AN~?0*N "m A <Na$lV?0-HS"lj2HN"m>)"HЇ?0-HS$lf2HN"m>)$HЇ?$m AN <Naa0-H$mB>*ЇS;@j:b0-j8e0-j8f.HmB*HЇS/a\ -;@`0-H"m >HЇS;@mo.?-?-Hm0-H/$m0*H/a -?a&]N]N NU+ &lHm?- a$+m$lJ+R+mB0- "mB2)R;@ /-Hma$m* c.B*S2-H@mHm~?B*SN`Bm~?0- ?Hma0-$mjl0- ??-a&]N]N NHm$m0H"m >HЇ/0-H>-HЇ/a -S$m4Hm"m0H$m>HЇ/0- H>-HЇ/a -S$m4Hm"m 0H/0-H/a -$m 4Hm"m0H/0-H/a -$m4"m0$m R\D$m0"mQ\D$m$&]N]N N$lJ+RBg~?HmHmHmHmN$m?~?HmHmHmHmNHmHmHmHmHm?-?-?-?-aJ-Nq7mz7m|7m~7m$lV?~HkzN&]N]NuN~;G0- @_D>-H$lBJxVDJg0-HR;@`0- @_D"m &]N]N NBg~ ?HmHmHmHmN$m B"lNB$lJB~;G0- @nR>-H$lBJxg2 rx0mf&0-"m $lN$lB"lJ"xa~;G0-HR;@`&]N]N N$lJ+R"m?~?HmHmHmHmNHm$lZ0H2-HT/0-H/ad -;@Hm$lZ0*H2-HR/0-H/a6 -;@HS$lf2HN"m3@0-HS/$lj0HrN"@2HN"m3@B0)>)HЇS3@0)ic3iB0)B2)R@C0AN"mA0+HJif$m5|Bj4Bj`B)if$m5|Bj`RB)B2)N"m3@$mB0*S"<N/B0*B*"@N"m3@0-/$lj0"@N"m2$mB*S"<N/ <2*H"@N"m3@$m0mg"m?~??BgBgBgN$m0*mg"m?~??*BgBgBgN$m0*mg"m?~ ??*BgBgBgN$m0*mg"m?~??*BgBgBgN&]N]NuN$lJ+RB-"m?~ ?HmHmHmHmN0-$mRg?~ ???-?-?-N~G0-$mjUDB0*>*HЇB2-@\DJg6Hm~/0*HrNB2-@/a -$m5@~G0- B*Al~;G` *@;@0-H$m>*HЇ2- H@o$Hm~/0*H/a0-HЭ;@`0-$mB*Gg0-@~GJ-gaaB- $m&]N]N NBg~?- HHNg8- HH$lB"lJ"hJga $lN "lJJVD$m` $lNB"mB&]N]N N$mB"lJB~;G0- @nV>-H$lBJxf0-HR;@`4 rx0m g0-HR;@`|"m"lJ"xa~;G`&]N]N N$lJ+R"m?~?HmHmHmHmN;m$m0*"lf>-HЇ;@0-H<-HІS;@ :-HЅS;@a$lV?HmN$m0*"lj>-HЇ/0HrNП;@;m"lV?HmN;m;m$lj0HrN>-HЇS;@"lV?HmNaނ&]N]NuN$lJ+R~?<"m?$m?$m?$m ?HmHmHmHmN~0-H$lj2HNR2HN"m3@"$lf0H>-HЇS3@$$lj0HrN"m2)"H@;@B'?<?-?-?-?-/-/-/-/- N~&]N]N N$lJ+RHm"m0)H@B@H@/B0)>)HЇS/aܼ$mB0*"-蒀m;A;@?-aRmSmd$mB0*B2*T2*Hm;A;@0-?BgaRmSmd&]N]NuN$lJ+R"m?~ ?HmHmHmHmN0-H>-HЇJgHmHmHmHmHm?-?-?-?- aJ-gD;m;m;m;m$lV?~HmNaa$lV?~HkzN$m?~ ?HmHmHmHmN`Z&]N]N N$lJ+R"m?~?HmHmHmHmN$m?~?HmHmHmHmN0-mWD0-mWD0-mWD0-mWDJg$m?~?HmHmHmHmNHmHmHmHma$m?~??-?-?-?-Naa$m**RDB*j^DJg ~GG&]N]NuN$lJ+RHmHmHmHm ax$m?~??-?-?-?- NadaaP$m**RDB*j^DJg ~GG&]N]N N$lJ+R"mJiVD).Jg0- a$m0* @g2HmB0*2*HR/~/a٨ -$m5@aax`p$m0*jg@HmB0*>*HЇS/B0*2*HR/a, -$m5@aja&`$m0* @gzB0*S5@aDHm$m*@H/B*R/a -$m@~?|?Hm0*HS/*@H/aآ -?a$m?*a`$m0*jgdB0*R5@aHm~/$mB*S/az -$m@B*jf~?|?0*HS?a$m?*a`0- @f$m0*HSrN@`~G$mB*B-A @mB*A@`~G-*gmaa`0- @f$m0*HSrN@`~G$mB*B-GH<*HІ nB*G@` <2*HrNR@*gmafa"``rN\`jj&]N]N N$lJ+R"mJiVD).JgZB0)2)H2- HN+@"<NR+@"mB>)f` -3@~GGGaa&]N]N N$lJ+R"mJiVD).JgZ <2)H2- HN+@"<NR+@rNR+@"mB)f` -@aBa&]N]N N$lJ+R"m?~ ??BgBgBgNHman$lNa3&]N]NuN;m$0-H@B@H@JgHmHma,-aJ-g0-@;@$lJ"R?~?HmHmHmHmNHmHmHmHmNx$lvJg 0-@;@0-ذm\D0-ְm\D0-H>-HЇ2-H@_D0-H<-HІ2-H@_D@J-ga`0-@;@aB-Hm?-~?|?$m@?-?-?-?-?-?-?-??Hm/</- /-HmHm/- /-Nr;m0-H@B@H@Jg0-~ GgHm?-aJ-gaZ~?Nl~$l~B'a;~G0-a\?-?-?-?-an`daD`^?-a`T?-a6`J?-a`@?-?-?-?-a(`*a`$B-`@r N\~a;VBgNl$l~B`D0-H@B@H@Jg~G`&0-H@B@H@Jg$lvBaӺ~GB- JgH0- @WD$mC$mAN"m&2&]N]N NHm-aJ-g$lJ+RHm a.HmHm a$mJf:Hj?<a$m%j j+H"mB) B)BB#m ` j( fL jHP?<a$m j P+H"m#j0*H@B@H@@ B)B#m j%P`( j+H"mB)R@B)&#8 B0*R5@%j &]N] _NNHm- aJ-gH$lJ+R"mJ).g6B)?~?HmHmHmHmN?-?-?-?-aaHma$lN&]N]N Np~G@-HH$lF2xadR-S-d&]N]NuN~;G0- @_D>-H$lBJxVDJg0-HR;@`0- @n">-HHrxpHNl"lJ"x+Q$mHj>?<a$m j>B%j>BBjFBB~5GB BjGGGB*Bj8Bj:Bg|?HmHmHmHmN0-H$lj2H;@HmHmHmHma20-$lj>-HЇ/0HrN"@"m3@&0-$lf<-HІ/0HrN"@"m3@($lj0H2-H@3@*$lf0H2-H@3@,;|Hm?-?-?-?-?-Nf$m4B*.A0+H"m2Bi3|Bi?~??<BgBgBgN$m?~??<BgBgBgN$m?~?BgBgBgBgN$m?~ ?BgBgBgBgN$mHjpRNl j/C $_A2RAQ$m? jHPN`0-$m^`"m^B&]N]N VNHm- aJ-g$lJ+R"mJ).g?NZ$m?NT$mJg /*pRND$mJg j+P/*aB$m%m`$mJ>g j>+P/*>a$m%m>`- HH"lB/1xpHND"lBBxHmad$lNa+&]N]N NHm-aJ-g$lJ+R"mB). JgJmWDJm WDJg;i&;i(;i*;i, HmHmHmHm ad$m??-?-?-?- NNHmNJmg~$mG.a$lJ+R"mJ).g,?~?Hi&Hi(Hi*Hi,N$m?NZ$mB*.&]N]N N$lFCAp~G@Hm-HH5xaJ-gH$lJ+R"mJg i /N$mJ*.g-HH5xa.~$mG.?NTR-S-dC$lFA&]N]NuN$lFCAp~G@Hm-HH5xaJ-g$lJ+RHm?<"m?)&?)(?)*?),Nf$m4JRl0`Unable to reopen windowApNpPNa`d$mA0+H~"m23G3G3GJg ? jHPN`$mJ*.gB*.-HH5xBgBgBgBgaDS-S-dC$lFA&]N]NuN~$m  |F+@.-$lBBxRS-dNHHmN$l40~Gf "m B`Hm"ljHQ$lfHR$lbHR$l^HRNB$lV4"lj0HrN"ln2p~ G+@~,-;hRS-dBm~;GHm$lVHR"lZHQN<$lVJRf "m BN6`^?Bg~?HmHmN0Hm$lV?~?N*;mp~G+@ -.-$lFxRS-d$lNB"lJB&]N]N Np~G@-aR-S-d$lV?N$N6&]N]NuProspero SoftwareLine width must be | at least 20 charactersThat menu choice does not exist!Np~G@ -@~ o"-H|AFHz -HH$m H`-H|0F-HH$m X -rN+@S-S-d&]N]N N$m BRp~ G@B-3x|Yf a~GG`~LG`~MG`~NG`~IG`~AG`~~PG`t~YG`j~UG`b~SG`Z~TG`R~DG`J~CG`B~RG`:~EG`2~ G`*@rN\hr|$m AN-~?NApPNR-S-d&]N]N N$l6CAN0- ~8Gf|YF Hma` Options :- Ap NHm~P?pN0- |"m0) @f~YB-$l6h`~NB-$l6h`.B-"l61x|Yf ~$m5G `$mBj &]N]N N~/B'- aV~/|- aF~/|- a6~/|- a&~/|- a~ /| - a~/|- a~/|- a~/| - a~ /| - aJ- g$k0* @WD"l6@`$l6J*g ~"k3G`"kBi$l6"lj $l*/~A?$l6*N$l*/~B?"l6)N$l*/~A?"l6B) N$l6ANBgNVD*JgD"l*/~B?` Using ApNANNAtpNNp NN`6"l*/~B?` Using *.LNK...ApNp NN$l*/~I?"l6)N$l*/~J?"l6)N/+~?$l6A"NpPNa/+~?$l6ADNpPNaɼ`INCLUDE=ApNpN$l6ADN <NN/+~?$l6AfNpPNaj` Ap N$l6B*Nf~ G/+|?BgpPNa(`/+~?*|?pPNa $l6J*g:"l*/~V?` Insert mode ^VApNp NN`8"l*/~V?` Replace mode ^VApNp NN$l*/~T?"l6)N$l6J*RD*~ SDJgB"l*/|S?` Tab width Ap NB*z0Ex?Np NN`2B*"l*/|S?` Special tabsApNp NNp~ G;@/+0-HRS?0-Hr"N&$l6A8NpPNaǞRmS-d&]N]N N - a.Hm~?BgB'aŎ;m`&AXp NpPNa` rN\&]N]N NUZ+ &l - a$l6J*gANANNApNNA <NHmbANp NaB-b ANN8@H JgANpPNa`4`p^~?Hm?< N`CAr0`QJ*g$Ap NANNA <NJ*gBgANNA <N - ~Dg<"lRHH$l: rh+H^$m^ANA"NNAlpPN`CA2RAQCAr0`QBmHmbHmHmHmaJ-bgVANApNNf$ANANNAlpPNa`A\pNpNaf```Hmb$l6AfNp Na$B-b Jg$l6AfNpPNa0`AlNp=~?NApNNAlNNANNA <N$l/~?BgpPNaĚ - ~7gXa$l"RBi"Bi:BgBgBgBgBg?*?*?*?* N~$lz"l/Bg??)?)?)?) N` $l/|?Bg?*?*?*?* N$lA /Hmda$l6A"NAbp NNp ~?NAdpNNp ?NANNHmNP|?BgBgBgBg"l?)?)?)?) N$lzB -a - ~Dg$lRHH"l: qhzE:a\``&Link completed with |undefined symbolsAp&NpPNa`d` Linking error - link terminatedApNpPNa`,`*AFp NpPN/-a`rN\0- @f ~?BgBgBgBg?-?-?-?-NN&]N]N 8NU+ &l - a - ~Ar0`QHmHmnHmHma:J-gVANApNNgApNpNa``"AnNANNApPNaތ``b`$lRHH"l: qh+HHm$mANp NaJ-g6$mANA"NNApPN"lJ$Q"l#jBi`2$mANA"NNA0pNNpPNaX`$lB*B"lJJgB'a - ~8g8$l/|?` Compiling Ap NANNpPNa`6$l/|?` Checking Ap NANNpPNa$l"RBi"Bi:BgBgBgBgBg?*?*?*?* N~$lz"l/Bg??)?)?)?) NHmANpPN - ?a+m - ~7WD - _DJgd$lRHH"l: qh+Hz$mE9B*:$l*/x?N$l*/~?B'N~7/ar$l*/~?|N`~?BgBgBgBg$l?*?*?*?* N$lzB - WD"lJVD - ~/+-HR@HS?-HHr"N&$l6A8NpPNaR-S-dh`Hm~?BgB'a0- @fT/+~?Hma`0- @f:-~0RD-|9SDJgB-ڐG$l6@`$l6B*`^$l6B* @`J$l6B* @`6A@p NpPNa` Nr N\rz|FB'a &]N]N  N$lNJVD@J-gp"lJ+Q$mB0*8B*<Ї/B0*:B*=Ї"@_DJj:VD$l$mJj8VD$l$mJj:VD$l`"lB$lB$lB"lNHH$l:JxVD-@C6Ar 0`Q| FB-B-B-B-J-gzE"lNQ-HH$lFrxxm R@-"lNfJ-g$lR`$lRHH$l:Jxf$lRB$lRJgdHH$l: rx+H$m*7-@j8Jj"^D*8Jg2*"HC$A$HB`QQj9j:$l*"R i/-HH$_C AH$HB`QQ$l*"R i/-HH$_CAH$HB`QQ$l*"R i/-HH$_CAH$HB`QQ$l*/~?-N$l*/~?-N$l*/~?"lN$l*/~?--N$l*/~?-N$l*/~"?-N$l*/~#?-N$l*/~%?"lN$l*/~&?"lN$l*/~(?"lN$l*/~)?"l$lN$l*/~+?-N$l*/~,?--N$l*/~-?-"l>B) -N$l*/~/?-N$l*/~0?-N$l*/~1?"lN$l*/~2?"lN$l*/~4?-N$l*/~6?-N$l*/~7?-N$l*/~8?-N$l*/~??-N$l*/~F?-N&]N]NuN~$m HmApNpPNaFJ-gBgBg$l*HRNBg~ ?HkNBg~?HkNBg~?HkNBg~?HkNBg~?HkNBg~ ?HkNBg~?HkNHmpNl'm$kA+H~"m23G3G|3FBiBi #|D $mBjBj"lZ0HR5@0)HR5@$l*/~NHmBgBgBgBgBgNf;m?-BgBgBgBgNN?-NZ?-NTBg~ ?$lHRN$l/HjHjHjHj N$lA "l#@>$lRB~-?N$l2ANAZpNNA(pNNAp NANN8JgTHm/<0ANNHm <0NNHmNNC$l6A"</QNN`CAr0`QC$l6ANB*B*B*B*B*~G"l2A"2RAQ"l2AD2RAQ"l2Af2RAQBj| F"l2A2RAQ"l2A2RAQGB*zE x D@-HHr"N/C~&$l6A8r0`QR-S-d~d$l6G|FB'aژ`$m BN&]N]N N0-a\0- H/a`h0- H/a`Z0- H/a `L0- H/ab`>0- H/a``0Ap NpPNa`W@rN\&]N]N Line too longLine length exceeded | Replace aborted Out of memory - |save your work!N-a$lB Jg"mANpPNa0`C$mAr 0`QANpPNa`/-/-pPN`Workbench internal error ApN-~?N` |at address Ap NN$mANNpPNa`rNbDD0FF0HHXQQ0~$m J-g"lzJg*|?BgBgBgBg$l?*?*?*?* N$lzBa&$l~Jg BgNl$l~BJkg"l*/?+~N$l*/~'?"l&Np |SNz&]N]N N$lJ+R"m)- gB) @B)S$lj2HN"m>)"HЇ;@B)S$lf2HN"m>)$HЇ;@;mH2HR;@aHm$lV?~?N;m$lV?~?HmNHm$lV?~?N;ma&]N]N N$lJ+R"mB0)8B)<Ї/B0):B)=Ї"@]DJi:VD$m &]N]N N$lJ+RHma-$lgZHma$l"l*/~&?N$l*/~%?"lN$l*/~(?"lN$l*/~?"lN$mJj8VD"lVDJj:VD$lVDJg\$mJj8VDJj:VD$l$l*/~1?N$l*/~2?"lN$l*/~)?"l$lN&]N]NuN$lNHH"l: qx+H$mB*9B*:|F7$l*/z?N$l*/~??B'N$l*/~F?B'N&]N]NuN$lJ+RHm?-?- a J-NqB0-$mB2*R@0- HB*R@&]N]N N$lJ+R"mB)B>)ЇS7@B)B)GHS7@Hm?+a'm+k$m0HB*Ї;@2+@Ao47mHm?+?+a^J-Nq0+H$mB*R@&]N]NuN$lJ+RaD/+Hka,0+HR7@k^D`ApN>+HB3xNWDJg0+HR2+H@oN0+$mjd2B0+R7@Hm?+a'm/+Hka~7G`0+HR7@`b0+HR2+H@]D`ApN>+HB3xNWDJg0+HR7@`$mB0*RB>+f"Hm S??+aJ-Nq~?a`Hm?+?+aJ-Nq0+H$mB*R@B0+B2*R@&]N]NuN$lJ+Ra/+Hkax0+HS7@`ApN>+HB3xNVD0+ @]DJg0+ @lJ0+ @c8B0+S7@Hm?+a6'm/+Hka0+HR7@`~7G```ApN>+HB3xNVDJk^DJg0+HS7@`0+HR7@$mB0*SB>+f"Hm R??+a6J-Nq~?aj`Hm?+?+aJ-Nq0+H$mB*R@B0+B2*R@&]N]NuN$lJ+R~"mGHm?)?aJ-Nq&]N]NuN$lJ+RHm"mB0)B)ЇS?a&0-HR;@Hm$m?*?-a`J-Nq0-H$mB*R@&]N]NuN$lJ+R"mB)S@J)f0) @g ~?aH`~G&]N]NuN$lJ+R"mB0)B)ЇSB2)l B)R@B)io~?a&]N]NuN$lJ+Ra$m* cB*S@`* cLB*B*GHU@Hm?**@?a@J-Nq$mB*B*A@`* RD0* @RDJgB*S@HmB*B>*ЇS?a~0-HR$m@J*f B0*S5@Hm?**@?aJ-g$mJ*fB0*R5@~?a$mB*B*AHR@&]N]NuN$lJ+Raf$mB*B*GHS/HmB*B>*ЇS?a 2-Ho$mB*B>*ЇB2*nT~+GB*B<*І+@B*jf.|??0*HS?a$mB0*R5@ -?a`*B*B>*ЇS+@B*B*GHS+@`,$mB*B*GH+@B*B>*ЇS+@Hm -? -?a.J-Nq -$mB*R@ -B2*R@&]N]NuN$lJ+R"m0) @d0-i8d B0)8R3@80-i:b B0):R3@:B0)R3@B0-S;@+iH@B@H@@+m B-B- Jg4Jf` `&0-H@B@H@$mB* f~G`+R`Jg+m-$m*c B*R@B*&%8 `B*&+r8 B-RB*@DҀm0A@B-S&$mB-%8 x S-S-dB-$m%x * d B*R@B*&%8 `|+mB-+R`"Hm?<a$mJf%m%m ` j +m"m#jBB0*S"<N"m@ B)#m %m&]N]N N$lJ+R0- "mi8d B0)8S3@80- i:dB0):S3@:`0):m f~G=Hm?- a+m/-aB0- S"<NH;@$mJ g j +H"mB)S2-H@m0;A;@0-HR&$m>-H%8 x RmSmd$mJg"B*/ R&% 8 Bm"m#R `RB*&B8 J*gB*S@`(Jg jB`"mB"m#j/) a$mB `&$mB0*S5@%j &]N]N NHm/- a^Hm$m RHPaN -f$m R/"m $_A2RAQ`Z$lJ+R"m/a>/-/- afHm?-a$m%m j /B0-S"<NH"m&$_%8 &]N]N N$lNHH"l:JxVD _DJ^DJgD qx+H$lJ+R|$ma$mB*7 - Jga/+Hka\`$mB&]N]N NHm~adJ-g$lJ+R0+"mi8f0+B)-H3x| VDJg0-HR;@`0-k]D>-H3x| WDJg0-HR;@`0-kf`0-H2+H;@``` 0+HS2-HNH2-H@;@$l6J*g0+H>-HЇ oA@p NpPNa`r0+$mj8f 0+B*-HЇ@<0+j:f 0+B*=AlB*=>-HЇ@=Bk0-HrNr@m*;A;@ApNHk?<pNRmSmdANApN~?0-H@N NA <NHm0+H2+HR/$m0*HB*2-HR/N -;@ANHk?<0+NHkan?+HkHka:0+H>-HЇ7@`0+H>-HЇ7@ @mAp NpPNN^`0+HR2+H@oJ0+HR2+H@op ~?Hk?<0+HRN`Hka?+HkHkaHm?+?+aJ-gZ$l6J*gP"m)@?)@?B)>-HЇ??-a$m*@?*@?Hka0+H$mB*R@&]N]N NHm~aJ-g$lJ+R0+ @f0+ @cB0+S7@Hm?+ar'mCA2RAQ/+Hka0+H>+HЇ oA$p NpPNN`*8f5k8B*<>+HЇ@*:f5k:B*=>+HЇ@=0+HR7@HmB0+R??+aTJ-NqB0+R?aVANANNA <NHka?+HkHka0+$mje\B0+B2*T;@HR??-0*H2-H?a$m0*jb ?*a`*@?Bga` B0*S5@?+aB0+$mB2*R@0+HB*R@a`0+"mi8f0+B)-HǰWD@0)HB)R;@ANp ~?N0+H<-HІ? N A <N`BkHka?+HkHkaHm?+?+a J-gn$m*@?*@?B*S??-a.Jkg>J-g$m*@?0*HS?a8`$m?**@?Hka0+H$mB*R@&]N]NuNHm~aJ-g$lJ+R0+"mi8fB)+HЇ oAp NpPNN~&`B0+R$mB>*8f5k8B*<>+HЇ@*:f5k:B*=>+HЇ@=B0+R?aANANNA <NHkaN?+HkHka0+$mjg2B0+B2*T;@HR??-0*H2-H?aT$m0*jb ?*aL`*@?Bga?+a2az`0+"mi8f0+B)-HǰWD@0)HB);@ANp ~?N0+H<-HІ? N A <N`BkHka?+HkHka$m*@?B*R?*@??-aJkg>J-g$m*@?0*HS?a`$m?**@?Hka&]N]NuNHm~aJ-g$lJ+R0+"mif4A0Hm?+a'm?+HkHkaB-`~G?+a.~7GHm?+?+aJ-gr0+$mjVD-Jg2B0+B2*R;@HR??-0*H2-H?a$m0*jb ?*a`*@?Bga0+H$mB*R@a&]N]NuNHm~aJ-g$lJ+RA0HkHka?+/+a*~7GHm?+?+a J-gJB0+$mB2*R;@jg"?-0-HR?0*H2-H?a?-Bga,0+H$mB*R@&]N]NuN$lJ+RHm"m0)H@B@H@/0)8H@B@H@/Nx -;@Hm$m0*H@B@H@/0*:H@B@H@/NxT -;@$mBj8Bj:H@B@H@B2-@m;A;@?-aRmSmd&]N]NuNHmB'a J-g$lJ+R"m;i83k80+@+HB3xNVDJk^DJg0+HS7@`0+HR7@$m5k8@<0+HR2+H@]D`ApN>+HB3xNVDJg0+HR7@`0+$mB*+Hǰfa`$lJ+R;G`ApN>-HB3xNVD@0-HR;@`ApN>-HB3xNVD-VD0+HR>-HǰWDJg`Hk?+ 2+HNHka?+HkHka\?+a&]N]NuNHm~aJ-g$lJ+R"l6J)gt$m;j:0+koBk`0+j8f:0+B*B*R@B0+B2*R;@?-HR?0*H2-H?a?+a ahB0+$mB2*R@&]N]NuN$mC$m A2RAQp2@mNA@B-$m 2x|aTD2xzzSDJgB2xFHxAЄxR-S-d&]N]N NU+ &lJ- g~G`~G$m0HR;@~G$mJgP R+HJ- g"mB)R;@`~;GB- Jg J- g"mBQ`"m)@$m4$m0mg0H&"m q8 +H- f$mHRHma`$mCA2RAQ~ G0-$mRm\J- g0-H2HR;@`|;FB- JgVJ- g"Hm0-H/|/NoH -$m4`,Hm0-H/0-H2HT/NoD -$m4`TJ- g(Hm"m0H/0-H/Nn -$m4`&Hm"m0H/0-H/Nn -$m4$m0mgv0H-HHЇ4|;F;R>-H5x<-H$m2hf6 R;@0-HR;@0-mf~"m $m0HS4`J``B-$m0H-HHЇ4`(J- g "m$m$` "m$m$`"m B&]N]N NU+ &lB-B'a$lJ+R0- a|HmB'NzxJ-g`b`Hm~Nz^J-g`H`jNm$l>B Jg.`Nothing to repeatApNpPNNn6`d$l*/~-?|N$l>* f."m+iBm~;GB* JgB*G`Hm"mB)B>)ЇS?N+mJf`$mB*B>*ЇU"<NH;@Hm~/B*B*F?<-H"m qh B(0H/Nl -;@$l>J*WD@*a,$l>"jA2RAQ`($l>"jHQHma2`@rN\NtB-HmHmHmHmHm$l>*-anJ-g>-H$m rx B(0-HЁ7@B* <-HІR7@"l>B) ) VDJg~a$m5k80+@<5k:@H>-HЇ@=Hm?+?+a6J-g ?+N@0+H$mB*R@B0+B2*R@`80+$mjTDB0*:*HЅB2+@]D-@"l>J)gtJ)WD@) fDHm~?BgNu;m0- @f`fNj0- @f0-HR;@`$lNHH"l: qxB(7 JgaԒ$mB*-H"m'qx /+HkN{0+H$l>"j >HЇ2-H oA.p'NpPNNj`Hk?+0-N$l>"j ANHk?<0+NHkN{H?+HkHka$l>* gB'aю?+N~~a|0-H$l>"j >HЇ;@`~G`J~G$l>B* J*WDJg&`No match foundApNpPNNiJ-gJ-g $lNaP`~??aӎ`$m?*Hm?*N|X0-HR?af`$mJj8g?*8*<@?aF`j$mJj:g?*:*=@?a&`J$mB0*B*ЇS/Hmp NBg~?HmN/-~?ANpPNNtBHm~?BgB'NrN0- @fB/-~?HmNsp2-’@m8;A;@ -r N>-HB5xІ~0+@RmSmdJWD -$mB2*^DJg2`That line does not existApNpPNNhB` -?~?a`"` @+r N\|Xf~a.&]N]N Np ~?$m ANN@Jgjp ?ANN@@/- @? N` ApN?B-Sr@N /- ?<-@N`~&]N]N NU+ &lHmA"NANNA NNpPNabmNf-HH$l:Hrxp;Nl rx+HC"$mA2RAQCA"2RAQC A02RAQB*7A N,-Ї?/+aTB0-R;@`B0+B>-ЇS7@0+HB+І7@ANANNA <N?+HkHkavHm?+?+N~J-g0- @f ?+Nx`jB0+B2-R/Hm$mB0*>*HЇS/0*H@B@H@/N_ "-蒀m;A;@?-NxvRmSmdN{0+H$mB*R@B0+B2*R@&]N]N NHm~a@J-g6$lJ+R"mJi:VDJi8VDJgHm?)8Nr'm$m7j8*<@7@/+HkNo$m0*:j8f|*<*=d Hk*<@?B*=B*-H$m/2x HkNkNHmNANpNNRmSmd$m"m#R `$m%j "mB)7$l*/~?B'NN&]N]N NBm`.*CAr0`QHm$l6HRHmHmN`NJ-gpANANNAp NANN8Jg(HmANpPNN\B- Jg`HmBANNHmaLN&]N]NuNBm`.*CAr0`QHm$l6HRHmHmN_J-grANANNN8Jg(HmBANANNNHmaL`.$l6ANANNANNpPNN\8N&]N]NuNBm`.*CAr0`QHm$l6HRHmHmN^J-gANANNAp NHm`Really delete ApNANNpPNNZJ-g@ANN8JgHmBANNHmN&`ANpPNN[RN&]N]NuN$lNJVDHH"l:JxVDJg qx+H$mJ*7g$lB"lJ"x+QHm$m?**@?NvzJ-g $lNaHm~?`8[2][Save changes before closing ?][ YES | NO | CANCEL ]Ap7N <NN0-aB'a@` `$lB`>`S@rN\Nt$lNHH"l:/1xp;ND"l:BxaZ&]N]NuN$lFCA~"l |F@-HH5xHH&$lBJ8VD"lJg $lNxalR-S-d&]N]NuN$lvJgBNV0- HrN&$l*"R018 @J@f~/?-B'N7m0-a@0- al.a`8$l&Jg "l"HQaB`$aZ``@"rN\a$~a`(?- a`?-?- ah`Y@rN\R$l*/~'?"l&N$l*/?-~NBk&]N]N N~;G0-$m R_D"lB Jg >-H2x@?a0-HR;@`$]N]N N0- H"<N@0- H@;@ J@f-aX~?| ?a`j~?|?a`\~?|?a`N~?|:?ar`@~ ?|L?ad`2~ ?|V?aV`$`.` rNb RRB+B+`$lJJg+RB'anNS~$lvJm f-a~?|?a`~?|?a`~?|%?a`~?|&?a`~?|'?a`~?|)?a`~?|,?a`~?|+?av`~?|4?af`|~?|6?aV`l~?|8?aF`\~?|??a6`L~ ?|F?a&``Ra`L~ ?|T?a*`>`HЇ"NR;@0-H2*"H"ln<HІ$lj2HNR;@0-"mB)A_D0)HR2-H@_DJgB'a0-$m@0-@a~a$m 0 @f2B'aa~~a~??BgHmHmHmHmN`~Hm~?|??Bg0-HS$lj2HN"m:)"HЅ$ln2H?0-HU$lf2HN"m:)$HЅ?$lj?$lf??)&?)(?)*?),HkBHmHmHmHmHmHmNr;m0- @VD-JgaaѠ~GB-0-H@B@H@JgB'a0-$mܰj&l ~?No`T0*&H>**HЇ2-H@o ~?Nor`.0-j(la`0*(H>*,HЇ2-H@oaa$Ma~a `0-H@B@H@Jg0-H$m2*$H"lf>HЇ"NR;@0-H2*"H"ln<HІ$lj2HNR;@0-"mB)A_D0)HR2-H@_DJgZB'af0-$m@0-@aJ$mB*B>*ЇS7@B*B*GHS7@$Ma~a0-H@B@H@Jga(&]N]N NU,+ &lrAT //NDHm3N}J-3g-6Hq5x| WD0-6mp_DJg0-6HR;@6`;m64>-4Hq5x| VD0-4mp_DJgN>-4Hq5xzae*>-4HqB5xxADH>-4Hqx0-4HR;@4`0-4m6oApN?-60-4H2-6HN ANp NHm1HmNHm@Hm8NJJ-1gXA8NBgNf.@5@5m< 5m: 5m85m6-4@5@5m25m05m.5m, -$"<NH5@ -$"<N5@"m(A $l$/<N$l"m 2"m20*"m20*"m2"m2 "m 2 0"mH2&]N]N @N/<N&]N]NuN$l 4 0-5@0-5@/<N$l"m2"m20*"m20*"m 2&]N]N N$mA "l,"- @$l$4/<N0&]N]N N$mA "l,"$l$4- @5@/<!N0&]N]N N6$mA "lF"$l>4- @5@/<NP&]N]N N6$mA "lF"$l>4- @5@/< NP&]N]N N6$m0A "lF"$l>4.A /NJA $lF%@/<"NP&]N]N (NV$mA "lf"$l^45m5m5m5m5m /<*Nj&]N]N Np$mA "l"$lx4 /<2N$l|"m2&]N]N N$l45m5m5m5m5m 5m 5m5m /< 3N&]N]N N$l4A /NA $l$/<4N$l"m2&]N] _NN$l4 /<5N&]N]N N$mA "l"/<6N$l"m2"m2"m2"m 2&]N]N N/<MN$l"m2"m2"m2"m 2"m2&]N]N N$l4"l" /<NN&]N]N N/<ON$l"m2"m20*"m20*"m 2&]N]N N$mA /N$mA /N$mA "l"$mA #@/<ZN$lJjVD"m $mA /N$mA /N&]N]N N0-$l45m5m5m5m /<dN$l"m2&]N]N N$l45m5m5m5m /<eN&]N]N N$l4 /<fN&]N]N N$l4 /<gN&]N]N N$l 45m/<hN$l"m2"m2"m2"m 2&]N]N N$l 45m5m5m5m5m /<iN&]N]N N$l 4 /<kN&]N]N N-&@$l 40-$5@5m"5m 5m5m /<lN$l"m2"m2"m2"m 2&]N]N NA /NHA $l6$/<nNB&]N]N TN/<oNB&]N]NuN$l.45m/<pNB$l:"m "&]N]N  A"lN$Qr 4 4 4 4" . <NBNu  _/"H0`QBNu  _/ JfRCBAg!RA`2NuNR~d$lZ4A "ln"$mA #@$m A #@ AZ #@$lZBj| 5F$m?Nr$lZ"m2 $l^A $ln%@$lbA $ln%@ $ljA $ln%@$lfA $ln%@&]N]N NR~e$lZ4BjBj?- Nr&]N]N NR$m A "ln#@-@$l^4$lZ4~5G|5F?-Nr$lfA "ln#@&]N]N Nx~$l4"m A $l%@$l5mBj?-N$lA "l#@&]N]N Nxp2- @m6;A;@0-HS/>-H5x @&$l58RmSmd$l4`5m^~"l2|3F3m ?-bN&]N]N XNx$m CANA "l#@~r$l4|5FBj?-N$lA "l#@&]N]N N~ $l4"l2 Bj|5F?-N$l"m2&]N]N N~$l4"l2 Bj|5F?-N$l"m2&]N]N N$l4 Bj~"l2|3FBi?-N$l"m2&]N]N N$l45m~'"l2Bi|3F?-N$l"m2"m 2&]N]N N$mCAN"m AN~m"l2|3FA +@3m3mA +@3m3m$l4$mA $l%@Jf B+mJf B+mz3E?-N$lA "l#@&]N]N N~$l4BjBj5m ?- N &]N]N N~??- a&]N]N N~??- a&]N]N ps", A P4/1B NB _NNBmBmBmHm?-N"J-g.Hm?-N"J-gB0-R;@`B0-R;@`0-mdHm?-N"J-gB0-R;@`B0-R;@;m~;GG0-mUDB0-2-H_D-Jg@Hm?-N"-B>-5xgB-B0-R;@B0-R;@`J-gN0-md2?-Hm?-N"-NB0-R;@B0-R;@`?-B'N;m`;m`Jm o~;GB0-2-Hn2?-B>-5xNB0-R;@B0-R;@`~;GB0-2- Hn,?-B>-5x NB0-R;@B0-R;@`?-B'NB0-R;@?-B'N&]N] _"NNU+ &l(`ApNTB-NNgB-~ G@Hm~G?A /B-|AFHR?N<+m/-N6HmN0-~Ұf $m BR`|+F$m BR.-J5xg*$m ANB5x|?NApLN R+@`$m ANBBgNg(-~?p:?NANBNApLN`.-~?`:\ApNHNANBNApLN&]N] _NNU+ &lZHm~?N -~AЇ$m &]N] _NNU+ &lZHm Nz` Ap NB- Ng&Hm~?B- |AF?Nt+mBNn`~/Nn&]N] _NNU+ &lZ0- @]D0- ~CG^DJg/<Nn`BNnHmam-~:f-a4Jm ^DHmNh-~ҰVDJghp2- @m ;A;@>-HHux NzRmSmd0- HR&B58 Hm~;?A /Nb+mJg-a~/Nn&]N] _NNN`ApN$m BNg B~ G&]N]N N$m+R - NN -NN|N+@"m""- N"@$&]N]N l h,0/af)Hpap _TN lNfp)@aVNu0/"o l _\N l0/ _XN?<NA`?<NATLNLN _ /J@gArXWg0<@Nu?/NAT _T"_"N?/?/NAX _X"_"N//?/ NA\ _\"_"N?///?/NAP _P"_"N _;XN _/ P*OؿeJ;X0fN;@0 @+ g @+ gUN+ N+ 0 @&Ig @&lgUN0&tN&INQ*_pN` _BN]N _B0/H4&l*lNap*Oaaa/aB .ML|Nu+_J@gLS@  Vg@S+H  WJ@jB@`SR@";A"Ha+O "m0-a+O mNp` _2XA>RWE`QN ,f l (, @p afP*Cpaf"UUApa&HdBg"O@H`  Q?"CNN|2RA`0N|2JAlp Np"_HdBgHd? `/ Q?Na I `a I03 Q _#NA26RCK"HNuH$H)@ $)p Desk File Block Find Compile Link Run Options About F_Bench... ---------------------- Desk Accessory 1 Desk Accessory 2 Desk Accessory 3 Desk Accessory 4 Desk Accessory 5 Desk Accessory 6 Edit *.FOR ... E Edit *.* ... -------------------- Save file S Save as... Delete file... D Write block... ^KW Read block... ^KR -------------------- Close W Quit Q Mark start ^KB Mark end ^KK -------------------- Copy C ^KC Cut X ^KX Paste V ^KV Delete ^KY Unmark H ^KH Find... F ^QF Replace... A ^QA Find next ^L -------------------- Start of text ^QR End of text ^QC Start of block ^QB End of block ^QK -------------------- Go to line... G Compile K Compile and link Check syntax Y ------------------------ Compiler options... ------------------------ Compile other file... Cross-reference Link L ---------------------- With F77GEM Using *.LNK ... ---------------------- Link other file... Run R Run other file... ---------------------- With command tail.. Under GEM ---------------------- Debug program P Save options... Restore options Set paths... Set F keys... -------------------- Tab width 8 Auto indent -------------------- Insert mode ^V Prospero Fortran for Atari ST OKVersion mmg 2.1A (C) 1987 Prospero Software SET PATHS: @2345678901234567890123456789012Overlays: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX@Workfiles: _:F@2345678901234567890123546789012User files: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXCancel OK @2345678901234567890123546789012Include files: ________________________________pppppppppppppppppppppppppppppppp@2345678901234567890123546789012Libraries: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX@2345678901234567890123456789012Find: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXCancelOKCase:IgnoreMatchGlobalBackwardsForwardsDirection:@2345678901234567890123456789012Replace with: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXOneReplace:SomeAll FIND & REPLACE: FIND: @2345678901234567890123456789012F1: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX@2345678901234567890123456789012F2: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX@2345678901234567890123456789012F3: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX@2345678901234567890123456789012F4: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX@2345678901234567890123456789012F5: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX@2345678901234567890123456789012F6: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX@2345678901234567890123456789012F7: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX@2345678901234567890123456789012F8: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX@2345678901234567890123456789012F9: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX@2345678901234567890123456789012F10: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX SET FUNCTION KEYS: CancelOKYesNoStopReplace?@2345_____99999Go to line:CancelOK@New tab width: _9CancelOK070Line width: ___999Output to:Source file: CROSS-REFERENCE: CANCELOKPRINTER CURRENTF.PASGOutput to LOG fileLNIAUSTCWListing to PRN fileTrace line numbersCheck array indexesCheck type boundsCheck declarationsStrict FORTRAN/77Default to INTEGER*2Compact codeWait after errorsOKCancel COMPILER OPTIONS: Create MAP fileM@2345678901234567890123456789012Command tail: ________________________________XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXOKCancelAbortContinueCompiling 1234567890123456789012345678901234567890123456789012345Last Error:1234567890123456789012345678901234567890123456789012345678901234512345678901234567890123456789012345678901234567890123456789012345123456789012345678901234567890123456789012345678901234567890123451234567890123456789012345678901234567890123456789012345678901234512345_____99999Line No.:Reading:12345678.123~!0'W!0!0G!0h!/  < k!/ !& * K q!& !&  A!& b !& !& 2 S y!& !&  # I!& j !&02COSeLD BI 8$________________________8#!/]B T P 7 $ + 2  9 @  I" P( U-  MT _v !    5J_t   *")#$%&1'F([)p!5+4 ,-./0123-4B*W >6=7l89:;<=5E?D$@4AKBbCyD>MFL*GHIJKL1EH NV/ O_PtQRSTUVM 3#@ C+ 3o// /x ( < / X /  2t. ( 0     1  &         . 0      %      +%%&&%8&T & p &  &  &    ' +   !   &'- E'L  i t  @  4 4Pl      0  L      4 FYk  * !h2.D(%GE N; T0 A   AAA 1AsA          CA`P!H"###$'0'C C(P!"#`#$8%''%''   C C8 (" #p#$`$%((h/  : C C8` "#$p$%H& ((B:\678901234567890123546789012U D:\OVERLAYS\567890123456789012OB:\678901234567890123546789012ID:\LIBS\1234567890123546789012LA:\DProspero SoftwareProspero SoftwareProspero SoftwareProspero SoftwareProspero SoftwareProspero SoftwareProspero SoftwareProspero SoftwareProspero SoftwareProspero SoftwaredNNNNNNNNNNNNNNNNNNNNN