545,148:46,37:248,39:250,38:56,38:644,38:R157,128:"":53281,12f"":53280,6:A$" **************************************"A$" ERSION 1.04 BY OBBY MITH"" UNTER & MODEM ILE RANSFERS" " FOR USE WITH DATASETTE"( A$:E " <>ERMINAL MODE"g " <>OAD FILE TO UPLOAD" " <>PLOAD PREVIOUSLY LOADED FILE" " <>OWNLOAD A FILE" " <>AVE DOWNLOADED FILE" " <>EAD SEQUENTIAL FILE" " <>UIT":" ";X CO$"TLUDSRQ":87:53280,12:J19,24,43,113,57,74,103,128,125a "" "** ERMINAL MODE. ** "; (5824)6"(300 BAUD)":23 "(OPTIONAL BAUD)" 5828:3 "** OAD A FILE. **" FI$"":"ILENAME";FI$ FI$""3! "ILE TYPE:"5 118:J29,34,3K "ROGRAM.":2,80[ 679,(FI$) I1(FI$):679I,((FI$,I,1)): 5490 !:39 ""EQUENTIAL.":2,83 #1,1,0,FI$ $:"LOADING"; %5627 &1: '"IT <> TO CONTINUE." (198,0& )A$:A$(13)41- *3K +"** PLOAD A FILE. **"X ,E0:114z -E"OTHING TO UPLOAD.":39 ."ROTOCOL:" /" <>MODEM" 0" <>UNTER" 1" <>BORT" 2CO$"XPA":87:J51,54,3 3"MODEM." 4122:7460 53 6"UNTER."" 7122:8901) 83I 9"** OWNLOAD A FILE. **"[ :"ROTOCOL:"n ;" <>MODEM" <" <>UNTER" =" <>BORT" >CO$"XPA":87:J63,70,3 ?"MODEM." @"YPE OF FILE BEING DOWNLOADED." A118:J66,67,3B"ROGRAM.":2,80:68-C"EQUENTIAL.":2,837D6886>E3NF"UNTER."aG"ILETYPE: ";kH8152rI3J"** AVE A FILE. **"KE0:114LE1"OTHING TO SAVE.":39MFI$"":"ILENAME";FI$NFI$""3O"AVE AS:" P118:J98,81,3 Q"EQUENTIAL."/R1,1,1,FI$CS:"SAVING "FI$MT5717`U1:"DONE":39fV{W"ELECTION? ";X" ";YI150ZA$:A$""96:J(CO$)[\" ";]I150^A$:A$""96:J(CO$)_:88`J1(CO$):A$(CO$,J,1)%a6b"ROGRAM."Fc679,(FI$)mdI1(FI$):679I,((FI$,I,1)):we5676f:"DONE":39g"** HANGE OPTIONAL BAUDRATE. **"h"NTER THE VALUES FOR CONTROL, COMMAND," i"OPT LOW, AND OPT HIGH. EPARATE"j"WITH COMMAS."Ck"XAMPLES: 110 BAUD = 3,0,0,0"jl" 450 BAUD = 0,0,12,4"mA,B,C,D:E9426:F5824nE,A:E1,B:E2,C:E3,DoF,A:F1,B:F2,C:F3,D::3q2,83:43r((2)80(2)83)E1s((251)256(252))10240E1Ft((253)256(254))((251)256(252))E1Lu`v" <>ROGRAM"vw" <>EQUENTIAL"x" <>BORT"yCO$"PSA":87:z"ILETYPE: ";{(2)80"ROGRAM.":|"EQUENTIAL.":}""~248,159:250,158:56,158:644,158:'"OODBYE...":0""S"** EAD SEQUENTIAL FILE. **"hA6498:"ROM:"{" <>EMORY"" <>APE"" <>BORT"E0:CO$"MTA":87:J135,144,3"EMORY.":115(2)83E1E"O SEQUENTIAL FILE IN MEMORY TO READ.":392S(251)256(252)LF(253)256(254)1WISFj((A(I)));z152:EIF::39"APE."F$"":"ILENAME";F$F$""31,1,0,F$:""#1,A$:((A(A$)));152:E151ST01481::39+212,0:A$:A$"";A$" "156KA$"A"E1QfA$:A$" "156lꢁxXL<)<L1)  ( )0 L  1xX` OK LOAD ERROR)(  L)   `) 箧 `)   `  Ʌ %ꪽb Ԣ),^  $b53 L ԍԍԍ ԍԩ ԩԩԩ!L  !"#$%&'()*+,-./0123456789:;<=>?@[\]^_ABCDEFGHIJKLMNOPQRSTUVWXYZ !"#$%&'()*+,-./0123456789:;<=>?@[\]^_ABCDEFGHIJKLMNOPQRSTUVWXYZ  !"#$%&'()*+,-./0123456789:;<=>?@abcdefghijklmnopqrstuvwxyz[\]^_    ABCDEFGHIJKLMNOPQRSTUVWXYZ !"#$%&'()*+,-./0123456789:;<=>?@[\]^_ABCDEFGHIJKLMNOPQRSTUVWXYZ !"#$%&'()*+,-./0123456789:;<=>?@[\]^_ABCDEFGHIJKLMNOPQRSTUVWXYZAITING... BORTED. RANSFER CANCELLED. RANSFER COMPLETE. LOCK # ERROR. UPLICATE BLOCK. AD (b  Lf  oN8L ALfЩLm L6t L6  L;   Iͧ  L  L   ׽) $P = >( =~, ̫ ͭ.  miL  L )m` ͚ݰ ) ͚` 90 SECONDS WITH NO . ?@b  LL ALע  m ?@L6?@Lz Lz    ׽)   I )P#=m= >m> ~,m ̩쭨 AL͞ 6L AL֢ L miL ?@  L6 AL6L68ei iiL6 Lf L 9 ATTEMPTS... O FILETYPE RECIEVED.ROGRAM. EQUENTIAL. 6 ATTEMPTS... (U  P3SGW+ɴ L!T `)P Lj  9" . LR"P A!= A!>( $}, A!̧ɀ) !ͨ; !ͩ3 9"mi - L+! 9" : Lp wLp L " )) AL!hhL}"꽫miЯ0,x(8080 `hhL !hhl L6 )`hhL ! @8eiL6 )(` L! RANSFER TIMEOUT... f" L6O READY SIGNAL RECIEVED. O / SIGNAL RECIEVED. ?@  U" L 9"L$P= !$> !$}, !$̪ɀ)  Z ͞ C0S ALբ" L: L#- mi v$L# 9" ?@L6) v$,ww$ $ JJJJ v$,ww$ $ `ei`mi` L0123456789ABCDEF=>`  -- 300 BAUD -- -- OPTIONAL BAUD -- Ʌ ɆɇGɈ`  hh`$`$$ $  L7%$L7%$$ $  L7%