(2063)L5 @444 $Lz{ : 808Fg  ` ~h{h|I Lj ~h{h|I L n_`)ܠ8 ܥ)` ~)ܠ_` ܥ I |H{H`}G5`LL\sl,tLI_ |H|}||}ʕh||$ |i|}L~LW7^L7 =7`CLI %|H L# L#HJJJJ h) 0:iL# } | |ȱ|  l i R XL` : # ` ȱ) # `` sts`EXECUT $P %L~L&`BRANC |e|Hȱ|e}}h|Ly 0BRANC$ |i|}Lw (LOOPE  hhhhL, (+LOOPu %膃HH}h}hL] (DO HHHHLw DIGI 800 08 0  HLr HLr (FIND  tQv)?,ȱtQv "ʘieteutHLp ȱtȱtȱtuttжHLp ˇENCLOSj  ʘʕv5t wv$t wLw Lw }m ] 8 h `EMI #KE;#GEE#?TERMINAO#C_#CMOV  tuLw xvywL U< tu666tuuuLw Ur u *t66&u8vuv66tL AN 5H5Lr O HLr XO UHULr SP HLp SP  Lw RP Lw ;5h|h}Lw EXI5LEAVQ Lw >oHHLw RhhLw HLp RHLp  H Lp 0ȔLw 0*Lw uuLw DuuuuL MINU>8Lw DMINUW8L?OVEnHLp DRO SWAHLr DUHLp +uuL TOGGL UL HLr CLw L CL ?N &<}H|H m i|e}Lw ?v33ss s`CONSTAN?T<HȱLp VARIABL?<iHeLp e`PIC HLr ROL 0L HLr 2CONSTAN?TT<ʕʕL2VARIABL?T32D tLw 2] ʱtLw zG2DRO?}}32DU?ll32OVE?  32RO?  32SWA?  3 COPYRIGHT 1983 PERFORMANCE MICRO PROD. SER#A100281 USE?<eHeLp GB C/(FIRSoLIMIB/BUB/SC+ORIGI?] 5 3TI WIDT WARNINFENCDVOC-LINBLIOUSCOFFSECONTEX CURREN"STAT$BAS&DP(FL*CS,R.HL01qLw 2iLw }m y5  `1Lw 28Lw 26Lw 2VvLw )LLw )HLw HERHȱLp }m mɎ)`ALLO?3?:H3C?1H3w8L HLr U*IHLr DUL8PIȔL }m ynɮ  `?3RO-HLr SPAC?K 3 -DUbHLp Lw ?DU?`3TRAVERS tevvuewwvvHwLp LATES?&3LF? u3CF?:u3NF? u] 3PF?1 3!CS? V3?ERRO?" R }3?COM?1 3?EXE?1 3?PAIR?u 3?CS? Vu 3`# #`#  L?LOADIN? 3COMPIL?7mT3?)13? 13SMUDG? 3HE? ;3DECIMA? ;3(;CODE?3;COD?v<3?<3+?" <3D+?" U3AB?,3DAB?>3MI?ll" }3MA?ll" }3M?ll mPP: >3M?lmm_Pp  ,,3?: }3/MO?m3?}3MO?}3*/MO?m3*? }3M/MO?m)p mp 3USoPREo+BU?] m" }ah u3UPDAT?h ] h 3FLUS?mauy o) ] !}C 3EMPTY-BUFFER?amlu3DR?) 3BUFFE?] ms " ] " ]  )*h 3BLOC? mh u" 4s " }!1*:uu" h }3(LINE?mUy ^!U3.LIN?!3MESSAG?" ] E] MS] GS " T} ) o" O 3  B" oNO}]  1C }] " *   " uo! } MSG # 5,33LOA?5,mm)3--?)l uA,38qȩq #L L L L #Lw KEYIu#ƅ̥ xʆ ꦃXLw  L ##Ś## # #`L&EBU 00, OK,00,00 ATCHED,01,00 DKFLAS@SYSDEVOPE0$i  `  $Lw CLOSq$  ͥ##L v L&tu$ Щz {z{`vt$ ЦL INPUT$ $v  å)@нvL$DVdDVDVDVSETDEV?1 )%o" )%#$ )%u5%) o" 5%#$ c5%uA%) o" A%#$ 6A%uM%) o" M%#$ 1 3ABORTI"& Lw GET5& $v )@ vL$CMDa&#L PRINTt& L& 饐$ L H #h iʕT|}LGETDE&  󥺦HLr RDSTA?& " }] 00#o # $3CKS?$ "  I/O STATUS ERROR: 5,  @ " 1 )3CKRDSTA?5' '#o] 00u"  # & R3CKWRSTA?'}3BLOCK-WRIT? )   @r&' @C }3BLOCK-REA? )  A 0  @3&'" Oo @ @C }3?DIS?#$ " 1 )3OPENCH?I("  #$ )).$'3CLOSCH?I("  o$3?FIL?5'}I(" < '#o] 62" }1 ] 00u"  # & R)3TAPEFLCKTO?I(" h(" ` LOOK FOR FILE ON TAPE (IF NO, $BLANK SCREEN WILL BE CREATED) [Y/N]?1k Nu" 1 )3CLRBU?]  03(R/W?;mm]%ml( #$I("  m'l_v+" R  W , S++ R C SI(" 3 :#$o1 0 @+" 1uo #+ u"  )" }{{)] " $.$(" " ) ( }' }] o$(};3-BC?) p  3R/?)3?)}3FORGE?* ml"   u" l:u`" 3SPACE?)`" ) NC 3<?g3#?}}glu3SIG?+"  -3?;A + l"   03#?+ll " 3D.?ml_v++++luY+3D?)+N3.?m+3?,3?5,3INDE? o B%,N) ! " OC 3LCAL,,,L~, ~,L CALL,,,L~,Hh ~,HhL BASI,LBAC?uT3BEGI?713ENDI?7:dlu3THE?-3D? B3LOO?BdC ,3+LOO?Bds ,3UNTI?1d" ,3EN?u-3AGAI?1d ,3REPEA?mm--3I?" )T:3ELS?:d )T:-:3WHIL?-3>I?30?)379-STANDAR?3NEGAT?<3NO?3DNEGAT?U3FIN?" } )3CONVER?i3SRDEPT? .u3RDRO?}3SAVE-BUFFER? 3U?),3U.?m)+3VLIS?] P] $ul] ? " )NN " }3LIS?  SCR # 5, ] UB" o) U] (u" :%,N !B " }BmUu] #B "   " OC {3WHER?U ! Y+] ^ ))3DUM?) ] .] ) B.oC :Y+] u] ) ]  ] " }] .] _" }] . oC ] s }3D?U3D0? 3D?0}3D?03D?003DMA?0" {3DMI?0" {3COP?^!! ]  3REBOO?] ] ] 3SAVESYSTE?21l(] * ,1#$] ] ,{}] "o] ] ,{}] ] ] ] ] ,{}))] ] ,{}(3(DIR?I("  SYSDEV IS NOT A DISK!l(;'] #$)] ] .$] :3&] ] 3& $" ,B5,] ] ($$" o$ " ] o$;(3DI?] $] 13D?I("  SYSDEV IS NOT A DISK!] "o] $" ] o 1 l(] or&'(3BUFFER? m] u)] p }m:] mu] ca] h  3MEMTO?umau] "  TOO LOW!E] u] ] o] 321h3SAVETURNKE? %DO YOU REALLY WANT A TURNKEY SYSTEM? ] Y" ] ] l]  l] ] " )) 1"  INSERT DISK, PRESS KEY s#}1] c1 3TASVA?30VA?)3CONS?3AS?] o3ADD?B+B]  }3CONCAT?)l+B443TYPE?3TO?)l43WORD?j:) "   ERROR -- NO '" ^! ] '" C 1H] 'oHzo3STR?)v++] +l3SW=?++5m5mlF." {})E1) l ]  F." })OC ++{3CAS?7V V] 3O?] dl" )T}] 3ENDO?] d )T:+-] 3ENDCAS?] d} VF." :+- V3AN?3OF?] dl5" )T}] 3BCONVER?o) K}eC 3BTABL?j/7z3$LE$LEN@?g7o3CMDBL?o) Kt7Hc.)TC 3CMDTB?je7z3(?lll "  ? COMMAND RANGE ERRORt7+o3CMDEX?t7 }3'?5?LIST?$85) " A  SELECT FROM: o) 7N+5 C  SELECTION:  K3VALBL?o) Kt7HK}TC 3VALTB?je8z3VALGE?t73?@[]^_`ABCDEFGHIJKLMNOPQRSTUVWXYZUCIZ7 !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_`ABCDEFGHIJKLMNOPQRSTUVWXYZLCOUZ7  !"#$%&'()*+,-./0123456789:;<=>?@abcdefghijklmnopqrstuvwxyz[\]^_`ABCDEFGHIJKLMNOPQRSTUVWXYZ ABCDEFGHIJKLMNOPQRSTUVWXYZ \UCOUZ7  !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`ABCDEFGHIJKLMNOPQRSTXVWXYZ ABCDEFGHIJKLMNOPQRSTUVWXYZ \MAXPAC^O3DOKER?1>3TSTKER?>" b >)" ^! >)   C }  <--ERROR?  NO ACTION >3XSETU?>K38o)3ITSPEETSPEEITWORTWORITSTOTSTOITSHTSHITDUTDUITPATPATCTTCOICHRSEIBORDEIBKGNICHRCLCL? 3DW? `" ) C ] ') K C ] ') C 3BYTEPRIN?" <)] )] ] ] ,{} )] ] y] ,{} }3PACKE˂NIBUFFADDRECPK˅C }?3SHOWTYP?EE7  FILE TYPE = +5 }5B+9l" }   C8l" }   %6l" }   } 3VTSPEE8110 300 1200 2400 STSPEE??6G?78?}3VTWOR88-BITS 7-BITS STWOR??G?78?}3VTSTO81 2 STSTO??H?78?}3VTSH83-LINE X-LINE STSH??SH?78?}3VTDU8FULL HALF STDU??H?78@}3VTPA8NO ODD EVEN `MARK SPACE STPA?@H@78@}3STCT????*@3STCO??@@5@3TOPNBLDTOPN?|III:lo*@lo5@3XTSPEE?6G}? 75"  G>C }?3XTWOR?G}? 75"  G>C }?3XTSTO?H}? 75"  3H>C }?3XTSH?SH}? 75"  H>C }?3XTDU?H}? 75"  H>C }?3XTPA?H}? 75"  \I>C }?3VCHRSE8 UC/GRAPHIC LC/UC SCHRSE?C@KC@78] }3XCHRSE?K}? 75"  9K>C }?3NUMI?K}3SBORDE?] Q@3XBORDE?K]  K3SBKGN?] !^@3XBKGN?K]  K3SCHRCL?] l@3XCHRCL?K]  L3STO?)v+K+++}BBB 3REC?K3XTS?] _^!)?2L1?2L:?2LB?2L] ?2L] @2L] C@2L] l@2L] ^@2L] Q@2L} 3XTSTOR?lL 3XTRECAL?] _)_LG_LG_L3H_LH_LH_L\I_L9K_LL_LK_LK3CTERMINA7 SPEED IWORD 'JSTOPBITS TJ HANDSHAKE JECHO JPARITY JSAVE LRESTORE LCASE ]K CHARCOLOR LBORDER K BACKGROUND KXTERMINA?5M}? 75" 5M 78>C }?3SHOWTER? TERMINAL PARAMETERS: 6G?7  SPEED = +5 }G?7  WORD LENGTH = +5 }H?7  STOPBITS = +5 }SH?7  HANDSHAKE MODE = +5 }H?7  ECHO = +5  DUPLEX }H@7  PARITY = +5 }KC@7  CHARACTER SET = +5 } CHARACTER COLOR = l@A, BORDER COLOR = Q@A, BACKGROUND COLOR = ^@A, 3XSPKTLE?KP=m%>3XSPADDI?K0>3XSPADCH?Kr>3XSTIMOU?K=3XSENDLI?K|>3XSQUOT?Ko6;=3IFLWRXFLWRNOF?)-P3XFLWRNO?1-P3XRPKTLE?KP=m>3XRPADDI?K=3XRPADCH?K=3XRTIMOU?K=>3XRENDLI?K=3XRQUOT?Ko6;>3XDELA?K=3XSDS?] _^!] ()%>2L10>2L:r>2LB=2L] |>2L] =2L} 3XSDSTOR?Q 3XSDRECAL?] _] (_L%>_L0>_Lr>_L=_L|>_L=3XRCS?] _^!] P)>2L1=2L:=2LB=>2L] =2L] >2L} 3XRCSTOR?Q 3XRCRECAL?] _] P_L>_L=_L=_L=>_L=_L>3RECAL? R]QL3STOR?QQlL 3CSEN7 LENGTH-PACKET OPADDING OCHAR-PAD OTIMEOUT O END-OF-LINE OQUOTE PSAVE IQRESTORE ]QCRECEIV7 LENGTH-PACKET gPPADDING PCHAR-PAD PTIMEOUT P END-OF-LINE PQUOTE PSAVE QRESTORE RCFLWR7OFF =PON RPXSEN?R}? 75" R 78>C }?3XRECEIV?!S}? 75" !S 78>C }?3XFLWR?S}? 75" S 78>C }?3SHOWSEN? SEND PARAMETERS:  PACKET-LENGTH = %>A,  NO. PAD CHARS = 0>A,  PAD CHARACTER = r>A,  TIMEOUT INTERVAL = =A,  END-OF-LINE CHAR = |>A,  QUOTE CHARACTER = =: 3SHOWRECEIV? RECEIVE PARAMETERS:  PACKET-LENGTH = >A,  NO. PAD CHARS = =A,  PAD CHARACTER = =A,  TIMEOUT INTERVAL = =>A,  END-OF-LINE CHAR = =A,  QUOTE CHARACTER = >: 3SHOWFLWR? FILE WARNING IS S-P7+5 }3SHOWDELA? INITIAL DELAY INTERVAL = =A, SEC 3CSE7TERMINAL NSEND SRECEIVE #T FILE-TYPE wF WARNING-FILE TTDELAY PCSHO7TERMINAL QNSEND TRECEIVE bU FILE-TYPE F WARNING-FILE >VDELAY qVSE?V}? 75" V 78>C }?3SHO?W}? 75" W 78>C }?3TIVATICSE?P<WWo3INTSE?] <X3TINTSE?=>#X3TI?W] 3TIGE?] ] 3WAI?=#XIX_X" 3BFσBF΅CLRI?X] )0)] 3CLROU?X] )0)] 3MODOPE?I::)I.$X] X] XX3MODCLOS?] ] " :o$3TOGGE?] ݞ]  3BREA?  [BREAK] ] XY7YIX_X" 7YX3FL?))3FL?] )3FL?] 13?ES?1l=" { [F8]s# 9l" })9KY S9l" }19KY 8l" }Y 8l" }UYY x9l" }TbU>VqVY ^9l" }QNY J9l" }Y 89l" ,}  OPTIONS: U L B C S T X ? Y }3GETK? @" @3GETMO?:^A13&^Ao]  3PUTMO?" SA:SA1r& }3UCI?ZY" BA,  TRIES = J>A,3SPAR?>[l=[l1=[l:=[lB=[l] =] 3RPAR?[%>1[=>:[0>B[r>] [|>] >3MESSG?] @ TRANSFER COMPLETE3MESSG?] @ ??TRANSFER FAILED3NUMTRY+>?J>1J>=3OLDTRY+>?W>1W>=3KSTATE?d>3KSTATE?d>3EOLSE?|>" r=|>3QUOTSE?>" 9>30NUMTR?)J>3N? >o] @ >3N? >3INITIALIZ? ^)W>) >3T?jA]  3T7?]^l3T?jA3T8?^l3MGE?):^A13&jA_X" {1\=jA" ]^3WAITHEADE?IX^\=F." } " ] ]  1)3GETHEADE?^\=" " {] ]  {)) }3FILLPACKE?B`" D] + ^\=" " {] ]  {)) }^ C 3RPAC?^l1l" }_q^[Bu]  :l" }_q^[]  bBl" }_q^A J] l" }O_ 6] l" (}_]^[A] ] @] ?  }ol] " NA" } 8] @] "   ? TIMEOUT    ? CKSUM ERR)A{{XA3MPU?uA:uA1r&3SPAC?0>`" ) r>`C \=`B[`+[+`++`" "B+ +`C  }}] ] @] ? [`|>`3BTEMBOU?g=l= l= " =l" }pa= =: r=l" 8}5B8" pa[=: ] J=] M=]  T}=l" &}5B8" pa[=: ) &6l" }pa= [=: } }pa= 13HEXOU?)v++++}o':3UCOOU?B<pa{a3TEXTOU?6;pa{a3ASCOU?]  pa{a3BINOU?pa]  {a3BUFIL?:A)+AB+A%>] u " VC5B9l" }b L9l" }b :+9l" }jb (8l" }b 6l" }b }`" ) :A+A1+AC  `+A3HBUHEXI?:cc1" }'0D1c o3TRPU?= 5B9l" }:z" 0D B9l" }:z" 0D (+9l" }c 6l" }0D }3BUM?llpa]  3BUFEM?)] " >td>" &otd>" pad pa[d pado }{3GNAM?9953SNAM?AdA"   FILENAME: Ad 3OUTNAM?AAAo1 A B93SFIL?p]" 8EA91^+`GAAA_g9l" }A1^ou" ] 8g `9l" }A1^u" ] 8g < 9l" }[8 (:l" }] 6l" }8 }3SDATA-AC? ^^Ab>" 9 93SDAT?p]" 8EA91^>`GAAA_g9l" }A1^ou" ] h `9l" }A1^u" ] h < 9l" }[8 (:l" }] 6l" }8 }3SEOF-AC? ^^)" 9 83SEO?p]" 8EA91^)`GAAA_g9l" }A1^ou" ] h `9l" }A1^u" ] h < 9l" }[8 (:l" }] 6l" }8 }3SBREAK-AC? ^^83SBREA?p]" 8EA81^)`GAAA_g9l" }A1^ou" ] i `9l" }A1^u" ] i < 9l" }[8 (:l" }] 6l" }8 }3SENDS?v@1@ SENDING 9d>vXF^9X8\]9l" }*h] 9l" }Rg] |9l" }h] h9l" }xf] T8l" }i] @8l" }:E ,8l" }:E 6l" }:E } X3SEN?ev@3RINIT-AC?A >A\Ad\A91^] `J>W> ^^93RINI?p]" 8EAAA_9l" }kk < 9l" }[8 (:l" }] 6l" }8 }3RFILE-?]" 8EA1^" Ad\A9A] ` ^] 83RFILE-?]" 8EA1^" )9A)` ^] 83RFILE-?A1^" ,Aqe:@A+5)91^)`J>W> ^^9 83RFILE-?A1^" )91^)`8 83RFIL?p]" 8EAAA_9l" } l r9l" }Ol `9l" }l N8l" }l < 9l" }[8 (:l" }] 6l" }8 }3RDATA-?A1^" &AAd)91^)`J>W> ^^9 6]" 8EA1^" Ad\A9A] ` ^] 83RDATA-?]" 8EA1^" )91^)` ^] 83RDATA-?A1^" &)91^)`EJ>W> ^^)A9 83RDAT?p]" 8EAAA_9l" }m `9l" }n N9l" }In < 9l" }[8 (:l" }] 6l" }8 }3RECS?v@1@  RECEIVING 9]F^9X8\]9l" }n] h9l" }l] T9l" }k] @8l" }:E ,8l" }:E 6l" }:E } 3REC?AdXo" ] F]iEY & >v@3RSER?A9)+`k3GETS?v@1@  RECEIVING9]F^9X8\]9l" }o] h9l" }l] T9l" }n] @8l" }:E ,8l" }:E 6l" }:E } 3GET?ev@3LLOGOU?Xv@9Xp!9)1`GAAA_ 9l" }[: (9l" }: 6l" }: }:l" }] @  LOGGED OUT :l" }F] }Y( & >v@3KQUI?( &3XD?23HEL?v@] c] ` v@] ) ! C >v@C 3NE? INSERT, THEN PUSH ANY KEY:  SOURCE DISKs#}] c] _ ^! C  DESTINATION DISKs#} c13CKERMI7CONNECT n[SEND ;kRECEIVE oGET pBYE pHELP qEXIT ,QUIT qSET WSHOW WSAVE mRRESTORE [R DIRECTORY 2DISK qNEW qKERMI?)] v@1@ KERMIT-C64/V1.5  R. DETENBECK DEPT. OF PHYSICS UNIVERSITY OF VERMONT] @  KERMIT-C64>  Ir}? 75" Ir 78>C }? 3