*@ 01762-1/1@ B @ D K4> * B`79|P^'[Initial program]' '[Maximum number of open files (0-15)]' '[Maximum random record length]'copy [kbd] [vid]  If this is a cluster system and the cluster is not disabled, then power down all cluster workstations OR press ACTION-FINISH, execute the Disable Cluster command, and restart this installation procedure. AMPress GO when ready 1AA Copy [f0]Basic.run [sys]Basic.run yNew Command Basic [sys]Basic.run @[f0]Basic.args 'Invoke the BASIC interpreter.' ycopy [kbd] [vid]  ***** INSTALLATION OF BASIC COMPLETE ***** If this is a cluster system, resume cluster operations. 2copy [f1]Basic.run Basic.run y new command 'Basic' [sys]Basic.run @[f1]Basic.args 'Invoke the Basic Interpreter.' ycopy [kbd] [vid]  ***** INSTALLATION OF BASIC COMPLETE ***** 2GWwwvxc9tCopyright 1985 Convergent Technologies, Inc. All rights reserved.Ver 9.1 Swp Linker 10.2\;\ \\E\\\'\7\J\\P\-\d\(\\\\^\O\\T\\\\\\\\1\\\\\s\K\\\}\Y\\c\\\\\m\\\\\\x\h\F\_\r\,\\"\U\\\\\\\\\\ \\w\n\\\2\\\6\\\\\|\\\\\\Z\@\\\\\<\\\i\\A\#\\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\!\&\+\0\5\:\?\D\I\N\S\X\]\b\g\l\q\v\{\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\ \%\*\/\4\9\>\C\H\M\R\W\\\a\f\k\p\u\z\\\\\\\\\\\%2=N\8BLV`ly #(,049=AEIMQU\a7 z  & P b x ~                 e ~                 2   &2H 8= .= = <@l l 'l l l \l ol l l Rx   <     A     K T l  <    2 3 Z3 } e} } K} } } } *} F}   2 j    B U   ;\ F\ U\ \ \ \ 9\ ]\ l\ \ \ 3\ B\ g\ \ l\ > d |    7            9   / P   z z    L {   % z         :\bf+! l! ! W 8W W W (d d d 29+   MAKEPOINTERGETRAGETSAPWA< DEFLPRINT(SYSERCK GETSTAMFILEHEADER8 GETMODULEID>GETPASCBGETUCB HGETPARTITIONSTATUS> GETPSTRUCTURE< GETUSERNUMBERQUERYREQUESTINFO QUERYVIDHDW TEXTEDIT[Kbd][Vid][Lpt][Ptr]! [Nul][SysIn][SysOut]otjto`etjB`etj$).=j  =\ \  `etjo`e je  728 Z-F#di 8         Jz3 _3 3 3 [sys]LptConfig.Sys[KBD][VID][sys]CommAConfig.sys[sys]CommBConfig.sys>6;P%$,%*NEXT without FORSyntax errorRETURN without GOSUBOut of DATAIllegal function callOverflowOut of memoryUndefined line numberSubscript out of rangeDuplicate DefinitionDivision by zeroIllegal directType mismatchOut of string spaceString too longString formula too complexCan't continueUndefined user functionNo RESUMERESUME without errorUnprintable errorMissing operandLine buffer overflowFOR Without NEXTWHILE without WENDWEND without WHILEInvalid ParameterUnknown ProcedureToo Much Parameter DataNot Enough Parameter DataProcedure Called As FunctionFunction Called As ProcedureNesting Limit ExceededPointer RequiredSystem ErrorFIELD overflowInternal errorBad file numberFile not foundBad file modeFile already openDisk I/O errorFile already existsDisk fullInput past endBad record numberBad file nameDirect statement in fileToo many filesNot readable as a random fileRecord size mismatchRecord does not existNot a random fileMalformed recordRead/write beyond EOFAccess denied in Ok BreakGO TOUB?Redo from start Undefined line Random number seed (-32768 to 32767) Press FINISH to leave BASIC or any other key to continue Continuing BASIC LFAAVN Bytes freeE[LPT]RUN ""  Basic  VNXVN  Q  $.,p2Kn,X` %K;@0 0123abcdABCD.,[Ptr]& $ % * -  Press NEXT PAGE or SCROLL UP to continue(Press NEXT PAGE to continueVNVF[!Scr]$$.Tmp       [KBD][VID]=\z2Q=C55@''56'''='555'J7999:=9'95=999'5@9''''=99999''=   $[Sys]Config.Sys  !"#$%&'2345679:=>?@BCDEFGHIJ   3 ? U ^ l *BLas %B_v-?Mfu 0@e  wzP ``0 pP@pp@        4 S l        6 P r 4 4 !4 8 8 ; ; = = = = l cl /l wl l l * J o 2 3 3 /3 ]3 } } +} p} }   r  5  \ G\ \ s\ =\     E  z kz    +  # q ! ! 1! t! K Q W \W d d {d d z           0 0 0 0 @ P ` p p p p p                                        0 0 @ P ` p p p                          "+@P5BYt!1Pk  B 6cq/] JcK^tvzrL u!!P"#$$%++,-=0i0045v66x8l=q>>x???@@ATCCCBDDEEEF{FFFGSH}HHH'I^IIIJK-K9.1 SwpUFV33&&NNNN rN &&ЋSQR&.Ӌ&6\=t=ZtP.6\@ы&ZY[SQR&.Ӌ&6Q=tы&ZY[>tþJK3:JtK<tSE<tE[@PSQR&.Ӌ&6P\ &ы&ZY[XÜPSQR&.Ӌ&62P\ ы&ZY[XÜPSQR&.Ӌ&6Q3P\&ы&ZY[XÜPSQR&.Ӌ&6P\ы&ZY[XPSQR&.Ӌ&6RQ\ы&ZY[XËPSQR&.Ӌ&6WR\ы&ZY[XPSQRU.&Ћ&&\ҋ&]ZY[XÜPSQR&.Ӌ&6P\$ uP&.&6\$? t2ы&ZY[XnS4c4@XOQv;4\45%X34$"()4 $ %%445Q5Sp()ͿTJJJ]s+NJ*+dCAd[@EppDQC?Dd-@OAEED000!8J+IAhmloi]Ro p+p2$y!20C-41B0U0(09->-t!VyVV8> >2ðd2FdAAAT >>>AAA,>CYZ_&[r{UTϫNBTSLOSONԚLEAҒINSNDBV+V,V-O HRAL̶OMMOθHAIιELETŪATI͆EFSTҭEFINԮEFSNǯEFDB̰EƘLSŢNāRASŦDIԧRROҨRRX O/QO҂IELRIOTωO TωOSUEEXNPUԅƋNSTNNMILPRINԞLISԟPOEԈINűOASEISԓO O0EEFTO1ERGOKI2KS3KD4IDEXԃUL̖AMEהOPEοUԝΕCTPTIOκRINԑTUOKřOEEETURΎEAćUΊESTORŌE͏ESUMũSEIGHTNENUͬANDOMIZŻTOАWAХAVPCTEGQI TRTRINGPACEYSTEͽHEROΣROFƤABA SINSAIDTȡAIԗHILŴENĵRITŷO۾yy||PF<2(z{VMVF7yVh^'6\c>6s84696Y6D6>7|6c668:gx #~ G:X :Yz: /: C : RORO ,.eE%#!Dd,0.eE%#!Dd,0p86:WXEh͍T'µfTTe'ye$µfrc OüdXOR AND NOT MOD SHL SHR OR EQ NE LT LE GT GE LOW HIGHNUL TYPE :X :Y:WA͍T'TTɯG og2 222\2X2Y9"!*VyFdRiʑiiji͗iO2ʹi=y,j$j $j_jy2#Ϳisi>i::i̬Csiʹi:#O͗iG:i͠TTT,oi: oi2 >ii:#O:ʆi͗i,jxʹiG:#O͗ih_y{ªi*MYGh!j_~xiͬCůG|2_jy2#Ϳijl:#O͗iiͪT2#:#G2*+N{*!2z̬C̬Ci|=iyWx=zVjzVjhVjVjVj ĬC>GʹiGh"(zrj ,"O"$y2#Ϳijj2'ʫjʫjʫjʫjʫjj:'*(!jo>g~#fo:#O*(ĬCjy®i"M  9kCkMkWkkklellkklmmm"m+mUmHmmkbmnm}mmmmm9lzW{_9lzW{_9lzW{_:#ľC*$ |/W}/_*$:#ĚCľC|/W}/_:#O9lzʚk)Ðk9l#+}zW{_àk*$:#yCͭkyk:#kkyO2Ilͭk:#Cyk2kyO:#lyOľCͺm {_zW9lDM!>=5l))#l#l :#ľC ľC*$:# aly ľC:#O*O"M*$9lz̬CzBl|G|ʍl|l͐ll|/G}/O!>ël Ҫl7>{_zW}o|g=¡l|g}oɯO_yW9lzl|l|hll>OiGC:mVm:mV?m:mVW :m/m:mm:mV7m?m:#ľCͺm*$> O2#*$\W> O2#*$]W9l}ͲX_9l}ͲX_9l}͠X_9l}͖X_9l}ͲXo{ͲX_CC7@?2"<   W2u{"tY U&YŠʢS[ӋW"t dӉf] ۇӻ_t "uI2Ѣ7J; RKP XSf#[ZYS:uRK7KCCS:;[ZuZUZӱVS:^VS^Vp m ur_ SxC^Vxò<.YuK<t< u2KrSP;rX,0жڇ[X[u<t< t,aYSS^VPQQ{< u<tS^VPCS;[sKrBs I M[òtöU<t[^V[:͊K u:uC<"tt,u:ƊX7KRPX^V:Ŋt <rS<u1SC;sl;Zs1;s Zog^V Z[:[h^u0 tt:r,s~PT XPy CYsQ2JB[SRRK>]4K<[t<(u(CGu <"u3<(t<[t<]t<)uu$t<,t^V:Bt}tSGu[K^V<,uz[K [tBSn 2J>CtE,BE^V,2^VR:Et J t 2b>CtE,BEt%Pu:]<"tJ t:.EKXȠb uÊӻ^VR#XP<QsDDKt :Et^VKtQCZJ tgR[% uCC uCC<|,^VPRub[6XA3܋Pb<)tG,S6>,XX tN܋ZJ xJJJÊ *<~tUCCt& u&&%>t&v䡼PPH ,S,[^_Nj u t&&S[ùVQyà^VQ=ZRQ7Z;ڇs ZYXSRsS;[sR ҇Zt C KuQ$YZ[RC t^VCه[_Q< 2MKCC uCCe tȠM tI[ Y[SQ [ZK< uRgSCCCC/*SSK/KK[àM uZC:t C O M M AD?,@.A$B/<"uDC t=<"t8BC t/<"t*@C t!<"tAC t<"t?C t<"uC?q@yKBASEm tSjӋl;t[,0s<rlm׊ uCP,t 3S* S-ZsrRCc5 u*DW [ñӋjKt<"u t <"uSQK;^.Vu <:r_هӋtSۋZrKnt tÜuS YS"t dSf28##tٰP,uS3[X#^"X@{"#f ۺu؋dtø2RS~j^V P,X:t^VSj;uZ[^VR{[~t[>uS>IIII xIIڇӋl;ڋBAuIىl[<,t9X[Êb}JlA^E62w8HMľfK:|O\ 5$4RKB.aUPo ̼ Y$ /\[_6A_p caw+fCzՔVijl7mGG'pfXQsOnwأp= #zL} Hz@PC$t >(kn@C:h* 51_c.1@v:k ^# bx-Àz&XƐn2xʵW ?h)͢SЅ@aQYԦo% 'N x9? 6!OgI#E@|o|p+L67EV߄vl: {Η@H½p Pv5$cCu͍M r5r1Ƥ~@zZrN vH Tʚ;@B@B''d ;8|Yt&wz^Pc|u~r1e&X4#]I׳]b5~P$L~y DNn"~CÞ&0123456789ABCDEF<taϻي u S[,ӉŢ à uÊ\ϻيC7CSCC/CC[C7B7Kt1QيC7Ӊ<uCSCC [tY2Auu<tλًC7u<t΋ًWNRSӉ3[Z[XSP<uf<u9XRQ˟PڊDtf,6B6f tfPQSIs4< uu<"u:fu #rSȊ<"t0< St^[<u&Ȋ:ftr&< u< t:f t t :t :tzsS<"t< u0r+< t:fu< u r<tޞ[, t l[ޟPXPsCXr?[ uÈCtY뵶2o 2PKrt,Rt*X2&X9C"usu%SQPDRQXYy[Y[<,tQ<#uu^VSDRRQ2YZ2]uU,tHȇӻًnLJӺيӊ<,tRQPAS XY^VRSىӋn;s[ZӈC[ y RnY^VSQ;/^VQSC tl;s9h;r1ѶlڇӋ4;rc*[Y^VRQYZ^VQSC[CY[C:s*ŊȝrtCBYYYYYs[ð uËB[Y^Vu Q UY^VQSb$(R<,uM<u2P)X^VP ucSYXPt!y<tCuXUsÿø(y tyà t ty à<r S<[3һ;r;r66Z[rùCCùKKÀO ûr%Q'GC2Y t& tQYGuþDÿ.߃ÿ꿶QSW_[YQSWËr?SW2x? x+rBu:+r9u12_+r+u#+r!u2GSW2y& x ,'Qޠ yu s  Y_[ûSW2yQĻ=u .+V.^x xá xx6á=uSn [û2󫢏r_ùrr߹zrlcnr$cs]5OOUÿDsXGGP*yrq :ʇfDDuًUS:SR(tKÇ?uhUjCCCCSq[t Qʋj[YYʻCC:u:t9uں2uv:uuCKiS|[Ktu1,<,t*Sމ|[Kt[,:t ALLu,:tj vQYZQىys Ӊw[;rʝtuSKCC uCCO t<:t:t =K4tS>qtd 2 >u <(u i<(uI[G u KRPR u$Sʻ"LSII x â><(u^VII[KuX<(u )uH,^[jh;tXSCC $ClٝYxQjډj[χӋl;ڋBAu*ÊЊNJJIىlËl;t%SCC $CC/CٝYxQ[׋hj;tCCCPX<uD2жYl;tcCCPCC/CXS<u6[C6;t˹.MQCCC uSh;[sS;[rSKKKS[N[lˋhj+ډ^4pGK4v tyˋw7ۉjl°{u t2{uhˋ^ىj4CӋp4;ڋBAuIىl|K u{rImȱ-KtVSt>3ߋCC7< u B7KK[Klt#<;t,K^ƠB빰"b߰"S t <u־[ S[- S[ >xuݰ ݰ  =t y=Kr .Ku, OQ2wsj2C<.rBt <:s<0sYr3Q ŋBC<:s<0s9s<.t<'r Y<&s!OR<%u<$uux,(u,3uC2>S] Ztډ[>Z t$2Zj[h#2Y^V[^VRP;t纼;ZtI^VSQQAAAlSYSl[lىjK;uZ7CZCZB[2؉u>[Ë 讱\PQIYX8s^S蠾[2ûxCCst3KKKKCCsWKKuCCt á t6 t t3ɋ6*s ن߉ߓ֊2㜴 2 tFr6&% ĢÀr֊2ۀtЀ ˀ uy%*̊Ês/u!Buus t x àttj6>@QQa󥾏CCs"Yt u ! u uf3Ҋ߹ U.VW+s_^ y u]ӊ֊] SWQ,0P:Xy sx HPr3P$tiy&Z66[ZZ ZMY_[2>Ct>Dtg.Fn.Hq.Fx.H,V3ϋPIX u<&u<-t<+tKEs>Ct >Dt:Btl.H>Ct >Dt:BtN3ҋ:Ft ;.Ft$M+.F.3bNbjbjbrbxb~bCbCb2I5AuyQSWi_[Yz3ҋ[t 2u zSy[ y+pKtHx'rR&ZyRbR:Z&x%;RjrG yS[[䟀>uSWy_[3r<-u<+t rÁ rP Z0232侾D yފ t  uË6 t,ϋ#S߁îsBsB[tGGۋS[tFF뾾 t  xCCz u t u[2QPXsBZsBڋ׋s uN y uAӊՊߊ? SrQ ty YP{ Xy Y&XyPG X~ :r Űŵ[P20uCK?0t?8tCXt+PKE{D'CX+y-ش/, s:CĉCCٻô|=.VEE6/+sC6uù=V2.תNuYɀ?0uC{wQSS[t[Y-= P/PXPsX<:u 1C0CXuQY)SQZ[Yt 7"Y[s=PSR]/PXPs.V.^EEEX[CXuBBQV.G^YQ.GYSQ3W9. t#_+W;sZѻ;3!s_OW_r <9sX, XY[ SW2y& x 83Qޠ yu=#u$ s  Y_[À>Dtg.Fp.Hq.Fz.H/ & t :*uut1.H:Ft ;.Ft&M+.F.gggggggggggK0&tKAuK/2 0Cu0Cuû S [y -S/[ C0uCy3 5 xh t`>΀s@3+s NFރ6$e,WQuy u u2 yRS66 [Zf[Zt# y 3iW$SR66Z[SuRSF[ZyZ[<SySRZ[؏&sEIWSRJZ[mSR.sZ[SRutZ[AbZ[6Z[^~Qu à,P=Z[n޻=Z[Z>Z[&1r8CC@u) t*t&x!u߀,vv& 뽀 v܊> x,urފԀ t@uuw܀ >.RUSX[[ZO.P66..Z[XHtPSRV-^..V@^SsC<nr [K%6ܵst[x?*y26RYZ62 t6Р tȊŠx2yPQRS[ZYXx*y%R6O?bC22**:?R6**x"'6 XZubix]*,Ƞ$@u3۴r[t SPzZ[P tt u*PxNSPPXuXPrĘC<;Ę)X[xXYQPSPX[2ܠ t ů2X6P.X ~+X uK:?tCbXrĊ&* t u G@u2䣚 t+S[y-S[C0ڡxhS[t/CC>b2++tC< t<*tKSP2<-t<+t<$t<0uCsKKX tX t[%á̵s SR2Z=,xRJXP uKxY tmy CEC.&=ʠ=2&C2E.&=2.=.=و&CE CC$C롋CE3&sCCutu&&$Ã߀ĀsBuuu XߝuFF> ߈ËڋQFr >y>y=ۻYQgڻ:ڻf8ػsYűڋÀ&IIws y $EIPd66VZ[662,[Zd y EIW$r pW3һC0 x:pW66׳][Z66׻=8[Z66[Z=Ix {<t<t <t %DKRtQDYSr;s@%Wى[Z 2<t}QSًCB^V<,uK辣t逜^V uf[YSQRV٠ tDT^Z[[tK DT¹ Ӌh;uû=؊*.2P=Ŋ؊X.2Bu u 븹 Ӌh;uû=Ŋ؊*.2P=؊X.2ŋBu u S"[tßPt tXKRډ2t.CBIu[:,h迲2>{uKKKS5ӉCCSrsً[uCUZ$Њ*Ê؊NJs<r*Ê؊NJs翉Ӊ4Uڿ+KKŸ r%D \K'uVn(^K<)uS.&[VK^>u [>uE>t駙VSݻSw.&.&7.3^&[^<,uV脠^V̿)^L +;Ltr!D">V%^D óU].GU].KU].OU].SU.< ]U>Fu+Jt㋇@]U^^F Ћ]U^+^F Ћ]UFf؋ʋF fЋ]U^FЋ]U^FЋ]U^ +^F FЋ]U^ ^F FЋ]UF +F]U3ҋF vFv]U3ҋF vFv،]U^ ;^t ^ ;^t]U^ ;^rt ^ ;^r]Uv v vv ]U^ ;^rt ^ ;^v]UF Ft]UFf؎]UFV v]UFV v]UF>@tP4]U~u]UFV>]UV>]U^SFP= ]UFPFP F u>~ sУ "FP>F t PP P>F tuFFHFPHXtNFH&OHF&ONF&F&G `NHF&O*HF&WF&O&OF&G ^&F&OF&GF&G㍏NF&O؍F&G&_szFFFHN;rb^8uLP;Vt F@FN+PFX^@FPFX^@Fu]UF&F9F uF&GFF F&G-FF ;FvDF&G FFF`F&+G F1v~^NNOOXF+F FWvvSPJ ^FF&G FFF`F&+G F1v~^YF F&FF&G]UF&]UF;rU+FuKF;u>F&GFF`++щV^&G^&^&^ &^ &^&F&GN;w&;wA^&F&GFFFV+‰F FFN^&FFFFFFF^&G HFF9Fv^&@]FFF^&H N^&@F:Fu;Nv F:Fs F@F룋FU F&GFF&ONF `++щVFFr2F&G;Fv%^&^&;GuF^&GFNJFs ^Swl ^&wPvSPJ ^F^&G^&^FF^Go ]U F&GFF^&;Ft6F&D;Fv^&GFF&G;Fw@Fs ^Swl vvvPPJ ^FF F&+G1FNsvPJ^&G)FFF^&G HN;rw&@FsFYFF;FuNF^ Gv^&@ ^ Fs$Os^ G^ G^ ^ G^ o FtzP8 ] UQ#&&GF^&t&GF&G ;Fv:&GFFF&G;Fv!^&tF&G^&GFҋFF&G ]U Swl ]UFJL u@NFO]U F FF FF tg=vF FFF~t)v ^SvvvFPF tPPыF)FtFFFV뒋] U^ &GF&GFF^ &G HN;ra&@FrK~uF^Gv^ &@ F^ &+^G^ &F^GF ^FFu] UFsFFFF3^ FFF;u^SFPFPFPl FFFs&FsFFF^&t&G^ GFrFF&GFF_F&G ;Fw^&t/nFF&G&;Gs P8 FF&G F^&^&^&G^&G`+F+1F^ +F^ G^&GFr;FtFFF ^ F^+^&G^F^SFPFPFPl F룊F$t@FFuFFFF F9F v t ؋FFs ^ GFF;t'^ F^SFPFPFPl F=]UF&GFF~t@FsFv^@%FF&G &G&+GF;FrFFF;FspFF&GFFF&G;Fv)^&G;Fs ^F&GF^&GFʃ~u P8 ^&GF&G녃~uUFF&ONFF&G;Fv4^&u &GF F+F^&G^&GFv v v* F&GFFF&G;Fw^&GF&uv&7d ^U^&GN;tWQPd F^&GFv&L~^Y^&uSPRP^SPS FF]FF&)G1F&GFFruF&wv^0^Svu^Swl ^&GF&G^&uSPRP^SPS v^&7{d ^] UF ]U욖 [،;t S&_K rX-6PSԃ RVU/l  X-YPԃRUcl U]bdfhj6l>n6p`U]6b6`Ў؉dfhj6l>npUFPFP^S= ]UFPFP^S= ]U  QVRWU&&8&\ &T$&6&&6 u@&T(8>&&t& >t> u"]_Z^Y[X&&&P666 u6T(8>˚0U&>P&6&>&\ &T$S&]&6&T(8>UW$>0>(>>>>3U^ ]U^. ]U^.(] dUPSQRVW^0u x@Ƈ0_^ZY[X]Uv ~N< t< t < t< t+~] U?U>@H ; w3ǁFıV&t&u#&t&DŽ&DŽBřN tƇ23U(>Ƈ0U ;$t6ķ&&,&FA +;$r3,z>ULJ@Hu HU ;$t2uLJ@ LJ@UU&>>ȋz>ptx0> tf."tPt,<t<u$h tSLƇ2@ uLJ@ߋd+w";fw "t>Ft;wm3EUt2 2t'Ƈ2;$t@uLJ@ 0uS/3 Ƈ|UUpu31u,<t&<t".t5u < u Ƈ5 Ƈ5< tYd;r";wNpt@t9t0,ht :iuĿ&E&&&n;drXdrQჿ`u`+^"Ŀ&S&C+t&E3퉯^&FtLJFRLJ>U`u`+^^&Ŀ&S&cFtLJFUd;t&r";v ;drdrLJ>QtĿV&&UƇ4tRPx>p$p>XZtLJ@0uS/3 U>Ȱ>t*z>Ƈ|"t&Fu33U*PFP t> u ~r > s2^Svs#^Sv^Sv ^SvP e> svN FF^FFFFFFFFFFFF FFFFFFFP]U(> sF uv vvP 'FڈFFF FFFFFFP;]U(> sFuvP5 FڈFFFFFP]U> sF uv v ^S 8> rv v ^S>FFv v ^S^S ]UQQ> sF uv vv 1> rv vv0 FFv vvP ]UQ^SvFP t Ft@]U^&&GFP0F uNF^&G&GSF u0vFPF uF;FuF;Ft ^&G]Uv P F t> F t?F,&7&< sE<s FN FFuFF uNF@t]`,&&? sPF XP+F XFFuFFuNFuNF #F^&]UQQv P F t>pFt?dFtZ,&&? r,&&? s N N F(&&N V ҲuB""&]UF tF0؋;Ft!,&&? u~~r>]UQQFP<F uJ^SvFP F u1~tB&~tCv^S^ SSvr ]U^&G&O;t t u.^&GsA!&&< s^&G&;Gt=FPFP F t@Fs-F ;wB;t@~wA" €> "FFrPPFP>F u^&GF&G0&G2&G8&G:&G @&GB&GF&G HJ&G>s`<s<sFMFG> sDPPPP8F tQ< uFFP<t<uFFvwvPSSSSPPPP>s?F 0J2N8H:L@,B*.HJ`F"D>s?F028:@BHJFH> sDF028:@"B &HJF F> sP02468:<>@BDHJL-028:@BHJzFvvPSSSSPPPP F t> s_vP^&w5>rD> s=^&u N&&ߋN&& &&FFwZ> s ȰN N+NFv^&xuF&&  &F&Fu&&|^&u&tvP^&G& GPMF⢬Nt#v; "FV<r :sF0؍F^FFwU^&Hs&@^&Z&P-vF^&Z&PS^&@_[&@Z&PFu^&^&G Z&W"F&G,S2 F^ &0&O8&G]UQQv v F uc> s~ t=Qv Pv$=~ v@6~ uF FFwN s v Pvn Fu]UQvv F uvF u v ]UF0؍F^FFw^&Z&PFu^&_ &G"v拄0&G$8&G&> u 2&G(0F%F0^&O(2&G*F^&G.]UF uf&&?s/vF@Ṁ+ȃ6HRSv4 o&&? shF u Hv v拔H6F=sVSP4 VSv4 1FQ< tF1qFFF t~uHF؋Z;FwFFڋFs>> sPF@6^v+F@6H^㋇vF.(FV^㋇vRT(Fv拔@FF]U~ &N u+JVuF F~ >Nu+JBVu~ ]Nu+JBVNF+ȃrCw>NF+ȃu ^ &80u&vN^ & u+JVu<F%^&] UQ^&G :it:kt:jt :t F^&G1^SG\ ]U^&1u&/u&lu&ju ^&G< ^&G<]UL^"&GLF&GJF&GxF&GzF&GF^"&G ^"&GFt2F^"&GLF^"&GJF^"&GxF^"&GzF^"&G~ sF=wmtZ=amtU=mmu8NFFF؍G ^"&GZ&WF +^"&G$F+^"&G ~ sF=rmt =tmt=mmu[ F FF؍G ^"&GZ&WF ++^"&G"F++^"&Gb^"&G`^"&G"&Gf^&G^"&G^&G^"&G^&G^"&G^&G^"&Gs^&Gd t v"&Dq ^"&Gs&Gq^&G^"&Gv^&G^"&G6^&G ^"&G8^&G ^"&G.^&G ^"&G/^&G^"&Gh^&G^"&Gi^&G^"&Gj^&G^"&GlF^"&GwPFPP6t@F^&<t<u6F F=wmt=amu^&?tFs/j*^&?u' (~mmukF=rmt=tmu i^"&G 3^"SP\ FFP3 ^"&G@^"&G :it:kuFFv3 ^"&G>FFv^"&@Fv^"&x"ti&Gwub@JPF u,vZ^F&^&G ^SF tvF^"&@VZ&PX^&GFth^"&Gwt^FFFFFFFFŌFǰFɈFʈFˈF^"&GsF&GqF^&GcF^SvFPPFPP} F t^"Ss\ FFF^"&GF^"&GxF^"&Gz^"&s &_ ^"&_F^"&wF&_v˷F^"&wxP; F@F^"&Go^"&wx&wo; ^"&wxP; ^"&G :jt:u^"&G tu ^"&wx ^"&wxP; ^"&wxP; ^"&G :it@^"&G :ku&G tu1F޹@@2^"&u&Gn(^"&u F޹@@F޹@@ ^"&Gn^"&wx&wn; ^"&wxP; F޹  ^"&Gp^"&wx&wp; ] U F^&Gt&GwuP+} F tF^&G FF;w|^&x"tf&Owu?&HJ tQF tFv^&@V t4PF t&F!v^&XV^F&^&GFtzF]U^&G :it:kt:jt :t ^Ss\ ]UQQ^ &G :it:kt:jt :t~ wc^ .9U^g %.FOXa^ &G~^ &Gu^ &G :ku$&Gs&;Gqt'^ &su$^ &qu^ &G :iuFFv^ &@q3^ &Gv@^ &G :itB^ &G8^ &G :jt,^ &G6v^ &G :jt^ &G.^^ &G :iu ]^ &G/C^ &G<^ &Gh&Oi$^ &Gq^ &Gs^ &Gl^ &GjFF^&] U^&F^&G :it :kt ^&FtSPz F u^&Gb;FsFF^&O*&Od^&`tN&9Os.SP^&+Qv ^SvZPkz F uF^^&G^&Z&W^&G*^&^F&9Gw^&G^&^&^&)G^&^&G*^&G*&G^j^&G^&Z&W^&G*^&^&GFF^&G`F^&FN;s#&)^F&)G^F&G*F^&^F&)GF^&^&_㋇F u^&G*~uF ^&^&G*^&G^F&G`^&GFF^F&9G*tC u&G"FvN^&8uvv^FF^&w`^&)FFs^&G4sm&G"&;Gva&Gt$&wxP; ^&Op^&wx&wp; ^&Gt"P3 ^&G@^&G0rS/3 ^&G4F]UFPWv^ S^SQFPQ ]U^ &G :it :kt '^ &G^&^ &G^ &G*^ &G&]UQ^ &G :it:kt:jt :t~ wJ^ SP  t^.Mi 3 'F uPvHF^ &G^ &s5&On?&w+@ &Gn^ &Op៵&w6^ &On?&w+@ &Gn^ &Op៵&w &Gp~vF^ &G^ &Go$&w &Go^ &s5&On?&w+@ &Gn^ &Op៵&w6^ &On?&w+@ &Gn^ &Op៵&w &Gp^ &wxP; ^ &wx&wo; ^ &wxP; ^ &wx&wn; ^ &wxP; ^ &wx&wp~F^ &GqF^ &Gs^ &wF uv~F^ &Gv^ &Go$&_v˷ ^ &Go^ &wxP; ^ &wx&wo^ &G :itRF^ &G86^ &G :jt9F^ &G6^ &G :jt ~w8F^ &G.V^ &G :iu G~wF^ &G/%~vF^ &G^ &G :ju&Gt tFF^ &G :it&Gtt ^ &gn^ &On ^ &wxP; ^ &wxF$P; ^ &wxP; ^ &wx&wn; 'Ft Nt2NKr'6NF < r^YNv>9^Yv686FYF FW6<6 6 P66^ P8 ]UFF:sWnPPPFPP8 nP P Q P8   P &FFV &&GPPP^&O Q&O QPPPPPP8 RP^&wP8 P:P8 vvP8 r?nPS6FPP8 nPPPFPP8 nPS6FPP8 ^G FF؍O^G^G^&G ]U\NJLщNPRFF;wƇxFu PFPP8 P^SP8 PFPP8 P^SP8 ]UFFFHN;r;^&F0:r<9wF Vµ+F e P8 FuF]؎м .< U ]U,]UFFFFHN;r-^@;FvFF^@FFuƋFFN;vXNvFPF=uI++ȃ;Ns P8 +F%FF F tP8 ^Sv= ]j EHUFFFvPF u F s 6FP^Sv^SvvF=uW~mmuPFF uq&G < r < w\F sFF :FF>F uDPPP>F uo&G ^ &:GwY^ &GX ^F&G;FsF^ &GPP^&GȴP^Sv6F tn<~u8F^ &OQP^&OɵQPv>FF tUV~uF~ t~uF r~tFPFPFF^&~uq븋F] U^ SP^S6]U^ SP^S6]U^ &G :t x uPPP>F uV&G < rL< wH^&^&G^&GP^&G^&G^&G^&G^&GA^&G6 uDPPP>F u&G ^ &:Gw^ &G@ FF^ &G^&^&G^&G^&G^&G^&G^&G^&G^&G^&8G uA^&O^&8G u@^&G^ &GA^&G^ &G^&G]UFPFP4V^&?[uP60:Xt. FPQSVSVQ6^[Y=Xt ],N~] t&<F uK&G ^;v ^X ^F&u^& u@^] UnVnjޱ;u$:u ^&GZL~F =amt =wmt? uPPP>F u~&G < r<w^&G _^SvFPFPrF uE^&G F^&GFshkF^F^S^SvFP6W]0 ^UQF =rmt =tmt"6%rmP>%^&G ]UQF =wmt =mmt"66wmP>6^&G ]U^&G :6t ^&SP0]UQ^&G :%t ^&S2]U^&G :6uSv4 ](<qUQF :r10^&Fr^&0FFF 10^v&F@]U vvFP6F^SvP}F^&:F@F^PvPXFF^&:F@F^PvP0FF]U ^&?[u8FFFn ^& ~]N u+JVuF HN;v9@N +^vp^~&=9^YF@N +^&CFP>F u^&O@wA^~&=9^Y^&G@^&^v&48y^&v&4^P^&wg&wet^&^v&48{^&]U ^vFF^&F^&G^vNFY^&Gw^ &Gj^&GyF^&^vNFYFP>F uQ^&G@^&^&O@wA^^Y^&Ƈ^&Ƈ^PF uI^ &k]u+JBV^ GkPRPPP^S|PPP x] U^&G F =wmt =amtw~]Nu+JV^SBRPPFPQ؍GPQ xF!t=uF,~^&Gi^GePF~v^kvNFYF^&^S^Sv^SFPF uF~u;^SvRPPRPF=u^v&xF^&Gi뾋F u9^SFPvRQWv Pv6F u ^&G ]U ^&G :t ^&G ^S6F u^&FF^SGkPF&P^SFPF u^&Oit^v8x^&GiF^S^Sv6F tM^G8P^SvRPPmmP65F u"^&w8F t^&w8FF]U^&G :t F^&Gj]rU쾄~F =amt=wmt=rmt=tmt =mmt&^&G F^&Z&WF^&G]U^&^&G :t ^&GN ^&]U^&^&G :t ] uU츊Vnjޱ;u$:u ^&G(~F =rmt =tmt ^&G ]UQQ^&^&G :t WFPF uC~uF1~uF$^G^ &Z&W^&F^&GF] (!Y+U~SF =wmt=amuF~]Nu+JV~&Nu+JVu F@;Fs F@;Ft ~s }~uA^&GM&_O^&GL&^v@^&GMZ&WOF@N+^&OL^S^Sv^Svv ^Sv6F u ^&G ]U^&^&G :t ^S^ Sv ^S8]U^&G :t ^Sv:]U^&G :t ^S6]UQ^ &G :t m~ wA^ . ^ &G=)^ &G.^ &G/!^ &GB^ &GDFF^&] U^ &G :t l~ wH^.PjvF^ &G=3F^ &G.'F^ &G/F^ &GB F^ &GD]U^&G :t F^&G1] ` U4^&^&G :t "Z XuPPXP>F t}X&G < r6<w2F ^&~ t^ &?uPPPP^ Sv 6;^ \uDPP\P>F t^&GF\&8G w ]F\X ^Fv&DF&GF&GF&GF^&GF&GF&GF&GF&G F&8G uANsNQPP2F ti FFF ;FwU FrfF9F w[^ &FF^&O&@^&G^&w FA:r F tFPFPFPPv4^&GF&GFF t ^&Gr-FPFԴPFմPFPFִP4F tF^&wWFA:rF uJFj~t/F:Fu~t FFQ^SFP6F uFP:F tFF~tx[~tNkFȈFaF:FvFRFL~tNFȈFF:FvFF~tFF  L a v FF^&GF^&GF^&GF^&GF^&GF^&GF^&GF^&G FsFPFPFP2FFF^&F uF]UFa:r 6^ &u}^ &G ^ S^SFh^ &G F]U^&G :t:u^&w&w&w6im^&G :}ul&Gs&G&;Gv &G&W^&w&w&w6i^&&W^&G sH&G s@^&w&7P6n^&&W!^&G :u^&&G ]0^Uv&D :Ws2&{؋:}u] ]Uv&D :Ws2&{؋:}u]~ ]Uv&D :Ws2&{؋:}u] ]Uv&D :Ws2&{؋:}u ]X[QSP ]Uv&D :Ws2&{؋:}u] ]UQv&D :WsB2&{؋:}u0VQFvV&D 2&{؋~t F Y]PmUQ^&G :ht Sv<4^&u}^&G ^SvFh^&G F]U^&G :t:up^&w&w&w6iFVRP^&w&w6sFV^&G&W^Sv6F u0^&wPGPP^&G :}u ]U^&G :t:}t:t :ht ^&G ^&w]UQ^&G :t&&G :t&O :t:it :jt:ku ^&G :Wr ^^&G :u F&G1E^&G :it:jt :kt:u^SFP6^&G :uF&Gj]U vPFPPF uxFV^&&W~u~tYFuRFVFV)F^v^ SPvvFPF u^ &?Gu&G &W^&&W] @UF 1F1FF1Vu FFmFm1FF1VF1F ;vN^㋇;FvNFF^&F 1^&W^&8Os&^F+@^&GF1^&WF <1^&WF 1F1^&WF 1º PF1Y^&G]dU ?r%^&&W^&Gt&G;F s Wv tX^F&F&GFFF;FsN ;Nvt&@FFڋF;Fr ,tv@^&Z&Wtv&^&G]Us]t&G@]U cr t&G;FsGvtX^F&F&GFFF;Fst&@FFF]U>rupP> u$>rtp&Gtv>vt>tt]ð]p6@JUQQFFFF^]UF]UF]UFrF^](.U"FF^&FFF^&GFFF^&GFFF^&GFt<v ^&V y^&GF^޷.FFtm*FFwmFFamFFrm FFmmFsF F[FFF;w1 uF 6F@/F%FF1VuF ~tF@FF؂xtF@Fv^&c F^&vF؍zP6F u!FvF؍P6F tF^SFPFs6FĿzWVRvRWvĿWFP67FĿzWVRvRWvĿWFPv6]F~uX~uFĿzWbwP6vF~u0F؊FވxF߈yF艇~F扇^&MF^&FsvFĿzW6FFsvFĿW6F]U FF^&GF^&F؊ys ĿzW6FĿzW6bFF~ĿzW6FFĿW6FFƇxF^&]UFF^&FFF^&GF^SFPFPFPvPPmmP^&^&?u"v^&^&?t vF]UFF^&FFF^&GFFF^&GF^SFPpFPFPvPPmmP^&^&?u?^SFP9vFPvPP^&vF^&?u&]U~u+J^]UJFF&FFF~ta^&G;F u!&^&Z&WF^&Z&W^&G;F vF^FFFFFFF&FF뙃~tcFFF^&Z&WFFFF FFFFFF&Z&W^&^&Z&WF+F ^&GF P^S]U JFF&FFF t"9Fs F^&ZFFF&Ѹ^&&WF ^&GF^&Z&WJFF&^F&FF~tL^&GFN;Nu(v&D^&G^&FF^&Z&WFFF&머]WU2FFFr9^ &FPrFр(r FЈBFF FFFr!^ &FP rFF F ^&GF^FFrG^&?tF1FP^GPrF^&GFF^&8u8^&^&G^&GZ&W^&G^&G^&^&G ^&]UFAs@NZvB"€0sB9vC" €.tA ]UFt@~(tA ]U^&^&:u]^&w^^t+Jt@]p$-=RUT]U~ s Y P6^.^S6^S6 s^S6f^S6LY^S6VLY P6@^S6Q3^S6&Y P6N[hu^Sv]UQVr]&W&>WtZ]V>WuW]UVrW^&V]rD6&^&@;tSPP6]^S]U FF^FFFF^&F^&FT t ]2~tF> ~tFIF;sv+؋&FF,s/vF9~V tF6~X tF4~c tFC~ tFD~ tFEq~ tFF_~ tFGM~ tFG;~ tFF)~ tFH~ tFDF'F^&]U6BP66]@UQ\s 6BF uN PXP6F u5]PFPvPPwmPXS6 6F u\F]UQQ\s%]P6F PXS6FF\F]UQ\rP PXP6P6]PS6RPPwmPXS6 6P6\]Pv6 P6]6U^&FFF^&GFFF^&GFFF^&GFF؊ys(ĿzW^SP^S6RFu9F2F^&GFFĿzWvv^S6FF^&]U^&FFF^&GFFF^&GFFĿzWFP6qFF^&F^&]U^&FFF^&GFFF^&GFF؊ys&v&TVĿzW^SRFP6W/F^&GFFĿzWvv^S6^&]wUr]rv6G&?t~tFFnPFPPFP6P6`:sqFrg&F&Nt&ȈFNNPFPFPFP8P6~tv6[]:rb~tnP P6 P68FtnQP6 P6~t &&~ t&&P&Y]U~t VW~t VW]UQQr]r1~u(FFHN;s^&06GFtnP^SvFP6P6`:r&FP1&&P&Y]UQ:r]&F&8G sr]P:P6PPPNQ&&O QPPPPPP6S66eF] COPYRIGHT 1980, 1985, 1986 CONVERGENT TECHNOLOGIES, INC. ALL RIGHTS RESERVED THIS PROGRAM IS FURNISHED UNDER A LICENSE RESTRICTING ITS USE SOLELY FOR THE OPERATION OF A DESIGNATED COMPUTER FOR A PARTICULAR PURPOSE, AND MAY NOT BE COPIED OR OTHERWISE USED WITHOUT THE PRIOR WRITTEN CONSENT OF CONVERGENT TECHNOLOGIES, INC. TITLE TO AND OWNERSHIP OF THE PROGRAM, INCLUDING ITS SOURCE CODE, SHALL AT ALL TIMES REMAIN IN CONVERGENT TECHNOLOGIES. VERSION: 9.1 (Friday July 18, 1986, 13:55) >B=K8xY1GWwtn"Copyright 1985 Convergent Technologies, Inc. All rights reserved.Ver 9.1 Res Linker 10.2%2=N\8BLV`ly #(,049=AEIMQU\a7z&Pbx~e~2"" ##&2z+S/Kg(, >, K, X, e, r, ~, , , , , @, F, a 'a Ta a a a a a a a a js s s s s - f l   $ *        <   Z  e  K    * F K K 2h jh h h h h Bh Uh h h ; F U    9 ] l   3 B g  l > d |    7            9   / P     ; ; ; L; {; ; ; %; z; ; ; ; ; ; ; ; ; H    H     ; v       > 2> > > > > > ;> l> > *] ^] h] v] ] ] ] ] ] ] ] ] 0] T] ] ] ] ] ] $] /] |] ] ] #] q] ] ] ] ] ] ] ] !] T] ] ] ] ] ] N] / C }  U   =    %/C//!/TvY# #)We\tQ0s0MMMMM8McccDcccc5cPcc*Fd#[sH`)Y-?n??)oMou:uzuuu+} MAKEPOINTERGETRA&GETSA0PWAa DEFLPRINT , SYSERCiGETSTAMFILEHEADER8 GETMODULEID>GETPASCBGETUCB HGETPARTITIONSTATUS> GETPSTRUCTURE< GETUSERNUMBERQUERYREQUESTINFO QUERYVIDHDWTEXTEDIT[Kbd][Vid]T[Lpt][Ptr]?[Nul][SysIn]r[SysOut]>r M< N*c Na<N* #N*?e*; ; = hN*c r< *|rr i  /O %, ,  , a   ]       *Z _   [sys]LptConfig.Sys[KBD][VID][sys]CommAConfig.sys[sys]CommBConfig.sys> P%$,%*NEXT without FORSyntax errorRETURN without GOSUBOut of DATAIllegal function callOverflowOut of memoryUndefined line numberSubscript out of rangeDuplicate DefinitionDivision by zeroIllegal directType mismatchOut of string spaceString too longString formula too complexCan't continueUndefined user functionNo RESUMERESUME without errorUnprintable errorMissing operandLine buffer overflowFOR Without NEXTWHILE without WENDWEND without WHILEInvalid ParameterUnknown ProcedureToo Much Parameter DataNot Enough Parameter DataProcedure Called As FunctionFunction Called As ProcedureNesting Limit ExceededPointer RequiredSystem ErrorFIELD overflowInternal errorBad file numberFile not foundBad file modeFile already openDisk I/O errorFile already existsDisk fullInput past endBad record numberBad file nameDirect statement in fileToo many filesNot readable as a random fileRecord size mismatchRecord does not existNot a random fileMalformed recordRead/write beyond EOFAccess denied in Ok BreakGO TOUB?Redo from start Undefined line Random number seed (-32768 to 32767) Press FINISH to leave BASIC or any other key to continue Continuing BASIC LFAAVN Bytes freeE[LPT]RUN ""  Basic  VNXVN=C55@''56'''='555'J7999:=9'95=999'5@9''''=99999''=   $.,p2Kn,X` %K;@0 0123abcdABCD.,[Ptr]& $ % * -  Press NEXT PAGE or SCROLL UP to continue`(Press NEXT PAGE to continue^uuVNVF[!Scr]$$.Tmp       [KBD][VID]=\z2Q[Sys]Config.Sys  !"#$%&'2345679:=>?@BCDEFGHIJ ! . C O e n |  + : R \ q 5Ro$.=O]v$(+.@Pu9.1 ResUFV33&&NNNN rN &&ЋSQR&.Ӌ&6\=t=ZtP.6\@ы&ZY[SQR&.Ӌ&6Q=tы&ZY[>tþJK3:JtK<tSE<tE[@PSQR&.Ӌ&6P\ &ы&ZY[XÜPSQR&.Ӌ&62P\ ы&ZY[XÜPSQR&.Ӌ&6Q3P\&ы&ZY[XÜPSQR&.Ӌ&6P\ы&ZY[XPSQR&.Ӌ&6RQ\ы&ZY[XËPSQR&.Ӌ&6WR\ы&ZY[XPSQRU.&Ћ&&\ҋ&]ZY[XÜPSQR&.Ӌ&6P\$ uP&.&6\$? t2ы&ZY[XnS4c4@XOQv;4\45%X34$"()4 $ %%445Q5Sp()ͿTJJJ]s+NJ*+dCAd[@EppDQC?Dd-@OAEED000!8J+IAhmloi]Ro p+p2$y!20C-41B0U0(09->-t!VyVV8> >2ðd2FdAAAT >>>AAA,>CYZ_&[r{UTϫNBTSLOSONԚLEAҒINSNDBV+V,V-O HRAL̶OMMOθHAIιELETŪATI͆EFSTҭEFINԮEFSNǯEFDB̰EƘLSŢNāRASŦDIԧRROҨRRX O/QO҂IELRIOTωO TωOSUEEXNPUԅƋNSTNNMILPRINԞLISԟPOEԈINűOASEISԓO O0EEFTO1ERGOKI2KS3KD4IDEXԃUL̖AMEהOPEοUԝΕCTPTIOκRINԑTUOKřOEEETURΎEAćUΊESTORŌE͏ESUMũSEIGHTNENUͬANDOMIZŻTOАWAХAVPCTEGQI TRTRINGPACEYSTEͽHEROΣROFƤABA SINSAIDTȡAIԗHILŴENĵRITŷO۾yy||PF<2(z{VMVF7yVh^'6\c>6s84696Y6D6>7|6c668:gx #~ G:X :Yz: /: C : RORO ,.eE%#!Dd,0.eE%#!Dd,0p86:WXEh͍T'µfTTe'ye$µfrc OüdXOR AND NOT MOD SHL SHR OR EQ NE LT LE GT GE LOW HIGHNUL TYPE :X :Y:WA͍T'TTɯG og2 222\2X2Y9"!*VyFdRiʑiiji͗iO2ʹi=y,j$j $j_jy2#Ϳisi>i::i̬Csiʹi:#O͗iG:i͠TTT,oi: oi2 >ii:#O:ʆi͗i,jxʹiG:#O͗ih_y{ªi*MYGh!j_~xiͬCůG|2_jy2#Ϳijl:#O͗iiͪT2#:#G2*+N{*!2z̬C̬Ci|=iyWx=zVjzVjhVjVjVj ĬC>GʹiGh"(zrj ,"O"$y2#Ϳijj2'ʫjʫjʫjʫjʫjj:'*(!jo>g~#fo:#O*(ĬCjy®i"M  9kCkMkWkkklellkklmmm"m+mUmHmmkbmnm}mmmmm9lzW{_9lzW{_9lzW{_:#ľC*$ |/W}/_*$:#ĚCľC|/W}/_:#O9lzʚk)Ðk9l#+}zW{_àk*$:#yCͭkyk:#kkyO2Ilͭk:#Cyk2kyO:#lyOľCͺm {_zW9lDM!>=5l))#l#l :#ľC ľC*$:# aly ľC:#O*O"M*$9lz̬CzBl|G|ʍl|l͐ll|/G}/O!>ël Ҫl7>{_zW}o|g=¡l|g}oɯO_yW9lzl|l|hll>OiGC:mVm:mV?m:mVW :m/m:mm:mV7m?m:#ľCͺm*$> O2#*$\W> O2#*$]W9l}ͲX_9l}ͲX_9l}͠X_9l}͖X_9l}ͲXo{ͲX_CC7@?2"<   W2u{"tY U&YŠʢS[ӋW"t dӉf] ۇӻ_t "uI2Ѣ7J; RKP XSf#[ZYS:uRK7KCCS:;[ZuZUZӱVS:^VS^Vp m ur_ SxC^Vxò<.YuK<t< u2KrSP;rX,0жڇ[X[u<t< t,aYSS^VPQQ{< u<tS^VPCS;[sKrBs I M[òtöU<t[^V[:͊K u:uC<"tt,u:ƊX7KRPX^V:Ŋt <rS<u1SC;sl;Zs1;s Zog^V Z[:[h^u0 tt:r,s~PT XPy CYsQ2JB[SRRK>]4K<[t<(u(CGu <"u3<(t<[t<]t<)uu$t<,t^V:Bt}tSGu[K^V<,uz[K [tBSn 2J>CtE,BE^V,2^VR:Et J t 2b>CtE,BEt%Pu:]<"tJ t:.EKXȠb uÊӻ^VR#XP<QsDDKt :Et^VKtQCZJ tgR[% uCC uCC<|,^VPRub[6XA3܋Pb<)tG,S6>,XX tN܋ZJ xJJJÊ *<~tUCCt& u&&%>t&v䡼PPH ,S,[^_Nj u t&&S[ùVQyà^VQ=ZRQ7Z;ڇs ZYXSRsS;[sR ҇Zt C KuQ$YZ[RC t^VCه[_Q< 2MKCC uCCe tȠM tI[ Y[SQ [ZK< uRgSCCCC/*SSK/KK[àM uZC:t C O M M AD?,@.A$B/<"uDC t=<"t8BC t/<"t*@C t!<"tAC t<"t?C t<"uC?q@yKBASEm tSjӋl;t[,0s<rlm׊ uCP,t 3S* S-ZsrRCc5 u*DW [ñӋjKt<"u t <"uSQK;^.Vu <:r_هӋtSۋZrKnt tÜuS YS"t dSf28##tٰP,uS3[X#^"X@{"#f ۺu؋dtø2RS~j^V P,X:t^VSj;uZ[^VR{[~t[>uS>IIII xIIڇӋl;ڋBAuIىl[<,t9X[Êb}JlA^E62w8HMľfK:|O\ 5$4RKB.aUPo ̼ Y$ /\[_6A_p caw+fCzՔVijl7mGG'pfXQsOnwأp= #zL} Hz@PC$t >(kn@C:h* 51_c.1@v:k ^# bx-Àz&XƐn2xʵW ?h)͢SЅ@aQYԦo% 'N x9? 6!OgI#E@|o|p+L67EV߄vl: {Η@H½p Pv5$cCu͍M r5r1Ƥ~@zZrN vH Tʚ;@B@B''d ;8|Yt&wz^Pc|u~r1e&X4#]I׳]b5~P$L~y DNn"~CÞ&0123456789ABCDEF<taϻي u S[,ӉŢ à uÊ\ϻيC7CSCC/CC[C7B7Kt1QيC7Ӊ<uCSCC [tY2Auu<tλًC7u<t΋ًWNRSӉ3[Z[XSP<uf<u9XRQ˟PڊDtf,6B6f tfPQSIs4< uu<"u:fu #rSȊ<"t0< St^[<u&Ȋ:ftr&< u< t:f t t :t :tzsS<"t< u0r+< t:fu< u r<tޞ[, t l[ޟPXPsCXr?[ uÈCtY뵶2o 2PKrt,Rt*X2&X9C"usu%SQPDRQXYy[Y[<,tQ<#uu^VSDRRQ2YZ2]uU,tHȇӻًnLJӺيӊ<,tRQPAS XY^VRSىӋn;s[ZӈC[ y RnY^VSQ;/^VQSC tl;s9h;r1ѶlڇӋ4;rc*[Y^VRQYZ^VQSC[CY[C:s*ŊȝrtCBYYYYYs[ð uËB[Y^Vu Q UY^VQSb$(R<,uM<u2P)X^VP ucSYXPt!y<tCuXUsÿø(y tyà t ty à<r S<[3һ;r;r66Z[rùCCùKKÀO ûr%Q'GC2Y t& tQYGuþDÿ.߃ÿ꿶QSW_[YQSWËr?SW2x? x+rBu:+r9u12_+r+u#+r!u2GSW2y& x ,'Qޠ yu s  Y_[ûSW2yQĻ=u .+V.^x xá xx6á=uSn [û2󫢏r_ùrr߹zrlcnr$cs]5OOUÿDsXGGP*yrq :ʇfDDuًUS:SR(tKÇ?uhUjCCCCSq[t Qʋj[YYʻCC:u:t9uں2uv:uuCKiS|[Ktu1,<,t*Sމ|[Kt[,:t ALLu,:tj vQYZQىys Ӊw[;rʝtuSKCC uCCO t<:t:t =K4tS>qtd 2 >u <(u i<(uI[G u KRPR u$Sʻ"LSII x â><(u^VII[KuX<(u )uH,^[jh;tXSCC $ClٝYxQjډj[χӋl;ڋBAu*ÊЊNJJIىlËl;t%SCC $CC/CٝYxQ[׋hj;tCCCPX<uD2жYl;tcCCPCC/CXS<u6[C6;t˹.MQCCC uSh;[sS;[rSKKKS[N[lˋhj+ډ^4pGK4v tyˋw7ۉjl°{u t2{uhˋ^ىj4CӋp4;ڋBAuIىl|K u{rImȱ-KtVSt>3ߋCC7< u B7KK[Klt#<;t,K^ƠB빰"b߰"S t <u־[ S[- S[ >xuݰ ݰ  =t y=Kr .Ku, OQ2wsj2C<.rBt <:s<0sYr3Q ŋBC<:s<0s9s<.t<'r Y<&s!OR<%u<$uux,(u,3uC2>S] Ztډ[>Z t$2Zj[h#2Y^V[^VRP;t纼;ZtI^VSQQAAAlSYSl[lىjK;uZ7CZCZB[2؉u>[Ë 讱\PQIYX8s^S蠾[2ûxCCst3KKKKCCsWKKuCCt á t6 t t3ɋ6*s ن߉ߓ֊2㜴 2 tFr6&% ĢÀr֊2ۀtЀ ˀ uy%*̊Ês/u!Buus t x àttj6>@QQa󥾏CCs"Yt u ! u uf3Ҋ߹ U.VW+s_^ y u]ӊ֊] SWQ,0P:Xy sx HPr3P$tiy&Z66[ZZ ZMY_[2>Ct>Dtg.Fn.Hq.Fx.H,V3ϋPIX u<&u<-t<+tKEs>Ct >Dt:Btl.H>Ct >Dt:BtN3ҋ:Ft ;.Ft$M+.F.3bNbjbjbrbxb~bCbCb2I5AuyQSWi_[Yz3ҋ[t 2u zSy[ y+pKtHx'rR&ZyRbR:Z&x%;RjrG yS[[䟀>uSWy_[3r<-u<+t rÁ rP Z0232侾D yފ t  uË6 t,ϋ#S߁îsBsB[tGGۋS[tFF뾾 t  xCCz u t u[2QPXsBZsBڋ׋s uN y uAӊՊߊ? SrQ ty YP{ Xy Y&XyPG X~ :r Űŵ[P20uCK?0t?8tCXt+PKE{D'CX+y-ش/, s:CĉCCٻô|=.VEE6/+sC6uù=V2.תNuYɀ?0uC{wQSS[t[Y-= P/PXPsX<:u 1C0CXuQY)SQZ[Yt 7"Y[s=PSR]/PXPs.V.^EEEX[CXuBBQV.G^YQ.GYSQ3W9. t#_+W;sZѻ;3!s_OW_r <9sX, XY[ SW2y& x 83Qޠ yu=#u$ s  Y_[À>Dtg.Fp.Hq.Fz.H/ & t :*uut1.H:Ft ;.Ft&M+.F.gggggggggggK0&tKAuK/2 0Cu0Cuû S [y -S/[ C0uCy3 5 xh t`>΀s@3+s NFރ6$e,WQuy u u2 yRS66 [Zf[Zt# y 3iW$SR66Z[SuRSF[ZyZ[<SySRZ[؏&sEIWSRJZ[mSR.sZ[SRutZ[AbZ[6Z[^~Qu à,P=Z[n޻=Z[Z>Z[&1r8CC@u) t*t&x!u߀,vv& 뽀 v܊> x,urފԀ t@uuw܀ >.RUSX[[ZO.P66..Z[XHtPSRV-^..V@^SsC<nr [K%6ܵst[x?*y26RYZ62 t6Р tȊŠx2yPQRS[ZYXx*y%R6O?bC22**:?R6**x"'6 XZubix]*,Ƞ$@u3۴r[t SPzZ[P tt u*PxNSPPXuXPrĘC<;Ę)X[xXYQPSPX[2ܠ t ů2X6P.X ~+X uK:?tCbXrĊ&* t u G@u2䣚 t+S[y-S[C0ڡxhS[t/CC>b2++tC< t<*tKSP2<-t<+t<$t<0uCsKKX tX t[%á̵s SR2Z=,xRJXP uKxY tmy CEC.&=ʠ=2&C2E.&=2.=.=و&CE CC$C롋CE3&sCCutu&&$Ã߀ĀsBuuu XߝuFF> ߈ËڋQFr >y>y=ۻYQgڻ:ڻf8ػsYűڋÀ&IIws y $EIPd66VZ[662,[Zd y EIW$r pW3һC0 x:pW66׳][Z66׻=8[Z66[Z=Ix {<t<t <t %DKRtQDYSr;s@%Wى[Z 2<t}QSًCB^V<,uK辣t逜^V uf[YSQRV٠ tDT^Z[[tK DT¹ Ӌh;uû=؊*.2P=Ŋ؊X.2Bu u 븹 Ӌh;uû=Ŋ؊*.2P=؊X.2ŋBu u S"[tßPt tXKRډ2t.CBIu[:,h迲2>{uKKKS5ӉCCSrsً[uCUZ$Њ*Ê؊NJs<r*Ê؊NJs翉Ӊ4Uڿ+KKŸ r%D \K'uVn(^K<)uS.&[VK^>u [>uE>t駙VSݻSw.&.&7.3^&[^<,uV脠^V̿)^L +;Ltr!D">V%^D óU].GU].KU].OU].SU.<]U>Fu+Jt㋇@]UQQFFFF^]UF]UF]UFrF^]U"FF^&FFF^&GFFF^&GFFF^&GFt<v ^&V y^&GF^޷.xFFtm*FFwmFFamFFrm FFmmFsF F[FFF;w1 uF 6F@/F%FF1VuF ~tF@FF؂>tF@Fv^&c F^&vF؍@PF u!FvF؍FPF tF^SFPFs6FĿ@WVRvRWvĿFWFP%7FĿ@WVRvRWvĿFWFPv F~uX~uFĿ@WbwP^> F~u0F؊Fވ>F߈?F艇DF扇J^&MF^&FsvFĿ@WFFsvFĿFWF]U FF^&GF^&F؊?s Ŀ@WFĿ@Wr FFDĿ@WFFJĿFWFFƇ>F^&]UFF^&FFF^&GF^SFPFPFPvPPmmP^&^&?u"v^&^&?t vF]UFF^&FFF^&GFFF^&GF^SFPpFPFPvPPmmP^&^&?u?^SFP9vFPvPP^&vF^&?u&]U~u+J^]UFF&FFF~ta^&G;F u!&^&Z&WF^&Z&W^&G;F vF^FFFFFFF&FF뙃~tcFFF^&Z&WFFFF FFFFFF&Z&W^&^&Z&WF+F ^&GF P^S]U FF&FFF t"9Fs F^&ZFFF&Ѹ^&&WF ^&GF^&Z&WFF&^F&FF~tL^&GFN;Nu(v&D^&G^&FF^&Z&WFFF&머]U2FFFr9^ &FPrFр(r FЈBFF FFFr!^ &FP rFF F ^&GF^FFrG^&?tF1FP^GPrF^&GFF^&8u8^&^&G^&GZ&W^&G^&G^&^&G ^&]UFAs@NZvB"€0sB9vC" €.tA ]UFt@~(tA ]U^&^&:u]^&w^^t+Jt@]U]U~ s Y P ^.^S^Ss^Sf^Ss Y^S s LY P @^Ss 3^S&Y P 6CP]jw^Sv]UQr]&&>tZ]>u]Ur^&]rD6&^&@;tSPP ]:^S]U FF^FFFF^&F^&F t ]2~tF> ~tFIF;sv+؋&FF,s/vF9~V tF6~X tF4~c tFC~ tFD~ tFEq~ tFF_~ tFGM~ tFG;~ tFF)~ tFH~ tFDF'F^&]Uka P 6]UQ"s ka F uN PPF u5#PFPvPPwmPS6 %F u"F]UQQ"s%#PF PSFF"F]UQ"rP PPP #PS6RPPwmPS6 %P "#PvoP ]U^&FFF^&GFFF^&GFFF^&GFF؊?s(Ŀ@W^SP^SFu9F2F^&GFFĿ@Wvv^S FF^&]U^&FFF^&GFFF^&GFFĿ@WFP> FF^&F^&]U^&FFF^&GFFF^&GFF؊?s&v&TVĿ@W^SRFP9/F^&GFFĿ@Wvv^S ^&]Ur]rva &?t~tFFnPFPPFPPx :sqFrg&F&Nt&ȈFNNPFPFPFP8P ~tv ]:rb~tnP PoP 8FtnQPoP ~t &&~ t&&P&Y]U~t ~t ]UQQr]r1~u(FFHN;s^&0a FtnP^SvFPPx :r&FP1&&P&Y]UQ:r]&F&8G sr]P:P PPPNQ&&O QPPPPPP  S6$ F]U  QVRWU&&8&\ &T$&6&&6 u@&T(8>&&t&( >t> u"]_Z^Y[X&&&P666 u6T(8>˚0U&>P&6&>&\ &T$S&]&6&T(8>UW$>0>(>>>>3U^ ]U^. ]U^.(] dUPSQRVW^0u x@Ƈ0_^ZY[X]Uv ~N< t< t < t< t+~] U?U>@H ; w3ǁFıV&t&u#&t&DŽ&DŽBřN tƇ23U(>Ƈ0U ;$t6ķ&&,&FA +;$r3,z>ULJ@Hu HU ;$t2uLJ@ LJ@UU&>>ȋz>ptx0> tf."tPt,<t<u$h tSLƇ2@ uLJ@ߋd+w";fw "t>Ft;wm3EUt2 2t'Ƈ2;$t@uLJ@ 0uS/ Ƈ|UUpu31u,<t&<t".t5u < u Ƈ5 Ƈ5< tYd;r";wNpt@t9t0,ht :iuĿ&E&&&n;drXdrQჿ`u`+^"Ŀ&S&C+t&E3퉯^&FtLJFRLJ>U`u`+^^&Ŀ&S&cFtLJFUd;t&r";v ;drdrLJ>QtĿV&&UƇ4tRPx>p$p>XZtLJ@0uS/ U>Ȱ>t*z>Ƈ|"t&Fu33U*PFP t> u ~r > s2^Svs#^Sv^Sv ^SvP h e> s vN F F^FFFFFFFFFFFF FFFFFFFP]U(> sF uv vvPh 'FڈFFF FFFFFFP;]U(> sFuvP5h FڈFFFFFP]U> sF uv v ^S K 8> rv v ^S>FFv v ^S^S]UQQ> sF uv vvK 1> rv vv0 FFv vvP]UQ^SvFPh t Ft@]U^&&GFP0F uNF^&G&GSF u0vFPF uF;FuF;Ft ^&G]Uv PK F t> F t?F&7&< sE<s FN FFuFF uNF@t]`&&? sPF XP+F XFFuFFuNFuNF #F^&]UQQv PK F t>pFt?dFtZ&&? r&&? s N N F&&N V ҲuB""&]UF tF0؋V;Ft!&&? u~~r>]UQQFP<F uJ^SvFPh F u1~tB&~tCv^S^ SSvrh ]U^&G&O;t t u.^&GsA!&&< s^&G&;Gt=FPFPF t@Fs-F ;wB;t@~wA" €> "FFrPPFP>F u^&GF&G&G&G&G&G &G&GF&G &G>s`<s<sFMFG> sDPPP8F t< uFF<t<uFFvwv*PSSSSPPPP>s?F JNHL,*.`F"D>s?FFH> sDF" &F F> sP-zFvv*PSSSSPPPP F t> s_vP^&w5>rD> s=^&u N&&ߋN&& &&FFwZ> s ȰN N+NFv^&xuF&&  &F&Fu&&|^&u&tvP^&G& GPMFN(t#v "FV<r :s(F0؍*F^FFwU^&Hs&@^&Z&P-vF^&Z&PS^&@_[&@Z&PFu^&^&G Z&W"F&G,S F^ &&O&G]UQQv vK F uc> s~ t=Qv Pv$=~ v@6~ uF FFwN s v Pvn Fu]UQvvK F uvF u v ]UF0؍*F^FFw^&Z&PFu^&_ &G"v拄&G$&G&> u &G(F%F^&O(&G*F^&G.]UF uf&&?s/vF@Ṁ+ȃ6Sv o&&? shF u v v拔6F=sSP Sv 1F< tF1qFFF t~uHF؋;FwFFڋFs>> sPF@6^v+F@6^㋇F.(FV^㋇RT(Fv拔FF]U~ &N u+JVuF F~ >Nu+JBVu~ ]Nu+JBVNF+ȃrCw>NF+ȃu ^ &80u&vN^ & u+JVu<F%^&] UQ^&G :it:kt:jt :t F^&G1^SG ]U^&1u&/u&lu&ju ^&G< ^&G<]UL^"&GLF&GJF&GxF&GzF&GF^"&G ^"&GFt2F^"&GLF^"&GJF^"&GxF^"&GzF^"&G~ sF=wmtZ=amtU=mmu8NFFF؍G ^"&GZ&WF +^"&G$F+^"&G ~ sF=rmt =tmt=mmu[ F FF؍G ^"&GZ&WF ++^"&G"F++^"&Gb^"&G`^"&G"&Gf^&G^"&G^&G^"&G^&G^"&G^&G^"&Gs^&Gd t v"&Dq ^"&Gs&Gq^&G^"&Gv^&G^"&G6^&G ^"&G8^&G ^"&G.^&G ^"&G/^&G^"&Gh^&G^"&Gi^&G^"&Gj^&G^"&GlF^"&Gw$PFPP6t@F^&<t<u6F F=wmt=amu^&?tFs/j*^&?u' (~mmukF=rmt=tmu i^"&G 3^"SP FFP ^"&G@^"&G :it:kuFFv ^"&G>FFv^"&@Fv^"&x"ti&Gwub@JPF u,vZ^F&^&G ^SF tvF^"&@VZ&PX^&GFth^"&Gwt^FFFFFFFFŌFǰFɈFʈFˈF^"&GsF&GqF^&GcF^SvFPPFPP F t^"Ss FFF^"&GF^"&GxF^"&Gz^"&s &_ ^"&_F^"&wF&_v˷F^"&wxP F@F^"&Go^"&wx&wo ^"&wxP ^"&G :jt:u^"&G tu ^"&wx ^"&wxP ^"&wxP ^"&G :it@^"&G :ku&G tu1F޹@@2^"&u&Gn(^"&u F޹@@F޹@@ ^"&Gn^"&wx&wn ^"&wxP F޹  ^"&Gp^"&wx&wp ] U F^&Gt&GwuP+ F tF^&G FF;w|^&x"tf&Owu?&HJ tQF tFv^&@V t4PF t&F!v^&XV^F&^&GFtzF]U^&G :it:kt:jt :t ^Ss ]UQQ^ &G :it:kt:jt :t~ wc^ .9U^g %.FOXa^ &G~^ &Gu^ &G :ku$&Gs&;Gqt'^ &su$^ &qu^ &G :iuFFv^ &@q3^ &Gv@^ &G :itB^ &G8^ &G :jt,^ &G6v^ &G :jt^ &G.^^ &G :iu ]^ &G/C^ &G<^ &Gh&Oi$^ &Gq^ &Gs^ &Gl^ &GjFF^&] U^&F^&G :it :kt ^&FtSP F u^&Gb;FsFF^&O*&Od^&`tN&9Os.SP^&+Qv ^SvZPk F uF^^&G^&Z&W^&G*^&^F&9Gw^&G^&^&^&)G^&^&G*^&G*&G^j^&G^&Z&W^&G*^&^&GFF^&G`F^&FN;s#&)^F&)G^F&G*F^&^F&)GF^&^&_㋇6F u^&G*~uF ^&^&G*^&G^F&G`^&GFF^F&9G*tC u&G"FvN^&8uvv^FF^&w`^&)FFs^&G4sm&G"&;Gva&Gt$&wxP ^&Op^&wx&wp ^&Gt"P ^&G@^&G0rS/ ^&G4F]UFPWv^ S^SQFPQ ]U^ &G :it :kt '^ &G^&^ &G^ &G*^ &G&]UQ^ &G :it:kt:jt :t~ wJ^ SP;  t^.Mi 3 'F uPvHF^ &G^ &s5&On?&w+D@ &Gn^ &Op៵&w6^ &On?&w+D@ &Gn^ &Op៵&wD &Gp~vF^ &G^ &Go$&w K&Go^ &s5&On?&w+D@ &Gn^ &Op៵&w6^ &On?&w+D@ &Gn^ &Op៵&wD &Gp^ &wxP ^ &wx&wo ^ &wxP ^ &wx&wn ^ &wxP ^ &wx&wp~F^ &GqF^ &Gs^ &wF uv~F^ &Gv^ &Go$&_v˷H ^ &Go^ &wxP ^ &wx&wo^ &G :itRF^ &G86^ &G :jt9F^ &G6^ &G :jt ~w8F^ &G.V^ &G :iu G~wF^ &G/%~vF^ &G^ &G :ju&Gt tFF^ &G :it&Gtt ^ &gn^ &On ^ &wxP ^ &wxF$P ^ &wxP ^ &wx&wn 'Ft tP4]U~u]UFFFvPF u F s 6FP^Sv^SvvF=uW~mmuPF]UV>]U uPPP>F uq&G < r < w\F sFF FFF   uDPP P>F uo &G ^ &:GwY^ &G X ^F&G;FsF^ &GPP^&GȴP^Sv6F tn<~u8F:^ &OQP^&OɵQPv>FF tUV~uF~ t~uF r~tFPFPFF^&~uq븋F] U^ SP^S ]U^ SP^S ]U^ &G :t x uPPP>F uV&G < rL< wH^&^&G^&GP^&G^&G^&G^&G^&GA^&G6   uDPP P>F u &G ^ &:Gw^ &G @ FF^ &G^&^&G^&G^&G^&G^&G^&G^&G^&G^&8G uA^&O^&8G u@^&G^ &GA^&G^ &G^&G]UFPFP4V^&?[uP60:Xt. FPQSVSVQ6^[Y=Xt ],N~] t&<F uK.&G ^;v ^.X ^F&u^& u@^] UnVnjޱ;u$:u ^&GZ~F =amt =wmt?, *uPP*P>F u~*&G < r<w^&G _^SvFPFPrF uE^&G F^&GFsF^F^S^SvFP9]UQF =rmt =tmt"6%rmP>24%^&G ]UQF =wmt =mmt"66wmP>686^&G ]U^&G :6t ^&6SP0]UQ^&G :%t ^&2S2]U^&G :6u6Sv4 ]UQF :r10^&Fr^&0FFF 10^v&F@]U vvFPF^SvP}F^&:F@F^PvPXFF^&:F@F^PvP0FF]U ^&?[u8FFF ^& ~]N u+JVuF HN;v9@N +^vp^~&=9^YF@N +^&CFP>F u^&O@wA^~&=9^Y^&G@^&^v&48^&v&4^P^&wg&wet^&^v&48^&]U ^vFF^&F^&G^vNFY^&Gw^ &Gj^&GyF^&^vNFYFP>F uQ^&G@^&^&O@wA^^Y^&Ƈ^&Ƈ^PF uI^ &k]u+JBV^ GkPRPPP^S|PPP x] U^&G F =wmt =amtw~]Nu+JV^SBRPPFPQ؍GPQ xF!t=uF,~^&Gi^GePF~v^kvNFYF^&^S^Sv^SFPF uF~u;^SvRPPRPF=u^v&xF^&Gi뾋F u9^SFPvRQWv Pv%F u ^&G ]U ^&G :t ^&G ^S\F u^&FF^SGkPF&P^SFPF u^&Oit^v8x^&GiF^S^SvF tM^G8P^SvRPPmmPF u"^&w8F t^&w8FF]U^&G :t F^&Gj]U~F =amt=wmt=rmt=tmt =mmt&^&G F^&Z&WF^&G]U^&^&G :t ^&GN ^&]U^&^&G :t ]U츊Vnjޱ;u$:u ^&G(~F =rmt =tmt ^&G ]UQQ^&^&G :t WFPF uC:~uF1~uF$^G^ &Z&W^&F^&GF]U<~SF =wmt=amuF~]Nu+JV~&Nu+JVu F@;Fs F@;Ft ~s }~u^&GM&_O^&GL&^v@^&GMZ&WOF@N+^&OL^S^Sv^Svv ^Sv6F u ^&G ]U^&^&G :t ^S^ Sv ^S8]U^&G :t ^Sv:]U^&G :t ^S6]UQ^ &G :t m~ wA^ .^ &G=)^ &G.^ &G/!^ &GB^ &GDFF^&] U^ &G :t l~ wH^.6ttttPt\htttyF^ &G=3F^ &G.'F^ &G/F^ &GB F^ &GD]U^&G :t F^&G1]U4^&^&G :t " uPPP>F t}&G < r6<w2F ^&~ t^ &?uPPPP^ Sv 6; uDPPP>F t^&GF&8G w ]FX ^Fv&DF&GF&GF&GF^&GF&GF&GF&GF&G F&8G uANsNQPP2F ti FFF ;FwU FrfF9F w[^ &FF^&O&@^&G^&w FA:r F tFPFPFPPv4^&GF&GFF t ^&Gr-FPFԴPFմPFPFִP4F tF^&wWFA:rF uJFj~t/F:Fu~t FFQ^SFP F uFP:F tFF~tx[~tNkFȈFaF:FvFRFL~tNFȈFF:FvFF~tFF  D Y n FF^&GF^&GF^&GF^&GF^&GF^&GF^&GF^&G FsFPFPFP2FFF^&F uF]UFa:r 6^ &u}^ &G ^ S^SFh^ &G F]U^&G :t:u^&w&w&w m^&G :}ul&Gs&G&;Gv &G&W^&w&w&w ^&&W^&G sH&G s@^&w&7P ^&&W!^&G :u^&&G ]Uv&D :Ws2&{؋:}u] ]Uv&D :Ws2&{؋:}u]~ ]Uv&D :Ws2&{؋:}u] ]Uv&D :Ws2&{؋:}u ]X[QSP ]Uv&D :Ws2&{؋:}u] ]UQv&D :WsB2&{؋:}u0VQFvV&D 2&{؋~t F Y]UQ^&G :ht Sv<4^&u}^&G ^SvFh^&G F]U^&G :t:up^&w&w&w FVRP^&w&w6 sFV^&G&W^SvcF u0^&wPGPP^&G :}u ]U^&G :t:}t:t :ht ^&G ^&w]UQ^&G :t&&G :t&O :t:it :jt:ku ^&G :Wr ^^&G :u F&G1E^&G :it:jt :kt:u^SFP ^&G :uF&Gj]U vPFPPF uxFV^&&W~u~tYFuRFVFV)F^v^ SPvvFPF u^ &?Gu&G &W^&&W] UF 1F1FF1Vu FFmFm1FF1VF1F ;vN^㋇~;FvNFF^&F 1^&W^&8Os&^F+~@^&GF1^&WF <1^&WF 1F1^&WF 1º PF1Y^&G]U ?r%^&&W^&G&G;F s Wv X^F&F&GFFF;FsN ;Nv&@FFڋF;Fr ,v@^&Z&Wv&^&G]Us]&G@]U cr &G;FsGvX^F&F&GFFF;Fs&@FFF]U>uP> u$>t&G>t>t]ð]U^S^Sv^Svv ^SvP3?]UT~&Nu+JVt^&?[t~ F ~]Nu+JVueNI^wF{FFHNFN+NI^vp{FF+FHNFz F FNN^^v@FFFF+ƉF~s 1~mmu*F FFN؋FFF+FFcF=wmt=amu%ЉFVFFF FFFF1F=rmt=tmuKF FFFFFЉFVFFP^Sv^SvrmPF tAqv^ SPRPFPFvF~u u~t( 0^S^Svv^ S^Sv^SvvP ]U^S^Sv^Svv ^SvP3?]UFP^Sv^ Sv rmPF u6v^SP66FPFvFF uF]U^&G :ht Sv"00^SFPF u^Sv"0Fh^&O ]UQQ^ &t3SFP ^& u/^ SwmP^S^& u^ &G ^&]UQQ^ &G<tN<uSP ^& uH^ SFP ^& u/^ SrmP^S^& u}^ &G ^&]U6P06P u%6 66P u6=t=!t3]U]. ]U]X[YZSP$t %tcRQRQS%[YZ$UQv& F*9,v,0s0v Ms\ w~ \u0J~ u ~ uP ~ u 6*{~ u ~ uP ~ u 6*؀~ uPдPF txt~ tIF .t2.Kr'6.F < r^YNv>9^Yv686FYFFW6<6 6 P66N^ P ]UFF:sWnPPPFPP nP PoP   P &FF &&GPPP^&O Q&O QPPPPPP RP^&wP P:P vvP r?nP S6FPP nPPPFPP nPS6FPP ^G FF؍O^G^G^&G ]U"щFF;wƇ>Fu PFPP P^SP PFPP P^SP ]UFFFHN;r;^&F0:r<9wF Vµ+F e P FuF]؎м .<U]U&]UQFF] COPYRIGHT 1980, 1985, 1986 CONVERGENT TECHNOLOGIES, INC. ALL RIGHTS RESERVED THIS PROGRAM IS FURNISHED UNDER A LICENSE RESTRICTING ITS USE SOLELY FOR THE OPERATION OF A DESIGNATED COMPUTER FOR A PARTICULAR PURPOSE, AND MAY NOT BE COPIED OR OTHERWISE USED WITHOUT THE PRIOR WRITTEN CONSENT OF CONVERGENT TECHNOLOGIES, INC. TITLE TO AND OWNERSHIP OF THE PROGRAM, INCLUDING ITS SOURCE CODE, SHALL AT ALL TIMES REMAIN IN CONVERGENT TECHNOLOGIES. VERSION: 9.1 (Friday July 18, 1986, 13:55) ^&v&4^P10 PRINT "BASIC Random File Conversion Program 7.0":PRINT 20 INPUT "Enter name of old random file"; OLDFILE$ 30 INPUT "Enter name of new random file"; NEWFILE$ 40 INPUT "Enter record size"; RECSIZE% 50 INPUT "Enter number of records"; COUNT% 60 MAXRUN% = 10 70 IF RECSIZE% > MAXRUN% * 255 THEN PRINT "Record size too big. Maximum value is ";MAXRUN% * 255: GOTO 240 80 OPEN "i", #1, OLDFILE$ 90 OPEN "b", #2, NEWFILE$, RECSIZE% 100 OPTION BASE 1 110 DIM R$(MAXRUN%), S%(MAXRUN%) 120 FOR I%=1 TO MAXRUN% 130 IF RECSIZE% > 255 THEN S%[I%] = 255: RECSIZE% = RECSIZE%-255 ELSE S%[I%] = RECSIZE%: RECSIZE% = 0 140 NEXT I% 150 FIELD #2, S%[1] AS R$[1], S%[2] AS R$[2], S%[3] AS R$[3], S%[4] AS R$[4], S%[5] AS R$[5], S%[6] AS R$[6], S%[7] AS R$[7], S%[8] AS R$[8], S%[9] AS R$[9], S%[10] AS R$[10] 160 FOR J% = 1 TO COUNT% 170 FOR I% = 1 TO MAXRUN% 180 IF S%[I%] > 0 THEN LSET R$[I%]=INPUT$(S%[I%],#1) 190 NEXT I% 200 PUT #2 210 NEXT J% 220 PRINT 230 PRINT COUNT%; " records written" 240 CLOSE 250 END /BasicBasTrn VER 3.0_ BASICBASICxtRUNBASICUFV33&&NNNN rN &&ЋSQR&.Ӌ&6\=t=ZtP.6\@ы&ZY[SQR&.Ӌ&6Q=tы&ZY[>tþJK3:JtK<tSE<tE[@PSQR&.Ӌ&6P\ &ы&ZY[XÜPSQR&.Ӌ&62P\ ы&ZY[XÜPSQR&.Ӌ&6Q3P\&ы&ZY[XÜPSQR&.Ӌ&6P\ы&ZY[XPSQR&.Ӌ&6RQ\ы&ZY[XËPSQR&.Ӌ&6WR\ы&ZY[XPSQRU.&Ћ&&\ҋ&]ZY[XÜPSQR&.Ӌ&6P\$ uP&.&6\$? t2ы&ZY[XnS4c4@XOQv;4\45%X34$"()4 $ %%445Q5Sp()ͿTJJJ]s+NJ*+dCAd[@EppDQC?Dd-@OAEED000!8J+IAhmloi]Ro p+p2$y!20C-41B0U0(09->-t!VyVV8> >2ðd2FdAAAT >>>AAA,>CYZ_&[r{UTϫNBTSLOSONԚLEAҒINSNDBV+V,V-O HRAL̶OMMOθHAIιELETŪATI͆EFSTҭEFINԮEFSNǯEFDB̰EƘLSŢNāRASŦDIԧRROҨRRX O/QO҂IELRIOTωO TωOSUEEXNPUԅƋNSTNNMILPRINԞLISԟPOEԈINűOASEISԓO O0EEFTO1ERGOKI2KS3KD4IDEXԃUL̖AMEהOPEοUԝΕCTPTIOκRINԑTUOKřOEEETURΎEAćUΊESTORŖE͏ESUMũSEIGHTNENUͬANDOMIZŻTOАWAХAVPCTEGQI TRTRINGPACEYSTEͽHEROΣROFƤABA SINSAIDTȡAIԗHILŴENĵRITŷO۾yy||PF<2(z{VMVF7yVh^'6\c>6s84696Y6D6>7|6c668:gx #~ G:X :Yz: /: C : RORO ,.eE%#!Dd,0.eE%#!Dd,0p86:WXEh͍T'µfTTe'ye$µfrc OüdXOR AND NOT MOD SHL SHR OR EQ NE LT LE GT GE LOW HIGHNUL ѠTYPE :X :Y:WA͍T'TTɯG og2 222\2X2Y9"!*VyFdRiʑiiji͗iO2ʹi=y,j$j $j_jy2#Ϳisi>i::i̬Csiʹi:#O͗iG:i͠TTT,oi: oi2 >ii:#O:ʆi͗i,jxʹiG:#O͗ih_y{ªi*MYGh!j_~xiͬCůG|2_jy2#Ϳijl:#O͗iiͪT2#:#G2*+N{*!2z̬C̬Ci|=iyWx=zVjzVjhVjVjVj ĬC>GʹiGh"(zrj ,"O"$y2#Ϳijj2'ʫjՠ ʫjʫjʫjʫjj:'*(!jo>g~#fo:#O*(ĬCjy®i"M  9kCkMkWkkklellkklmmm"m+mUmHmmkbmnm}mmmmm9lzW{_9lzW{_9lzW{_:#ľC*$ |/W}/_*$:#ĚCľC|/W}/_:#O9lzʚk)Ðk9l#+}zW{_àk*$:#yCͭkyk:#kkyO2Ilͭk:#Cyk2kyO:#lyOľCͺm {_zW9lDM!>=5l))#l#l :#ľC ľC*$:# aly ľC:#O*O"M*$9lz̬CzBl|G|ʍl|l͐ll|/G}/R O!>ël Ҫl7>{_zW}o|g=¡l|g}oɯO_yW9lzl|l|hll>OiGC:mVm:mV?m:mVW :m/m:mm:mV7m?m:#ľCͺm*$> O2#*$\W> O2#*$]W9l}ͲX_9l}ͲX_9l}͠X_9l}͖X_9l}ͲXo{ͲX_CC7@?2"<   W2u{"tY U&YŠʢS[ӋW"t1 dӉf] ۇӻ_t "uI2Ѣ7J; RKP XSf#[ZYS:uRK7KCCS:;[ZuZUZӱVS:^VS^Vp m ur_ SxC^Vxò<.YuK<t< u2KrSP;rX,0жڇ[X[u<t< t,aYSS^VPQQ{< u<tS^VPCS;[sKrBs I M[òtöU<t[^V[:͊K u:uC<"tt,u:ƊX7KRPX^V:Ŋt <rS<u1SC;sl;Zs1;s Zog^V Z[:[h^u0 tt:r,s~PT nXPy CYsQ2JB[SRRK>]4K<[t<(u(CGu <"u3<(t<[t<]t<)uu$t<,t^V:Bt}tSGu[K^V<,uz[K [tBSn 2J>CtE,BE^V,2^VR:Et J t 2b>CtE,BEt%Pu:]<"tJ t:.EKXȠb uÊӻ^VR#XP<QsDDKt :Et^VKtQCZJ tgR[% uCC uCC<|,^VPRub[6XA3܋Pb<)tG,S6>,XX tN܋ZJ xJJJÊ *<~tUCCt& u&&%>t&v䡼PPH ,S,[^_Nj u t&&S[ùVQyà^VQ=ZRQ7Z;ڇs ZYXSRA*sS;[sR ҇Zt C KuQ$YZ[RC t^VCه[_Q< 2MKCC uCCe tȠM tI[ Y[SQ [ZK< uRgSCCCC/*SSK/KK[àM uZC:t C O M M AD?,@.A$B/<"uDC t=<"t8BC t/<"t*@C t!<"tAC t<"t?C t<"uC?q@yKBASEm tSjӋl;t[,0s<rlm׊ uCP,t 3S* Sz,-ZsrRCc5 u*DW [ñӋjKt<"u t <"uSQK;^.Vu <:r_هӋtSۋZrKnt tÜuS YS"t dSf28##tٰP,uS3[X#^"X@{"#f ۺu؋dtø2RS~j^V P,X:t^VSj;uZ[^VR{[~t[>uS>IIII xIIڇӋl;ڋBAuIىl[<,t9X[Êb}JlA^E62w8HMľfK:|O\ 5$4RKB.aUPo ̼ Y$ /\[_6A_p caw+fCzՔVijl7mGG'pfXQsOnwأp= #zL} Hz@PC$t(< >(kn@C:h* 51_c.1@v:k ^# bx-Àz&XƐn2xʵW ?h)͢SЅ@aQYԦo% 'N x9? 6!OgI#E@|o|p+L67EV߄vl: {Η@H½p Pv5$cCu͍M r5r1Ƥ~@zZrN vH Tʚ;@B@B''d ;8|Yt&wz^Pc|u~r1e&X4#]I׳]b5~P$L~y DNn"~CÞ&01234=>56789ABCDEF<taϻي u S[,ӉŢ à uÊ\ϻيC7CSCC/CC[C7B7Kt1QيC7Ӊ<uCSCC [tY2Auu<tλًC7u<t΋ًWNRSӉ3[Z[XSP<uf<u9XRQ˟PڊDtf,6B6f tfPQSIs4< uu<"u:fu #rSȊ<"t0< St^[<u&Ȋ:ftr&< u< t:f t t :t :tzsS<"t< u0r+< t:fu< u r<tޞ[, t l[ޟPXPsCXr?[ uÈCtY뵶2o 2PKrt,Rt*X2&X9C"usu%SQPDRQXYy[Y[<,tQ<#uu^VSDRRQ2YZ2]uU,tHȇӻًnLJӺيӊ<,tRQPAS XY^VRSىӋn;s[ZӈC[ y RnY^VSQ;/^VQSC tl;s9h;r1ѶlڇӋ4;rc*[Y^VRQYZlF^VQSC[CY[C:s*ŊȝrtCBYYYYYs[ð uËB[Y^Vu Q UY^VQSb$(R<,uM<u2P)X^VP ucSYXPt!y<tCuXUsÿø(y tyà t ty à<r S<[3һ;r;r66Z[rùCCùKKÀO ûr%Q'GC2Y t& tQYGuþDHÿ.߃ÿ꿶QSW_[YQSWËr?SW2x? x+rBu:+r9u12_+r+u#+r!u2GSW2y& x ,'Qޠ yu s  Y_[ûSW2yQĻ=u .+V.^x xá xx6á=uSn [û2󫢏r_ùrr߹zrlcnr$cs]5OOUÿDsJXGGP*yrq :ʇfDDuًUS:SR(tKÇ?uhUjCCCCSq[t Qʋj[YYʻCC:u:t9uں2uv:uuCKiS|[Ktu1,<,t*Sމ|[Kt[,:t ALLu,:tj vQYZQىys Ӊw[;rʝtuSKCC uCCO t<:t:t =K4tS>qtd 2 >u <(u i<(uI[G u KRPR u$Sʻ"LSILI x â><(u^VII[KuX<(u )uH,^[jh;tXSCC $ClٝYxQjډj[χӋl;ڋBAu*ÊЊNJJIىlËl;t%SCC $CC/CٝYxQ[׋hj;tCCCPX<uD2жYl;tcCCPCC/CXS<u6[C6;t˹.MQCCC uSh;[sS;[rSKKKS[N[lˋhj+ډ^4pGK4v tyˋw7ۉjl°{u t2{uhˋ^ىj4CӋp4;ڋBANuIىl|K u{rImȱ-KtVSt>3ߋCC7< u B7KK[Klt#<;t,K^ƠB빰"b߰"S t <u־[ S[- S[ >xuݰ ݰ  =t y=Kr .Ku, OQ2wsj2C<.rBt <:s<0sYr3Q ŋBC<:s<0s9s<.t<'r Y<&s!OR<%u<$uux,(u,3uC2>S] Ztډ[>#PZ t$2Zj[h#2Y^V[^VRP;t纼;ZtI^VSQQAAAlSYSl[lىjK;uZ7CZCZB[2؉u>[Ë 讱\PQIYX8s^S蠾[2ûxCCst3KKKKCCsWKKuCCt á t6 t t3ɋ6*s ن߉ߓ֊2㜴 2 tFr6&% ĢÀr֊2ۀtЀ ˀ uy%*̊Ês/u!Buus t x àt`tj6>@QQa󥾏CCs"Yt u ! u uf3Ҋ߹ U.VW+s_^ y u]ӊ֊] SWQ,0P:Xy sx HPr3P$tiy&Z66[ZZ ZMY_[2>Ct>Dtg.Fn.Hq.Fx.H,V3ϋPIX u<&u<-t<+tKEs>Ct >Dt:Btl.HYb>Ct >Dt:BtN3ҋ:Ft ;.Ft$M+.F.3bNbjbjbrbxb~bCbCb2I5AuyQSWi_[Yz3ҋ[t 2u zSy[ y+pKtHx'rR&ZyRbR:Z&x%;RjrG yS[[䟀>uSWy_[3r<-u<+t rÁ rP Z0232侾D yފ t  uË6 t,ϋ#S߁îsBsB[tGGۋS[tFF뾾 t  xCCz du t u[2QPXsBZsBڋ׋s uN y uAӊՊߊ? SrQ ty YP{ Xy Y&XyPG X~ :r Űŵ[P20uCK?0t?8tCXt+PKE{D'CX+y-ش/, s:CĉCCٻô|=.VEE6/+sC6uù=V2.תNuYɀ?0uC{wQSS[t[Y-= P/PXPsX<:u 1C0CXuQ fY)SQZ[Yt 7"Y[s=PSR]/PXPs.V.^EEEX[CXuBBQV.G^YQ.GYSQ3W9. t#_+W;sZѻ;3!s_OW_r <9sX, XY[ SW2y& x 83Qޠ yu=#u$ s  Y_[À>Dtg.Fp.Hq.Fz.H/ & t :*uut1.H:Ft ;.Ft&M+.F.gggggggggggK0&tKAuK/2 0Cu0Cuû/h S [y -S/[ C0uCy3 5 xh t`>΀s@3+s NFރ6$e,WQuy u u2 yRS66 [Zf[Zt# y 3iW$SR66Z[SuRSF[ZyZ[<SySRZ[؏&sEIWSRJZ[mSR.sZ[SRutZ[AbZ[6Z[^~Qu à,P=Z[n޻=Z[Z>Z[&1Πjr8CC@u) t*t&x!u߀,vv& 뽀 v܊> x,urފԀ t@uuw܀ >.RUSX[[ZO.P66..Z[XHtPSRV-^..V@^SsC<nr [K%6ܵst[x?*y26RYZ62 t6Р tȊŠx2yPQRS[ZYXx*y%R6O?bC22**:?R6**x"'6 XZubix]*,Ƞl$@u3۴r[t SPzZ[P tt u*PxNSPPXuXPrĘC<;Ę)X[xXYQPSPX[2ܠ t ů2X6P.X ~+X uK:?tCbXrĊ&* t u G@u2䣚 t+S[y-S[C0ڡxhS[t/CC>b2++tC< t<*tKSP2<-t<+t<$t<0uCsKKX tX t[%á̵s SR2Z=,xRJXP uKxY tmy CϠnEC.&=ʠ=2&C2E.&=2.=.=و&CE CC$C롋CE3&sCCutu&&$Ã߀ĀsBuuu XߝuFF> ߈ËڋQFr >y>y=ۻYQgڻ:ڻf8ػsYűڋÀ&IIws y $EIPd66VZ[662,[Zd y EIW$r pW3һC0 x:pW66׳][Z66׻=8[Z66[Z=Ix {<t<t <t %DKRtQDYSr;s@%Wى[Z 2<t}QSًCB^V<,uK辣t逜^V uf[YSQRV٠ tDT^Z[[tK DT¹ Ӌh;uû=؊*.2P=Ŋ؊X.2Bu u 븹 Ӌh;uû=Ŋ؊*.2P=؊X.Pr2ŋBu u S"[tßPt tXKRډ2t.CBIu[:,h迲2>{uKKKS5ӉCCSrsً[uCUZ$Њ*Ê؊NJs<r*Ê؊NJs翉Ӊ4Uڿ+KKŸ r%D \K'uVn(^K<)uS.&[VK^>u [>uERt>t駙VSݻSw.&.&7.3^&[^<,uV脠^V̿)^L +;Ltr!D">V%^D óFt Bas-SamGen CTAsm 10.2*??SEG??SEGDATADATASAMGENCODEDGROUPhhsh$RpSetImageModeBrn#tagTableM tagPtrWrite tagSplWrite pSetBsLfaSyncSetBsLfaC tagGpamWrite<tagNul sTagProcsK fGpamBsDef3tagLast' SetImageMode pGetBsLfaSyncGetBsLfa QueryBsVid/ pPrepReadMMDo tagDiskReadM tagSysOut QueryVidBs! DiskBsOpen* pQueryVideoBs tagCommModify; tagKbdReadw tagVideoWritebsKbdZ tagLptWrite pPrepWriteMMDk tagCommRead9bsVid> deviceLast(tagSysIn fSplBsDef. tagCommWrite: SplBsOpen/ OpenTable fDiskBsDef) tagDiskModify8 tagDiskWriteb GpamBsOpen4ReleaseByteStreamLpt CheckPointBsCSetImageModeIllegalOpenByteStreamCFlushBufferLptFlushBufferVid FillBufferN GetBsLfaSyncReleaseByteStreamSDOpenByteStreamSysOutFlushBufIllegalCheckPointBsSD FlushBufferNFillBufIllegal ReleaseEasyCheckPointBsLptSetImageModeLptCheckPointBsSysOutReleaseByteStreamCOpenByteStreamKReleaseByteStreamSpl FillBufferSDOpenByteStreamSplOpenByteStreamNOpenByteStreamSDFillBufferSysInSetImageModeBrnFlushBufferSysOut QueryVideoBs FillBufferK SetImageModeCOpenByteStreamVid FlushBufferC SetBsLfaSyncOpenByteStreamLptOpenByteStreamSysInChkptNopSetImageModeSpl FlushBufferSD[Kbd] VV [Vid] V V [Lpt] V#V#[Ptr] VV([Nul] VV2[SysIn] V$ V$>[SysOut] V V N VVR V V V V V Z V V ^ VVc VVg!V'V'V V V V VV xVVV V  V%V%VVVV V V)VVV%V%V V VVVV VV VV VV VVVV V!V! VV VV  VV VV!9V V V%V%V V VVVVV'V'V V  VV  V&V& )VVV V V% V% VVVV  VV VVVV VV U]. AG VV  U]. AG V"V" U]. AG# VV U].# AGP'  VVV VBasForPLM86 V2.307/18/86 14:05:4͖1STACKMEMORYCODEDATACONST BASFOR_CODEDGROUPh@E˘HH T D K+ MAKEPOINTERGETRAGETSA$PWA. DUQQFFFF^]ҠUF]i$UF]].UFrF^]̊tBasIniPLM86 V2.307/18/86 14:06:1ϖ1STACKMEMORYCOEDDATACONST BASINI_CODEDGROUPh@BɘHHrT:ɘD%$,%* KPBACTION VFINITIALPROGRAMRPBBUFFERIBBUFFER IBBUFFERMAXSABASDS BASMEMLENOLDTERMtNEWTERMVFCTIXĐ9 INITBASICBASICVIDEOINITBASICFILESYSTEMINITEɌRGPARAMCPARAMS CSUBPARAMS ALLOCMEMORYSL INITVIDFRAME INITVIDMAPCHECKERC DISPLAYBYTEDOFILEIO FATALERRORRUNBASIC PRINTBYTEGETBASDSKSNSKGETSPRINTWIDSETGETPRCOGETERCMESSAGE FREEMEMORY GETMEMORY RESETFRAME FLUSHBUFFERBSVID WRITEBYTE GETUSERNUMBERGETPARTITIONSTATUSQUERYDEFAULTRESPEXCHREQUESTWAITBASICOVERLAYINITSETSCREENVIDATTR WINITIALBPVFACTION FLPRINTOPEN PFREEHEADSENTINELRGBASFILESTATE PICOLLEFTOFF PILINELEFTOFFPCCOLS SSAMBUFFERqxSBVERRUNPBRUN1CBRUN1PBRUN2CBRUN2PBHEADERCBHEADERPBTURNCURSOROFFCBTURNCURSOROFF WMAXFILES WMAXRECLEN'%$,%*k D,)VVV VV V VV V$VYXPU&F sFFFFFFPPFFFF^FFPF tFvFPP &FH&G$rF~v:DPP6DPSP!PP_&&+ȉr%&PJPPL&   &RFۚvxFP t4PPFPP^SvYv d PP t&PPFPP^SvEFrP u /V5VWVrVxV~ąĉğ̤V̪VİķVVV ЎԎV ގ VV!$V*048?EH"NV`VvV|VŌ4͘V͡VͷVͽV͆5\VPPFPPRPPP6>^YNv>9^Yv686FYFFW666P66^ P]ҜfVV"'V-V3,8<-PT-f-jq.u/Ąč-đ/Ĕ̗\ğĤ!Ĩ4Ĭ5ıĵ̸V V UFFsWPPPFPPP PPP&FF&&GPPP^&O Q&O QPPPPPPRP^&wPPPvvPRr?PS6FPPPPPFPPPS6FPP^G FF؍O^G^G^&G ]˶+!+,V2V7?VEVJM'Q'TW([(^a)e)o}"ā̦V̬V̿VVVVV V01V V++%V+V062<3DVJVa'e'n(r({))$EUщFF;wƇFu PFPP P^SPPFPPP^SP]HO # %$$%!%&%;&MVSVaVgVl*yVVĄ*̑V̗VbUFFFHN;r;^&F0:r<9wF Vµ+F e PFuF]TLVt BasIni_dxPLM86 V2.307/18/86 14:07:5ʖ1STACKMEMORYCODEDATACONST BASINI_CODEDGROUPh@gHHrT:ɘD%$,%* KPBACTION VFINITIALPROGRAMRPBBUFFERIBBUFFER IBBUFFERMAXSABASDS BASMEMLENOLDTERMtNEWTERMVFCTIXĐ9 INITBASICBASICVIDEOINITBASICFILESYSTEMINITRGPARAMCPARAMS CSUBPARAMS ALLOCMEMORYSL INITVIDFRAME INITVIDMAPCHECKERC DISPLAYBYTEDOFILEIO FATALERRORRUNBASIC PRINTBYTEGETBASDSKSNSKGETSPRINTWIDSETGETPRCOGETERCMESSAGE FREEMEMORY GETMEMORY RESETFRAME FLUSHBUFFERBSVID WRITEBYTE GETUSERNUMBERGETPARTITIONSTATUSQUERYDEFAULTRESPEXCHREQUESTWAITBASICOVERLAYINITSETSCREENVIDATTRIOCTLSIGNAL WINITIALBPVFACTION FLPRINTOPEN PFREEHEADSENTINELRGBASFILESTATE PICOLLEFTOFF PILINELEFTOFFPCCOLS! SSAMBUFFERSBVERRUNPBRUN1CBRUN1PBRUN2CBRUN2PBHEADERCBHEADERPBTURNCURSOROFFCBTURNCURSOROFF WMAXFILES WMAXRECLEN"%$,%*k D,)VVV VV V VV V$VYXPU&F sFFFFFFPPFFFF^FFPF tFvFPP &FH&G$rF~v:DPP6DPSP!PP_&&+ȉr%&PJPPL&   &RFۚvxFP t4PPFPP^Svv d PP t&PPFPP^SvzFrP uޜ /V5VWVrVxV~ąĉğ̤V̪VİķVVV ЎԎV ގ VV!$V*048?EH$NV`VvV|VŌ6͘V͡VͷVͽV͆7\V/PPFPPRPPP6>^YNv>9^Yv686FYFFPTPtPPTPP&PTPPPNPNSP666v66^ P]=VV"'V-V3.8tZ]>u] ):?IڠUr^&]rD6&^&@;tSPP]^S]:&15BGKTYbVhVu~VU FF^dFFFF^&F^&F t ]2~tF> ~tFIF;sv+؋FF,s/vF9~V tF6~X tF4~c tFC~ tFD~ tFEq~ tFF_~ tFGM~ tFG;~ tFF)~ tFH~ tFDF'F^&] <Đ.UP] V VVt BasPrm_dxPLM86 V2.307/18/86 14:13:2Ж1STACKMEMORYCODEDATACONST BASPRM_CODEDGROUPh@UHnHTD K$VFACTIONBACTIONERCSYS)SYSERCDOFILEIO KSNSKGETDEALLOCMEMORYSLREADKBDEXITCHECKERC FATALERRORBASOPENBASCLOSE BASDELETEBASREADBASLASTBASWRITE BASRENAMETERMINATEBASLPTVFINITIALPROGRAMPBBUFFERIBBUFFER IBBUFFERMAXFTYPEDIOCTLOLDTERMPBACTION DWd   h=C55@''56'''='555'J7999:=9'95=999'5@9''''=99999''=Š U]͜  U~ s Y P^.^S^Ss^Sf^SY^SLY P@^S3^S&Y P*7DQ^kw^Sv]wJV\'V4VAVNV [V gVtV ́V ̍VĚ\Ĝ\Ğ\Ġ\Ģ\Ĥ\Ħ\Ĩ\Ī\Ĭ\\WUQr]&&>tZ]>u] ):?IؠUr^&]rD6&^&@;tSPP]^S]:&15BGKTYbVhVu~VU FF^dFFFF^&F^&F t ]2~tF> ~tFIF;sv+؋FF,s/vF9~V tF6~X tF4~c tFC~ tFD~ tFEq~ tFF_~ tFGM~ tFG;~ tFF)~ tFH~ tFDF'F^&] <Đ+.UPPTPP]ӜV VV!VtBasPrtPLM86 V2.307/18/86 14:14:5̖1STACKMEMORYCODEDATACONST BASPRT_CODEDGROUPh@!HHT&ݘD K4 FLPRINTOPENPRGBBASLPTBUFFER BSWABASLPT0 DEFLPRINTTERMINATEBASLPTk PRINTBYTE+nCHECKERC FREEMEMORY GETMEMORYOPENBYTESTREAM WRITEBYTECLOSEBYTESTREAMPBLPSPECCBLPSPEC SSAMBUFFER DoUQs kF uNPPF u5PFPvPPwmPS6F uF]# \ %V1IO RV_FkUQQs%PFPSFFF]˗ V #(V8xUQrPPPPPS6RPPwmPS6PPvP]:; VV$*0CI LVRVX\dVjVtBasRwsPLM86 V2.307/18/86 14:15:4̖1STACKMEMORYCODEDATACONST BASRWS_CODEDGROUPh@OHH T,טD K%BASREADBASLASTBASWRITE^ READBSRECORD WRITEBSRECORD READDARECORD WRITEDARECORDQUERYDALASTRECORDRGBASFILESTATE# DU^&FFF^&GFFF^&GFFF^&GFF؊s(ĿW^SP^SFu9F2F^&GFFĿWvv^SFF^&]KSfVĔ̤VhU^&FFF^&GFFF^&GFFĿWFPFF^&F^&]# ;EVfU^&FFF^&GFFF^&GFF؊s&v&TVĿW^SRFP/F^&GFFĿWvv^S^&]i;QaVĂ̒VtBasVidPLM86 V2.307/18/86 14:16:4˖1STACKMEMORYCODEDATACONST BASVID_CODEDGROUPh@,HH T(ۘD$ K8FUSELP  PICOLLEFTOFF PILINELEFTOFFPCCOLS5 DISPLAYBYTE CHECKACTIONvSPRINTWIDSET[CHECKERC PRINTBYTE RESETFRAMEQUERYFRAMECHAR FLUSHBUFFER INITVIDFRAMEBSVID WRITEBYTE PBTOFRAME0 CBTOFRAME0VFINITIALPROGRAMBACTIONVFACTIONVFCTIX$. D LzUr] rv&?t~tFFPFPPFPPvsqFrg&F&Nt&ȈFNNPFPFPFPP~tv]rb~tP PP8FtQPP~t &&~ t&&P&Y]8] )V/ObVh\năčĞVV\V V V&V5?OWeY6vU~t ~t ]  & + UQQr] r1~u(FFHN;s^&0FtP^SvFPPvr&FP1&&P&Y]+$ HVUgVm\s~ĔĢΠ[UQr]&F&8G sr]PPPPPNQ&&O QPPPPPPS6F]&;VAVSeVkVq w z\ĊtBasLog CTAsm 10.2??SEG??SEGbasicbasichxs@INEG2O7@STKERR3@CHEAD@TEMP88@RNDXC@DOCNVF#@INITBr@VINTJ@@FMULSd@CVIA@PBUFF@ERRDV0 @@FINEb@MAIN~@TEMP36@INCHR X@@SHRAG@FLOATRX7@STRLT2}-@DERNMF @@XCGAFG@FINBCKa0@@ZX@CLLPRC@KBUF@@FOTB9@PUSHF37@DERBRN @@CDSV@@POPAI@@VNEG@I@BINPSVD@DLINE B@SYNCHR#4@@CLROV,@FVALSVf@@ARGLO@ORGPPR@@CHKEL]@VMOVMF7@ATNFIX@ENDCON|4@ASCB0@OPNBLK%@@FOTCVe@INTIDX@@FBUFF@SUBFLG>@EXTBLK1@MRGFLGu@QINTJV@CHPLPT@NMLOFC@@FINDBva@ISCNTCX@FILGET]A@RETVAR@@TMERR @PROFLGt@FINCHF@WPLMDG@LEN20@DCXBRT7@ERRBS @FD@SIZ@SYSTEMCA@FMULTY6@@FINInV@@RNDA=@@ATNC1=@@DP07;@STROUTF@FPWR^6@@DFACL@PARM1@ERRBFN4@VDFACS7@@FOTEDY@IADD|6@ONELIN]@WBPINI@ICMPA8@SNGFLT!@CONSTR@OVCSTR@CHRGTR@OKGETMOD@GONE@ERRFIN@@NAMTMP7@@FOTZSJg@@COSRo@CHNENTsC@INSTRe1@TRYINEX@@MOVMFI@LEFTUS0@NAMCNT@KILBLK3@SINLINZ@@DIV10cG@TEMPAn@TTYPOS@ERRPAR@ERRST@@VALNTIW@PRGFLIIC@FRMQNTu)@DOTY@TEMPK@@MUL10mG@EVAL@@FMTCX@DSEGBF@@ZEROG@CMSPTRy@FADDS+7@FRETMS0@@DP01;@FIXER8@MAKUPL@FININLpX@ERRUE@@FPWRh@NTOPNC>@INXHRTG8@PTRFLGM@@FOR@PAKSPn@@VMVMFI@@CONI2 I@PUTDEIs-@USFLGJ@@STARTD@NAMBUF@@VALTP@PUFOUTm@@PUIm@CRDOvX@FRETMP/@RBLK@ARYEXTQ@CLEAR5@TOFF4@@FMTAL@NXTLINj@BRKTXT@VNEG@I@ERRLINW@@DPM38:@MAKINT8@MOVFM6@PROSAV\q@PRGFIN0D@NEXTX@@CHRGT$6@CRDONZfX@@FOITB|=@@Z1LO@MAXRECr@ISTAT @@PUFj@@RDLG@DSOUT-@STR@C-@SETWID5%@CLOSED@POPAHT5@EDENT@FILNA2z@CNSLEN@COMPMf@ISVAR@LPTLST@@FDV@@DP16C<@FRQINT)@DSUB'6@LEFT@0@FRMCHK%@DIMFLG@FRCDBLV@@EXPCN=@FOUTO7@CLEARCz3@MORCP2;%@DERFOV @TEMPB@@WHILE@FRCINTV@LSETE@BUFMIN@LBOERR@CHNFLG{@@QINTJV@CONINT%@CHRCON@ERRFOV2@FOUTH!7@FMLTT1@ERRFNF5@@PUFXEHm@VMOVFA7@FADD46@@STPRN+@ERRFDRB@KILLOA@READY`@@VPOPFI@@DCMPMH@@COMPMH@@S32KM=@FUNACT`@@FTDNTU@FINOVC,@@FINDSV@@Z1@TEMP2b@@ROUNXn@RUNCu3@DV0ERR @NMLO@C@EDITRTpU@CHR@U0@@DELET@@FSUBS_@ERROR @NEXTSX@@SETDB`I@@INFMD=@FD@LOG@PRCLVL@@FICH1q@PUTp@FRCSTRF7@@ARG@MDLFLGv@NAMBLK@OLDTXTf@@ROUNMn@NOTFDDQ@PTRGT2(O@WENDJJ@GETSTK2@@FLGOC,@CALTTY+@SNERR @INPPASb@SINFIX@ERROV@@VADDHIG@STRLTIy-@TEMPST@REDDY@@FDIVS`@INLED2S@ABS+I@@MOVBF H@SCRATHX3@READYRR @CNTCCNX@VALINTIW@DEPTR*@@SINlo@@FOFMTvd@@MOVBSH@@FAC@DIRTMP9@NOTFNSP@TSTOP5@FRMPRN @BYTER@GETSPA.@CTRLPT4@STPRDY_@FLGOVC@PRMLN2@@NEGEI@ONEFLG_@@DINTU@TANFIX@COSFIX@WBLK@@VCOMPgH@@FODTB-=@ERRWE@PTRGTNP@BLTUC7@@DBUFF@STARTD@PRGFL2KC@FDIVT'8@VAL41@CMEPTRw@SAVSTKU@PRODIRr@@FIDIG`@@SHDRG@@FACLO@CALLS]s@ZEROG@@SHALF<@GETBCD?8@FACLO@@RSUBM"I@SIGNG@LINPT3@INTID2@BDELB@@FOTNVf@BSERRQ@MOVE48@NFERR @VALTYP@FILPTR@CHGET@GIVINT!@@FMTAX@WSPBAS@LPTPOS@VMOVFM7@NXTCONK@DSCTMP1@@PUIZm@@FADDS$_@@INTU@@MOVAF7H@CHNRETM@@SIGNSG@@LOGQ=@DOASIG@DERFAO @OLDLINd@PRCRAS@SUBDE6@RSETE@MKD@A@ASC2F0@STRCMP,@QINLINY@FDIVD6@SWAP5@STRIN1h-@CNSGET@@FINCHg@PROLODq@FBUFFR@@NORMD j@@FCOMPoH@CHSNSa@NEGEI@FILSCNA@BLTU7@RESFINU4@PGTFLG@VARTABh@TOPMEM@EXP]@DERRPE @CLSFIL}>@STOP\4@PUTTMP-@OUTCH1X@@EXP]@CONSIHI6@DCOMPR 4@CRUNCHI@SAVSEG`@FFINIS@ERASEQ5@@ZLO@LRUNPC@FILINDA@RNDMONr7@BDECPT?@@FCI4&e@PLUSTK@NLPPOS@FILINP[A@POPHRT 8@CHKSTRF7@AFTOFS@@FOUTHWe@GTMPRT4@GETINTQ%@PRMPRV@@FOUTOOe@@CATTY+@LINSPC@AUTFLGN@CNTOFL@@FMULD\c@PTRGTRP@DERFNFy @PRMFLGZ@@CSIV@WHILEJ@CHPUT<@OAFTN/@ISLET25@CONT4@@RNDXC@LINGET+@ERRDD @GARBA2].@FRETOP4@@ROUNSn@PTRGETO@OVERR @SAVTXTS@PRCSAS@FIELDE@ISIGN8@LHSMID2@ENDBUF@PRCSAV@PRINUS*[@GTBYTCz%@ERROM@@FOTZg@NAME-@@@FCERR@GETMSG@MAXFIL@TAN p@ENDSc4@FOPCMAD@LINPOS@@MOVFAJH@@NUMB=@PRMSTK@@MLSP|G@PRGFIL@@LOGi@SGN!8@DSCPTR2@ERRWH@@SQRAh@NULL4@STRINIj-@@DHALF<@DATPTRn@@TAN p@SIGNS|8@TTYCHRW@@DIV0SN@@INEGKI@OPEN[@@@DPM01;@FCOMP>7@LINPT4@SAVFREp@SQRAh@@FSyV@@MOVFMI@FIXINPnF@LOADQC@MKS@A@IMOD8@PUTNEW-@LOPFD1G9@OPTFLGm@@SIGDn@INDSKC?@RNDCNT8@@FOTCI!e@@VCMPMI@SCRTCH[3@PRTFLG@EDITS@@GETYP=G@LBUFF@NULCNT@DMULT\c@NMLOFS@ATN+p@@DP00;@DFACLO@ENDFOR:@CLSBLK@@RNDm@CRFIN{X@INPRTK8@IADAHLR@SCCPTRT*@DEFTBLp@CHAINJ@NEWSTT@STRCPYP-@RECORD@PRCDAT@REASON#3@BCRNCYA@TON4@STRO@9-@COMMON(N@UMULT7@OPTVALl@BCOMMA@@MKI@A@@FDIVD_@LOPFND>9@ISLET5@WIDSETz@FILPT1@FILUPPf?@@DP06;@RIGHT@0@DSKMOD@@AEXPSp]@@VPSHFI@LOF>@IBUF@WRITE+N@WBUF@FINDBLva@DADDh^@GETBYT}%@IOGOR@DATOFC@@NORMS_j@@INFPD=@LINPRTS8@VMOVAF7@SPACE@0@@ATAN+p@PRMLEN@@DZEROF@REPINIq@SPRINT@PPSWRTF.@FILNAM:@OUTDOOW@BUF@@VABS+I@DERBFMv @@FOUT2'h@DIRDOxD@@FOTZCg@MOVE17@TSTACK5@@POLYj@@FADDDh^@@FINFCwV@@SINCN=@STRENDl@VARECSp@FILIDXA@CTROPT4@ERESET @PENCODtq@INLINZ@FPWRQ,8@FD@DAT@@LOGi@DERDFLp @MINUTK@ERSFINQ@RESTOR;4@CAT/@ARG@LINLEN@LINKER@VMOVE7@DDERR @STRLITx-@EQULTK@@DP09 <@LETCONL@ACTUAL@FORSZC@@FOUTh@DATA@FINqa@@FOTANY@DDIV>6@GETPTRA@FRESTR/@FINI@SINlo@STOPRG_4@INTU@POPARTNT@ISUBc6@NXTTXTc@ARYTA2[@@FOSTBs=@MOVMF 7@@FINEXb@@SNERR @@FINqa@DIMO@SETSTR[0@WCNT @@MOVRF^H@@OHCNS@FINCH1H@@IN2PI=@JMPINID@MAXTRK@CTINIT@@SEXPSs]@@FACM1@GETp@OUTLOD9D@FNDLIN$@IMULT6@FCERR@@FINSUV@MEMSIZ@NODSKS<3@FNDFOR @@PUFEl@INCHRIEX@@FIV@@MOVFC$H@FILOUT?@USERR@CHTABJ@@VMVFMI@@MOVFRUH@CONIA8@STRPRT-@STROUI-@PARCHK@@DADDHNG@SWPTMP~@ERRCN@LOC>@@MERGE@OPNMOD)@STRNG@e0@FAC@RNDCOP?@@ATNC2=@OMERR3@GETIN2T%@MAKUPS@ERRIER3@NXTFLGe@SCNLIN@FILFRMA@MOVRF7@MINPLS @TRCFLG@INDSKB?@@RNDC=@DERIER @TEMP9^@@PUEXPd@@FADDHZG@@POLYXj@@ROUNDwn@FILOU3"?@FINPRT@TMERR @LPTSIZ@@CSDV@@VMOVMI@CURLIN@RAMLOW@@FSUBD\^@IDIV6@STKINI3@NOPRINX@CVDA@FSUB96@FRMEVL$@TEMPPT@DBLK@C@VALSNG8@@PUSHFI@@LOGP=@@COMMO@CRFINOxX@EOF >@@DCMPAH@DSEGZ>@BUFLIN4&@GIVDBLo!@STPENDy4@@DPADRb@SCNSEM[@FRCSNGyV@CISISH>@LISPRT'&@PROCHK%r@ICOMP8@LOGDELE@FOUTh@MERGE?D@FRMEQL@ARYTABj@@VINTJ@DEL(@FMLTT2@DATOFS@@PUFOTm@DCOMPs8@MOVFR6@CLROVC,@@FLGOV@CALLFs@CLSALLE@MOVRM:8@STRAD1p-@DERBFN| @CHNLIN|@COSRo@@FLT7c@FINLPTW@FRE2@ERRLS@LOCOFS@RNDm@@MOVACH@ARGLO@FINPC@FRETM2/@FREFAC/@GETYPR$!@NOFUNS]@LRUN2PC@VSIGN7@MID@0@LSTFRE@ERRSO@ERREDTR@SIGNCn8@CVSA@OCTCNS@INTXT@@OVFLSN@TXTTAB@ERRFLG@NOARYSO@FLOATP6@INEGKI@SAVED@RNDMN2u7@LIST%@CHRGT2@@OVERR @DERIOEs @ISFLIO6@STRLT3{-@STRH@>-@WNDSCN ,@GETPRCe@I@ISIS.@PTRFIL@INRART8@ALPTABMBasMem CTAsm 10.2}??SEG??SEGdatadatastackstack BasicData BasicData BasMain_CodecoedMainCODE BasMem_CodecoedMemArrayMemArraydgrouphHthH h H h SaMemArray TheBeginning Main_ wInitialBpGetBasDs InitBasic؎м.AGU VVU.]AC_V V U] AT U]TBasMsg CTAsm 10.2Y??SEG??SEGConstConst ConstRgNumConst ConstRgMsgConstGetErcMessageCodeCodeDGROUPhhhhh2  y cbToFrame0cbTurnCursorOffpbHeaderpbLPSpecpbRun2cbRun2pbRun1cbHeaderpbTurnCursorOffOGetErcMessage'cbRun1cbLPSpec pbToFrame0 AG6U>Fu+Jt㋇]  *NEXT without FORSyntax errorRETURN without GOSUB3Out of DATA3?Illegal function call? UOverflow  U^Out of memory  ^lUndefined line numberlSubscript out of range Duplicate Definition Division by zero Illegal direct Type mismatch Out of string spaceString too longString formula too complexCan't continue  *Undefined user function""*BNo RESUME$$BLRESUME without error&&LaUnprintable error((asMissing operand**sLine buffer overflow,,FOR Without NEXT..WHILE without WEND00WEND without WHILE22Invalid Parameter44Unknown Procedure6 6Too Much Parameter Data8!8 Not Enough Parameter Data:": !%Procedure Called As Function<#<%!BFunction Called As Procedure>$>B_Nesting Limit Exceeded@%@_vPointer RequiredB&BvSystem ErrorD'DFIELD overflowF2FInternal errorH3HBad file numberJ4JFile not foundL5LBad file modeN6NFile already openP7PDisk I/O errorR9RFile already existsT:TDisk fullV=VInput past endX>X-Bad record numberZ?Z-?Bad file name\@\?MDirect statement in file^B^MfToo many files`C`f"uNot readable as a random filebDbuRecord size mismatchdEdRecord does not existfFfNot a random filehGhMalformed recordjHjRead/write beyond EOFlIlAccess deniednJn  in pp Ok rr  BreakttGO vvTOxxUBzz?Redo from start ||0Undefined line ~~0)@Random number seed (-32768 to 32767)@?e Press FINISH to leave BASIC or any other key to continue eContinuing BASIC LFAAVN Bytes freeEH[LPT]RUN ""  Basic  VNXVN 7UUU(*U24U>@UBasSwpPLM86 V2.307/18/86 14:18:3ʖ1STACKMEMORYCOEDDATACONST BASSWP_CODEDGROUPh@-HH TD KBASICOVERLAYINITW ALLOCMEMORYSL FATALERROR INITOVERLAYS SAMEMARRAY STATICSDESCSABASDS BASMEMLEN DUFFFFHN;r-^@;FvFF^@FFuƋFFN;vXNvFPF=uI++ȃ;Ns P+F%FF F tP^Sv]<5 pV}Văċ̠VĥıĹVV܊tBasResPLM86 V2.307/18/86 14:17:5ɖ1STACKMEMORYCOEDDATACONST BASRES_CODEDGROUPh@HH TD KBASICOVERLAYINIT DUQFF]tF($W2P<\AK7-a@LOCh@LOFh@LOGh@@FSUBSh@QINTh@@FSUBDh@TANFIXh@STRPRTh@NFERRhBASREADc@CONIAh@@SINCNh@LINPRTh tagKbdRead=@FUNACThBasMsg!z0:*"^5NSJX?Dc@NOTFNSh@CHSNSh@FILNAMh PICOLLEFTOFFe PRINTBYTEa@CLSBLKh@MRGFLGh@I@ISISh@VMOVAFhGetBasDsx@TANh@FILNA2h@CNSGETh GETMEMORYR@SCNLINhk\ap'ID1M";Wu,?f6Rz@@ATNC1h@STRCMPh@ACTUALh@@ATNC2h@INTID2h@WSPBASh@PRMPRVh@FILSCNh@@FINh@GETINTh@@FCI4hbsKbd=@NULCNTh@@DIV10h@CHPLPTh@INTIDXh@GETIN2hPCCOLSe@DIRDOh@ERESETh@NAMCNThgQ8l=]bGB3.)XLq@REPINIh wInitialBpxPRGBBASLPTBUFFERa@STRAD1h@KILBLKh@GIVINTh@@FOTZSh@@FOTZCh@DOCNVFh@CHEADh@VARECSh MAKEPOINTERC@@DIV0Sh@VALSNGh@LOCOFSh@GTMPRThBasMem!x-QG=1(8B#LVpbHeaderz@BLTUCh@SAVSEGh@VMOVFAh@@MOVRFh@COSh tagCommRead=@VMOVFMh@INEG2h@FINCHh@OUTDOh@EDENTh@BUFLINh,k'"E@\X6aSpzu;OJ1@DFACLOh@CLSALLh@WPLMDGh@PRMLENh@@NORMSh@LSTFREh@TRYINh@SAVTXTh@@MUL10h@@NORMDh@RETVARh@OMERRh@NAMEh@@POPAh@@FLTh@FLOAThpSetImageModeBrn=@NMLO@Ch@RNDMONh@DERBFMh@@NUMBh@DERBFNh@CHNRETh@PUThO^;Yc6T',rm1@JwEh|@TEMP2h GpamBsOpen= tagGpamWrite=@LINPT3h@TEMPBh@@RNDCh@CRDONZh@RNDMN2h@TEMP3h@LINPT4h@TEMP8h@CRFINh@TMERRh@@RNDAh@TEMP9h@TEMPAh@OPNBLKh@PROFLGh@@IN2PIh@@RNDXh<Y{bPl(7Kg-]#F2qvTA@PPSWRTh@FDIVTh tagSysOut=@@STARTh@@COMPMh@ISVARh@@PUFOTh@MOVE1h@NXTLINh@GARBA2h@EDITRTh@POPAHTh@@ARGh@@DINTh@@FDh@LINLENh@PLUSTKh@FACLOh@DBLK@Ch@COMMONh@OAFTNh@CHGETh BASRENAMER@@FIh@@FSh@ABSh@LSETh@IDIVh@ICMPAhBasRws!c BasIni_dx!K*G=9/L4!&BQ@IMULTh@FDIVh@MOVFMh@PUSHFh@NEXTh@NAMBLKh@MOVFRh@NOARYSh@@FORh@STKERRh@@SEXPSh@OPNMODh@BUFMINh^9hYOc/C+H4">Tm@FOUTOh@@VCMPMh@@FLGOChpbTurnCursorOffz@VALh@SINLINh@REDDYh@@FLGOVh@@FTDNTh@FPWRQh DiskBsOpen=@NLPPOSh@@POLYh@CONSTRh@FOUTHh@SNGFLTh@PRODIRh@27Q$-MUEJ<)Z BSWABASLPTa@FNDLINh@SCCPTRh@DSEGBFh@@INThFUSELPe@@FMTCXh@STPENDh@MAINh@CHRGT2h@CHRGTRhPWAC@DSUBh@@FACh@FINLPThO=/&FAJ8+"T@BINPSVh@FRCSTRh@SPACE@h@CRDOh@USFLGh@FREhcbTurnCursorOffz@STRLITh@MKS@h@JMPINIh@IBUFh@NOTFDDhBasPrt!a+07N<AbSF!&Xg]l@@FMTAXh@DV0ERRh@MID@h@DERFOVh@PRMLN2h@PRMSTKh QueryVidBs=@@FCERRh@LHSMIDh@@FMTALh TheBeginningx@VALTYPh@@ZEROh@@DFACLh@FVALSVh@MINUTKh@VMOVEhfpWAa<K\S"'kuO2F7-z@BDECPTh@FRESTRh@BYTERh@RNDCOPhcbLPSpecz@DOASIGhBASLASTc@DERFNFh@DATOFCh@DATOFShBASOPENR@SQRh@RSETh@EXPh@FILPTRh@STRNG@h@FILPT1h@DERDFLh@PARM1h@POPARTh@NXTCONhe;\O@nsE}S1`W"'x6iI,@PRGFINh@CLLPRCh@LINSPCh@ERSFINh@PRGFILh@DDERRh@RNDCNTh@MAKINTh@@SNERRh@@VALNTh@INIThSetBsLfa=@WENDh@CATh@LISPRTh@IADDh@FD@SIZh@TEMPh@LETCONh@@FOFMTh@@DELETh@PUTTMPh@FRMQNTh@QINLINh@FRETOPh;'@E"/6JNSENTINELR@TONh@TTYPOSh@OPTFLGh pGetBsLfaSync= pbToFrame0z@NEXTSh@ENDFORh@SYNCHRh@SPRINTh@DADDh?I%VDQM: *50[@FINOVCh PILINELEFTOFFe@ALPTABh@SINFIXh fSplBsDef=@FRETMSh@FRETM2h@@POLYXh@CHTABh@FRETMPh@@CSDh@@CSIh@FILFRMh@FININLhQH5(:CL-!1V>]@MKI@h@ERRDV0h@DSEGZh tagSplWrite=@@DADDHh@WBUFh@SWAPh@DCOMPRh@ATNh@@DZEROh@FRCSNGh@GONEh@ONEFLGh@DERBRNh Bas-SamGen!=iB_y2V(Q>7LZd#-nrG~ OpenTable=@ERRLSh@@ROUNSh@@CLROVh@DERFAOh@VARTABh@@ROUNDh tagDiskRead=bsVid=@CRUNCHh@FRCDBLh@@ROUNXh@ISLETh@VNEGh@@VINTh@@ROUNMh@@Z1LOh@CNTCCNh@FINh DISPLAYBYTEe@CALTTYh6:YT1!G,'BL^c@LISTh@PRGFLIh@CLEARCh sTagProcs=@DIMFLGh@ORGPPRh@CLROVCh@STOPh pSetBsLfaSync=@PRGFL2h@DSCPTRh pPrepReadMMD=@COMPMh@@QINThBasFor!C&>G9+!4\BLWR/a@@CATTYh@CISISh@MKD@h@MOVRMh@CLEARhGETRAC@INXHRTh@MOVRFh@SAVFREh@@SINh@WIDSETh@ERASEh PFREEHEADR@ISCNTCh@@FIDIGh@CHPUTh$=).FAYPK^38Uc@BDELhBASWRITEc SaMemArrayx@ERRORh@ERROVh@WRITEh@READYh@ERROMhGETSAC@@FMULDh@CMEPTRh@FRQINTh@SAVSTKh@@RNDh@FD@LOGh@@FMULShf!Nb8I.3*]S=Xj%Do@SYSTEMh@WCNTh@DSKMODh@STR@h@EQULTKh@MOVEh@PROCHKhpbRun1z@FINPRTh QueryBsVid=@PARCHKh@TSTOPh@CALLFh@@OVERRhpbRun2z@@PUFXEh@DELh@KILLh@CALLSh@kE\&7+2{bG1L@WBLKh@ERRBSh CHECKACTIONe@BRKTXTh@MINPLSh@IMODh@ASCh@POPHRTh@FOUTh@EDITh@@VALTPh@DSOUThh8"t_G/LB4&UZPod+=x@ENDBUFh@PBUFFh@@DBUFFh@LOADh@FILIDXh@FSUBh@@SIGNSh@RBLKh@ERRCNh@@FOTCVh@@FOTCIh@STRENDh@SIGNh@@FCOMPh@ERRBFNh@ARYEXTh@OLDTXTh@FINPh FREEMEMORYR@GETPRCh@FINIh^YTOr"*;&6cE2|.mJhw@@INTh@LINGETh SplBsOpen=@GETh@DIMh@FACh@KBUFh@INEGh@WNDSCNh@SCRATHh@TEMPPTh@EXTBLKh@TRCFLGh@ERRDDh@INDSKCh@GIVDBLh@@MERGEh@INDSKBh@DCOMPh@DATPTRh@ARYTA2h@ARYTABh@DERIERh@@PUFEh@DSCTMPh@@VMVMFhBasSwp!bA- <72J$]SXE(Ofk@CVSh@@Z1h@@ARGLOh@@ZXh@CVDh@SETWIDh@CLSFILh@PTRGTNh@@FOTANh@SUBFLGh@CVIh@TTYCHRh@@SHRAh@LRUNh@PTRGTRh@PTRGT2h@PGTFLGh@@RDLh@FRCINTh-"AT<Oe2E7`(J[j@LRUN2h@DCXBRTh@CTRLPTh DEFLPRINTa@MAXFILh@@XCGAFh@SWPTMPh@NEWSTTh@LPTLSTh@EOFh@@INFPDh@FLGOVCh@MAXTRKh cbToFrame0z@@S32KMh@FCERRh@BSERRhY;@Oc,1J6TE^(#jcbHeaderz@@MLSPh@USERRh@NOPRINh@@NEGh@CTINITh@SUBDEh@@VABSh@NOFUNSh@CNSLENh@DEPTRh@NAMTMPh@CLOSEh@@WHILEh@FINCH1hBasRes! BasPrm_dx!].*I]c3NSD&"7X<h@ERRFINh@CRFINOh@@ATANh@RUNCh@BUFh@TOFFh@SNERRh@FADDh@@FADDHh tagVideoWrite=@@FADDDh@FINBCKh@@FADDSh@SCNSEMh@STPRDYhRUNBASICBasVid!e+5!>RH&CWM90\@OVCSTRh@STRH@h@@LOGh@READYRh@FILINPh@GETPTRh@FILINDh@DATAh@PRCDATh@STRCPYh@OUTLODh@@FOTEDh@@FODTBh@ERREDThSPRINTendB/PZU9*KG">4_is@ERRFOVh@DERIOEh@ISIGNh tagDiskModify=@@MOVMFh@ISFLIOh@MEMSIZh@CHNLINh@DOTh@SETSTRh@@TANh@@GETYPh@@AEXPSh@FILOUTh@FILOU3h@CHKSTRh@CMSPTRh@LOGDELhBasLog!hY;',OEmh^@"c1JT6r@@DCMPMh@INPRTh@INPPASh@LBOERRh@ERRFNFh@@STPRNh@OCTCNSh@@VMVFMh@@FINCHh@FILGETh@@DPM38h@@DCMPAh@@FICH1h@MDLFLGh@GETBCDh@FMULTh@FIELDh@@CONI2hBasPrm!YWe#?-I5'[jD:n`RMs@OPENh@PTRFILh fGpamBsDef=@@ZLOhGetBsLfa= SetImageMode=@TSTACKh@RECORDh@@DHALFh@VDFACSh@RNDXh@@DPADRhWIDSETe@CONTh@FLOATRh@@PUEXPh@FBUFFRh@CHR@h@CURLINh-=_ld&Q~G!3[ByVLq8@ONELINhMain_x@BCRNCYh@CONSIHh deviceLast=pbLPSpecz@DEFTBLh@@MOVBFh@OPTVALh@ICOMPh@TOPMEMh@@VCOMPh@ERRFLGh@STOPRGh@@COSh@IOGORh tagCommModify=@@MOVBSh tagDiskWrite=@@SHALFh@GETSTKh@PRCLVLhBasPrc!WZ'd"B9G>5_,QLV0i@FNDFORh@@MOVACh@LPTSIZh@@MOVAFh@FRMEVLh@@PUIh@RAMLOWh@@PUFh@@DPM01h@SINh@@RSUBMh@NXTFLGh@DERRPEh@INCHRh@BLTUh@LOPFNDh@@FOSTBhBasic!5?[LQ"0H&D+:V_@@LOGPh@@FOTZh@@FOTBh@NULLh@@PUIZh@@TMERRh@@FPWRh@@LOGQh@@VNEGh@FRMPRNh@RNDh@LENh@INRARTh@@VPOPFh@PUFOUTh@ISUBhW<"M\,'1RHaC7f@@FBUFFh@OLDLINh@@FDIVDh@STRO@h@@FOTNVh@GTBYTCh BASDELETER@@FDIVSh FLPRINTOPENa@@FINFCh@INLEDh@REASONh@@FOUTh@OVERRh@PRCRASh@PRMFLGh"h^;E1wrcOmY6@'J|,T@@CHKELhtagLast=@@FINEXh@UMULTh@@INFMDh@@MOVFMh@ARGLOh@GETSPAh@FCOMPh@@FINSh@STRLT3h@STRLT2h@INSTRh@@FINDh@@MOVFRh@PAKSPh@STRLTIh@@MOVFCh@PTRFLGh@@FINEh@@FINIh@FINDBLh@@MOVFAh@FOPCMAh.gAb3'KPYU"<]F8l@@OVFLSh@NODSKSh@CTROPTh@OKGETMh tagLptWrite=@TXTTABh@MORCP2h@ZEROh@CONINTh@FIXINPh@SCRTCHh@@VADDHh@@INEGh@DDIVh@@CDSh@@FINDBhBasIo!RBasIni!D;^16J@cET,YO"h'l@ERRSOh@@COMMOh@STRINIhcbRun1z@SIGNCh@SIGNShGETPRCW@FRMEQLhcbRun2z@NXTTXTh@@FACM1h@LEFT@h@WHILEh@MAXRECh@STRIN1h@ERRSTh@VSIGNh@EVALh",in1_;'@HdUZ6PsLx@@FACLOh@ENDCONh@FFINISh@CHAINh@LPTPOSh@OUTCH1h@STROUTh@LINKERh@FREFACh pQueryVideoBs=@SGNh@ENDSh@PRCSAVh@STROUIh@PTRGETh@FADDSh@FRMCHKh@LINPOSh@PRCSASh@INLINh*dU9Zi_/P>K%4Cn@FORSZCh@PROLODh tagCommWrite=@@CHRGTh@WBPINIh@FD@DATh@GETBYTh@@VMOVMh@ERRFDRh pPrepWriteMMD=@ERRUEh@RESFINh@AUTFLGh@@PUSHFh@@FOITBh@VALINTh@ISLET2h^Oc(mTw-2K<A#7YFhr{@FIXERh@@FOUTOhtagTable=@STKINIh@MAKUPLh@@FOUTHh@@SETDBh@CHNFLGh@@EXPCNh@FILUPPh@LEFTUSh@@SQRh@VMOVMFh@MAKUPSh@ERRPARh@@VPSHFh@GETMSGh@@FOUT2h@@SIGDh@MERGEh@@EXPh1@E#YOTJ;,6'^tagSysIn=@IADAHLh@@DP06h@NEGh@@DP07h@PENCODh@@SHDRh@RIGHT@h@ERRWEh@@DP00h@NTOPNCh@ERRWHh@@DP09h@@DP01htagNul=T6O;Yw@1cr^h"'E|,Jm@LBUFFh@NAMBUFh@CHNENTh@@DP16h@LOPFD1h@NMLOFCh@NMLOFSh@DLINEh@BCOMMAh@AFTOFSh@GETYPRh@DMULTh@MOVMFh@PRTFLGh@CNTOFLh@PUTNEWh@DERNMFh@CHRCONh@PROSAVh@ISTATh@ERRIERh@PRINUSh@VINTh@ASC2h@@OHCNSh COPYRIGHT 1980, 1985, 1986 CONVERGENT TECHNOLOGIES, INC. ALL RIGHTS RESERVED THIS PROGRAM IS FURNISHED UNDER A LICENSE RESTRICTING ITS USE SOLELY FOR THE OPERATION OF A DESIGNATED COMPUTER FOR A PARTICULAR PURPOSE, AND MAY NOT BE COPIED OR OTHERWISE USED WITHOUT THE PRIOR WRITTEN CONSENT OF CONVERGENT TECHNOLOGIES, INC. TITLE TO AND OWNERSHIP OF THE PROGRAM, INCLUDING ITS SOURCE CODE, SHALL AT ALL TIMES REMAIN IN CONVERGENT TECHNOLOGIES. LIBRARY: Basic.lib VERSION: 9.1 (Friday July 18, 1986, 14:30) %' ****************************** %' Basic: StartBasicLink.sub %' %' This Submit File takes one optional argument: %' %' Res ... resident BASIC runtime system %' Swp ... swapping BASIC runtime system %' %' The default is "Swp" %' %' ****************************** %' StartBasicLink.sub Link @ObjBasInt%0%#0:Swp:%1%#1::.fls Basic.run Basic.map @MaxMemArray%0%#0:Swp: 6000 '9.1 %0%#0:Swp:' Basic.symP PpP_@PO 0Basgen.obj Basic.lib(Basic Bas-SamGen BasIni BasMem BasMsg BasSwp BasLog) [sys]CTOS.lib(rqlabl ossub quad math32 ftlpro sameof samcommsubs swap0 swap1 swap2 swapal) [sys]CTOS.lib(CommNub_Pre10 SamCal InitComm CommStatus_Pre10 InitComm_Pre10 SamCma SamCrp SamCrx SamCst SamCsu SamCtx damoct/o dammsc/o damutl damrwd samvut/o samvutmsg samswi/o samsop/o samvop/o samsys/o samspl/o samnul/o samkbd/o samlpt/o samvwr/o saminf/o samcom/o samsre/o samswr/o samsse/o sambrn/o samscl/o samimg/o samtxt/o expdt/o rdparm/o) Basic.lib(BasFor/o BasIo/o BasPrc/o BasPrm/o BasPrt/o BasRws/o BasVid/o)Basgen.obj Basic.lib(Basic Bas-SamGen BasIni BasMem BasMsg BasRes BasFor BasIo BasPrc BasPrm BasPrt BasRws BasVid) [sys]CTOS.lib(rqlabl CommNub_Pre10 SamCal InitComm CommStatus_Pre10 InitComm_Pre10 SamCma SamCrp SamCrx SamCst SamCsu SamCtx ossub quad math32 ftlpro damoct dammsc damutl damrwd sameof samcommsubs samvut samvutmsg samswi samsop samvop samsys samspl samnul samkbd samlpt samvwr saminf samcom samsre samswr samsse sambrn samscl samimg samtxt expdt rdparm)Basgen.obj Basic.lib(Basic Bas-SamGen BasIni BasMem BasMsg BasSwp BasLog) [sys]CTOS.lib(rqlabl ossub quad math32 ftlpro sameof samcommsubs swap0 swap1 swap2 swapal) [sys]InitComm_pre10.obj [sys]CTOS.lib(CommNub_Pre10 SamCal InitComm CommStatus_Pre10 SamCma SamCrp SamCrx SamCst SamCsu SamCtx damoct/o dammsc/o damutl damrwd samvut/o samvutmsg samswi/o samsop/o samvop/o samsys/o samspl/o samnul/o samkbd/o samlpt/o samvwr/o saminf/o samcom/o samsre/o samswr/o samsse/o sambrn/o samscl/o samimg/o samtxt/o expdt/o rdparm/o) Basic.lib(BasFor/o BasIo/o BasPrc/o BasPrm/o BasPrt/o BasRws/o BasVid/o)/   @ p p!"&P._//`3O34p68`;p</ =PF/0HO`IJOJ K?5L@7'8(1)E" !+*Basgen.obj Basic.lib(Basic Bas-SamGen BasIni BasMem BasMsg BasRes BasFor BasIo BasPrc BasPrm BasPrt BasRws BasVid) [sys]InitComm_pre10.obj [sys]CTOS.lib(rqlabl CommNub_Pre10 SamCal InitComm CommStatus_Pre10 SamCma SamCrp SamCrx SamCst SamCsu SamCtx ossub quad math32 ftlpro damoct dammsc damutl damrwd sameof samcommsubs samvut samvutmsg samswi samsop samvop samsys samspl samnul samkbd samlpt samvwr saminf samcom samsre samswr samsse sambrn samscl samimg samtxt expdt rdparm)O 06360064244 $save nogen %'############################################################################ %' File: BasGen.asm # %' Version: 9.1 for CTOS 10.0 or higher and Distrix 1.0 # %' Revised: 07/23/86 # %' # %'Copyright(c) 1980,1981,1982,1983,1984,1985,1986 by Convergent Technologies # %' # %' This version of BasGen.asm can be used for both the BASIC Compiler # %' and the BASIC Interpreter. # %' # %' Also, this version of BasGen.asm can be used for operation under # %' either a CTOS/CTOS II environment OR under a DISTRIX environment. # %' # %' Note that BasGen serves a different function depending on whether # %' it is being used with the Interpreter or Compiler as follows: # %' # %' Function # %' # %' Compiled BASIC # %' # %' In compiled BASIC, BasGen.asm only defines the procedural interface # %' for non-BASIC procedures. The configuration parameters # %' (e.g. "wMaxfiles" and "sSamBuffer") have no effect. To change these # %' parameters you must edit BrCnfg.asm, (see the BASIC Compiler Manual # %' for details). To access a non-BASIC procedure, first # %' assemble BasGen.asm to produce BasGen.obj. Next, compile the # %' BASIC program and enter BasGen.obj in the [BasGen file] field of # %' the Basic Compile command form. See Appendix F of the BASIC # %' Compiler Manual for more details. # %' # %' Interpreted BASIC # %' # %' In interpreted BASIC, BasGen.asm defines the procedural interface # %' of non-BASIC procedures and the required segment ordering of # %' Basic.run. BasGen.asm also defines the following configuration # %' parameters: # %' # %' wMaxFiles - Declared in the CONST segment. Use this variable to # %' configure the default value for the number of files that a BASIC # %' program can open concurrently. # %' # %' wMaxRecLen - Declared in the CONST segment. Use this variable to # %' configure the default value for the maximum record size of a random # %' file. # %' # %' sSamBuffer - Declared in the CONST segment. Use this variable to # %' configure the buffer size for SAM byte streams. # %' # %' See Appendix F of the Basic Manual for more details on using # %' BasGen.asm to configure a new Basic.run. # %' # %' Summary of Changes from version 9.0 # %' # %' The following procedural interfaces were added or expanded: # %' # %' 1. Procedural interfaces for CTOS Parameter Management are added. # %' 2. An interface for ConvertTo8087 (in Graphics.lib) is added. # %' 3. CTOS IPC Management is added. # %' 4. CTOS Exchange Management is added. # %' 5. CTOS Queue Management is added. # %' 6. CTOS Partion Management is added. # %' 7. CTOS Cluster Management is added. # %' 8. CTOS System Service Management is added. # %' 9. CTOS Spooler Management is added. # %' 10. CTOS Configuration Management is added. # %' 11. CTOS Interrupt Handlers Management is added. # %' 12. CTOS Contingency Management is added. # %' 13. CTOS Process Management is added. # %' 14. CTOS Disk Management is added. # %' 15. Distrix System calls added. # %' 16. CTOS Calls described in Standard Software Engineering Update added. # %' 17. CTOS II Calls added. # %' 18. CTOS Graphics, Mouse, Voice/Data and Tape calls added. # %' 19. The grouping of calls has been changed and arranged alphabetically. # %' 20. "Intelligence" (skipping categories based on previous answers) added. # %' # %' # %' Assembling BasGen.asm: # %' # %' Answering questions # %' # %' Non-BASIC procedural interfaces are defined below. When you assemble # %' this module, the assemble asks questions such as: # %' # %' Are you using Forms (y or n)? # %' # %' If you type y (for yes) followed by RETURN, an entry is defined # %' for each procedure in the corresponding software package (in # %' this case, an entry is made for each procedure in the FORMS package). # %' # %' The first questions asked pertain to the Operating System to be used: # %' # %' Are you running on CTOS operating system (y or n)? # %' Are you using CTOS System Calls (y or n)? # %' Are you using CTOS II System Calls (y or n)? # %' Or: # %' Are you running on DISTRIX operating system (y or n)? # %' Are you using DISTRIX System Calls (y or n)? # %' # %' When using CTOS, only the flag fCTOS will be set with a "y" answer. # %' If using CTOS II, also, both the fCTOS and fCTOSII flags will be set # %' and additional calls will be automatically added. # %' # %' When using DISTRIX, only the flag fDISTRIX will be set and questions # %' pertaining to CTOS functions will be skipped. Questions that pertain # %' to both Operating Systems will be asked in either case. # %' # %' # %' # %' Results from answering "y" to assemble questions: # %' # %' General # %' # %' The end effect to answering "y" to one or more questions is to extend # %' BASIC by creating a new set of Reserved Words within the BASIC # %' language. For example, normally a programmer could use a variable # %' named "OpenFile". However, if you answered "y" to the question # %' # %' Are you using OpenFile or CloseFile (y or n)? # %' # %' then the words "OpenFile" and "CloseFile" are recognized by BASIC as # %' external functions that require a list of parameters and return # %' a value. # %' # %' Interpreter BASIC # %' # %' Answering "y" to a question will affect the size of the BASIC.run # %' file and reduce the amount of program memory available to the user. # %' This is a normal and expected result to creating a BASIC that has # %' more functionality and power availiable to the programmer. It should # %' be noted, however, that answering "y" to many questions may result # %' in a BASIC Interpreter with very little free memory left for programs. # %' If this becomes a factor, you can comment out un-needed calls from # %' any catagory, simply by putting a single-quote after the percent sign # %' as follows: # %'TableEntry(0,2,SETSTYLERAM) # %' # %' Compiler BASIC # %' # %' The size of a compiled BASIC program is not adversly affected by "y" # %' answers during BasGen. During compilation and linking only the CTOS # %' calls used in the program will bring in external code. For this # %' reason it is advisable to assemble BasGen by answering "y" to a wide # %' selection of questions, with the possible exception of "ConvertTo8087",# %' which is used primarily when making calls to the Graphics Library. # %' # %' # %' NOTE: # %' # %' There are now approximately 510 CTOS Table Entries in BasGen. # %' The Assembler can handle a MAXIMUM of ONLY 510 external symbols. # %' # %' IF YOU ADD EXTERNAL PROCEDURES OF YOUR OWN OR $INCLUDE AN ".MDF" FILE # %' THEN ANSWER "YES" TO EVERY QUESTION, THE ASSEMBLE WILL RESULT IN A # %' LARGE NUMBER OF ERRORS CLAIMING: # %' # %' *** Error #23 Limit of 255 EXTRN symbols per object module exceeded # %' # %' FOR THIS REASON, BE SURE TO ANSWER "NO" TO ONE OR MORE CATEGORIES # %' THAT YOU ARE UNLIKELY TO USE, OR COMMENT OUT UN-NEEDED CALLS FROM # %' ANY CATAGORY SIMPLY BY PUTTING A SINGLE-QUOTE AFTER THE PERCENT SIGN # %' AS FOLLOWS: # %'TableEntry(0,2,SETSTYLERAM) # %' # %' (Note: although the error message says "255 extrn symbols", # %' recent Assemblers, through Version 10.2, actually handle 510 # %' external symbols.) # %' # %' # %' Adding New Entries # %' # %' If you are calling non-BASIC procedures that are not already defined in # %' this module, (i.e., written by you in Assembler or Pascal) you must # %' invoke the Editor or Word Processor and add a table entry for each # %' new procedure. # %' # %' Use the macros # %' # %' %TableEntry(procType,cbParams,procName) or # %' %TableEntryRename(procType,cbParams,procName,procRename) # %' # %' to define a table entry for each new procedure. # %' # %' %TableEntry and %TableEntryRename require these three parameters: # %' # %' 1. The procedure type, whose value is # %' # %' 0 if the procedure does not return a value, # %' 1 if the procedure returns a word, # %' 2 if the procedure returns a pointer (double word), # %' 3 if the procedure returns a byte. # %' # %' 2. The number of bytes of parameters that are pushed on the # %' stack when the procedure is invoked. CAUTION: Byte # %' parameters are always pushed as words. For example, if a # %' procedure takes a single byte parameter, the number of # %' bytes pushed is 2. # %' # %' 3. The procedure name in UPPERCASE. # %' # %' %TableEntryRename requires this additional parameter: # %' # %' 4. A name in UPPERCASE. This name renames the procedure. # %' In a BASIC program, refer to the procedure with this name. # %' # %' For example, the following macro invocation defines a procedure # %' INITIALIZE which takes a pointer (4 bytes) as a parameter and returns # %' a word. # %' # %' %TableEntry(1,4,INITIALIZE) # %' # %' In the next example, the macro defines a procedure CHAIN that is renamed # %' OSCHAIN. CHAIN requires 18 bytes of parameters and returns a word. # %' # %' %TableEntryRename(1,18,CHAIN,OSCHAIN) # %' # %' Add all new entries immediately following the comment: # %' # %' ADD NEW ENTRIES HERE # %' # %' Note that some Convergent Technologies software products, CT-DBMS for # %' example, contain Macro Definition Files (xxxx.mdf) which are pre-written # %' lists of the procedures used in that product arranged for each language. # %' An mdf can be added to the BasGen simply by adding a line similar to # %' # %' $INCLUDE(BasGenDBMSEntries.Mdf) # %' # %' to this BasGen.asm file, in the "ADD NEW ENTRIES HERE" area. # %' Note: The character "$" must be the first character on the line. # %' # %' # %'############################################################################ $restore ;############################################################################# ; Segment Ordering and Constant Declarations for the BASIC Interpreter # ;############################################################################# public rgForeignProc, sSamBuffer, wMaxFiles, wMaxRecLen extrn InitBasic:far data segment word public 'data' ; beginning of Dgroup rgForeignProc LABEL BYTE data ends stack segment stack 'stack' stack ends const segment word public 'const' sSamBuffer dw 1024 ; size of a Sam buffer ; - use 512 for synchronous byte streams ; - use 1024 for asynchronous byte streams wMaxFiles dw 6 ; default number of files that can be opened ; at the same time wMaxRecLen dw 128 ; default maximum record size of a random file const ends heap segment public 'heap' heap ends memory segment public 'memory' memory ends ; end of Dgroup Basic segment common 'Basic' ; extrn @baslog:near Basic ends code segment word public 'code' code ends BasicData segment public 'BasicData' ; BASIC data segment BasicData ends coed segment word public 'coed' coed ends MemArray segment word public 'MemArray' MemArray ends ;!!! Must come last ;############################################################################# ; End Segment Ordering Declarations # ;############################################################################# %*define (TableEntry(type,cbParams,procName))( extrn %procName:far data segment word public 'data' DB %type DW %cbParams DD %procName DB %len(%procName) DB '%procName' data ends) %*define (TableEntryRename(type,cbParams,procName,procRename))( extrn %procName:far data segment word public 'data' DB %type DW %cbParams DD %procName DB %len(%procRename) DB '%procRename' data ends) ;############################################################################# ; ADD NEW ENTRIES HERE # ;############################################################################# %' -- some sample entries --- %' %TableEntry(1,4,INITIALIZE) %' %TableEntryRename(1,18,CHAIN,OSCHAIN) %' $INCLUDE(BasGenDBMSEntries.Mdf) ; -- add your entries below ;############################################################################# ; END OF NEW ENTRIES # ;############################################################################# ; The flag fCTOS should be set for CTOS enviroment. ; The flag fDISTRIX should be set for DISTRIX enviroment. %IF(%pass1 eq -1) then ( %out( Basic Generation 9.1 ) %out(pf) ;This disables video's Pause between Pages %set(fCTOS,0) %set(fCTOSII,0) %set(fDISTRIX,0) %set(fDISTRIXsc,0) ;############################################################################# ; Check which OS this BasGen is for, CTOS or DISTRIX # ;############################################################################# %WHILE ((%fCTOS eq 0) AND (%fDISTRIX eq 0)) ( %out( Are you running on CTOS operating system (y or n)? ) %define(bCTOS)(%in) %IF (%eqs(%substr(%bCTOS,1,1),Y)) then (%set(fCTOS,1)) FI %IF (%eqs(%substr(%bCTOS,1,1),y)) then (%set(fCTOS,1)) FI %IF (%fCTOS eq 0) then ( %out( Are you running on DISTRIX operating system (y or n)? ) %define(bDISTRIX)(%in) %IF (%eqs(%substr(%bDISTRIX,1,1),Y)) then (%set(fDISTRIX,1)) FI %IF (%eqs(%substr(%bDISTRIX,1,1),y)) then (%set(fDISTRIX,1)) FI )FI ;end of fCTOS flag NOT set %IF ((%fCTOS eq 0) AND (%fDISTRIX eq 0)) THEN ( %out( YOU MUST ANSWER YES TO EITHER CTOS OR DISTRIX OPERATING SYSTEM. ) )FI ;end of NO flag set ) ;end of WHILE loop ;############################################################################# ; Inquire if System Calls will be used and set appropriate flag(s). # ; (This permits the building of an expanded version of BASIC or the # ; rebuilding of a "plain vanilla" version of BASIC.) # ;############################################################################# %IF (%fCTOS eq 1) then ( %set(fCTOS,0) %out( Are you using CTOS System Calls (y or n)? ) %define(bCTOS)(%in) %IF (%eqs(%substr(%bCTOS,1,1),Y)) then (%set(fCTOS,1)) FI %IF (%eqs(%substr(%bCTOS,1,1),y)) then (%set(fCTOS,1)) FI ) FI %IF (%fCTOS eq 1) then ( %out( Are you using CTOS II System Calls (y or n)? ) %define(bCTOSII)(%in) %IF (%eqs(%substr(%bCTOSII,1,1),Y)) then (%set(fCTOSII,1)) FI %IF (%eqs(%substr(%bCTOSII,1,1),y)) then (%set(fCTOSII,1)) FI ) FI %IF (%fDISTRIX eq 1) then ( %out( Are you using DISTRIX System Calls (y or n)? ) %define (bDISTsc)(%in) %IF (%eqs(%substr(%bDISTsc,1,1),Y)) then (%set(fDISTRIXsc,1)) FI %IF (%eqs(%substr(%bDISTsc,1,1),y)) then (%set(fDISTRIXsc,1)) FI ) FI ;############################################################################# ; The next four questions are valid for both CTOS and DISTRIX. # ;############################################################################# %IF ((%fDISTRIX eq 1) or (%fCTOS eq 1)) then ( %out( Are you calling ConvertTo8087 (y or n)? ) %define(b87)(%in) %set(f87,0) %IF (%eqs(%substr(%b87,1,1),Y)) then (%set(f87,1)) FI %IF (%eqs(%substr(%b87,1,1),y)) then (%set(f87,1)) FI %out( Convergent Library and Server packages: ) %out( Are you using the FORMS library (y or n)? ) %define(bFORMS)(%in) %set(fFORMS,0) %IF (%eqs(%substr(%bFORMS,1,1),Y)) then (%set(fFORMS,1)) FI %IF (%eqs(%substr(%bFORMS,1,1),y)) then (%set(fFORMS,1)) FI %out( Are you using the ISAM library (y or n)? ) %define(bISAM)(%in) %set(fISAM,0) %IF (%eqs(%substr(%bISAM,1,1),Y)) then (%set(fISAM,1)) FI %IF (%eqs(%substr(%bISAM,1,1),y)) then (%set(fISAM,1)) FI %out( Are you using the SORT/MERGE library (y or n)? ) %define(bSM)(%in) %set(fSM,0) %IF (%eqs(%substr(%bSM,1,1),Y)) then (%set(fSM,1)) FI %IF (%eqs(%substr(%bSM,1,1),y)) then (%set(fSM,1)) FI ) FI ;############################################################################# ; The remaining questions are valid only for CTOS. # ;############################################################################## %IF (%fCTOS eq 1) then ( %out( Are you using the CONTEXT MGR services (y or n)? ) %define(bContext)(%in) %set(fContext,0) %IF (%eqs(%substr(%bContext,1,1),Y)) then (%set(fContext,1)) FI %IF (%eqs(%substr(%bContext,1,1),y)) then (%set(fContext,1)) FI %out( Are you using the CT-MAIL services (y or n)? ) %define(bMail)(%in) %set(fMail,0) %IF (%eqs(%substr(%bMail,1,1),Y)) then (%set(fMail,1)) FI %IF (%eqs(%substr(%bMail,1,1),y)) then (%set(fMail,1)) FI %out( Are you using the GRAPHICS library (y or n)? ) %define(bGRAPH)(%in) %set(fGRAPH,0) %IF (%eqs(%substr(%bGRAPH,1,1),Y)) then (%set(fGRAPH,1)) FI %IF (%eqs(%substr(%bGRAPH,1,1),y)) then (%set(fGRAPH,1)) FI %IF (%fGRAPH eq 1) then (%set(f87,1)) FI %out( Are you using the MODEM SERVER (y or n)? ) %define(bMODEM)(%in) %set(fMODEM,0) %IF (%eqs(%substr(%bMODEM,1,1),Y)) then (%set(fMODEM,1)) FI %IF (%eqs(%substr(%bMODEM,1,1),y)) then (%set(fMODEM,1)) FI %out( Are you using the MOUSE SERVER (y or n)? ) %define(bMOUSE)(%in) %set(fMOUSE,0) %IF (%eqs(%substr(%bMOUSE,1,1),Y)) then (%set(fMOUSE,1)) FI %IF (%eqs(%substr(%bMOUSE,1,1),y)) then (%set(fMOUSE,1)) FI %out( Are you using the VOICE/DATA SERVICES (y or n)? ) %define(bVoiDa)(%in) %set(fVoiceData,0) %IF (%eqs(%substr(%bVoiDa,1,1),Y)) then (%set(fVoiceData,1)) FI %IF (%eqs(%substr(%bVoiDa,1,1),y)) then (%set(fVoiceData,1)) FI %out( CTOS Disk and File Management Calls: ) %out( Are you using FILE Management (y or n)? ) %define(bCTOSfm)(%in) %set(fFile,0) %IF (%eqs(%substr(%bCTOSfm,1,1),Y)) then (%set(fFile,1)) FI %IF (%eqs(%substr(%bCTOSfm,1,1),y)) then (%set(fFile,1)) FI %out( Are you using DISK Management (y or n)? ) %define (bDisk)(%in) %set (fDisk,0) %IF (%eqs(%substr(%bDisk,1,1),Y)) then (%set(fDisk,1)) FI %IF (%eqs(%substr(%bDisk,1,1),y)) then (%set(fDisk,1)) FI %out( Are you using SAM (y or n)? ) %define(bSAM)(%in) %set(fSAM,0) %IF (%eqs(%substr(%bSAM,1,1),Y)) then (%set(fSAM,1)) FI %IF (%eqs(%substr(%bSAM,1,1),y)) then (%set(fSAM,1)) FI %out( Are you using RSAM (y or n)? ) %define(bRSAM)(%in) %set(fRSAM,0) %IF (%eqs(%substr(%bRSAM,1,1),Y)) then (%set(fRSAM,1)) FI %IF (%eqs(%substr(%bRSAM,1,1),y)) then (%set(fRSAM,1)) FI %out( Are you using DAM (y or n)? ) %define(bDAM)(%in) %set(fDAM,0) %IF (%eqs(%substr(%bDAM,1,1),Y)) then (%set(fDAM,1)) FI %IF (%eqs(%substr(%bDAM,1,1),y)) then (%set(fDAM,1)) FI ;############################################################################# ; The following items all use Open/CloseFile, so set flag accordingly. # ;############################################################################# %IF ( (%fGRAPH eq 1) OR (%fFORMS eq 1) OR (%fISAM eq 1) OR (%fSM eq 1) OR (%fFile eq 1) OR (%fDisk eq 1) OR (%fDAM eq 1) OR (%fSAM eq 1) OR (%fRSAM eq 1) ) THEN (%set(fCTOSoc,1)) ELSE (%set(fCTOSoc,0)) FI %IF (%fCTOSoc eq 1) THEN ( %out( (CTOS OpenFile/CloseFile already included.) ) ) ELSE ( %out( Are you using CTOS OpenFile/CloseFile (y or n)? ) %define(bCTOSoc)(%in) %IF (%eqs(%substr(%bCTOSoc,1,1),Y)) then (%set(fCTOSoc,1)) FI %IF (%eqs(%substr(%bCTOSoc,1,1),y)) then (%set(fCTOSoc,1)) FI ) FI ;fCTOSoc flag set %out( Other Device Management Calls: ) %out( Are you using KEYBOARD Management (y or n)? ) %define(bCTOSkm)(%in) %set(fKbd,0) %IF (%eqs(%substr(%bCTOSkm,1,1),Y)) then (%set(fKbd,1)) FI %IF (%eqs(%substr(%bCTOSkm,1,1),y)) then (%set(fKbd,1)) FI %out( Are you using TAPE Management (y or n)? ) %define(bTpM)(%in) %set(fTape,0) %IF (%eqs(%substr(%bTpM,1,1),Y)) then (%set(fTape,1)) FI %IF (%eqs(%substr(%bTpM,1,1),y)) then (%set(fTape,1)) FI %out( Are you using TIMER Management (y or n)? ) %define(bCTOSttm)(%in) %set(fTimer,0) %IF (%eqs(%substr(%bCTOSttm,1,1),Y)) then (%set(fTimer,1)) FI %IF (%eqs(%substr(%bCTOSttm,1,1),y)) then (%set(fTimer,1)) FI %out( Are you using VIDEO Management (y or n)? ) %define(bVID)(%in) %set(fVID,0) %IF (%eqs(%substr(%bVID,1,1),Y)) then (%set(fVID,1)) FI %IF (%eqs(%substr(%bVID,1,1),y)) then (%set(fVID,1)) FI %out( System Resource Management Calls: ) %out( Are you using CLUSTER Management (y or n)? ) %define(bCTOScm)(%in) %set(fCluster,0) %IF (%eqs(%substr(%bCTOScm,1,1),Y)) then (%set(fCluster,1)) FI %IF (%eqs(%substr(%bCTOScm,1,1),y)) then (%set(fCluster,1)) FI %out( Are you using COMMUNICATIONS SAM (y or n)? ) %define(bSAMc)(%in) %set(fSAMc,0) %IF (%eqs(%substr(%bSAMc,1,1),Y)) then (%set(fSAMc,1)) FI %IF (%eqs(%substr(%bSAMc,1,1),y)) then (%set(fSAMc,1)) FI %out( Are you using CONFIGURATION Management (y or n)? ) %define(bCTOSccm)(%in) %set(fConfig,0) %IF (%eqs(%substr(%bCTOSccm,1,1),Y)) then (%set(fConfig,1)) FI %IF (%eqs(%substr(%bCTOSccm,1,1),y)) then (%set(fConfig,1)) FI %out( Are you using CONTINGENCY (Error) Mgt (y or n)? ) %define(bCTOSerrm)(%in) %set(fErr,0) %IF (%eqs(%substr(%bCTOSerrm,1,1),Y)) then (%set(fErr,1)) FI %IF (%eqs(%substr(%bCTOSerrm,1,1),y)) then (%set(fErr,1)) FI %out( Are you using EXCHANGE Management (y or n)? ) %define(bCTOSem)(%in) %set(fExch,0) %IF (%eqs(%substr(%bCTOSem,1,1),Y)) then (%set(fExch,1)) FI %IF (%eqs(%substr(%bCTOSem,1,1),y)) then (%set(fExch,1)) FI %out( Are you using INTERRUPT Handlers (y or n)? ) %define(bCTOSih)(%in) %set(fIntrupt,0) %IF (%eqs(%substr(%bCTOSih,1,1),Y)) then (%set(fIntrupt,1)) FI %IF (%eqs(%substr(%bCTOSih,1,1),y)) then (%set(fIntrupt,1)) FI %out( Are you using IPC Management (y or n)? ) %define(bCTOSim)(%in) %set(fIPC,0) %IF (%eqs(%substr(%bCTOSim,1,1),Y)) then (%set(fIPC,1)) FI %IF (%eqs(%substr(%bCTOSim,1,1),y)) then (%set(fIPC,1)) FI %out( Are you using MEMORY Management (y or n)? ) %define(bCTOSmm)(%in) %set(fMem,0) %IF (%eqs(%substr(%bCTOSmm,1,1),Y)) then (%set(fMem,1)) FI %IF (%eqs(%substr(%bCTOSmm,1,1),y)) then (%set(fMem,1)) FI %out( Are you using PARAMETER Management (y or n)? ) %define(bCTOSpm)(%in) %set(fParam,0) %IF (%eqs(%substr(%bCTOSpm,1,1),Y)) then (%set(fParam,1)) FI %IF (%eqs(%substr(%bCTOSpm,1,1),y)) then (%set(fParam,1)) FI %out( Are you using PARTITION and TASK Mgt (y or n)? ) %define(bCTOSppm)(%in) %set(fPartit,0) %IF (%eqs(%substr(%bCTOSppm,1,1),Y)) then (%set(fPartit,1)) FI %IF (%eqs(%substr(%bCTOSppm,1,1),y)) then (%set(fPartit,1)) FI %out( Are you using PROCESS Management (y or n)? ) %define (bCTOSprm)(%in) %set (fProcess,0) %IF (%eqs(%substr(%bCTOSprm,1,1),Y)) then (%set(fProcess,1)) FI %IF (%eqs(%substr(%bCTOSprm,1,1),y)) then (%set(fProcess,1)) FI %out( Are you using QUEUE Management (y or n)? ) %define(bCTOSqm)(%in) %set(fQueue,0) %IF (%eqs(%substr(%bCTOSqm,1,1),Y)) then (%set(fQueue,1)) FI %IF (%eqs(%substr(%bCTOSqm,1,1),y)) then (%set(fQueue,1)) FI %out( Are you using SPOOLER Management (y or n)? ) %define(bCTOSsm)(%in) %set(fSpooler,0) %IF (%eqs(%substr(%bCTOSsm,1,1),Y)) then (%set(fSpooler,1)) FI %IF (%eqs(%substr(%bCTOSsm,1,1),y)) then (%set(fSpooler,1)) FI %out( Are you using SYSTEM SERVICE Management (y or n)? ) %define(bCTOSssm)(%in) %set(fSysServ,0) %IF (%eqs(%substr(%bCTOSssm,1,1),Y)) then (%set(fSysServ,1)) FI %IF (%eqs(%substr(%bCTOSssm,1,1),y)) then (%set(fSysServ,1)) FI %out( Are you using UTILITY Management (y or n)? ) %define(bUtility)(%in) %set(fUtility,0) %IF (%eqs(%substr(%bUtility,1,1),Y)) then (%set(fUtility,1)) FI %IF (%eqs(%substr(%bUtility,1,1),y)) then (%set(fUtility,1)) FI ) FI ; fCTOS flag set %out( Assembler Pass 1 ... configuring BASIC with the following options: ) %out( BASIC Built-In Functions) ) FI ;End of pass1 = -1 $title( BASIC Built-In Functions) eject %TableEntry(1,6,DEFLPRINT) %TableEntry(1,4,GETSA) %TableEntry(1,4,GETRA) %TableEntry(2,4,MAKEPOINTER) %TableEntry(2,4,PWA) %TableEntry(1,0,SYSERC) %IF ((%fDISTRIX eq 1) or (%fCTOS eq 1)) then ( %if (%fFORMS eq 1) then (%if (%pass1 eq -1) then (%out( Forms Package) )fi $title( Forms Package) eject %TableEntry(1,14,OPENFORM) %TableEntry(1,10,DISPLAYFORM) %TableEntry(1,4,UNDISPLAYFORM) %TableEntry(1,26,READFIELD) %TableEntry(1,22,WRITEFIELD) %TableEntry(1,12,DEFAULTFIELD) %TableEntry(1,4,DEFAULTFORM) %TableEntry(1,20,USERFILLFIELD) %TableEntry(1,0,LOCKKBD) %TableEntry(1,14,SETFIELDATTRS) %TableEntry(1,18,GETFIELDINFO) ) fi %if (%fISAM eq 1) then (%if (%pass1 eq -1) then (%out( ISAM Package) )fi $title( ISAM Package) eject %TableEntry(1,6,CLOSEISAM) %TableEntry(1,34,CREATEISAM) %TableEntry(1,6,DELETEISAM) %TableEntry(1,10,DELETEISAMRECORD) %TableEntry(1,18,DELETEISAMRECORDBYKEY) %TableEntry(1,4,ENDISAMTRANSACTION) %TableEntry(1,18,GETISAMRECORDS) %TableEntry(1,18,GETISAMRECORDSHOLD) %TableEntry(1,10,HOLDISAMRECORD) %TableEntry(1,12,LOCKISAM) %TableEntry(1,16,MODIFYISAMRECORD) %TableEntry(1,18,MODIFYISAMRECORDBYKEY) %TableEntry(1,24,OPENISAM) %TableEntry(1,4,PURGEISAMTRANSACTION) %TableEntry(1,16,READISAMRECORDBYURI) %TableEntry(1,16,READISAMRECORDBYURIHOLD) %TableEntry(1,16,READNEXTISAMRECORD) %TableEntry(1,16,READNEXTISAMRECORDHOLD) %TableEntry(1,24,READUNIQUEISAMRECORD) %TableEntry(1,24,READUNIQUEISAMRECORDHOLD) %TableEntry(1,10,RELEASEISAMRECORD) %TableEntry(1,30,RENAMEISAM) %TableEntry(1,18,SETISAMPROTECTION) %TableEntry(1,14,SETUPISAMITERATION) %TableEntry(1,14,SETUPISAMITERATIONKEY) %TableEntry(1,14,SETUPISAMITERATIONPREFIX) %TableEntry(1,24,SETUPISAMITERATIONRANGE) %TableEntry(1,14,STARTISAMTRANSACTION) %TableEntry(1,16,STOREISAMRECORD) %TableEntry(1,4,UNLOCKISAM) ) fi %if (%fSM eq 1) then (%if (%pass1 eq -1) then (%out( Sort/Merge Package) )fi $title( Sort/Merge Package) eject %TableEntry(1,20,RELEASERECORDANDKEY) %TableEntry(1,4,DOSORT) %TableEntry(1,20,RETURNRECORDANDKEY) %TableEntry(1,4,CONCLUDESORT) %TableEntry(1,4,TERMINATESORT) %TableEntry(1,52,BASICPREPARESORT) %TableEntry(1,12,RELEASERECORD) %TableEntry(1,12,RETURNRECORD) %TableEntry(1,54,BASICPREPAREKEYSORT) ) fi %if (%f87 eq 1) then (%if (%pass1 eq -1) then (%out( ConvertTo8087) )fi $title( ConvertTo8087) eject %TableEntry(2,4,CONVERTTO8087) ) fi ) FI %IF (%fCTOS eq 1) then ( %if (%fContext eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Context Manager Services) )fi $title( CTOS Context Manager) eject %TableEntry(1,8,CMCURRENTVERSION) %TableEntry(1,10,CMQUERYCONFIGFILE) %TableEntry(1,4,CMQUERYCONTEXTHANDLE) %TableEntry(1,4,CMQUERYERC) %TableEntry(1,6,CMQUERYPARENT) %TableEntry(1,4,CMSETPARENT) %TableEntry(1,18,CMSTARTAPPL) %TableEntry(1,18,CMSTARTAPPLBYBLOCK) %TableEntry(1,18,CMSTARTAPPLBYNAME) %TableEntry(1,2,CMSWITCHCONTEXT) %TableEntry(1,2,CMSWITCHTOEXISTINGCONTEXT) %TableEntry(1,2,CMTERMINATECONTEXT) %TableEntry(1,6,CMTRANSLATECHTOPH) %TableEntry(1,6,CMTRANSLATEPHTOCH) %TableEntry(1,8,NOTIFYCM) %TableEntry(1,10,ICMSCHECK) %TableEntry(1,8,ICMSCURRENTVERSION) %TableEntry(1,2,ICMSFLUSH) %TableEntry(1,8,ICMSSEND) %TableEntry(1,10,ICMSWAIT) ) fi %if (%fMail eq 1) then (%if (%pass1 eq -1) then (%out( CT-Mail Services) )fi $title( CT-Mail Services) eject %TableEntry(1,10,ACKNOWLEDGEMAILRECEIPT) %TableEntry(1,8,CHECKPOINTMSG) %TableEntry(1,14,CONNECTNEXTMAILCENTER) %TableEntry(1,4,DETACHMSG) %TableEntry(1,4,ENCLOSEMSG) %TableEntry(1,22,ESTABLISHMAILCONNECTION) %TableEntry(1,4,FENCLOSEDMSG) %TableEntry(1,10,GETCMSGELEMENTSFORID) %TableEntry(1,22,GETMSGCOMPONENTBYID) %TableEntry(1,24,INITMAILMSGBUFFER) %TableEntry(1,14,INITVM) %TableEntry(1,30,OPENMAILCONNECTION) %TableEntry(1,16,PUTMSGCOMPONENT) %TableEntry(1,8,QUERYMAIL) %TableEntry(1,16,QUERYMAILSTATUS) %TableEntry(1,16,RECEIVEMAIL) %TableEntry(1,4,RELEASEMSG) %TableEntry(1,20,SENDMAIL) %TableEntry(1,2,TERMINATEMAILCONNECTION) %TableEntry(1,22,VALIDATEMAIL) ) fi %if (%fGRAPH eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Graphics Package) )fi $title( CTOS Graphics Package) eject %TableEntry(1,30,ADDLABEL) %TableEntry(1,22,ADDOBJECT) %TableEntry(1,8,ADDPICTURE) %TableEntry(1,0,CLEARLABELS) %TableEntry(1,0,CLEARVECTORS) %TableEntry(1,0,CLEARVIEWPORT) %TableEntry(1,0,CLOSEOBJECT) %TableEntry(1,2,CLOSEPICTURE) %TableEntry(1,0,CLOSETEMPOBJECT) %TableEntry(1,0,DELETECURRENTLABEL) %TableEntry(1,0,DISPLAYCURRENTOBJECT) %TableEntry(1,2,DISPLAYPICTURE) %TableEntry(1,8,DRAW) %TableEntry(1,20,DRAWARC) %TableEntry(1,12,DRAWCIRCLE) %TableEntry(1,16,DRAWLINE) %TableEntry(1,8,DRAWRELATIVE) %TableEntry(1,18,FILLRECTANGLE) %TableEntry(1,6,GETCURRENTLABEL) %TableEntry(1,4,GETCURSORPOSITION) %TableEntry(1,10,GETFONTNAME) %TableEntry(1,10,GETFONTNUMBER) %TableEntry(1,4,GETLABELDATA) %TableEntry(1,4,GETNUMBEROFFONTS) %TableEntry(1,4,GETNUMBEROFOBJECTS) %TableEntry(1,4,GETPICTURECOLORS) %TableEntry(1,4,GETTRANSFORMATIONDATA) %TableEntry(1,10,GETUSERFONTNAME) %TableEntry(1,4,GETWINDOWDATA) %TableEntry(1,0,INITGRAPHICS) %TableEntry(1,2,LOADPAPER) %TableEntry(1,4,MODIFYLABEL) %TableEntry(1,8,MOVE) %TableEntry(1,8,MOVERELATIVE) %TableEntry(1,20,OPENPICTURE) %TableEntry(1,16,OPENTEMPOBJECT) %TableEntry(1,0,READINTERRUPTKEY) %TableEntry(1,0,REMOVECURRENTOBJECT) %TableEntry(1,4,SETCHARACTERSIZE) %TableEntry(1,2,SETCOLOR) %TableEntry(1,4,SETCURRENTPALETTE) %TableEntry(1,2,SETDRAWINGMODE) %TableEntry(1,6,SETFIRSTLABEL) %TableEntry(1,0,SETFIRSTOBJECT) %TableEntry(1,6,SETFONT) %TableEntry(1,2,SETLABELORIGIN) %TableEntry(1,16,SETLIMITS) %TableEntry(1,2,SETLINETYPE) %TableEntry(1,10,SETNDCCURSORPOSITION) %TableEntry(1,6,SETNEXTLABEL) %TableEntry(1,0,SETNEXTOBJECT) %TableEntry(1,10,SETOBJECTCURSORPOSITION) %TableEntry(1,2,SETOUTPUTDEVICE) %TableEntry(1,2,SETOUTPUTTYPE) %TableEntry(1,8,SETPEN) %TableEntry(1,6,SETPLOTTERDEVICE) %TableEntry(1,2,SETPLOTTERMATERIAL) %TableEntry(1,8,SETSCALE) %TableEntry(1,8,SETSCALERELATIVE) %TableEntry(1,8,SETTRANSLATE) %TableEntry(1,8,SETTRANSLATERELATIVE) %TableEntry(1,16,SETUSERCOORDINATES) %TableEntry(1,6,SETUSERFONT) %TableEntry(1,4,SETUPGRAPHICSSPOOLING) %TableEntry(1,16,SETVIEWPORT) %TableEntry(1,16,SETWINDOW) %TableEntry(1,10,SETWORLDCURSORPOSITION) %TableEntry(1,0,TURNOFFCURSOR) %TableEntry(1,0,TURNONCURSOR) %TableEntry(1,6,WRITEPICTURE) %TableEntry(1,6,WRITETEXTSTRING) ) fi %if (%fMODEM eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Modem Services) )fi $title( CTOS Modem Services) eject %TableEntry(1,10,ACCEPTMODEMCALL) %TableEntry(1,12,ADDMODEMLINE) %TableEntry(1,2,CLOSEMODEMLINE) %TableEntry(1,2,DISCONNECTMODEMCALL) %TableEntry(1,28,EDITLINE) %TableEntry(1,8,INITIATEMODEMCALL) %TableEntry(1,22,OPENMODEMLINE) %TableEntry(1,14,QUERYMODEMSERVERSTATUS) %TableEntry(1,28,READINPUTLINE) %TableEntry(1,12,READMODEMBYTES) %TableEntry(1,6,RELEASEMODEMLINE) %TableEntry(1,10,SETLINEPARAMETER) %TableEntry(1,12,WRITEMODEMBYTES) ) fi %if (%fMOUSE eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Mouse Services) )fi $title( CTOS Mouse Services) eject %TableEntry(1,6,GETIBUSDEVINFO) %TableEntry(1,8,PDGETCURSORPOS) %TableEntry(1,8,PDGETCURSORPOSNSC) %TableEntry(1,8,PDLOADCURSOR) %TableEntry(1,10,PDREADCURRENTCURSOR) %TableEntry(1,18,PDREADICONFILE) %TableEntry(1,6,PDSETCONTROLS) %TableEntry(1,2,PDSETCURSORDISPLAY) %TableEntry(1,4,PDSETCURSORPOS) %TableEntry(1,4,PDSETCURSORPOSNSC) %TableEntry(1,2,PDSETCURSORTYPE) %TableEntry(1,8,PDSETMOTIONRECTANGLE) %TableEntry(1,8,PDSETMOTIONRECTANGLENSC) %TableEntry(1,6,PDSETSYSTEMCONTROLS) %TableEntry(1,2,PDSETTRACKING) %TableEntry(1,8,PDSETVIRTUALCOORDINATES) %TableEntry(1,12,PDTRANSLATENSCTOVC) %TableEntry(1,12,PDTRANSLATEVCTONSC) %TableEntry(1,8,READINPUTEVENT) %TableEntry(1,8,READINPUTEVENTNSC) ) fi %if (%fVoiceData eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Voice / Data Services) )fi $title( CTOS Voice Data) eject %TableEntry(1,8,TSCONNECT) %TableEntry(1,8,TSDATACHANGEPARAMS) %TableEntry(1,4,TSDATACHECKPOINT) %TableEntry(1,4,TSDATACLOSELINE) %TableEntry(1,26,TSDATAOPENLINE) %TableEntry(1,16,TSDATAREAD) %TableEntry(1,8,TSDATARETREIVEPARAMS) %TableEntry(1,6,TSDATAUNACCEPTCALL) %TableEntry(1,14,TSDATAWRITE) %TableEntry(1,8,TSDEINSTALL) %TableEntry(1,16,TSDIAL) %TableEntry(1,4,TSDOFUNCTION) %TableEntry(1,10,TSGETSTATUS) %TableEntry(1,4,TSHOLD) %TableEntry(1,8,TSOFFHOOK) %TableEntry(1,4,TSONHOOK) %TableEntry(1,18,TSQUERYCONFIGPARAMS) %TableEntry(1,18,TSREADTOUCHTONE) %TableEntry(1,4,TSRING) %TableEntry(1,8,TSSETCONFIGPARAMS) %TableEntry(1,8,TSVOICECONNECT) %TableEntry(1,26,TSVOICEPLAYBACKFROMFILE) %TableEntry(1,26,TSVOICERECORDTOFILE) %TableEntry(1,2,TSVOICESTOP) ) fi %if (%fFile eq 1) then (%if (%pass1 eq -1) then (%out( CTOS File Management) )fi $title( CTOS File Management) eject %TableEntry(1,6,CHANGEFILELENGTH) %TableEntry(1,10,CHANGEOPENMODE) %TableEntry(1,8,CHECKREADASYNC) %TableEntry(1,8,CHECKWRITEASYNC) %TableEntry(1,0,CLEARPATH) %TableEntry(1,0,CLOSEALLFILES) %TableEntry(1,0,CLOSEALLFILESLL) %TableEntry(1,22,CREATEDIR) %TableEntry(1,16,CREATEFILE) %TableEntry(1,12,DELETEDIR) %TableEntry(1,2,DELETEFILE) %TableEntry(1,20,GETDIRSTATUS) %TableEntry(1,6,GETFHLONGEVITY) %TableEntry(1,10,GETFILESTATUS) %TableEntry(1,16,GETSTAMFILEHEADER) %TableEntry(1,6,GETUCB) %TableEntry(1,4,GETUSERNUMBER) %TableEntry(1,8,GETUSERSTATUS) %TableEntry(1,18,OPENFILELL) %TableEntry(1,4,QUERYWSNUM) %TableEntry(1,0,QUIETIO) %TableEntry(1,18,READASYNC) %TableEntry(1,16,READFILE) %TableEntry(1,18,READDIRSECTOR) %TableEntry(1,14,RENAMEFILE) %TableEntry(1,6,SETNODE) %TableEntry(1,20,SETDIRSTATUS) %TableEntry(1,4,SETFHLONGEVITY) %TableEntry(1,10,SETFILESTATUS) %TableEntry(1,18,SETPATH) %TableEntry(1,6,SETPREFIX) %TableEntry(1,12,WILDCARDINIT) %TableEntry(2,12,WILDCARDMATCH) %TableEntry(1,8,WILDCARDNEXT) %TableEntry(1,16,WRITEFILE) %TableEntry(1,18,WRITEASYNC) ) fi %if (%fCTOSoc eq 1) then (%if (%pass1 eq -1) then (%out( CTOS OpenFile/CloseFile) )fi $title( CTOS OpenFile/CloseFile) eject %TableEntry(1,2,CLOSEFILE) %TableEntry(1,18,OPENFILE) ) fi %if (%fDisk eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Disk Management) )fi $title( CTOS Disk Management) eject %TableEntry(1,12,DISMOUNTVOLUME) %TableEntry(1,16,FORMAT) %TableEntry(1,12,GETVHB) %TableEntry(1,12,MOUNTVOLUME) %TableEntry(1,12,QUERYDCB) %TableEntry(1,14,SETDEVPARAMS) ) fi %if (%fDAM eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Direct Access Method) )fi $title( CTOS Direct Access Method) eject %TableEntry(1,4,CLOSEDAFILE) %TableEntry(1,8,DELETEDARECORD) %TableEntry(1,26,OPENDAFILE) %TableEntry(1,8,QUERYDALASTRECORD) %TableEntry(1,12,QUERYDARECORDSTATUS) %TableEntry(1,16,READDAFRAGMENT) %TableEntry(1,12,READDARECORD) %TableEntry(1,6,SETDABUFFERMODE) %TableEntry(1,8,TRUNCATEDAFILE) %TableEntry(1,12,WRITEDARECORD) %TableEntry(1,16,WRITEDAFRAGMENT) ) fi %if (%fSAM eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Sequential Access Method) )fi $title( CTOS Sequential Access Method) eject %TableEntry(1,4,CHECKPOINTBS) %TableEntry(1,4,CLOSEBYTESTREAM) %TableEntry(1,8,GETBSLFA) %TableEntry(1,24,OPENBYTESTREAM) %TableEntry(1,6,PUTBACKBYTE) %TableEntry(1,8,QUERYVIDBS) %TableEntry(1,14,READBSRECORD) %TableEntry(1,8,READBYTE) %TableEntry(1,14,READBYTES) %TableEntry(1,4,RELEASEBYTESTREAM) %TableEntry(1,8,SETBSLFA) %TableEntry(1,6,SETIMAGEMODE) %TableEntry(1,14,WRITEBSRECORD) %TableEntry(1,6,WRITEBYTE) ) fi %if (%fSAMc eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Comm Sequential Access Method) )fi $title( CTOS Comm Sequential Access Method) eject %TableEntry(1,32,ACQUIREBYTESTREAMC) %TableEntry(1,8,CHECKFOROPERATORRESTARTC) %TableEntry(1,14,CHECKPOINTBSASYNCC) %TableEntry(1,6,CHECKPOINTBSC) %TableEntry(1,8,DISCARDINPUTBSC) %TableEntry(1,4,DISCARDOUTPUTBSC) %TableEntry(1,24,FILLBUFFERASYNCC) %TableEntry(1,14,FILLBUFFERC) %TableEntry(1,24,FLUSHBUFFERASYNCC) %TableEntry(1,14,FLUSHBUFFERC) %TableEntry(1,24,OPENBYTESTREAMC) %TableEntry(1,10,READBYTESTREAMPARAMETERC) %TableEntry(1,10,READSTATUSC) %TableEntry(1,4,RELEASEBYTESTREAMC) %TableEntry(1,4,SENDBREAKC) %TableEntry(1,6,SETIMAGEMODEC) %TableEntry(1,8,WRITEBYTESTREAMPARAMETERC) %TableEntry(1,8,WRITESTATUSC) ) fi %if (%fRSAM eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Record Sequential Access Method) )fi $title( CTOS Record Sequential Access Method) eject %TableEntry(1,4,CHECKPOINTRSFILE) %TableEntry(1,4,CLOSERSFILE) %TableEntry(1,8,GETRSLFA) %TableEntry(1,24,OPENRSFILE) %TableEntry(1,14,READRSRECORD) %TableEntry(1,4,RELEASERSFILE) %TableEntry(1,16,SCANTOGOODRSRECORD) %TableEntry(1,10,WRITERSRECORD) ) fi %if (%fKbd eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Keyboard Management) )fi $title( CTOS Keyboard Management) eject %TableEntry(1,2,ASSIGNKBD) %TableEntry(1,0,BEEP) %TableEntry(1,0,CHECKPOINTSYSIN) %TableEntry(1,2,DISABLEACTIONFINISH) %TableEntry(1,4,QUERYKBDLEDS) %TableEntry(1,4,QUERYKBDSTATE) %TableEntry(1,4,READACTIONCODE) %TableEntry(1,6,READACTIONKBD) %TableEntry(1,4,READKBD) %TableEntry(1,6,READKBDDIRECT) %TableEntry(1,4,SETKBDLED) %TableEntry(1,2,SETKBDUNENCODEDMODE) %TableEntry(1,4,SETSYSINMODE) ) fi %if (%fTape eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Tape Management ) )fi $title( CTOS Tape Management ) eject %TableEntry(1,2,CLOSETAPE) %TableEntry(1,18,OPENTAPE) %TableEntry(1,18,READTAPERECORDS) %TableEntry(1,8,TAPEOPERATION) %TableEntry(1,6,TAPESTATUS) %TableEntry(1,18,WRITETAPERECORDS) ) fi %if (%fTimer eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Timer Management) )fi $title( CTOS Timer Management) eject %TableEntry(1,4,CLOSERTCLOCK) %TableEntry(1,8,COMPACTDATETIME) %TableEntry(1,2,DELAY) %TableEntry(1,8,EXPANDDATETIME) %TableEntry(1,8,FORMATTIME) %TableEntry(1,8,FORMATTIMEDT) %TableEntry(1,8,FORMATTIMETM) %TableEntry(1,4,GETDATETIME) %TableEntry(1,4,OPENRTCLOCK) %TableEntry(1,8,PARSETIME) %TableEntry(1,4,RESETTIMERINT) %TableEntry(1,4,SETDATETIME) %TableEntry(1,4,SETTIMERINT) ) fi %if (%fVID eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Video Calls ) )fi $title( CTOS Video Calls ) eject %TableEntry(1,2,ASSIGNVIDOWNER) %TableEntry(1,6,INITCHARMAP) %TableEntry(1,20,INITVIDFRAME) %TableEntry(1,4,LOADCOLORSTYLERAM) %TableEntry(1,6,LOADCURSORRAM) %TableEntry(1,8,LOADFONTRAM) %TableEntry(1,6,LOADSTYLERAM) %TableEntry(0,0,LOCKVIDEO) %TableEntry(0,0,LOCKVIDEOFORMODIFY) %TableEntry(0,1,NPRINT) %TableEntry(0,10,OUTPUTQUAD) %TableEntry(0,8,OUTPUTWORD) %TableEntry(1,6,POSFRAMECURSOR) %TableEntry(1,24,PROGRAMCOLORMAPPER) %TableEntry(0,2,PUTBYTE) %TableEntry(0,6,PUTCHAR) %TableEntry(1,10,PUTFRAMEATTRS) %TableEntry(1,12,PUTFRAMECHARS) %TableEntry(0,6,PUTPOINTER) %TableEntry(0,6,PUTQUAD) %TableEntry(0,4,PUTWORD) %TableEntry(1,10,QUERYFRAMECHAR) %TableEntry(1,6,QUERYVIDHDW) %TableEntry(1,2,RESETFRAME) %TableEntry(1,12,RESETVIDEO) %TableEntry(0,6,SBPRINT) %TableEntry(1,10,SCROLLFRAME) %TableEntry(1,2,SETALPHACOLORDEFAULT) %TableEntry(1,4,SETSCREENVIDATTR) %TableEntry(0,2,SETSTYLERAM) %TableEntry(0,4,SETSTYLERAMENTRY) %TableEntry(1,2,SETVIDEOTIMEOUT) %TableEntry(0,0,UNLOCKVIDEO) %TableEntry(0,0,UNLOCKVIDEOFORMODIFY) %TableEntry(0,1,ZPRINT) %if (%fCTOSII eq 1) then (%if (%pass1 eq -1) then (%out( CTOS II Video Calls ) )fi $title( CTOS II Video Calls ) eject %TableEntry(1,18,MOVEFRAMERECTANGLE) %TableEntry(1,18,PUTFRAMECHARSANDATTRS) %TableEntry(1,10,QUERYFRAMEBOUNDS) %TableEntry(1,18,QUERYFRAMECHARSANDATTRS) %TableEntry(1,10,QUERYFRAMECURSOR) ) fi ) fi %if (%fCluster eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Cluster Management) )fi $title( CTOS Cluster Management) eject %TableEntry(1,4,DISABLECLUSTER) %TableEntry(1,8,GETCLUSTERSTATUS) %TableEntry(1,8,GETWSUSERNAME) %TableEntry(1,6,SETWSUSERNAME) ) fi %if (%fConfig eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Configuration Management) )fi $title( CTOS Configuration Management) eject %TableEntry(1,8,CURRENTOSVERSION) %TableEntry(1,8,GETMODULEID) %TableEntry(1,16,MAPXBUSWINDOW) %TableEntry(1,4,LOCKXBIS) %TableEntry(1,4,OSVERSION) %TableEntry(1,2,RESETXBUSMISR) %TableEntry(1,10,SETXBUSMISR) %TableEntry(1,2,SWAPXBUSEAR) %TableEntry(1,10,QUERYMODULEPOSITION) %TableEntry(1,0,UNLOCKXBIS) ) fi %if (%fErr eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Contingency (Error) Management) )fi $title( CTOS Err Management) eject %TableEntry(0,2,CHECKERC) %TableEntry(0,2,CRASH) %TableEntry(0,8,ERROREXITSTRING) %TableEntry(0,2,ERROREXIT) %TableEntry(0,0,EXIT) %TableEntry(0,2,FATALERROR) %TableEntry(1,6,WRITELOG) ) fi %if (%fExch eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Exchange Management) )fi $title( CTOS Exchange Management) eject %TableEntry(1,4,ALLOCEXCH) %TableEntry(1,2,DEALLOCEXCH) %TableEntry(1,4,QUERYDEFAULTRESPEXCH) ) fi %if (%fIntrupt eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Interrupt Handlers) )fi $title( CTOS Interrupt Handlers) eject %TableEntry(1,4,LOCKIN) %TableEntry(1,4,LOCKOUT) %TableEntry(1,2,MEDIATEINTHANDLER) %TableEntry(1,2,RESETCOMMISR) %TableEntry(1,22,SETCOMMISR) %TableEntry(1,12,SETINTHANDLER) %TableEntry(1,6,SETLPISR) %TableEntry(1,6,SETTRAPHANDLER) ) fi %if (%fIPC eq 1) then (%if (%pass1 eq -1) then (%out( CTOS IPC Management) )fi $title( CTOS IPC Management) eject %TableEntry(1,6,CHECK) %TableEntry(1,6,PSEND) %TableEntry(1,4,REQUEST) %TableEntry(1,4,RESPOND) %TableEntry(1,6,SEND) %TableEntryRename(1,6,WAIT,OSWAIT) ) fi %if (%fMem eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Memory Management) )fi $title( CTOS Memory Management) eject %TableEntry(1,8,ALLOCALLMEMORYSL) %TableEntry(1,6,ALLOCMEMORYLL) %TableEntry(1,6,ALLOCMEMORYSL) %TableEntry(1,6,DEALLOCMEMORYLL) %TableEntry(1,6,DEALLOCMEMORYSL) %TableEntry(1,0,RESETMEMORYLL) %TableEntry(1,4,QUERYMEMAVAIL) %if (%fCTOSII eq 1) then (%if (%pass1 eq -1) then (%out( CTOS II Memory Management ) )fi $title( CTOS II Memory Management ) eject %TableEntry(1,6,ALLOCAREASL) %TableEntry(1,2,DEACTIVATERUNFILE) %TableEntry(1,10,EXPANDAREALL) %TableEntry(1,10,EXPANDAREASL) %TableEntry(0,0,FREELARGELL) %TableEntry(1,4,QUERYBIGMEMAVAIL) %TableEntry(0,0,RESETALLSEGS) %TableEntry(1,6,SHRINKAREALL) %TableEntry(1,6,SHRINKAREASL) ) fi ) fi %if (%fParam eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Parameter Management) )fi $title( CTOS Parameter Management) eject %TableEntry(1,0,CPARAMS) %TableEntry(1,2,CSUBPARAMS) %TableEntry(1,8,RGPARAM) %TableEntry(1,8,RGPARAMINIT) %TableEntry(1,4,RGPARAMSETELTNEXT) %TableEntry(1,2,RGPARAMSETLISTSTART) %TableEntry(1,6,RGPARAMSETSIMPLE) ) fi %if (%fPartit eq 1 ) then (%if (%pass1 eq -1) then (%out( CTOS Partition and Task Management) )fi $title( CTOS Partition Management) eject %TableEntry(1,14,CREATEPARTITION) %TableEntry(1,6,GETPARTITIONEXCHANGE) %TableEntry(1,10,GETPARTITIONHANDLE) %TableEntry(1,10,GETPARTITIONSTATUS) %TableEntry(1,18,LOADINTERACTIVETASK) %TableEntry(1,16,LOADPRIMARYTASK) %TableEntry(1,6,LOADTASK) %TableEntryRename(1,18,CHAIN,OSCHAIN) %TableEntry(1,16,QUERYEXITRUNFILE) %TableEntry(1,2,REMOVEPARTITION) %TableEntry(1,14,SETEXITRUNFILE) %TableEntry(1,2,SETPARTITIONEXCHANGE) %TableEntry(1,2,SETPARTITIONLOCK) %TableEntry(1,8,SETPARTITIONNAME) %TableEntry(1,2,SETSWAPDISABLE) %TableEntry(1,2,TERMINATEPARTITIONTASKS) %TableEntry(1,2,VACATEPARTITION) %if (%fCTOSII eq 1) then (%if (%pass1 eq -1) then (%out( CTOS II Partition and Task Management) )fi $title( CTOS II Partition Management) eject %TableEntry(1,14,CREATEUSER) %TableEntry(0,0,EXECFH) %TableEntry(1,4,FORK) %TableEntry(1,6,LOADFILE) %TableEntry(1,2,SWAPINCONTEXT) %TableEntry(1,12,WRITESWAP) ) fi ) fi %if (%fProcess eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Process Management) )fi $title( CTOS Process Management) eject %TableEntry(1,2,CHANGEPRIORITY) %TableEntry(1,4,CREATEPROCESS) %TableEntry(1,4,QUERYPROCESSNUMBER) %TableEntry(1,6,REQUESTDIRECT) %TableEntry(1,4,SETDELTAPRIORITY) ) fi %if (%fQueue eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Queue Management) )fi $title( CTOS Queue Management) eject %TableEntry(1,24,ADDQUEUEENTRY) %TableEntry(1,10,ESTABLISHQUEUESERVER) %TableEntry(1,34,MARKKEYEDQUEUEENTRY) %TableEntry(1,20,MARKNEXTQUEUEENTRY) %TableEntry(1,34,READKEYEDQUEUEENTRY) %TableEntry(1,22,READNEXTQUEUEENTRY) %TableEntry(1,22,REMOVEKEYEDQUEUEENTRY) %TableEntry(1,10,REMOVEMARKEDQUEUEENTRY) %TableEntry(1,16,REWRITEMARKEDQUEUEENTRY) %TableEntry(1,6,TERMINATEQUEUESERVER) %TableEntry(1,10,UNMARKQUEUEENTRY) ) fi %if (%fSpooler eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Spooler Management) )fi $title( CTOS Spooler Management) eject %TableEntry(1,22,CONFIGURESPOOLER) %TableEntry(1,12,SPOOLERPASSWORD) ) fi %if (%fSysServ eq 1) then (%if (%pass1 eq -1) then (%out( CTOS System Service Management) )fi $title( CTOS System Service Management) eject %TableEntry(1,0,CONVERTTOSYS) %TableEntry(1,4,SERVERQ) %TableEntry(1,8,QUERYREQUESTINFO) ) fi %if (%fUtility eq 1) then (%if (%pass1 eq -1) then (%out( CTOS Utility Management) )fi $title( CTOS Utility Management) eject %TableEntry(1,4,GETPASCB) %TableEntry(1,8,GETPSTRUCTURE) %TableEntry(1,24,LOOKUPFIELD) %TableEntry(1,18,LOOKUPNUMBER) %TableEntry(1,0,LOOKUPRESET) %TableEntry(1,24,LOOKUPSTRING) %TableEntry(1,20,READTONEXTFIELD) %TableEntry(1,8,STRINGSEQUAL) %TableEntry(1,6,TEXTEDIT) %TableEntry(1,10,ULCMPB) ) fi ) fi %if (%fDISTRIX eq 1) then ( %if (%fDISTRIXsc eq 1) then (%if (%pass1 eq -1) then (%out( DISTRIX System calls) )fi $title( DISTRIX System calls) eject %TableEntry(1,6,ACCESS) %TableEntry(1,2,ALARM) %TableEntry(1,4,BRK) %TableEntry(1,4,CHDIR) %TableEntry(1,6,CHMOD) %TableEntry(1,8,CHOWN) %TableEntry(1,4,CHROOT) %TableEntryRename(1,2,PLM_CLOSE,OSCLOSE) %TableEntry(1,6,CREAT) %TableEntry(0,2,EXIT) %TableEntry(1,6,FCNTL) %TableEntry(1,0,FORK) %TableEntry(1,0,GETPID) %TableEntry(1,0,GETUID) %TableEntry(1,4,KILL) %TableEntry(1,8,LINK) %TableEntry(2,8,LSEEK) %TableEntry(1,8,MKNOD) %TableEntryRename(1,10,PLM_MOUNT,MOUNT) %TableEntry(1,8,MSGCTL) %TableEntry(1,2,NICE) %TableEntryRename(1,6,DX_OPEN2,OPEN2) %TableEntryRename(1,8,DX_OPEN3,OPEN3) %TableEntry(0,0,PAUSE) %TableEntry(1,4,PIPE) %TableEntry(1,2,PLOCK) %TableEntryRename(1,8,DX_PLM_READ,DXREAD) %TableEntry(1,8,SEMCTL) %TableEntry(1,8,SEMOP) %TableEntry(1,0,SETPGRP) %TableEntry(1,2,SETUID) %TableEntry(1,8,SHMCTL) %TableEntry(1,6,SHMGET) %TableEntry(1,8,SHMAT) %TableEntry(1,4,SHMDT) %TableEntry(1,6,SIGNAL) %TableEntry(1,6,STAT) %TableEntry(1,4,STIME) %TableEntry(1,0,SYNC) %TableEntry(1,4,TIME) %TableEntry(1,4,TIMES) %TableEntry(1,6,ULIMIT) %TableEntry(1,2,UMASK) %TableEntry(1,4,UMOUNT) %TableEntry(1,4,UNAME) %TableEntry(1,4,UNLINK) %TableEntry(1,6,USTAT) %TableEntry(1,8,UTIME) %TableEntryRename(1,4,WAIT,DXWAIT) %TableEntryRename(1,8,DX_PLM_WRITE,DXWRITE) ) fi ) fi %if (%pass1 eq -1) then (%out( Assembler Pass 2 - Please stand by ... ) ) fi %out(pn) ;This re-enables video's Pause between Pages ; SENTINEL data segment word public 'data' DB 255 even %set(enddata,this byte - rgforeignproc + 6) data ends %if (%pass1 eq 0) then ( %out ( For BASIC Interpreter usage,data size is %enddata bytes. ) ) fi END CONVERGENT TECHNOLOGIES RELEASE NOTICE FOR 9.1 BASIC Interpreter (SDA-2200) July 23, 1986 SECTION TITLE PAGE 1.0 Description of Programs 2 2.0 Changes from Prior Version 3 2.1 SPRs Closed in This Release 3 2.2 Changes from Release 9.0 3 3.0 Contents of Distribution Diskette(s) 4 4.0 Installation Procedures 5 4.1 Stand-Alone Hard Disk Systems 5 4.2 Master Hard Disk Systems 6 4.4 Stand-Alone Floppy Disk Systems 7 5.0 Required Files 8 6.0 Hardware Information 8 6.1 Hardware Configurations Supported 8 7.0 Resource Requirements/Utilization 8 7.1 Memory Requirements/Utilization 8 7.2 Disk Requirements/Utilization 8 8.0 Certification Information 8 9.0 Documentation Updates 9 10.0 Known Errors and Omissions 16 1.0 Description of Programs This Release Notice describes BASIC Interpreter version 9.1. This section and the sections that follow provide a description of the product, contents of the Distribution Diskette, installation procedures, and other information pertinent to this release of BASIC Interpreter. BASIC Interpreter 9.1 will not run under Protected Mode Operating System. 2.0 Changes from Prior Version 2.1 SPRs Closed in This Release A915 Memory overwrite (i.e. comma insertion) problem. A758 Negative double precision number raised by any number resulted in Illegal Function call for large numbers. A1355 Changed error message (i.e. from File not found to Access denied). A1441 Print Using did not work with small numbers. 2.2 Changes from Release 9.0 BasGen.asm has been extensively modified. There are now approximately 500 TableEntries in the file. 3.0 Contents of Distribution Diskette(s) The BASIC Interpreter Distribution Diskette is your master copy, and has been shipped write-protected. It should not be write-enabled, nor should it be used as a working copy. The Distribution Diskette contains the following files in the directory: Basic.run BasicRes.run The Distribution Diskette contains the following files in the directory: Basic.lib BasGen.asm ObjBasIntSwp.fls ObjBasIntRes.fls ObjBasIntSwpII.fls ObjBasIntResII.fls MaxMemArraySwp MaxMemArrayRes StartBasicLink.sub It also contains a directory with various files used only in the installation of the product. Basic.run is a swapping version of the BASIC interpreter. BasicRes.run is a resident version. Basic.run (or BasicRes.run renamed to Basic.run) must be present in the [sys] directory to run a BASIC program. The difference between Basic.run and BasicRes.run is described below in Memory Requirements: Swapping and Resident Versions of Basic.run. The remaining files are needed only for configuring BASIC to invoke non-BASIC procedures. The use of these files is described below in Configuring BASIC. The Distribution Diskette also has the directory with the following file: ReleaseNote 4.0 Installation Procedures The BASIC Interpreter should only be used on Convergent Information Processing Systems which are equipped with hard disk , or in clusters where the master is equipped with hard disk. Use the installation procedures described below . Characters that you must type are shown in boldface. Special keys, such as RETURN and GO, are shown in upper case. {4.1 Stand-Alone Hard Disk Systems A. Signon and set path at the stand-alone workstation. If the Signon form is displayed, fill it in and press GO. Set the path as follows: Command Path RETURN Path [Volume] Sys RETURN [Directory] Sys RETURN [Default file prefix] RETURN [Password] (if any) GO [Node] If your hard disk has a volume password on [Sys], fill this password into the [Password] field before pressing GO.} Command Submit RETURN Submit File list [f0]HDInstall.sub GO [Parameters] [Force expansion?] [Show expansion?] Or if your system is installed with Standard Software version 10.0 or higher, do the following: Command Install GO {4.2 Master Hard Disk Systems A. Signon and set path at the master workstation. If the Signon form is displayed, fill it in and press GO. Set the path as follows: Command Path RETURN Path [Volume] Sys RETURN [Directory] Sys RETURN [Default file prefix] RETURN [Password] (if any) GO [Node] If your hard disk has a volume password on [Sys], fill this password into the [Password] field before pressing GO. B. Command Submit RETURN Submit File list [f0]HDInstall.sub GO [Parameters] [Force expansion?] [Show expansion?] Or if your system is installed with Standard Software version 10.0 or higher, do the following: Command Install GO {4.4 Stand-Alone Floppy Disk Systems A. Signon and set path at the stand-alone workstation. If the Signon form is displayed, fill it in and press GO. Set the path as follows: Command Path RETURN Path [Volume] Sys RETURN [Directory] Sys RETURN [Default file prefix] RETURN [Password] (if any) GO [Node] If your floppy disk has a volume password on [Sys], fill this password into the [Password] field before pressing GO. B. Command Submit RETURN Submit File list [f0]FDInstall.sub GO [Parameters] [Force expansion?] [Show expansion?] {5.0 Required Files The BASIC Interpreter requires the following files which exist in directory on the Distribution Diskette. Also, they must exist in [sys] on user's system. Basic.run {6.0 Hardware Information 6.1 Hardware Configurations Supported BASIC Interpreter can be run on any of the Convergent Technologies' workstation (i.e., IWS, AWS, NGEN). {7.0 Resource Requirements/Utilization 7.1 Memory Requirements/Utilization The BASIC Interpreter runs on any workstation with 512K of memory. 7.2 Disk Requirements/Utilization The BASIC Interpreter needs disk space of: 156 sectors for Basic.run. 153 sectors for BasicRes.run. {8.0 Certification Information BASIC Interpreter conforms to the ANSI x3.60-1978 standard. {9.0 Documentation Updates This section explains BASIC features which are not explained in the current BASIC manual. OPTION COMMA permits the program to substitute optional characters for use as the logical input delimiter, comma, decimal point, and currency symbol. BasGen.asm BasGen.asm has been extensively modified and now contains approximately 500 TableEntries. The order of questions and arrangement of external operations has been extensively modified and a large number of new table entries added to BasGen.asm. The comments within BasGen.asm have also been expanded and are the documentation update for the file. OPTION COMMA Format: OPTION COMMA [,S$] Action: For input and output of numeric data lists during program execution, OPTION COMMA changes the physical representation of the following items: (1) Logical input delimiter, which separates data items in the INPUT and WRITE statements; (2) Logical comma, which is used by the PRINT USING statement when formatting numbers; (3) Logical currency symbol, which is used by the PRINT USING statement when formatting numbers; (4) Logical decimal point, which separates the integer and fractional parts of floating-point numbers. If the optional string parameter is omitted or is the null string, OPTION COMMA resets the above items to the following new default values. Old Value New Value logical input delimiter comma (,) slash (/) logical comma comma (,) period (.) logical currency symbol dollar ($) dollar ($) logical decimal point period (.) comma (,) If the optional string parameter is included and is non-null, OPTION COMMA resets the above items based on the first four characters in S$. New Value logical input delimiter - first character in s$ logical comma - second character in s$ logical currency symbol - third character in s$ logical decimal point - fourth character in s$ If S$ contains less than four characters, then the new default values are used for the unspecified items. Note: OPTION COMMA only effects the execution of a BASIC program with respect to the input and output of numeric data lists. It does not change the syntax of any part of a BASIC source program. In particular, OPTION COMMA does not change the syntax of DATA statements or PRINT USING format strings. Examples: 10 INPUT X, Y 20 PRINT USING "$$##,###.## "; X, Y ? 12345.67,76543.21 $12,345.67 $76,543.21 10 OPTION COMMA 20 INPUT X, Y 30 PRINT USING "$$##,###.## "; X, Y 40 PRINT X, Y 50 WRITE X, Y ? 12345,67/76543,21 $12.345,67 $76.543,21 12345,67 76543,21 12345,67/ 76543,21 10 OPTION COMMA "; &" 20 INPUT X, Y 30 PRINT USING "$$##,###.## "; X, Y ? 12345,67;76543,21 &12 345,67 &76 543,21 Configuring BASIC The BASIC interpreter can be configured, that is, you can create a custom version of Basic.run. By configuring BASIC, you can o create a Basic.run that can call non-BASIC procedures such as the Forms package or the CTOS operating system, o link in a customized SAM, o or change default values, such as the number of files that BASIC can open concurrently, the maximum random record size, and the size of SAM buffers. To create Basic.run, follow the five steps below. 1. Copying the BASIC Configuration Files Path into a working directory of your choice. Copy the contents of the directory on the BASIC distribution diskette into your directory. 2. Editing BasGen.asm (Optional) If your are simply configuring in procedures that are already included in BasGen.asm, skip this step. If you are adding new entries or changing default values, invoke the Editor to modify BasGen.asm. Add an entry for each new non-BASIC procedure. Comments within BasGen.asm explain how to add an entry. The variables sSamBuffer, wMaxFiles, and wMaxRecLen define default values. These can be modified. BasGen.asm also provides a facility for renaming non-BASIC procedures. This facility is documented within BasGen.asm. 3. Assembling BasGen.asm Use the Assemble command to assemble BasGen.asm: Command Assemble RETURN Assemble File BasGen.asm GO [Errors only?] [GenOnly, NoGen, or Gen?] [Object File] [Error File] [List on pass 1?] During assembly, the Assembler asks a sequence of questions such as: Are you calling Forms (y or n)? Are you calling Sort/Merge (y or n)? Are you calling the Sequential Access Method (y or n)? If you answer y (for yes) to a question, the assembler creates an entry for each procedure in the corresponding software package. To answer no to a question, type "n RETURN" or just RETURN. The procedures associated with each software package are as described in the documentation of that package. The procedure names and interfaces are also part of the file BasGen.asm. These interfaces are consistent with the current releases of the various software packages. However, subsequent releases of CTOS.lib, Forms.lib, etc., in which interfaces have been added or changed, may require corresponding revision of BasGen.asm. If you need to be able to access channel A or B for printing or Comm, you will need to link with SamGenAll.obj. When relinking Basic.run, be sure to use a SamGen and Ctos.lib of the same version. 4. Linking Basic.run After assembling BasGen.asm, you link the BASIC object module library (Basic.lib) with BasGen.obj and with the object modules containing any added non-BASIC procedures. Use the Executive's Submit command and the submit file StartBasicLink.sub to link BASIC. StartBasicLink.sub allows an optional parameter to be typed into the [Parameters] field of the Submit command form. Allowed parameter values are: Swp which causes a swapping version of Basic.run to be created. The [Object files] field of the Link command form is filled in using the contents of the file ObjBasIntSwp.fls. The [Max memory array] field is filled in with the contents of the file MaxMemArraySwp. This is also the default case. Res which causes a resident version of Basic.run to be created. The [Object files] field of the Link command form is filled in using the contents of the file ObjBasIntRes.fls. The [Max memory array] field is filled in with the contents of the file MaxMemArrayRes. In general, the swapping version of Basic.run is preferable to the resident version because it requires less memory, with only a small performance degradation. If you are adding object modules to the [Object files] field, do so by editing either ObjBasIntSwp.fls or ObjBasIntRes.fls. For more details on the [Object files] field, see the Linker manual. The example below shows how to link a BASIC that can invoke the Forms package. We assume that when you assembled BasGen.asm, you answered yes to these questions: Are you calling Forms (y or n)? Are you calling CTOS OpenFile or CloseFile (y or n)? In this example, it is assumed that Forms.lib, the library containing the object modules for the Forms package, is in the working directory. Command Submit RETURN File List StartBasicLink.sub [Parameters] Swp GO [Force expansion?] [Show expansion] If you are running under CTOS II environment, you need to list one more parameter which is II. Command Submit RETURN File List StartBasicLink.sub [Parameters] Swp II GO [Force expansion?] [Show expansion] StartBasicLink.sub displays the Linker command form and fills in these fields. Command Link Link Object modules BasGen.obj Basic.lib(Basi.. Run file Basic.run [List file] [Publics?] [Line numbers?] [Stack size] [Max memory array size] 63584 [Min memory array size] 6000 [System build?] [Version] '9.1 Swp' [Libraries] [DS allocation?] [Symbol file] Basic.sym Note: The Linker automatically searches CTOS.lib, hence, you do not need to include CTOS.lib in the [Libraries] field even though it contains needed object modules. BASIC must be linked with a CTOS.LIB that is version 9.2 or higher. 5. Copying Basic.run Once Basic.run is created, copy it to [sys]Basic.run. {10.0 Known Errors and Omissions A. Assigning 39 or more digits to a single precision variable will crash the system. This a limitation of BASIC. B. If you add your own procedures to BasGen.asm then answer "Yes" to every question while assembling BasGen.asm, the Assemble may result in a very large number of errors claiming: *** Error #23 Limit of 255 EXTRN symbols per object module exceeded For this reason, be sure to answer "no" to one or more categories that you are unlikely to use. (Note: Although the error message says "255 EXTRN symbols", recent Assemblers, through Version 10.2, actually handle 510 external symbols.)2 9.1 BASIC Interpreter A-09-00876-01-B SDA-2200 Page # of 16 A-09-00876-01-B 9.1 BASIC Interpreter Page # of 16 SDA-2200O_t}_tڔ-"ڞ3~}@@ p "@#&'*+,@0,1@,!@p "@#&'*+, !A¦˜ !Aw0c݁./߁#8ߜ@ @ X @p "@#&'*+,@@ @@ p "@#&'*+, )T\ٿW[twّOP[a٘AHK )ۜLPQ7L K@<@ ` @ ` @ P@@p "@#&'*+,@ݵ (ݻݢ5Υp "@#&'*+,@<@ ` @ ` @ p P<p "@#&'*+,%,4@ASCɭ9[ %вAз?SC9[!> @@@ xp "@#&'*+,@<@ ` @ ` @ P9w rrt2E9s @  @  @p "@#&'*+, @<@ xp "@#&'*+, 2˸TUg~42dɖܸ҇K|]@  p "@#&'*+, @ p @ @   @  i l – - ˑҵˣ*ˌW F˽ { h - @  p "@#&'*+, @ p "@#&'*+, @ @ H@ PpvX9ؾӭ}@ Pp "@#&'*+,@ @ @ Hp "@#&'*+,"y{|ѱڲѸ"ߓy@|y{@ ,!,@ ,!!,@ x @ x$p "@#&'*+,  ((()P xxxx Courier 72G B::( & 1.0.1}m ^~`"/7Mfd.sys CrashDump.sysFileheaders.sysLog.sys SysImage.sys BadBlk.sys Basic.args HdInstall.sub FdInstall.sub *@ 01762-1/1@ B @ D K4> * B`79|P^Sys: CT Config  ReleaseNote 9|Fileheaders.sysSys< D [:Mfd.sysSys: &B d6Log.sysSys< @ 0 SysImage.sysmilo9Sys<  BadBlk.sysSys< . CrashDump.sysSys: @ { Basic.argsmilo9Sys< +--\m HdInstall.submilo9Sys< .00MPO`atallan FdInstall.submilo9Sys < 244 MP`at Basic.runmilo9CT  6@@c d BasicRes.runmilo9CT  BKK-p.V ConvertRandom.basmilo9CT  LOOY1 Basic.libmilo9Config  Q[[mn"StartBasicLink.submilo9Config \^^MP`atvivianObjBasIntSwp.flsmilo9Config `bbZBObjBasIntRes.flsmilo9Config dffObjBasIntSwpII.flsmilo9Config giihMP`evivianatlan;ObjBasIntResII.flsmilo9Config jllXMaxMemArraySwpmilo9Config noo 5U}j}j}j/MaxMemArrayResmilo9Config qss" BasGen.asmmilo9Config tzz]$8 ReleaseNotemilo9 ReleaseNote |TTMPmF%bYC%b:allanScott"d!c ba`_^]\ [ !Z!"Y"#X#$W$%V%&U&'T'(S()R)*Q*+P+, O,- N-. M./ L/0 K01J12I23H34G45F56E67D78C89B9:@:;?;<><===><>?;?@:@A9AB8BC7CD6DE5EF4FG3GH2HI1IJ{J Basic.run BasicRes.run ConvertRandom.bas Basic.lib StartBasicLink.subObjBasIntSwp.flsObjBasIntRes.flsObjBasIntSwpII.flsObjBasIntResII.flsMaxMemArraySwpMaxMemArrayRes BasGen.asm ReleaseNote