280/РЪ #1:АX│1е Y:Ю:З@34,"*** EDIT LINE:";X;:З" ***":З:З"- -";:ЗTX$(X):З"- -";/║"Q$│ Т:ЕQ$│"Y"з305 :ДЕQ$│"N"з295 :Д290/є'ЕTX$(X)│""з320 :ДЗ:З" *** EXIT OR NEXT: ***"0,Q$│ Т:ЕQ$│"E"з315 :ДЕQ$│"N"зЛ :Д3000Ж1З" *** OK, ENTER A NEW LINE ***":З"- -";:M$│"":Бж200:ЕM$│""зM$│ б(31,32)0Ь6TX$(X)│M$:X│Xм1:Л0┬;ЕTX$(Y)│""з Y│Yм1:Бе315 :ДЗ:X│Yл10Ё@З:З" RESAVE FILE TO DISK: ?":Бе1701EТ 113,0:в 409991J:Г --------------10O:Г end of program(31,32)0Ь6TX$(X)│M$:X│Xм1:Л0┬;ЕTX$(Y)│""з Y│Yм1:Бе315 :ДЗ:X│Yл10Ё@З:З" RESAVE FILE TO DISK: ?":Бе1701EТ 113,0:в                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 EST ACCESS LOG ======":Бж960:Зe@цЗ:З" FIRST NAME: ";:KN│1:LP│1eДыQ$│"":Бж1385:Е З(Q$)┤3з1510 :ДЗ:FR$│Q$:I$│Q$:Бж1255:ЕNK┤▓1з1510e▌ЁЗ:З" LAST NAME: ";:Q$│"":Бж1385:Е З(Q$)┤3з1520 :ДЗ:LS$│Q$:I$│Q$:Бж1255:ЕNK┤▓1з1520f їNA$│FR$л" "лLS$:LS$│"":Е З(NA$)┤17з1535fV·З:З" SORRY, BUT A USERLOG FILENAME":З" CANNOT EXCEED 16 LETTERS!":Бе1510fМ АX│1е300:─ #1,X:Е О(NM$, З(NA$))│NA$з1275 :ДЛ:З:ЗgЗ" DO YOU WANT TO BECOME A MEMBER":З" OF THIS BBS BOARD: ?":KN│0:LP│0:Бж1385:ЕCM$┤▓"y"зЗ" NOT YET":FLAG│0:Бе1600gw З" YES":З:З:АX│1е300:─#1,X:ЕPW$│ б(6,32)зMF│X:Бе1560 :ДЛ:З" SORRY, "NA$:З" BUT OUR USERLOG FILE IS FULL!"gщЗ" PLEASE DON'T HANG UP, BUT FEEL":З" FREE TO USE OUR BBS; AND LEAVE":З" A SYSOP MESSAGE AT SIGN OFF!":FLAG│0gЇБе1600h З" !!! !!!"h\З:З" ENTER <3> INITIALS FOR YOUR E-":З" MAIL, "NA$": ";:LP│1:Q$│"":Бж1385hЙ"З:I$│Q$:Е З(Q$)┤▓3з1565 :ДЕQ$│"sop"з1270hа'Бж1255:ЕNK┤▓1з1565h╩,АX│1е300:─ #1,X:ЕIN$│I$з1270 :ДЛ:TR│1i`1З:З" PASSWORD? YOU MUST ENTER <6>":З" LETTERS, PLEASE: ";:Q$│"":Т&H7D03,88:Бж1385:Т&H7D03,0:З:P$│Q$:Е З(Q$)│6з1590 :ДTR│TRл1:ЕTR│4з1635 :Д1585iЬ6╘ LU$│DA$:╘ NM$│NA$:╘ PW$│P$:╘ IN$│I$:╘ FL$│"C":┼ #1,MFi╥;FLAG│1:NL$│I$:З:З" YOUR GUEST USER NUMBER IS:";MFj @Ъ #1:LP│0:З:Бж1360:З:З:З" DATA BITS: <7/8=COLOR> ?"j:EБж1385:BITS│ Й(CM$):Е BITS┤7 ▒ BITS▓8з1605jLJЗ BITS:Бж1355joOFX$│"NEW-MBR/SXT":Бж1320:Бе215jИT:Г -----------------jбY:Г goodbye: sign offj║^:Г -----------------jуcЪ #1:Бж1480:ЕSC┤450зSC│450:SO│1:LP│0k'hЗ:CB│255:Бж1350:З" ========== SIGN OFF ==========":З:ЕLM│1з1660kЛmЗ:З" DO YOU WANT TO LEAVE A MESSAGE":З" FOR THE SYSOP: ?":Бж1385:ЕCM$┤▓"y"зЗ" NO":Бе1660k▓rЗ" YES":Бж1220:ЕMF┤1зБж1285:Бе1660k╔wLM│1:Бж1015:Бе1640l |З:З" GOODBYE, "NA$:З" THANKS FOR CALLING ...":АX│1е4:З:Л: Я│0l-БЕ Я┤200з1665 :ДЗ" +++";: Я│0lMЖЕ Я┤200з1670 :ДЗ"ATH";: Я│0lГЛЕ Я┤500з1675 :Д ЯИ:АX│1е200:Л:Як:АX│1е400:Л:Бе105lбР:Г ----------------------l┐Х:Г the motoron / motoroffl▌Ъ:Г routine must be linkedl√Я:Г to your telephone linemд:Г through cassette inputm7й:Г ----------------------mLо:Г END OF SYSTEM105lбР:Г ----------------------l┐Х:Г the motoron / motoroffl▌Ъ:Г routine must be linkedl√Я:Г to your telephone linem  1&" :Г -------------------------&@:Г text file processor&a:Г bbs-board bulletin system&В:Г -------------------------&ШХ 5000:М TX$(500)&┼#Ю:З@34,"*** TEXT FILE PROCESSOR ***":З:З'(З" DO YOU WANT TO START A FILE OR":З" EDIT AN EXISTING ONE: ?"'0-Q$│ Т:ЕQ$│"E"▒Q$│"S"з50 :Д45'Q2З:╗Й" ENTER FILENAME: ";FL$'d7Е  З(FL$)▓8з50'Е<З:╗Й" EXTENSION NAME: ";XT$'ЭAЕ  З(XT$)│3з85 :Д60'╗F:Г ----------------------'┘K:Г directory verification'ўP:Г ----------------------(LUFX$│FL$л"/"лXT$:З:З" CHECKING THE DISK DIRECTORY:":З" JUST A MOMENT, PLEASE ..."(═ZCK│0:АX│3е11:▀0,17,X,A$,B$:A$│A$л О(B$,120):АK│0е7:SB$│ Р(A$,Kн32л1,8):XS$│ Р(A$,Kн32л9,3):Y│ К(SB$):Е Y│255з K│7:X│11:Бе105(√_Е П(SB$,1)│" "зSB$│ О(SB$, З(SB$)м1):Бе95)'dDF$│SB$л"/"лXS$:ЕDF$│FX$з CK│1:K│7:X│11)<iЛK,X:ЕQ$│"E"з120)KnЕ CK┤1з140)╖sЮ:З@33,"SORRY, BUT THAT FILENAME NOW":З" EXISTS ON YOUR DISK! PLEASE":З" CHOOSE ANOTHER NAME ...":Бе50)■xЕ CK│1з255 :ДЗ:З" SORRY, I CAN'T FIND THAT FILE!":АX│1е3500:Л:Бе35*}:Г ------------------*2В:Г textfile processor*LЗ:Г ------------------*zМЮ:З@33,"======= TEXT PROCESSOR =======":З*хСЗ" OK, CREATE YOUR TEXT PROGRAM!":З" PRESS ON AN OPEN LINE":З" FOR INPUT COMMANDS WHEN READY."+ЦX│1:З:З" //////////////////////////////":З+YЫM$│"":Бж200:З:ЕM$│""з165 :ДTX$(X)│M$:Е X┤500з X│Xл1:З"-";X:Бе155+йаЗ:З" YOU HAVE REACHED THE LIMIT OF":З" TEXT DIMENSION: SAVE ?":Бе170+█еЕ X┤2з230 :ДЗ:З" SAVE FILE TO DISK: ?",кQ$│ Т:ЕQ$│"Y"з175 :ДЕQ$│"N"з230 :Д170,0пЩ"O",#1,FX$:АY│1е X:З #1,TX$(Y):Л:Ъ #1,c┤З:З" OK, "FX$:З" HAS NOW BEEN SAVED ...":Бе230,|╣:Г -----------------,Х╛:Г inkey$ subroutine,о├:Г -----------------,╧╚Q$│ Т:ЕQ$│ Л(8)░ M$│""зQ$│"",▐═ЕQ$│""з200,Ё╥ЕQ$│ Л(8)з225-╫ЕQ$│ Л(13)зР-(▄M$│M$лQ$:З Q$;:Е  З(M$)┤31з200 :ДР-KсM$│ О(M$, З(M$)м1):З Q$;:Бе200-rцЗ:З" START ANOTHER FILE: ?"-ЫыQ$│ Т:ЕQ$│"Y"з35 :ДЕQ$│"N"з325 :Д235-▓Ё:Г ----------------╔ї:Г textfile editor-р·:Г ---------------.  Ю:З@33,"====== TEXTFILE EDITOR =======".ЫЗ@131,"THIS IS A BASIC LINE EDITOR.":З" YOU CAN REVISE ANY LINE WITHIN":З" THE FILE, BUT YOU CAN'T ADD TO":З" OR DELETE LINES OF TEXT ...".╖ З@353,"PRESS ANY KEY !".╟Е  Т│""з270.█Щ"I",#1,FX$:Y│1/Еи  М(1)з ╗Й #1,TX$(Y):Y│Yл1:Бе&H7D06):ЗSЦ№З" OK, LEAVE YOUR MESSAGE. PRESS":З" ON AN OPEN LINE TO END":З" ROUTINE. 7 LINES MAXIMUM! 32":З" CHARACTER LIMIT PER LINE ..."S█З:З" //////////////////////////////":Т&H7D06,143:З:M$│"":C│7:Y│1S√╗ЙQ$:ЕQ$│""з1055 :ДX│ З(Q$)T- ЕX│32з1045 :ДЕX┤32зQ$│Q$л б(32мX,32):З:Бе1045TQQ$│ О(Q$,32):З:З"- LINE#";Y:ЗQ$T{M$│M$лQ$:ЕY┤7зY│Yл1:З"-";Y:Бе1030 :ДЗT╩З:З" YOUR MESSAGE HAS REACHED THE":З" LIMIT! SAVE AS IS: ?":Бе1065TшЕM$│""зТ&H7D06,CC:Р :ДЗ:ЗU$З" OK, "NA$:З" SAVE MESSAGE TO DISC: ?"U])Т&H7D06,CC:SC│SCмYн45:Бж1375:ЕCM$┤▓"y"зЗ" NO":Р :ДЕLM│1з1220Uz.:Г----------------------UЧ3:Гmessage log processingU┤8:Г----------------------V =Щ"D",#1,"MESSLOG/SYS:"лML$,248:╨ #1,10  з DT$,8  з SB$,3  з TH$,3  з BH$,224  з MS$V$BЕSM┤1 ▒ SM▓299зSM│1VSGЗ:И C Бе1105,1120,1140,1155,1185,1200,1205V^LБе1215VДQАX│1е300:─ #1,X:ЕTH$│NL$з1115 :ДЛV┬VЗ" SORRY, "NA$:З" NO MAIL IN YOUR MESSAGE BOX!":З:Бе1215W [З" OK, YOU HAVE SOME MAIL IN YOUR":З" SYSTEM MESSAGE BOX!":З:Бе1215W4`АX│SM е300:─ #1,X:ЕTH$│"ALL"з1135 :ДЛWgeЕMK│1зЗ:З:З" END OF MESSAGE SCAN ...":З:Бе1215WгjЗ" SORRY, "NA$:З" NO MESSAGES FOUND TO SCAN!":З:Бе1215W¤oЗ:З:З" MESSAGE #";X;:З" "DT$:З" SUBJECT: "SB$:З" LEFT BY: "BH$:MK│1:З:Л:Бе1125X'tАX│SM е300:─ #1,X:ЕTH$│"ALL"з1165 :ДЛXYyЕMK│1зЗ:З:З" END OF MESSAGE LOG ...":З:Бе1215XХ~З" SORRY, "NA$:З" NO MESSAGES FOUND TO READ!":З:Бе1215X╗ГАX│1е300:─ #1,X:ЕTH$│NL$з1165 :ДЛX°ИЕMK│1зЗ:З:З" END OF E-MAIL MESSAGES ...":З:Бе1215 :Д1110YIНЗ:З:З" MESSAGE #";X;:З" "DT$:З" SUBJECT: "SB$:З" LEFT BY: "BH$:З:ЗMS$Y`ТЗ:MK│1:ЕX│300з1145YЗЧЗ" NEXT MESSAGE: ? ":Q$│""Y┼ЬБж1385:ЕCM$│"y"зЗ" YES":Л :ДЕCM$│"n"зЗ" NO":Бе1145 :Д1180Y▐б─ #1,X:ЕTH$│NL$з1195ZжЗ" SORRY, "NA$:З" THAT'S NOT YOURS TO KILL!":З:Бе1215ZЪл╘ SB$│ б(8,32):╘ TH$│ б(3,32):╘ BH$│ б(3,32):╘ MS$│ б(224,32):┼ #1,X:З" OK, "NA$:З" YOUR MESSAGE HAS BEEN KILLED!":З:Бе1215Z┘░MF│0:АX│1е300:─ #1,X:ЕDT$│ б(10,32)зMF│X:Бе1215 :ДЛ:Бе1215[╡─ #1,MF:╘ DT$│DA$:╘ SB$│S$:╘ TH$│I$:╘ BH$│NL$:╘ MS$│M$:┼ #1,MF[N║З" OK, "NA$:З" YOUR MESSAGE HAS BEEN SAVED!"[c┐Ъ #1:SM│0:MK│0:Р[к─Щ"D",#1,"EXITLOG/SYS:"лEL$,250:╨ #1,10  з DT$,16  з NM$,224  з MS$[╗╔З:ЕLM│1з1235[·╬MF│0:АX│1е100:─ #1,X:ЕDT$│ б(10,32)зMF│X:Бе1215 :ДЛ:Бе1215\2╙─ #1,MF:╘ DT$│DA$:╘ NM$│NA$:╘ MS$│M$:┼ #1,MF:Бе1210\M╪:Г -------------------\h▌:Г system message base\Гт:Г -------------------\▌чNK│0:АX│1е З(I$):Y│ К( Р(I$,X,1)):Е(Y▓64 ░ Y┤91)▒(Y▓96 ░ Y┤123)зЛ:NK│1:Р :ДЕKN│1з1265] ьЗ:З" SORRY, YOU CANNOT USE NUMBERS":З" FOR E-MAIL INITIALS!":Р]hёЗ:З" SORRY, YOU CANNOT USE NUMBERS":З" IN YOUR USERLOG FILENAME!":Р]╢ЎЗ:З" THOSE LETTERS HAVE BEEN TAKEN!":З" PLEASE CHOOSE <3> OTHERS.":Бе1565^√З:З" SOMEONE ALREADY HAS THAT NAME!":З" PLEASE CHOOSE ANOTHER ONE.":Бе1510^HЗ:З" SORRY, "NA$:З" ONLY MEMBERS CAN RECIEVE MAIL!":SC│SCм2:Р^ИЗ" SORRY, "NA$:З" BUT, OUR MESSAGE LOG IS FULL!":SC│SCм5:Р^╘ З:З" SORRY, BUT YOU MUST ENTER 3 TO":З" 8 LETTERS FOR ALL FILENAMES!":Р_З:З" SORRY, "NA$:З" BUT, I CAN'T FIND THAT FILE ?":SC│SCм3:Р_2:Г --------------------_N:Г text/graphic display_j:Г --------------------_А#:Г TEXT ROUTINE_Т(Щ"I",#1,FX$:З_╟-Еи  М(1)з ╗Й#1,TX$:З TX$:SC│SCм1:Бе1325 :ДЪ #1:Р`#2LP│1:Q$│"":Т&H7D04,1:Бж1385:Т&H7D04,2:L│ З(Q$):FX$│Q$:FX$│FX$л б(8м З(FX$),32):LP│0:З:Р`=7:Г GRAPHICS ROUTINE`O<Щ"I",#1,FX$:З`РAАG│1е16:Й #1,GR$(G):З GR$(G);:Л:Ъ #1:SC│SCм16:Q$│"":Бж1385:Р`мFЕ BITS│8зБж1365:Р :ДЗ:Р`хKЕ BITS│8зБж1365:З" ==============================":РaPЗ:З" ==============================":РaJUЗ:З" ==============================":З" "л б(30,CB):РagZ:Г----------------------aД_:Гinkey response routineaбd:Г----------------------a╖i Я│0:SC│SCм1:RS│0aфnCM$│ Т:LQ│ З(Q$):ЕCM$│ Л(8)░ LQ┤1зCM$│""b"sЕCM$│""з1415 :Д Я│0:RS│0:ЕCM$│ Л(8)з1410 :ДЕLP│1з1400 :ДРbGxЕCM$┤▓ Л(13)зQ$│Q$лCM$:ЗCM$; :ДРb[}ЕLQ┤17з1390 :ДРbБВQ$│ О(Q$, З(Q$)м1):З Л(8);:Бе1390bСЗЕ Я┤60з1390b┬М Я│0:RS│RSл1:SC│SCм1:ЕSC┤1з1445 :ДЕLP│1з1440cСЕSC┤TW зЗ:З" SORRY, "NA$:З" BUT YOUR TIME IS ALMOST GONE!":TW│0cDЦЕRS│60зЗ:З" YOU MUST RESPOND IN 30 SECONDS":З" "NA$"..."c[ЫЕRS┤90з1390 :Д1445clаЕRS┤150з1390cВеЕSO│1з1660 :Д1635cЬк:Г ------------------c╢п:Г actslog processingc╨┤:Г ------------------cш╣ЕCM$│ Л(13)зCM$│"?"d3╛AC│ З(LG$)л З(CM$):ЕAC▓253зLG$│ О(LG$,253):Ъ #1:Бж1480:AL│ALл1:CM$│NL$dI├LG$│LG$лCM$л" ":РdZ╚ЕAL▓150зAL│1dЩ═Щ"D",#1,"ACTSLOG/SYS:"лAL$:┘ #1,LG$:┼ #1,AL:Ъ #1:LG$│" ":Рd┤╥:Г -------------------d╧╫:Г guest logon routinedъ▄:Г -------------------eсЗ:З:З" ====== GU55:SC│SCм15:Бе615AС{З:DF│0:АX│3е11:▀0,17,X,A$,B$:A$│A$л О(B$,120):АK│0е7:SB$│ Р(A$,Kн32л1,8):XT$│ Р(A$,Kн32л9,3):Y│ К(SB$):ЕY│255зK│7:X│11:Бе655A╝АЕY│0 ▒  П(XT$,2)┤▓"DL"з655 :ДЕC┤▓3з650A№ЕЕSB$┤▓FX$з655 :ДCM$│FX$:Бж1465:FX$│FX$л"/"лXT$:Бж1320:Бе610BWКDF│1:З" "SB$" / ";:D$│ О(XT$,1):ЕD$│"G"зЗ"A GAME":ДЕD$│"U"зЗ"UTILITY":ДЗ"GENERAL"B~ПЛK,X:ЕC│3зБж1295:Бе610 :ДЕDF│1з610B┐ФЗ" SORRY, "NA$:З" NO DOWNLOAD FILES TO SCAN!":SC│SCм5:Бе610C#ЩЗ:Е FLAG┤3зЗ" SORRY, "NA$:З" ONLY VALIDATED MEMBERS CAN":З" DOWNLOAD OUR PROGRAM FILES!":Бе240CPЮЗ" OK, ENTER A PROGRAM FILENAME ?":З" ";CyгБж1330:ЕL▓8 ▒ L┤3зБж1290:Бе610 :Д635CУи:Г ------------------Cнн:Г text program boardC╟▓:Г ------------------C№╖SC│SCм3:З:З:З" ========= TEXT FILES =========":ЗDk╝З:З" < G H R S X >":Бж1385:C│ Ю("hsrgxX",CM$):З" "CM$:Бж1465:ЕC│6зБж985:Бе695 :ДИ C Бе705,720,750,1635,240DЦ┴Бж1355:З" TEXT PROGRAM HELP":З:ЗE╞З" G) OODBYE / SIGN OFF":З" H) ELP / THIS BOARD":З" R) EVIEW TEXT FILES":З" S) CAN TEXT HEADERS":З" X) RETURN TO MAIN":ЗE-╦Бж1355:SC│SCм15:Бе700Eо╨З:DF│0:АX│3е11:▀0,17,X,A$,B$:A$│A$л О(B$,120):АK│0е7:SB$│ Р(A$,Kн32л1,8):XT$│ Р(A$,Kн32л9,3):Y│ К(SB$):ЕY│255зK│7:X│11:Бе740E┘╒ЕY│0 ▒  П(XT$,2)┤▓"XT"з740 :ДЕC┤▓3з735F ┌ЕSB$┤▓FX$з740 :ДFX$│FX$л"/"лXT$:Бж1320:Бе695Fg▀DF│1:З" "SB$" / ";:D$│ О(XT$,1):ЕD$│"C"зЗ"COMPUTER":ДЕD$│"S"зЗ"SUPPORT":ДЗ"GENERAL"FОфЛK,X:ЕC│3зБж1295:Бе695 :ДЕDF│1з695F╤щЗ" SORRY, "NA$:З" NO TEXT FILES FOUND TO SCAN!":SC│SCм5:Бе695G8юЗ:Е FLAG┤1зЗ" SORRY, "NA$:З" YOU MUST BECOME A MEMBER TO":З" REVIEW OUR TEXTFILE PROGRAMS!":Бе240GeєЗ" OK, ENTER A PROGRAM FILENAME ?":З" ";GО°Бж1330:ЕL▓8 ▒ L┤3зБж1290:Бе695 :Д720Gз¤:Г -----------------G└:Г graphic-art boardG┘:Г -----------------H SC│SCм3:З:З:З" ====== GRAPHIC-ART BOARD =====":ЗH}З:З" < G H S V X >":Бж1385:C│ Ю("hsvgxX",CM$):З" "CM$:Бж1465:ЕC│6зБж985:Бе780 :ДИ C Бе790,805,840,1635,240HиБж1355:З" GRAPHIC-ART HELP":З:ЗI'З" G) OODBYE / SIGN OFF":З" H) ELP / THIS BOARD":З" S) CAN GRAPHIC FILES":З" V) IEW GRAPHIC FILES":З" X) RETURN TO MAIN":ЗIA Бж1355:SC│SCм15:Бе785Iв%Е BITS│7зЗ:З" SORRY, YOU MUST RECEIVE 8 DATA":З" BITS TO VIEW COLOR GRAPHICS!":SC│SCм2:Бе240J#*З:DF│0:АX│3е11:▀0,17,X,A$,B$:A$│A$л О(B$,120):АK│0е7:SB$│ Р(A$,Kн32л1,8):XT$│ Р(A$,Kн32л9,3):Y│ К(SB$):ЕY│255зK│7:X│11:Бе830J=/ЕY│0 ▒ XT$┤▓"ART"з830J|4ЕC┤▓3з825 :ДЕSB$┤▓FX$з830 :ДFX$│FX$л"/"лXT$:Бж1340:З:Бе780Jб9DF│1:З" "SB$" / GRAPHICS"J╚>ЛK,X:ЕC│3зБж1295:Бе780 :ДЕDF│1з780K CЗ" SORRY, "NA$:З" NO GRAPHIC-ART FILES TO SCAN!":SC│SCм5:Бе780KpHЗ:Е FLAG┤1зЗ" SORRY, "NA$:З" YOU MUST BECOME A MEMBER TO":З" VIEW OUR GRAPHIC-ART FILES!":Бе240KЭMЗ" OK, ENTER A GRAPHIC FILENAME ?":З" ";K╞RБж1330:ЕL▓8 ▒ L┤3зБж1290:Бе780 :Д805K▀W:Г -----------------K°\:Г user access boardLa:Г -----------------LFfSC│SCм3:З:З:З" ===== USER ACCESS OPTIONS ====":ЗL╝kЗ:З" < C D G H S X >":Бж1385:C│ Ю("hscdgxX",CM$):З" "CM$:Бж1465:ЕC│7зБж985:Бе870 :ДИ C Бе880,895,905,940,1635,240LчpБж1355:З" ACCESS MENU HELP":З:ЗM~uЗ" C) HANGE A PASSWORD":З" D) ISPLAY TRACER FILE":З" G) OODBYE / SIGN OFF":З" H) ELP / THIS BOARD":З" S) CAN USERLOG FILE":З" X) RETURN TO MAIN":ЗMШzБж1355:SC│SCм15:Бе875MиБж900:Бе870NДSC│SCм12:З:Бж960:АX│1е300:─ #1,X:ЕPW$│ б(6,32)зЛ:Бе955 :ДЗ" "NM$" <"IN$">":Л:Бе955NKЙЗ:Е FLAG┤1зЗ" SORRY, "NA$:З" YOU DON'T HAVE A PASSWORD YET!":Бе870NyОЗ" CHANGE USER PASSWORD: ?":Бж1385NчУЕCM$┤▓"y"зЗ" NO":Бе870 :ДЗ" YES":З:З" CURRENT PASSWORD: ";:LP│1:Q$│"":Бж1385:З:P$│Q$:LP│0:Е З(Q$)┤▓6з870OFШЗ:Бж960:АX│1е300:─ #1,X:ЕIN$│NL$ ░ PW$│P$з925 :ДЛ:З" SORRY, PASSWORD IS INCORRECT ?":Бе935OбЭЗ" TO WHAT? ENTER 6 NEW LETTERS!":З" ";:LP│1:Q$│"":Бж1385:З:P$│Q$:LP│0:Е З(Q$)┤▓6з935O╒в╘ PW$│P$:┼ #1,X:З:З" YOUR PASSWORD IS NOW: "P$OьзЪ #1:SC│SCм3:Бе870PNмЗ:Е FLAG┤1зЗ" SORRY, THE SYSTEM TRACER FILE":З" IS AN OPTION FOR MEMBERS ONLY!":SC│SCм2:Бе870Px▒З" SYSTEM ACTIONS: "LG$:SC│SCм4:Бе870P▒╢MBR│0:Бж960:АX│1е300:─ #1,X:ЕI$│IN$з MBR│1:Бе955 :ДЛP─╗Ъ #1:SC│SCм2:РQ└Щ"D",#1,"USERLOG/SYS:"лUL$,36:╨ #1,10  з LU$,16  з NM$,6  з PW$,3  з IN$,1  з FL$Q ┼РQ<╩:Г --------------------QX╧:Г sysop access routineQt╘:Г --------------------Q╡┘З:З:З" HELLO, "NA$:З" THE SYSTEM OPERATOR IS ONLINE!":X│0:ЗQ°▐╗Й" > ";S$:X│Xл1:ЕS$┤▓""з990 :ДЗ" > GOODBYE, "NA$:SC│SCмXн5:РRjуЕNL$┤▓"sop"░ NA$┤▓"sysop's name"з250 :ДЗ:╗Й" PASSWORD: ";P$:ЕP$┤▓"back door"зБж1465:Бе1660 :Д ╙"SYSOP/EDT",RRЗш:Г ---------------------Rдэ:Г enter message routineR┴Є:Г ---------------------SўЗ:CB│239:Бж1350:З" ========= BBS WRITER =========":CC│ Ж( R T U X >":Бж1385:C│ Ю("hnxpbrldtaugzX",CM$):З" "CM$:Бж1465:ЕC│14зБж985:Бе240 :ДИ C Бе250,270,290,325,350,430,505,610,695,780,870,1635,995/╢·З:Бж1360:З" MAIN MENU HELP":З:З0I З" A) RT / GRAPHICS BOARD":З" B) ULLETIN MESSAGE BOARD":З" D) OWNLOAD PROGRAM FILES":З" G) OODBYE / SIGN OFF BBS":З" H) ELP / MAIN MENU BOARD"0┐З" L) EAVE MESSAGES BOARD":З" N) AME LOGON / IF YOU CAME":З" ONBOARD AFTER STARTUP":З" P) AGE SYSTEM OPERATOR"1> З" R) EAD MESSAGES BOARD":З" T) EXT FILES TO REVIEW":З" U) SER ACCESS OPTIONS":З" X) DATE & TIME REMAINING":SC│SCм15:Бе2401bUN$│NL$:Бж1480:АX│1е500:Л:Бе1101}:Г -------------------1Ш:Г date & time routine1│:Г -------------------1╚"TA│0:SS│SC:Бе3001▌'TA│TAл1:SS│SSм601э,Е SS▓59з295281TA$│ И(TA):SS$│ И(SS):З:З:З" "DA$" / TIME:"TA$;SS$:SC│SCм2:Бе2402R6:Г ------------------2l;:Г sysop page routine2Ж@:Г ------------------2╥EЗ:З:З" OK, PAGING SYSTEM OPERATOR ...":З" ";:АX│1е10:З" / ";:а110,5:Л:З3JЗ" !! THE SYSOP HAS BEEN PAGED !!":SC│SCм6:Бе2403O:Г ---------------35T:Г bulletin boards3LY:Г ---------------3Б^SC│SCм3:З:З:З" ======= BULLETIN BOARD =======":З3ЁcЗ:З" < G H R S X >":Бж1385:C│ Ю("hsrgxX",CM$):З" "CM$:Бж1465:ЕC│6зБж985:Бе350 :ДИ C Бе360,375,405,1635,2404hБж1355:З" BULLETIN SYSTEM HELP":З:З4ЬmЗ" G) OODBYE / SIGN OFF":З" H) ELP / THIS BOARD":З" R) EAD BULLETIN NEWS":З" S) CAN TOPIC HEADERS":З" X) RETURN TO MAIN":З4╢rБж1355:SC│SCм15:Бе35557wЗ:DF│0:АX│3е11:▀0,17,X,A$,B$:A$│A$л О(B$,120):АK│0е7:SB$│ Р(A$,Kн32л1,8):XT$│ Р(A$,Kн32л9,3):Y│ К(SB$):ЕY│255зK│7:X│11:Бе3955b|ЕY│0 ▒  П(XT$,2)┤▓"BD"з395 :ДЕC┤▓3з3905УБЕSB$┤▓FX$з395 :ДFX$│FX$л"/"лXT$:Бж1320:Бе3506ЖDF│1:З" "SB$" / ";:D$│ О(XT$,1):ЕD$│"C"зЗ"COCO-LUV":ДЕD$│"B"зЗ"BARGAINS":ДЕD$│"N"зЗ"BBS-NEWS":ДЗ"WHATEVER"6.ЛЛK,X:ЕC│3зБж1295:Бе350 :ДЕDF│1з3506qРЗ" SORRY, "NA$:З" NO SYSTEM BULLETINS TO SCAN!":SC│SCм5:Бе3506ЯХЗ:З" OK, ENTER A BOARD OF CHOICE ?":З" ";6╚ЪБж1330:ЕL▓8 ▒ L┤3зБж1290:Бе350 :Д3756тЯ:Г ------------------6№д:Г read message board7й:Г ------------------7KоSC│SCм3:З:З:З" ======== READ MESSAGES =======":З7╚│З:З" < E G H K R S X >":Бж1385:C│ Ю("hsrekgxX",CM$):З" "CM$:Бж1465:ЕC│8зБж985:Бе430 :ДИ C Бе440,455,455,470,475,1635,2407Ў╕Бж1355:З" READ MESSAGE HELP FILE":З:З8о╜З" E) MAIL MESSAGE CHECK":З" G) OODBYE / SIGN OFF":З" H) ELP / THIS BOARD":З" K) ILL E-MAIL MESSAGES":З" R) EAD SYSTEM MESSAGES":З" S) CAN MESSAGE HEADERS":З" X) RETURN TO MAIN":З8╚┬Бж1355:SC│SCм16:Бе4359╟З:З" OK, AT WHAT NUMBER WOULD YOU":З" LIKE TO START: <1-300> ? ";:LP│19O╠Q$│"":Бж1385:З:SM│ Й(Q$):LP│0:ЕC│2зSC│SCм60 :ДSC│SCм909`╤Бж1085:Бе4309└╓ЕFR$┤▓""зБж1280:Бе430 :ДЗ:З" OK, CHECKING FOR E-MAIL: JUST":З" A MOMENT, PLEASE ...":Бе465:█З:Е FLAG┤2зЗ" SORRY, "NA$:З" ONLY MEMBERS HAVE MAIL TO KILL":Бе430:YрЗ" OK, ENTER THE MESSAGE NUMBER":З" OF YOURS TO KILL: <1-300> ?":З" ";:LP│1:╬хQ$│"":Бж1385:З:X│ Й(Q$):LP│0:ЕX▓0 ░ X┤301з465 :ДЗ:З" SORRY, "NA$:З" THAT'S NOT AN E-MAIL NUMBER!":SC│SCм2:Бе430:щъ:Г -------------------;я:Г leave message board;Ї:Г -------------------;T∙SC│SCм3:З:З:З" ======= LEAVE MESSAGES =======":З;┘■З:З" < E G H L S X >":Бж1385:Q│ Ю("helgxsX",CM$):З" "CM$:Бж1465:ЕQ│6зБж900:Бе505 :ДЕQ│7зБж985:Бе505 :ДИ Q Бе530,535,535,1635,240<Бж1355:З" LEAVE MESSAGE MENU":З:З<бЗ" E) MAIL SYSTEM LETTER":З" G) OODBYE / SIGN OFF":З" H) ELP / BBS MESSAGES":З" L) EAVE SYSTEM MESSAGE":З" S) CAN USERLOG FILE":З" X) RETURN TO MAIN":З<╗ Бж1355:SC│SCм15:Бе510<▐FX$│"MESSAGE/HLP":Бж1320:Бе505=DЕ FLAG┤2зЗ:З" SORRY, "NA$:З" YOU MUST BE A MEMBER TO LEAVE":З" SYSTEM MESSAGES OR E-MAIL!":Бе240=fC│6:Бж1085:ЕMF┤1зБж1285:Бе505=~!ЕQ│3зI$│"ALL":Бе575=к&З:З" ENTER <3> INITIALS PLEASE: ";:LP│1=╫+Q$│"":Бж1385:З:I$│Q$:LP│0:Е  З(Q$)│3з565>'0З:З" YOU MUST ENTER 3 INITIALS FOR":З" ALL E-MAIL TO ANOTHER MEMBER!":Бе505>n5ЕNL$│I$зЗ:З" SORRY, "NA$:З" YOU CAN'T LEAVE YOUR OWN MAIL!":Бе505>в:Бж1255:ЕNK┤▓1з505 :ДБж950:Е MBR┤▓1зБж1280:Бе505>╙?З:З" SUBJECT: <8 LETTERS MAX> ?":З" ";:LP│1?DQ$│"":Бж1385:З:S$│Q$:LP│0:L│ З(Q$):ЕL▓8 ▒ L┤3зБж1290:Бе505?,ISC│SCм13:ЕQ│2зSC│SCм3?MNБж1005:З:Бж1355:CB│223:Бе505?iS:Г --------------------?ЕX:Г download files board?б]:Г --------------------?╓bSC│SCм3:З:З:З" ======= DOWNLOADS BOARD ======":З@EgЗ:З" < D G H S X >":Бж1385:C│ Ю("hsdgxX",CM$):З" "CM$:Бж1465:ЕC│6зБж985:Бе610 :ДИ C Бе620,635,665,1635,240@qlБж1355:З" DOWNLOAD MENU HELP":З:З@ЎqЗ" D) OWNLOAD SYSTEM FILES":З" G) OODBYE / SIGN OFF":З" H) ELP / THIS BOARD":З" S) CAN DOWNLOAD HEADERS":З" X) RETURN TO MAIN":ЗAvБж13 ¤ :Г--------------------5:Г bbs-board systemN:Г preload bootfilei:Г--------------------r└1:ЮЬ#З@33,"** BBS-BORD BULLETIN SYSTEM **"н(Х 512,&H7D00─-╙M "REMOTE2/BIN":в∙2З@33,"** BY: MIKE JORGENSON 1986 **":АX│1е750:Л'7З@33,"*** BBS-BORD PRELOAD SETUP ***":З:ЗP<╗Й" DISABLE BREAK: ? ";Q$aAЕ Q$┤▓"N"з75pFТ &H7D00,0ЩK╗Й" CORNER DISPLAY: ? ";Q$кPЕ Q$┤▓"N"з90╣UТ &H7D01,0тZ╗Й" LINEFEEDS / CR: ? ";Q$Ї_Е Q$┤▓"N"з105dТ &H7D02,0,i╗Й" LOWERCASE INPUT: ? ";Q$>nЕ Q$┤▓"Y"з120MsТ &H7D04,2vx╗Й" UPPERCASE OUTPUT: ? ";Q$И}Е Q$┤▓"Y"з135ЧВТ &H7D05,1└З╗Й" SCROLL TOP LINE: ? ";Q$╥МЕ Q$┤▓"Y"з150тСТ &H7D08,32 ЦЗ:З" CURSOR COLOR: "еЫЗ:З" 1. YELLOW":З" 2. GREEN ":З" 3. DARK BLUE":З" 4. LIGHT BLUE":З" 5. PURPLE":З" 6. ORANGE":З" 7. WHITE":З" 8. RED":З:З:З:З┘аQ$│ Т:И  Й(Q$)Бе205,170,175,180,185,190,195,200ЄеЕQ$│ Л(13)з205 :Д160 кТ &H7D06,143:Бе205 пТ &H7D06,175:Бе2057┤Т &H7D06,223:Бе205N╣Т &H7D06,239:Бе205e╛Т &H7D06,255:Бе205|├Т &H7D06,207:Бе205Н╚Т &H7D06,191в═О "BBS-BORD/SYS",143:Бе205 пТ &H7D06,175:Бе2057┤Т &H7D06,223:Бе205N╣Т &H7D06,239:Бе205e╛Т &H7D06,255:Бе205|├Т &H7D06,207:Бе205Н╚Т &H7D06,191в═О "BBS-BORD/SYS"                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 G~& :Г ------------------&2:Г the bbs-board&J:Г communications&c:Г bulletin system&:Г --------------------&Т#Х 5000:З Л(12)&к(М TX$(40),GR$(16):Ю'-З:З" THE BBS-BORD BULLETIN SYSTEM":З" PLEASE ENTER DATE: ":З:╗Й" ";DA$:З'92╗Й" ACTSLOG DRIVE: <0/3> ? ";AL$:ЕAL$│""зAL$│"0"'p7╗Й" USERLOG DRIVE: <0/3> ? ";UL$:ЕUL$│""зUL$│"0"'з<╗Й" MESSLOG DRIVE: <0/3> ? ";ML$:ЕML$│""зML$│"0"'▐A╗Й" EXITLOG DRIVE: <0/3> ? ";EL$:ЕEL$│""зEL$│"0"($FЗ:╗Й" START CALLER NUMBER: ";CN$:CN│ Й(CN$):CN$│"":ЕCN▓0зCN│CNм1(hK╗Й" START ACTLOG NUMBER: ";LA$:AL│ Й(LA$):LA$│"":ЕAL▓0зAL│ALм1(ГP:Г -------------------(ЮU:Г bbs startup routine(╣Z:Г -------------------) _LG$│" ":З:З" PLEASE INSERT THE ONLINE DISC.":З" PRESS ANY KEY WHEN READY ...";)dЕ Т│""з100)diЗ Л(12):Ю:UN$│"":З:З" THE BBS IS NOW ON STANDBY!":SO│0:LM│0:╗Й CM$)оnЗ Л(12):Ю:АX│1е200:Л:FR$│"":FLAG│0:CN│CNл1:AL│ALл1:SC│450:CB│223:LP│0)╩s:Г --------------------)цx:Г initial welcome text*}:Г --------------------*ВFX$│"STARTUP/SXT":Бж1320*aЗЗ" <<< "DA$" >>>":З:З:З" YOU ARE CALLER NUMBER: ";CN:З*╚МЗ" IF YOU'RE NOT A MEMBER, PLEASE":З" ENTER AT THE PROMPT BELOW!":З:З:З" BBS MEMBER: ?"+ СБж1385:ЕCM$│"y"зЗ" YES":Бе150 :ДЕCM$│"n"зЗ" NO":Бе1505 :Д145+-ЦЗ:З" DATA BITS: <7/8=COLOR> ?"+[ЫБж1385:BITS│ Й(CM$):Е BITS┤7 ▒ BITS▓8з155+ЮаЗ BITS:З:Бж1350:З" ========= USER LOGON =========":З:LP│1:TR│1+╕е:Г ------------------+╥к:Г user logon routine+ьп:Г ------------------,.┤З:З" USER NUMBER: ";:Q$│"":Т&H7D03,88:Бж1385:Т&H7D03,0:Бе190,C╣ЕTR│4з1635 :Д180,Л╛X│ Й(Q$):ЕX┤1 ▒ X▓300зTR│TRл1:Бе185 :ДЗ:З:Бж960:─ #1,X:NL$│IN$:TR│1,╥├З" PASSWORD: ";:Q$│"":Т&H7D03,88:Бж1385:Т&H7D03,0:З:ЕUN$│NL$з1635-+╚ЕQ$│PW$зNA$│NM$:F$│FL$:З:З:З" HELLO, "NA$" <"NL$">":Бе205 :ДTR│TRл1:ЕTR│4з1635 :Д195-П═З" LAST LOGON DATE: "LU$:╘ LU$│DA$:┼ #1,X:Ъ #1:LP│0:ЕF$│"A"з FLAG│3 :ДЕF$│"B"з FLAG│2 :ДFLAG│1-▄╥C│1:З:З" CHECKING FOR E-MAIL MESSAGES;":З" ONE MOMENT PLEASE ...":Бж1085.╫CM$│NL$:Бж1465:TW│300:Е FLAG│3зTA│40 :ДЕ FLAG│2зTA│30 :ДTA│20.Q▄З:З" TIME ALLOCATION: ";TA;"MINUTES!":SC│TAн60.jс:Г -----------------.Гц:Г main command menu.Ьы:Г -----------------.цЁSC│SCм6:З:CB│239:Бж1350:CB│223:З" ========= MAIN BOARD =========":З:З/КїЗ" < A B D G H L N P \& АA│0е11:Т&HFFB0лA,0:Л&,N$│"PRESENT"&4ф 2&H(А I│&H70 е &H73&W2Т &HFFA2,I&pnў>p╢>p╖>qЖU╜?_╜?ДБURCL=0TO16:PRINTCHR$(13):NEXTCL:GOTO70 80 ONERRGOTO70 90 IFA$=""THEN                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 ║ Т149,0:Т150,180 :ГBAUD 300F ┌ И:└ 1:Т&HFFBC,48:Т&HFFBD,0:т 32~М Y$(20):Е  Ж(&H3F00)┤▓129 ▒  Ж(&H3F01)┤▓84 з Бе800▒Т &HFF40,0:Т &H3FFF,0:Т &H3FFE,0:BS│&H3FD4:╧ 0═(╣ Г0│&H3E73:╣ Г1│&H3EDB┌2:ГSCREENф7Х1000 8Ю:З" talkterm vr ?.? by the snail"$<З:З"<1> Send File"<FЗ"<2> Receive File"QPЗ"<3> Directory"fZЗ"<4> Comm Link"БnЗ"<5> Return to BASIC"ШxЗ:З"YOUR CHOICE: "▌ВI$│ Т:Е I$▓"5" ▒ I$┤"1" з 130 :Д И  Й(I$) Бе 140,290,410,420,590KМЮ:З" ---SEND FILE---":З:╗Й"Filename (name.ext) >";F$:Е F$│"" з О :Д Е  Ю(F$,"/")│0 ░  Ю(F$,".")│0 з 140кЦЩ "D",1,F$,1:LO│ е(1):Е LO│0 з З"NOT FOUND!!!!":Ъ:╥ F$:Бе 140 :Д Ъ:Щ "R",1,F$,255:LO│ е(1)■кO│ Ж(&HC006)л Ж(&HC007):TF│ Ж(Oл2):SF│ Ж(Oл3):P│ Ю(F$,"/"):Е P│0 з P│ Ю(F$,".")<┤F1$│ б(11,32): Р(F1$,1,8)│ О(F$,Pм1): Р(F1$,9,3)│ П(F$,3)╛▀ 0,TF,SF,A$,B$:C$│A$л О(B$,127):P│ Ю(C$,F1$):D$│ Р(C$,Pл11,2)╢╚D$│F1$лD$:Z$│ Г0(D$):╨ #1,255  з A$:Z$│ Г0( И(LO))╟╥Е LO│0 з 250щ▄А R│1 е LO:З@128,"BLOCKS:";LO ц─ #1,R:Z$│ Г0(A$):З"SENT:";RЁЛ RN·Ъ:Щ "D",1,F$,1:LO│ е(1):L│LOм Б(LOо256)н255:Е L│0 з 280╕B$│"":З"SENDING LAST";L;"BYTES....":L│Lм1:╨ #1,1  з A$:А R│LOмL е LO:─ #1,R:B$│B$лA$:Л R:Ъ:Z$│ Г0(B$)├Бе 680шZ$│ Г0(")(DC16EOF:*;@,<"):Бе 270i"Ю:З" ---RECEIVE FILE---":З:F$│ б(13,32):Z$│ Г1(F$):RE$│ П(F$,2):RF$│F$:F$│ О(F$,8)л"."л Р(F$,9,3):F1$│F$:З:З"RECEIVING: ";F$н,З@128,"BLOCKS:";:Z$│ Г1(F$):Z$│ О(F$, Ж(&H3E70)):LO│ Й(Z$):З LO┼6Щ "O",1,F1$:Ъ:╥ F1$ў@Щ "D",1,F1$,255:A$│ б(255,255):╨ #1,255  з B$JЕ LO│0 з 350JTА R│1 е LO:З@128л32,"BLOCK<:";R:Z$│ Г1(A$):╘ B$│A$:┼ #1,R:Л RЪ^F$│ б(255,255):Ъ:Щ "D",1,F1$,1:╨ #1,1  з A$:Z$│ Г1(F$):Z$│ О(F$, Ж(&H3E70))╗hЕ Z$│")(DC16EOF:*;@,<" з 380їrLO│ е(1):А R│1 е  З(Z$):╘ A$│ Р(Z$,R,1):┼ #1,LOлR:Л R=|Ъ:Щ "D",1,F1$,1:O│ Ж(&HC006)н256л Ж(&HC007):TF│ Ж(Oл2):SF│ Ж(Oл3):Ъ┤Ж▀ 0,TF,SF,A$,B$:C$│A$л О(B$,127):P│ Ю(C$, О(RF$,11)): Р(C$,P,Pл12)│RF$:A$│ О(C$,128):B$│ П(C$,127):р 0,TF,SF,A$,B$┐РБе 680 ЪЮ:З" ---DIRECTORY---":╬:З"FREE GRANS ="; г(0):З:╗Й"PRESS ENTER >>>";A$:ОWNЮ:З" ---END---":З:З"YOU HAVE 6 SECONDS TO":З"PRESS enter TO ABORT END"ЯXА A│1 е700:Е Т│ Л(13)зО:ДЛ:Т&H3F00,&H3E:Т&HFFDE,0:Т113,0:в &H3F00:С╨ФЮ:З" ---AUTO RECEIVE--- FILE #"; Ж(&H3FFF):РЮЮ:З" ---AUTO RECEIVE--- FILE #"; Ж(&H3FFF):Р6иЕ  Ж(&H3FFF) з 710 :Д Ю:З"TRANSMISSION DONE!!!!"i▓Е C│0 з C│1:а 50,1:┐0,1 :Д а а 100,1:┐ 0,0:C│0А╝Е  Т│"" з 690 :Д Оа╞Е  Ж(&H3FFE)│1 з 480 :Д 520и └ 1t*Ж A0,27,00,00,00,34,01,1A,50,7F,FF,40,AE,02,BF,3E,6E,F7,3E,70,B6,3E,70,B7,3E,71,86,55,BD,3F,5F,BD,3F,84,81,55,26,EE,B6,3E,70,BD,3F,5F,BD,3F,84,B1,3E,70,26,E0,86,54,BD,3F,5F,86,FE,BD,3F,5F,86,21,BD,3F@4Ж 5F,7D,3E,70,27,0D,BE,3E,6E,A6,80,BD,3F,5F,7A,3E,71,26,F6,BD,3F,4C,B7,3E,72,BD,3F,84,B1,3E,72,26,B1,C6,05,BD,3F,84,5A,26,FA,35,81,34,01,1A,50,7F,FF,40,AE,02,BF,3E,6E,BD,3F,84,81,55,26,F9,BD,3F,5F,BD >Ж 3F,84,B7,3E,70,B7,3E,71,BD,3F,5F,BD,3F,84,81,54,26,E3,BD,3F,84,81,FE,26,DC,BD,3F,84,81,21,26,D5,7D,3E,70,27,0D,BE,3E,6E,BD,3F,84,A7,80,7A,3E,71,26,F6,BD,3F,4C,BD,3F,5F,C6,03,BD,3F,84,81,55,27,B4 ╒HЖ 81,00,26,F5,5A,26,F2,35,81,45,43,51,4D,A4,52,27,4B,51,59,60,55,5B,4F,61,54,34,14,4F,F6,3E,70,5D,27,08,BE,3E,6E,A8,80,5A,26,FB,35,94,34,14,BD,3F,AF,7F,FF,20,BD,3F,D1,8E,00,08,44,59,59,F7,FF,20,BD,3F!дRЖ D1,30,1F,26,F3,C6,03,F7,FF,20,BD,3F,D1,35,94,34,14,4F,8E,10,00,F6,FF,22,30,1F,27,1C,C5,01,26,F5,BD,3F,D1,BD,3F,DC,8E,00,08,F6,FF,22,54,46,BD,3F,D1,30,1F,26,F4,BD,3F,AF,35,94,34,14,F6,04,00,C1,CF,26,04"7\Ж C6,20,20,02,C6,CF,F7,04,00,8E,05,E0,E6,01,E7,80,8C,05,FF,26,F7,A7,84,35,94,34,10,8E,01,AA,30,1F,26,FC,35,90,34,10,8E,00,D5,30,1F,26,FC,35,90"OfА C│&H3E6E е &H3FE6"lpН B$:B│ Й("&H"лB$):Т C,B"zzA│AлB:Л C"кДЕ A┤▓41575 з З"CHECK YOUR DATA LINES!!!!":К"│ОБе30,10,8E,01,AA,30,1F,26,FC,35,90,34,10,8E,00,D5,30,1F,26,FC,35,90░FА C│&H3E6E е &H3FE6═PН B$:B│ Й("&H"лB$):Т C,B█ZA│AлB:Л C dЕ A┤▓41575 з З"CHECK YOUR DATA                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                     1 PRINT"TESTING 123 ";:GOTO1 Д 480:Р"╖ ╕Е  Ж(&H3FFF) з 3030 :Д Ю:З"TRANSMISSION DONE!!!!""ъ ┬Е C│0 з C│1:а 50,1:┐0,1 :Д а а 100,1:┐ 0,0:C│0# ╠Е  Т│"" з 3010 :                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 & Т149,0:Т150,18&TЎ:Ю:З"PLEASE WAIT...":Т&HFFD9,0:А A│3872 е 5000:Т A,255:Л A&ЖЙ"Load old file (y/n)";A$:Е A$│"Y" з 40::Д 50&и(Т&HFFD8,1:╙M"LOTTO":Т&HFFD9,0&▌2А LPIC│3872 е 5000:Е  Ж(LPIC)│255 з 60::Д Л LPIC'" Add another set of #'s":З'hPЗ"<2> Check #'s just added":З'~ZЗ"<3> Save #'s":З'ФdЗ"<4> Load #'s":З'лnЗ"<5> Print #'s":З'╥xЗ"<6> Pick and Print Random #'s":З'ўВИ Ё Бе 60:Й" ENTER CHOICE >";CH($МТ&HFFD8,1:И CH Бе 150,180,200,20,280,320(>ЦЮ:З"Enter next 6 #'s"(ZаЙ B:Й C:Й D:Й E:Й F:Й G(cкБе60(}┤Ю:З:ЗB:ЗC:ЗD:ЗE:ЗF:ЗG(╢╛Й"Are these the correct (y/n)";A$:Е A$│"Y"з 60::Д150(├╚Т LPIC,0(▄╥LPIC│LPICл1:Т LPIC,B(ї▄LPIC│LPICл1:Т LPIC,C)цLPIC│LPICл1:Т LPIC,D)'ЁLPIC│LPICл1:Т LPIC,E)@·LPIC│LPICл1:Т LPIC,F)YLPIC│LPICл1:Т LPIC,G)уЮ:З"Make sure disk is ready to save":З"LOTTO program. Hit any key":З"when ready...":в44539:╪M"LOTTO",3872,5000,44539:LPIC│LPICл1:Бе60*2Е LPIC ┤ 4 з З"You have no #'s to print!!!":З"Hit any key.":в44539:Бе60::Д*d"А P│3872 е LPICл1:Q│ Ж(P):Е  Ж(P)│255 з 60::Д*Г,Е Q│0 з З#м2, Л(13):Л P::Д*л6З#м2,Q;:З#м2," ";:Л P:Бе60*я@Й"How many Random picks";FF:З#м2,"Random 6 pick of present #'s"+EА GG│1 е FF:З#м2+$JА Z│6000 е 6006:Т Z,191:Л Z+ETR│ Б( Д(LPICм3872)):S│3872лR+q^Е  Ж(S)│0 з 340::Д Е  Ж(S)│255 з 340::Д+ЖhА CK│6000 е 6006+╣rЕ  Ж(CK)│191 з Т CK, Ж(S):N│Nл1:Е N│6 з 390::Д+┌|Е  Ж(CK)│ Ж(S) з 340::Д Л CK,ЖА RP│6000 е 6005:З#м2, Ж(RP);:Л RP:З#м2:Л GG:Бе60 6006:Т Z,191:Л Z+ETR│ Б( Д(LPICм3872)):S│3872лR+q^Е  Ж(S)│0 з 340::Д Е  Ж(S)│255 з 340::Д+ЖhА CK│6000 е 6006+╣rЕ  Ж(CK)│191 з Т CK, Ж(S):N│Nл1:Е N│6 з 390::Д+┌|Е  Ж(CK)│ Ж(S) з 340::Д Л CK,ЖА RP│6000 е 6005:З#м2, Ж(RP);:Л                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  W& Т63575,34&Т63576,48&)т40:т32&4(Т231,1&;2Ю3&I<Т&HFF94,0&XFТ57798,255&cP°3,3,B&ФZЗ" Talkterm vr.2.0.4 by SnailSoft Software";&мdх 49232,32:х49233,2&╡n°4,4&═xТ63117,34:Т63118,48&хВТ63189,34:Т63190,48& МТ&HFFB4,48:Т&HFFB2,27' Ц°4,4:Ю'&ат32:Ю:З"PLEASE WAIT..."'7кХ 200,&H7DFF'?┤C│0'W╛А X│&H7E00 е &H7F75'b╚Т113,3'k╥Н A$'}▄A│ Й("&H"лA$)'ЗцC│CлA'СЁТ X,A'Щ·Л X'┐Е C┤▓40914 з З"CHECKSUM ERROR.":К'╨╣  Г0│&H7E00'╪B│3'х"A│ Г0(B)'Є,Т32394,3' 6╧0:Бе680("@Ж 9E,72,8C,7E,7A,26,E,8E,7F,3A(DJЖ A6,80,27,6,AD,9F,A0,2,20,F6(gTЖ 39,BD,B3,ED,C4,3,F7,7E,8A,BE(К^Ж C0,4,86,7E,A7,84,CC,7E,8C,ED(мhЖ 1,30,4,BF,7E,99,B6,FF,A1,34(╬rЖ 2,7F,FF,A1,8E,21,0,6F,80,8C(ё|Ж 22,0,25,F9,8E,21,21,86,FF,A7)ЖЖ 80,8C,21,3C,25,F9,8E,22,0,A7)7РЖ 80,8C,3F,FF,25,F9,35,2,B7,FF)[ЪЖ A1,9E,72,BF,7E,88,8E,7E,7A,9F)~дЖ 72,8E,7F,56,BD,7E,A,B6,7E,8A)боЖ 8B,30,AD,9F,A0,2,8E,7F,73,7E)├╕Ж 7E,A,12,BE,C0,4,86,7E,A7,84)ф┬Ж CC,7E,8C,ED,1,7E,AB,CD,0,0*╠Ж B6,0,EB,B1,7E,8A,27,7,34,76*(╓Ж 86,5,7E,D7,63,34,76,F,F0,10*JрЖ DF,0,10,CE,FE,F0,96,EA,27,9*lъЖ 4A,27,6,4A,27,8,4A,27,31,10*ПЇЖ DE,0,35,F6,8D,52,DE,EE,10,8E*░■Ж 1,0,FC,FF,A1,34,6,F6,7E,8B*╘Ж F7,FF,A1,5C,F7,FF,A2,A6,80,34*ЎЖ 2,EC,61,FD,FF,A1,35,2,A7,C0+Ж 31,3F,26,E5,32,62,20,CF,8D,26+<&Ж DE,EE,10,8E,1,0,FC,FF,A1,34+_0Ж 6,A6,C0,F6,7E,8B,F7,FF,A1,5C+Г:Ж F7,FF,A2,A7,80,EC,E4,FD,FF,A1+жDЖ 31,3F,26,E9,32,62,20,A7,8E,0+╚NЖ 0,96,EC,80,11,27,7,30,89,12+ъXЖ 0,4A,20,F7,34,10,96,ED,80,1, bЖ 5F,E3,E1,34,2,44,44,44,44,44,/lЖ B7,7E,8B,35,2,84,1F,1F,1,30,@vЖ 89,20,0,39,ФАЖ 2A,20,54,54,45,52,4D,20,42,55,46,46,45,52,20,49,4E,53,54,41,4C,4C,45,44,20,2A,ЯКЖ 2E,0,∙ФЖ 20,54,54,45,52,4D,20,42,55,46,46,45,52,20,49,4E,53,54,41,4C,4C,45,44,20,41,53,20,23-ЮЖ 0,2E,D,0- и:ГSCREEN TO PRINTER-@▓А I│243 е 250:Н A:Т I,A:Л I-]╝Т359,126:Т360,0:Т361,243-~╞Ж 52,20,189,162,191,53,20,57-Й╨Т149,0-Ъ┌:ГMODEM BAUD-офТ149,1:Т150,110-╠ю:ГPRINTER TO MODEM REROUT-█°Т 65315,48-ыТ 65314,249-· Т 65315,52.Т 65314,0. Х1000.&*BUFFER$│"EMPTY".A4Е FLAG│1 з 830::Д 1310.Q>:ГMAIN LOOP.xHт40:Т&HFF9A,27:°4,4,B:Ю:Т&HFF9A,24.ЕRТ359,126.Т\Y│9:X│м1.їf°4,4:Т&HFFB3,11:Т&HFF9A,11:Т&HFFB2,11:З:З" **COMMLINK**":АA│0е12:З:ЛA:З"F2=MENU":°4,4/fpFLAG│2:ИЁБе890:A$│ Т:Е  З(W$)▓59 з A$│ Л(32):Бе900::Д Е A$│""з А RP│338 е 345:Т RP,255:Л RP: Бе 880::Д Бе900/|z╔"V1;L10;A":Бе880/╖ДЕ A$│ Л(8) з X│Xм2:Е X ┤ 1 з Y│Yм1:X│39: Е Y ┤ 9 з Y│90ОЕ A$│ Л(8) ░ W$ ▓ "" з F$│ Р(W$,1, З(W$)м1):W$│F$:ё Xм1,Y:Т359,57:З#м2, Л(8);:Т359,126::Д X│Xл10<ШЕ A$│ Л(4) з Т359,57:Бе 13100`вЕ A$│ Л(13) з X│м1:Y│Yл1:Бе11400wмЕ A$│ Л(32) з 11200д╢Е A$│ Л(12) з АA│0е24:З Л(13):Л A:Бе 8400╩└Е A$│"#" з W$│W$л" POUND":Бе 11200Є╩Е A$│"$" з W$│W$л" DOLLARS":Бе 11201╘Е A$│"%" з W$│W$л" PERCENT":Бе 11201>▐Е A$│"&" з W$│W$л" AND":Бе 11201eшЕ A$│"=" з W$│W$л" EQUALS":Бе 11201КЄЕ A$│"+" з W$│W$л" PLUS":Бе 11201п№Е A$│"*" з W$│W$л" TIMES":Бе11201╘Е A$│"-" з W$│W$л" MINUS":Бе11201°Е A$│"." з W$│W$л" STOP":Бе11202 Е A$│ Л(34) з W$│W$л" QUOTE":Бе11202E$Е A$│"<" з W$│W$л" LESS":Бе 11202m.Е A$│">" з W$│W$л" GREATER":Бе 11202С8Е A$│ Л(13) з W$│W$л".":Бе 11202┤BЕ A$│"@" з W$│W$л" AT":Бе 11202╠LЕ  К(A$) ┤ 32 з 8802фVЕ  К(A$) ▓ 90 з 8803`X│Xл1:Е X▓39 з Y│Yл1:X│138jЕ A$│ Л(8) з X│Xм2:Е X┤ 1 з Y│Yм1:X│39:Е Y┤9 з Y│93YtЕ Y▓ 22 з X│1:Y│9:Бе 840::Д 3x~Е X┤1 з X│1:ё X,Y::Д ё X,Y3КИЗA$;:W$│W$лA$3ФТT$│W$3▓ЬЕ A$│ Л(32) з 1190::Д 8803╜ж:ГTALK3▌░Т&HFFD8,1:U│&HFF00:V│&HFF7E3Є║Т Uл1,52:ТUл3,634─Т Uл35,604 ╬Бж12404╪А I│1е З(T$)42тТV, К( Р(T$,I,1))49ьЛI4SЎЕ Ж(V) ░ 128│0 з 12704^Т V,134Ф А WT│1 е 109н З(T$):Л:Т&HFFD9,0:A$│"":W$│"":T$│""4├И FLAG Бе 840,880,1490,1690,1820,1990,20504╨:ГSCREEN4ц(Т359,57:Т&HFFD9,04ї2т40:°4,4:Ю5/О                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                TELECOMMUNICATIONS PROGRAMS                                                                                                                                                                                                                                                                                                                                                                                                 ULL"з Ю:З:З" BUFFER IS FULL!!!":Й" CLEAR BUFFER (Y/N)";AN$:Е AN$│"Y" з ╧3:╥ LOD$:╧0:BUFFER$│"EMPTY":LOD$│"":Бе1310: :Д 13108аЁИЁБе1310:Й"ENTER FILE.EXT";LOD$8ч·И яБе 1540:REC$│LOD$:▐ LOD$л":0" е LOD$л":3":BUFFER$│"FULL":Бе15509DЗ" "; м:LOD$│"":BUFFER$│"EMPTY":З"ERROR!!! HIT ANY KEY TO CONTINUE...":в44539:Бе13109oF$│"":FF$│"":L$│"":SR$│"":SR│0:S│3:A│19{F$│REC$9┴"L$│ Р(F$,A,1):Е L$│"." ▒ L$│"/" з 1580::Д FF$│FF$лL$:A│Aл1:Бе15709ё,Е  З(FF$)│8 з 1590::Д FF$│FF$л Л(32):Бе1580:6FF$│FF$л Р(F$, З(F$)м2,3):F$│FF$:<@Т&HFFD8,1:▀0,17,S,A$,B$:Т&HFFD9,0:RJА SR│1 е 113 й 16:gTSR$│ Р(A$,SR,16):Ц^Е F$│ Р(SR$,1, З(SR$)м5) з Бе 1680::Д Л SR:мhА SR│1 е 113 й 16:┴rSR$│ Р(B$,SR,16):·|Е F$│ Р(SR$,1, З(SR$)м5) з 1680::Д Л SR:S│Sл1:Бе1600;ZЖ:Г0-7 FN; 8-10 EXT; 11 FTYP; 12 ASCII FLG; 13 1 GR#; 14-15 #B L SEC.; 16-31 ---;РSR$│ Р(SR$,1,13):LNG$│SR$:Бе1310;СЪ:ГSAVE A FILE;эдТ&HFFD8,1:Е BUFFER$│"EMPTY"зЗ:З" NOTHING TO SAVE!":З" HIT ANY KEY...":в44539:Бе1310<оИяБе1720:Бе1730<]╕Е  м│34 з 1725::Д З:З" ERROR IN SAVING!":З" HIT ANY KEY TO CONTINUE...":в44539:Бе1310<к╜Й" File already there! Kill it";Q$:Е Q$│"Y"з ╥ REC$л":0":Бе1730::Д 1310<Ї┬З" SAVING ";REC$;"":▐ REC$л":3" е REC$л":0":S│ Ж(237):▀0,17,S,A$,B$= ╠А FD│1 е 129 й 16=K╓Е  Р(A$,FD,11)│F$ з 1760::Д RP$│RP$л Р(A$,FD,16):Л FD:Бе1770=ПрRP$│RP$лLNG$л Р(A$,( З(RP$)л З(LNG$)л1),128м( З(RP$)л З(LNG$)))=пър0,17, Ж(237),RP$,B$:Бе1310=┼ЇА FD│1 е 129 й 16>■Е  Р(B$,FD,11)│F$ з 1800: :Д RP$│RP$л Р(B$,FD,16):Л FD:С>FRP$│RP$лLNG$л Р(B$,( З(RP$)л З(LNG$)л1),128м( З(RP$)л З(LNG$)))>fр0,17, Ж(237),A$,RP$:Бе1310>x:ГSEND A FILE>╩&Е BUFFER$│"EMPTY" з З:З" NOTHING TO SEND!":З" HIT ANY KEY...":в44539:Бе1310>╫0ИяБе1980>▌:Ю>хDЗ:З?NЗ" SENDING FILE ";SEN$:А WT│1е1200:Л?7XТ359,126:З LOD$:З Л(13):АT│0е30:ЛT?CbF$│LOD$?KlX│1?Sv╧ 3?wАЩ"D",#1,F$,1:K1│ е(1):╨#1,1 зA$?СКИЁБе 1980:─#1,X:З A$;?лФX│Xл1:Е X ┤ K1 з 1930?│ЮЪ:█?─иАX│1е1000:ЛX@"▓З#м2, Л(0);:З#м2,LNG$:Т359,57:З:З"FINISHED":╧0:АT│1е60:ЛT:З"Hit any key...":в44539:Бе1310@n╝Ъ:З:З:З" ERROR!!! TRANSFER ABORTED!":З" HIT ANY KEY...":в44539:Бе1310@Г╞:ГRECIEVE A FILE@й╨Е BUFFER$┤▓"EMPTY" з 2010::Д 2030A┌Ю:З:З" CLEAR BUFFER TO RECIEVE (Y/N)";AN$:Е AN$┤▓"Y" з З" ABORTED!!!":З" HIT ANY KEY...":в44539:Бе1310::Д AFфТ359,126:╥ LOD$л":3":BUFFER$│"EMPTY"AnюЗ" INOPPERATIVE!!!":в44539:Бе1310A┤°З:З" FILE RECIEVED.":З" HIT KEY TO CONTINUE...":в44539:Бе1310BЮ:З:З" QUIT(Y/N)":Й AN$:Е AN$┤▓"Y" з 1310::Д Т359,126:Т231,0:Т113,3:Т&HFFD8,1:в40999BV Ю:Т359,57:З:З" SERVICE AND CORRECTIONS AREA.":С:Бе1310IVE!!!":в44539:Бе1310A┤°З:З" FILE RECIEVED.":З" HIT KEY TO CONTINUE...":в44539:Бе1310BЮ:З:З" QUIT(Y/N)":Й AN$:Е AN$┤▓"Y" з 1310::Д Т359,126:Т23                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                уp╛ ┐p╢Оpп┐ ╢ ╖p╡╛h┐p╠Оp╕┐h╢g╖p╦╛k┐uЛОuЖ┐k╢j╖uК╠)PЧЦ╫Ы╠@▌Ч╛(ЖОpЗ┐(юБябJ&∙╬u╙я<Оuц┐ЫОpy┐bЖ~╖g╖j╖ ╖Ъ╖a92b┴¤-┴.9~ж╝z╝ю╝У┐┐x╖P╢Б┤¤╖╢а╢Ме╬й╞╢л╢╚╢╧иїu╙┤ю╜sK╜q▀~╪п4╓o'E┴¤'д\5+┬~╠М%.ОьИ эБьИ эБьИ эБьИ эБМр%чЯИ╠``эБэБэБэБМ%є5Цпa4ЮИБ %M+ Б`$К@ А`зАЯИ о5ЦБ&ЮИМ'єЖ`зВЯИ5ЦБ &Ж`╓Й─P╦ ЮИзАZ&√ЯИ ББ &╧О М%є5Ц52b} ~*√╖ ~4╢ Дў╖ ╢ К╖ Ж<╖ #5Впф4╛q┌PзАМА%Оwm┐q┌╝q▄'√Б Уwmwm9╢ "D%∙╛q▄╝q┌'ёжАМА%Оwm┐q▄Н_Н╞4_DYXНjф&Ў2a╞ў  ЮХ4╜sF5&2{oczsE&Ж╜sОROJзфзbжbI$пзblф╜sзaиДдДцaчА\'хlcM'р╞°╦D$√ОsCыф'0┴/Оrё┴ /%Оr╙┴0,╜s ┴+/И@M&╦ ╩@╜s ║& ╩ 8XНt'\цЕ┴`$,┴0%(┴@% ЖўНa'╦@ ┴9"ЖўНS'╦k ЖяНI'└@'iчdО^╜sFЖ Н*L&жbН#бa& ┴&s mc'╢sEБ[&Ж\╜sod2d5В╖ ╢ КА9Ж╖ ╢ CД@9╖sE╠ ОRзАZ&√9^_ [ ] 0 \ейзл@&0&№9╜r M'+1ЎsЭ+ |sЭОsЮзЕ9╢ #Дє╖ #Ў "╩ў "К╖ #Ж@Ў "╚ў "J'°9╞АА=Оt1лжа+╜sS ўД ╢ Н Н Н Н DIR░ Н Н Н ?HEX$и Н Н Н Н ?MEMНН Н Н Н Н Н Н Н Н VERIF┘ Н Н Н Н Нй ?#-1,в ?#-2,в ?#-3,в Н Н Н Н Н Н Н Н " CMP: CLS Н RGB: CLS Н o'~┼╝пф4}sЭ&!ЮИжДЛКПзД╞ J&∙}sЭ&Z&ё хЖ`зДЎsЭОsЮжДzsЭ4жзАZ&∙жр5Ф TTHK By The Snail p┼ Н Н                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                З═0!ёБ╘#&  @ PD▓RB╞CC3DisыПцnЗ═0!ёБ╘#&  @ PD▓RB╞CC3DisыПцn                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 Л/ Х 10000:Бж 430:В AUTODIALER FOR THE COCO HВ SEAN M. BOSSINGER ^В 16220 SW 282 ST}В HOMESTEAD, FLORIDA 33033Ж(Ю(4)л2З" WELCOME TO THE AUTODIALER"╤<З" FOR LOCAL, AND LONG DISTANCE"ёFЗ" BY SEAN BOSSINGER."PЗ" USING THE HAYES SMARTMODEM.".ZА X│1 е 3000:Л X:Ю`dЙ"INSTRUCTIONS?(Y/N):";A$:Е A$│"Y" з Бж 60170уnАX│1 е 200:Л X:Ю:З"ENTER:":З"1) FOR INTERNATIONAL":З"2) FOR LOCAL AND NATIONAL.":Й"1 OR 2 PLEASE:";A:Е A │1 ▒ A│2 з 120 :Д 110°xИ A Бе 130,60000,}В BEGIN INTERNATIONAL AUTODIAL HERE2ВПUМЙ"ENTER THE COUNTRY NAME:";CN$vЦН A$,B:Е A$│CN$ з 190 :Д 160ЛаЕ A$│"END" з 180ЦкБе 150┴┤З"TRY AGAIN, COUNTRY NOT FOUND":Бе 130█╛З"COUNTRY CODE IS:";Bф╚CC│B╥Й"ENTER THE CITY NAME:";CN$#▄Е CN$│"NONE" з 230 :Д 250 TцЙ"ENTER THE CITY CODE";CC(1):Е CC(1)│0 з 310_ЁБе 310f·П ЗН A$,B:Е A$│CN$ з 300 :Д 270ЬЕ A$│"END" з 290зБе 260╨"З"NO CITY BY THAT NAME FOUND":Бе 210▄,CC(1)│B6Й"ENTER THE PARTY NUMBER";PN$:Е CC(1)│0 з 500004@З"DIALING 011";CC;" ";CC(1);PN$HOВ TIMER ROUTINEВTЗ"HIT TO START TIMER, AND TO DISCONECT MODEM"Л^Й A$ШhЗ#м2," "жrS│0:M│0:Ю└|А X│1 е 456:Л X:S│Sл1╘ЖЗ@0,S;":SECOND"ЇРA$│ Т:Е A$│"" з 380 :Д 410 1ЪЮ:З"TOTAL TIME ON PHONE WAS:";:З═"##.##";Sо60:З"MINUTES.uдЙ"ANOTHER NUMBER(Y/N)";A$:Е A$│"Y" з 110 :Д Е A$│"N" з К :Д 420ФйВ SET UP MODEM FOR DIALINGпоВ SETUP THE MODEM PORT┴╕W│65314:X│Wл1┬Т 149,0:Т 150,180:Т X,48:Т W,249:Т X,52:Т W,0:З#м2,"ATS11=40" ╠Р%╤В CITY AND COUTRY CODES║╓Ж ALGERIA,213,AMERICAN SAMOA,684,ANDORRA,33,ALL,078,ARGENTINA,54,BUENOS AIRES,1,CORDOBA,51,ATLANTIC OCEAN,871,AUSTRAILIA,61,MELBOURNE,3,SYDNEY,2]рЖ AUSTRIA,43,INNSBRUCK,5222,VIENNA,222,BAHRAIN,973,BELGIUM,32,ANTWERP,3,BRUSSELS,2,GHENT,91,BELIZE,501,BOLIVIA,591,LA PAZ,2,SANTA CRUZ,33,BRAZIL,55,BRASILO,11$ъЖ CAMEROON,237,CHILE,56,SANTIAGO,2,VALPARAISO,31,COLUMBIA,57,CALI,3,COSTA RICA,506,CYPRUS,357,NICOSIA,21,CZECHOSLOVAKIA,42,DENMARK,45,AALBORG,8,COPENHAGEN,1,ECUADOR,593,CUENCA,4,QUITO,2,EGYPT,20▌ЇЖ EL SALVADOR,503,ETHIOPIA,251,FIJI,679,FINLAND,258,HELSINKI,0,FRANCE,33,BORDEAUX,56,MARSEILLE,91,NICE,93,PARIS,1,FRENCH ANTILLES,596,FRENCH POLYNESIA,689,GABON,241,EAST GERMANY,37└■Ж WEST GERMANY,49,STUTTGART,711,BERLIN,30,FRANKFURT,611,MUNICH,89,SCHWEINFURT,9721,GREECE,30,ATHENS,1,RHODES,241,GUAM,671,GUANTANAMO BAY,53,GUATEMALA,502,GUATEMALA CITY,2,GUYANA,592,GEORGETOWN,02,HAITI,509,PORT AU PRINCE,1╖Ж HONDURAS,504,HONG KONG,852,KOWLOON,3,HUNGARY,36,ICELAND,354,AKUREYRI,6,HAFNARFIJOROUR,1,INDIA,91,INDONESIA,62,JAKARTA,21,IRAN,98,TEHERAN,21,IRAQ,964,BAGHDAD,1,IRELAND,353,DUBLIN,1,GALWAY,91,ISRAEL,972,HAIFA,4,JERUSALEM,2,TEL AVIV,3,ITALY,39ЖЖ FLORENCE,55,NAPLES,81,ROME,6,VENICE,41,IVORY COAST,225,JAPAN,81,HIROSHIMA,822,TOKYO,3,YOKOHAMA,45,JORDAN,962,KENYA,254,REPUBLIC OF KOREA,82,PUSAN,72,SEOUL,2,KUWAIT,965,LIBERIA,231,LIBYA,218,TRIPOLI,21 (Ж LIECHTENSTEIN,41,ALL CITIES,75,LUXEMBOURG,352,MALAWI,265,MALAYSIA,60,KUALA LUMPUR,3,MEXICO,52,MEXICO CITY,5,TIJUANA,668,MONACO,33,ALL CITIES,93,MOROCCO,212!&Ж NAMIBIA,264,NETHERLANDS,31,AMSTERDAM,20,THE HAGUE,70,NETHERLAND ANTILLIES,599,ARUBA,8,NEW CALEDONIA,687,NEW ZEALAND,64,AUCKLAND,9,WELLINGTON,4,NICARAGUA,505,MANAGUA,2,NIGERIA,234,LAGOS,1,NORWAY,47,BERGEN,5,OSLO,2!Э0Ж OMAN,968,PACIFIC OCEAN,872,PAKISTAN,92,PANAMA,507,PAPUA NEW GUINEA,675,PARAGUAY,595,ASUNCION,21,PERU,51,AREQUIPA,54,LIMA,14,PHILIPPINES,63,MANILA,2" :Ж POLAND,48,PORTUGAL,351,LISBON,1,QATAR,974,ROMANIA,40,BUCURESTI,0,SAIPAN,670,SAN MARINO,39,ALL POINTS,541"∙DЖ SAUDI ARABIA,966,RIYADH,1,SENEGAL,221,SINGAPORE,65,SOUTH AFRICA,27,CAPE TOWN,21,JOHANNESBURG,11,PRETORIA,12,SPAIN,34,BARCELONA,3,LAS PALMAS,28,MADRID,1,SEVILLE,54,SRI LANKA,94,KANDY,8,SURINAME,597,SWEDEN,46,GOTEBORG,31,STOCKHOLM,8#уNЖ SWITZERLAND,41,BERNE,31,GENEVA,22,LUCERNE,41,ZURICH,1,TAIWAN,886,TAINAN,62,TAIPEI,2,THAILAND,66,BANGKOK,2,TUNISIA,216,TUNIS,1,TURKEY,90,ISTANBUL,11,IZMIR,51,UNITED ARAB EMIRATES,971,ABU DHABI,2,AJMAN,6,AL AIN,3,AWEIR,49,DUBAI,4$мXЖ FUJAIRAH,91,RAS AL KHAIMAH,7,SHARJAH,6,UMM AL QUWAIN,6,UNITED KINGDOM,44,BELFAST,232,CARDIFF,222,EDINBURGH,31,GLASGOW,41,LIVERPOOL,51,LONDON,1,URUGUAY,598,CANELONES,598,MERCEDES,532,MONTEVIDEO,2%bЖ VATICAN CITY,39,ALL CITIES,6,VENEZUELA,58,CARACAS,2,MARACAIBO,61,YEMEN,967,YUGOSLAVIA,38,BELGRADE,11%JlВ TELEPHONE DIRECTORY BEGINS HERE!%ЛvЖ MCI,3728501,DOWPHONE,18002220248,RAINBOW,15022284492,END,0%│'║PRITN"INSTRUCTIONS FOR AUTODIAL***"%╤'├З"INTERNATIONAL CALLING:"&l'─З"HIT <1>, AT THE FIRST PROMPT, FOLLOWED BY COUNTRY NAME, FOLLOWED BY CITY NAME (IF APPLICABLE), FOLLOWED BY TELEPHONE NUMBER"&Ь├OВ DIAL NUMBER WITHOUT CITY CODE&╗├PЗ"DIALING 011 ";CC;" ";PN$&┌├ZЗ#м2,"ATDT 011";CC;" ";PN$&ц├dБе 340 'ъ_В LOCAL, U.S., AND CANADIAN DIALING'#ъ`Ю'1ъjЗ"ENTER:"'MъtЗ"1) FOR LOCAL NUMBERS"'rъ~З"2) FOR NATIONAL LONG DISTANCE"'ПъИЙ"1 OR 2 ONLY PLEASE:";A'░ъТЕ A│1 ▒ A│2 з 60070 :Д 60060'╜ъЬБе 60010'╒ъжИ A Бе 60080,60110 'ёълREN MENU А  дAL DIALING(4ъ░Ю:З"1>MANUAL ENTER OR 2>AUTO DIAL";:Й A:Е A│1 з 60090 :Д 60380(Wъ║Й"ENTER THE NUMBER TO DIAL";A$(Иъ─З DIALING ";A$:PRINT#-2,"ATDT ";A$:GOTOB 340(Оъ╬Ю(┤ъ╪Й"1>MANUAL DIAL OR 2>AUTO DIAL";A(╨ътЕ A│1 з 60140 :Д 60380 )ъьЙ"ENTER THE AREA CODE";AC$:Й"ENTER THE TELEPHONE NUMBER";TN$)-ъЎЗ"DIALING ";AC$;"+";TN$)NыЗ#м2,"ATDT1 ";AC$лTN$:Бе 340)hыВ INSTRUCTION SCREENS)Мы З"INSTRUCTIONS FOR AUTODIAL***")кыЗ"INTERNATIONAL CALLING:"*EыЗ"HIT <1>, AT THE FIRST PROMPT, FOLLOWED BY COUNTRY NAME, FOLLOWED BY CITY NAME (IF APPLICABLE), FOLLOWED BY TELEPHONE NUMBER"+9ыЗ"IF NO CITY CODE IS NEEDED, THEN TYPE 'NONE' AT THE CITY NAME PROMPT, FOLLOWED BY 0 AT THE CITY CODE PROMPT, IF AN ALL CITY CODE IS NEEDED, FOLLOW THE ABOVE INSTRUCTIONS, EXCEPT, AT THE CITY CODE PROMPT , ENTER THE POINT CODE.":+_ыЙ"PRESS TO CONTINUE";A$:Ю+yыЗ"FOR LOCAL CALLING:"+╞ыЗ"ENTER <2> AT THE FIRST PROMPT FOLLOWED BY <1> AT THE NEXT MENU.",,ыЗ"FOR DIAL BY NAME ENTER <2> AND THEN WHEN THE COMPUTER ASKS FOR IT, ENTER THE PARTY NAME.",ЩыЗ"FOR MANUAL KEYBOARD ENTRY, ENTER <1> AND WHEN THE COMPUTER ASKS FOR IT, ENTER THE PARTY NAME.",╣ыЙ" TO CONTINUE";A$:Ю,┌ыЗ"U.S. AND CANADIAN DIALING"-'ыЗ"ENTER <2> AT THE FIRST MENU, FOLLOWED BY <2> AT THE SECOUND MENU."-гыЗ"FOR MANUAL DIALING, ENTER <1> AND WHEN THE COMPUTER ASKS FOR THEM, ENTER THE AREA CODE, AND THE TELEPHONE NUMBER".<ы З"FOR AUTO-DIAL BY NAME, ENTER <2>AT THE MENU, THEN WHEN THE COMPUTER ASKS FOR IT, ENTER THE PARTY NAME":Й" TO START PROGRAM";A$:Ю:Р.nы╫ дAL, U.S. ░ CANADA DIALING BY NAME .Шы▄Ю:Й"ENTER THE NAME OF THE PARTY:";NP$.ЯыцП .┼ыЁН A$,B$:Е A$│NP$ з 60440 :Д 60410.хы·Е A$│"END" з 60420 :Д 60430/QьЗ"ENTRY NOT FOUND":А X│1 е 1000:Л X:Ю:З"RETURNING TO LOCAL, LONG DISTANCEMENU.":АX│1е1000:Л X:Ю:Бе60000/^ьБе 60400/КьЮ:З"DIALING ";A$:З#м2,"ATDT ";B$:Бе 340PARTY:";NP$.ЯыцП .┼ыЁН A$,B$:Е A$│NP$ з 60440 :Д 60410.хы·Е A$│"END" з 60420 :Д 60430/QьЗ"ENTRY NOT FOUND":А                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                  @UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU33%UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU5UUUUUUUUUUUUUUUUUUUUUUUUU5UUUUUUUUUUUUUUUUUUUUUUUUU33%UUUUUUUUUUUUUUUUUUUUUUUUU33%UUUUUUUUUUUUUUUUUUUUUUUUU""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU5333%UUUUUUUUUUUUUUUUUUUUUUUUU5333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU5333%UUUUUUUUUUUUUUUUUUUUUUUUU5333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""&f3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""f&3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""f&33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""f&33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""fffb3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""ffffb3333%UUUUUUUUUUUUUUUUUUUUUUUUU53"""""""""""""""""""" н√33%UUUUUUUUUUUUUUUUUUUUUUUUU53""ffffb3333%UUUUUUUUUUUUUUUUUUUUUUUUU53"""""""""""""""                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 @33333333УУ""3333%UUUUUUUUUUUUUUUUUUUUUUUUU53"""""""""""""""""""""""""""""""""""""""""""""""""" Р""ЩРС33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""339Щ9Щ33У33333%UUUUUUUUUUUUUUUUUUUUUUUUU53""33333333У33333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""9Щ"ЩТЩ)ЩЩ"")""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33""""""""""""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""33333333%UUUUUUUUUUUUUUUUUUUUUUUUU53""33333333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33""333333ЩУ""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33""ЩЩЩУ9Щ33""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""3У333333%UUUUUUUUUUUUUUUUUUUUUUUUU53""339Щ3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53"""""""""""""""""""""""""""""""""""""""""""""""""" ""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""93333333%UUUUUUUUUUUUUUUUUUUUUUUUU53""93333333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33ЩР")Щ"9Щ33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33""""3333""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""939Щ""""3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""9333""""3333%UUUUUUUUUUUUUUUUUUUUUUUUU53"""""""""""""""""""""""""""""""""""""""""""""""""")"33"Т)"33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""""ЩЩ9Щ"Т)"33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""333У""3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""39Щ3У)"3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""""33ЩУ"ТС)"33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""""3333"Т""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""33933У33""3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""3393С3У33""3333%UUUUUUUUUUUUUUUUUUUUUUUUU53"""""""""""""""""""""""""""""""""""""""""""""""""")Щ9333"Т""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""""339Щ""""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""33ЩУ3333""3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""3333339Щ""3333%UUUUUUUUUUUUUUUUUUUUUUUUU53"""""""""""""""""""""""""""""""""""""""""""""""""")ТЩУ"ЩТ"ЩЩ)ТЩ3ЩР""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""""33""""33""33Р""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""33333ЩУ9Щ3Щ3У33У""3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""333Щ333333333333""3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33""""33""""""С33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33"Щ""Щ3")")Т)С33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""3333393333%UUUUUUUUUUUUUUUUUUUUUUUUU53""339Щ393333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""39Щ3""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53"""""""""""""""""""""""""""""""""""""""""""""""""" Щ3333""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""33""3333333333%UUUUUUUUUUUUUUUUUUUUUUUUU53""33)Т39Щ39Щ3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""33""33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""ИИИИИИИИИИ3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""ИИИИИИИИИА3333%UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""8ИИИИИИИИА33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""8ИИИИИИИИА33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""ИИИИИИА └UUUUU53""""""""""""""""""""""""""""""""""""""""""""""""""8ИИИИИИИИА33""""""""""""""""""""""""""""""""""""""""""5UUUUUUUUUUUUUUUUUUUUUUUUU53""ИИИИИИА                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 The process of electrodeposition is one in which electric current is carried across an electrolyte and in which a substance is deposited at one of the electrodes. The electrolyte is the medium that carries the current by means of ions. The ability of a solvent, especially water, to ionize substances dissolved in it, makes electrlysis possible. The electricity is carried across the electrolyte by the charged ions and products of electrolysis appear at the electrodes. This is a result of the positively charged ions being attracted to the negatively charged cathode while the negatively charged ions travel toward the positively charged anode. The charges of the ions are then neutralized by the charges on the electrodes and the products then appear. The electrolyte is a conducting medium in which the flow of electric current is accomplished by the movement of matter. It is also a substance that gives rise to ions. If more than one ion is present, carrying a positive charge, several reactions are possible at the negativley charged cathode, although usually only one product of electroysis appears. Each electrode reaction takes place at a specific voltage and the most positive metal ion will deposit at the cathode. Any liquid or solution that contains ions can be used as an electrolyte. The large majority of commercial electrolytes, however, use water as the solvent and are therefore called aqueous electrolytes. Fused salts find their greatest use in the electrolytic production of metals such as sodium, magnesium, and aluminum. Fused-salt electrolytes are also used in the cleaning of metals. The extensive use of water as the solvent in the electroplating industry is due to its cheapness and abundance and to the fact that many common salts are very soluable in water. The plater is primarily inserted in the reaction that takes place at the cathode since this is where deposits are produced. The potential at which this reaction takes place is called the deposition potential. The reaction at the cathode is much esier to follow by a knowledge of the quantity of current that reaches the cathode then by measuring the potential however. The reaction taking place at the anode is almost independent of the reaction occuring at the cathode. The position of the anodes has much to do with the distribution at the cathode, but the anode usually operates best at a range of current densities that can be changed independantly of the cathode current by changing the anode area. A plating bath can be operated succesfully for long periods of time if the composition of the bath is not changed too rapidly. Such changes are primarily due to chemical composition, incomplete electrode reactions, and drag-in or drag-out. An acid copper bath is relatively easy to control easy because there is very little tendency for chemical decomposition and the reactions at the electrodes are essentially complete. This means that the electrolyte is chemically stable and that for every chemical equivalent of copper disolved at the anode there is a chemical equivalent of copper deposited at the anode. Nevertheless, the bath cannot be continuously opperated without control, since solution is lost from the system by drag-out every time a rack is removed. Control is further complicated in that glue is generally added to the bath to produce a finely crystalline deposit. The glue is not stable and must be controlled. This bath is typical of many acid baths where the major factor in control is the addition agent used- in this case, the glue. An alkaline tin bath is not a typical alkaline bath, but it is a good example of a bath where care is required to maintain solution balance. In the alkaline tin bath, the electrode reactions are not complete. In addition to depsiting tin, hydrogen is evolved at the cathode. And in addition to tin being dissolved, oxygen is given off at the anode. To make the problem more complex, the bath undergoes continues chemical decomposition and the anodes must be maintained with an oxide film at all times. If the oxide film is not present or is too thick, troubles set in that through the bath out of balance or even cause a deposit to form that is not acceptable. The bath can be controlled by regulation of bath temperature, cathode current, anode current, and by proper chemical additions. The bath voltage is responsive to changes at the anodes; and since the bath is sensitive to anode changes, the voltage may be used as an aid to bath control. A plating bath should always be kept within prescribed chemical limits wether or not the bath composition is difficult to maintain. The bath should also be used in such a way that a minimum of chemical additions is required. It is very rare that a bath does not require frequent additions, although this condition is approached when the anode effecieny is slightly higher than the cathode efficiency. Such a bath would be a perfectly balanced bath, but even in this case, drag-out would eventually remove a sufficient amount of one of the essential chemicals so that chemical additions would be required. Since additions are required to all baths, it is best to make them frequently and in small amounts, so that chemical limits are held. It is well to settle a few points reguarding the equilibrium potential befor considering some of the details of the plating process. The well-known series potential for electrochemical reactions is shown below. Ion Voltage -------------------- Au+ +1.5 Ag+ +0.7995 Cu+ +0.0528 Sn++++ +0.003 H+ 0 Pb++ -0.1264 Sn++ -0.1406 Ni++ -0.231 In+ -0.336 Cd++ -0.4024 Cr+++ -0.509 Zn++ -0.762 Na+ -2.7125 It is a reliable point for reference; however, it can be highly misleading if it is used as a definite guide. These potentials are equilibrium potentials. They were measured under conditions where no current was flowing and with definite quantities of dissolved salt present and at standard temprature to obtain compareable values. Hydrogen is taken as the reference point on the electromchemical scale and is arbitrarily assigned a value of zero. The metal ions whose voltage is listed as possitive are more reactive than the hydrogen ion when they are present in equivilent chemical quantities, whereas the metal ions having a negative voltage are less reactive than the hydrogen ion. Thus, as we go up the scale, the metal ions become more and more reactive at the cathode. The potentail of an electrode and of a solution of its ions may be measured during plating. This deposition potential varies with the concentration of metal ions in the bath and is also greatly affected by the current density. As the current density is increased, polarization at the electrode increases, resaulting in conditions more favorable for deposition of metals low in the electrochemical scale. Thus, it becomes possible to deposit zinc from acid solutions, whereas zinc normally disolves in acid. One might expect that zinc could not be deposited in the presence of hydrogen ions, and under some conditions it is difficult to achieve this. If polarization does not exceed the hydrogen overvoltage, hydrogen will develope exclusive of zinc. This can take place even during the electrolysis of copper from a copper nitrate solution. Such an electrolysis is carried out in the presence of nitric acid, and by continued electrolysis, the copper can be deposited completely from the solution. However, if the solution is heated while copper is depositing, a point will be reached where the tendency for the copper to disolve will be greater than its tendency to plate. At this point the copper will go back into solution in the nitric acid even though current is flowing. The behavior of copper in nitric acid solutions and that of zinc in acid solutions illustrate that to study the mechanism of deosition the measurement of deposition potentials is helpful. These potentials direct attention to the importance of polorization, overvoltage, chemical reactivity, and ability to plat in the presence of other ions. The plater is concerned with the quantity of electricity that is used in his process, since the number of units of electricity that passes through the electrolyte during electrolysis detrermines the quantity of product formed at the cathode. The unit quantity of electricity is the coulomb, wich is the quantity of current passing in a circuit when 1 ampere flows for 1 second. Ordinarily, the ampere is considered when electroplating. One gram equivalant weight of a metal equals 1 gram atomic weight divided by the valence. The valenece is equal to the number of charges on the ion. From the faraday, the grams deposited at the cthode can be calculated. The table for this is shown below. ---------------------------------------------------------------------------- Metal Ion Gram atomic weight Valance Grams per Faraday ---------------------------------------------------------------------------- Silver Ag+ 107.88 1 107.88 Copper Cu+ 63.57 1 63.57 Copper Cu++ 63.57 2 31.78 Gold Au+ 197.20 1 197.20 Tin Sn++++ 118,70 4 29.67 The quantity of electricity that passes through the electrolyte durng electrolysis is importnt because a minimum amount of metal is required for every application. Also it may be desired to avoid an excess of metal for economic or specification purposes. However, it is not enough to know the total quantity of current that passes. The distribution of the current and the platig efficiency must also be known for a reasonable estimate of the thickness. If the piece to be plated is a large flat sheet, then the excess of 10 to 20% of the current may be lost to the edges. The current density over most of the area will then be 10-20% lower than the current density obtained by dividing the total current by the total area. From this approximate current density, the approximate plating rate can be calculated. In many cases, however, the cathode efficiency is not 100% because a part of the total current is consumed in evolving hydrogen. The cathode efficiency is that percentage of the current that deposits metal. In other words, if 60% of the current deposits metal, then the plating rate is only 60% of that which would be obtained by calculation from an ampere hour. Just as it is more convenient to use current density than total current, it is also convenient to use ampere-hours per square foot to calculate plating thickness. Of course, if the cathode efficiency is less than 100%, then plating rate is calculated from the following equation: amp-hr plating rate=-------- X % effiency (1) sq ft The plating rate calculated from equation (1) is in ampere-hours per square foot. In order to convert this to thickness, the chemical equivalent and the specific gravity of the metal must be taken into consideration. This can be done with the following formulas: equivalent weight equivalent weight ----------------- = ----------------- amp-hr faraday 26.8 g =------- at 100% efficiency (2) amp-hr g amp-hr(1) g ------- X ----------- = ------ amp-hr sq ft sq ft g 1,000 ------------- X ------------- = mils thickness (3) sq ft X 144 16.4 X sp.gr. These formulas illustrate how the total current produces a total thickness. In every application, it is convenient to know the ampere-hours per square foot and the cathode efficiency. Not only is it convenient to have this information, but it is also desirable to have it for the areas of highest and lowest current density. If the distribution of current is known and if a specification for thickness is given, then the required quantity of current can be determined. Unfortunately, many things cannot be calculated and one has to estimate. Experimenting in a plating room to obtain proper metal distribution should be guided by a knowledge of the qualitative rules for the behavior of the cathode and may aid in reducing some of the percentages of error. These qualitative rules may be stated as follows: 1. The current concentrates on the edges. 2. The current does not penetrate into deep recesses. 3. The current does not readily flow around a nonconductor. 4. One conductor will rob another of current. These rules may be used as a guide to the arrangement or geometry of a plating system. Quality plating is primarily dependent upon the reaction that takes place at the cathode during deposition. This reaction can only be favorable if the plating bath has been properly prepared and adjusted. But even if conditions are right in the plating bath, there is no guarantee that the deposit will be satisfactory. The first step in preparing a new bath consists of through cleaning of the empty plating tank. It is far easier to clean the tank when it is empty than to remove the dirt from the solution after the bath is made up. All solid particles and dirt should first be removed from the tank by sweeping and wiping. After the tank is thus swept it should be examined to determine if further cleaning is required. After the tank is cleaned and rinsed, it should be partially filled with ater befor the chemicals are added. If the tank is partially filled, it will be easier to agitate without spilling solution over the top. For very soluable salts, it will be convenient to fill the tank 1/3, but for salts that are not soluable, the tank should be filled to about 2/3 full. When large volumes of solution are made, the salts should be added slowly and the solution agitated. Agitation may be provided by hand stirring with a stirring rod, but if many solutions are made, a portable electric mixer will be convenient. If the salts are added too rapidly, they may form a cake on the bottom of the tank that will be very difficult to dissolve. After the bath is of suitable gravity and filtered, a plating test should be made. This may be done by either plating on a simple flat cathod, plating on an actual article, or (best) by running a plating range test. Purification tests are best carried out simultaneously. These consist of filtration, carbon treatment, and electrolysis. The activated carbon should be loaded into the filter and the solution pumped over the carbon and through the filter. Electrolysis for purificaton is most effective at low current density-5 amperes per square foot. When the bath is suitable for full-scale operation, the geometry of the plating system should be considered. Anodes should be spaced so that the current reaches the rack equally from all directions. We know that the surface must be cleaned of all foreign matter and that it must be chemically prepared for plating. The preparatory steps are dependent of the surface of the plating bath. Furthermore, there are variations in the steps that are necessary to accomodate alloys, and contaminants worked into the surface. Some of the more common cleaners that might be used are, sodium hydroxide, trisodium phosphate, sodium carbonate, soap soda, soap rosin, and sometimes just water. Once all preliminary steps have been taken and all is in readiness, one can then electroplate the object they want. Due to the many types of electroplating procedures, it would be very wise to use a set procedure already preformed, or have a guide of sorts to the particular type of plating you want to achieve. Many things can be achieved through electroplating, but the most common of these are for instance, the chrome so popular on automobiles, the gold eyes of sewing needles, and most gold plated objects. Although a fairly simple process, much needs to be known befor plating an object. Hopefully this has been a guide that will help people do just so, and someday, maybe someone will find yet another use for this science. yet another use for this science.                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                 !¤&" :Г -------------------------&@:Г sysop access program&`:Г bbs-bord bulletin system&Б:Г -------------------------&ХХ4000:З Л(12):Ю&╦#IP│ Ж(&H7D04):OP│ Ж(&H7D05):Т &H7D04,0:Т &H7D05,0&ў(З:З" *** SYSOP ACCESS PROGRAM ***":З:З'.-╗Й" ACTSLOG DRIVE: <0/3> ? ";AL$:ЕAL$│""зAL$│"0"'e2╗Й" USERLOG DRIVE: <0/3> ? ";UL$:ЕUL$│""зUL$│"0"'Ь7╗Й" MESSLOG DRIVE: <0/3> ? ";ML$:ЕML$│""зML$│"0"'╙<╗Й" EXITLOG DRIVE: <0/3> ? ";EL$:ЕEL$│""зEL$│"0"'эA:Г ------------------(F:Г sysop program menu(!K:Г ------------------(MPЗ:З:З" *** SYSOP ACCESS PROGRAM ***":З(╛UЗ" 1) EXIT TO DISK BASIC":З" 2) PRINT ACTSLOG FILE":З" 3) PRINT USERLOG FILE":З" 4) UPDATE ACTSLOG FILE")NZЗ" 5) UPDATE MESSLOG FILE":З" 6) CREATE ACTSLOG FILE":З" 7) CREATE USERLOG FILE":З" 8) CREATE MESSLOG FILE":З" 9) CREATE EXITLOG FILE")г_З" 10) SYSTEM FILE EDITOR":З" 11) SYSOP LOG REVISION":З" 12) RETURN TO BBS-BORD")∙dЗ:╗Й" COMMAND: ";CM$:И  Й(CM$)Бж980,125,300,240,340,205,585,755,885,460,925,975*iБе80*n:Г ------------------*6s:Г print actslog file*Px:Г ------------------*Б}З Л(12):Ю:З:З" *** PRINT ACTSLOG FILE ***"*╬ВЗ:З:З" OUTPUT TO SCREEN OR PRINTER:":╗Й" OR

? ";Q$*чЗЕQ$│"P"зDV│м2 :ДDV│0+МЗ:╗Й" START NUMBER: ? ";S$:RC│ Й(S$)+5СЕ RC┤1 ▒ RC▓150з RC│1+TЦЩ"D",#1,"ACTSLOG/SYS:"лAL$+АЫ─ #1,RC:Й#1,LG$:Е О(LG$,3)│ б(3,32)з180+║аЗ#DV," ACTSLOG RECORD: #";RC:З#DV:Е DV│0зЗ LG$:Бе170,8еLG$│LG$л б(253м З(LG$),32):A$│ О(LG$,64):B$│ Р(LG$,65,64):C$│ Р(LG$,129,64):D$│ П(LG$,61):З#DV,A$:З#DV,B$:З#DV,C$:З#DV,D$,XкЗ:З" NEXT RECORD: ?",ВпQ$│ Т:ЕQ$│"Y"з180 :ДЕQ$│"N"з185 :Д175,Ы┤RC│RCл1:Е RC┤151з155,ж╣Ъ #1:Р,┴╛:Г -------------------,▄├:Г create actslog file,ў╚:Г --------------------I═З Л(12):Ю:З:З" *** CREATE ACTSLOG FILE ***":З:З:З:З" ARE YOU SURE: ?"-q╥Q$│ Т:ЕQ$│"Y"з215 :ДЕQ$│"N"зР :Д210-Щ╫З:З" OK, CREATING ACTSLOG FILE ..."-╠▄Бж275:З" THE LOG WILL HOLD 150 RECORDS!":Бе615-чс:Г -------------------.ц:Г update actslog file.ы:Г -------------------.UЁЗ Л(12):Ю:З:З" *** KILL ACTSLOG RECORDS ***":З:З:З.дїЗ" RECORD NUMBER: <1-150> ?":╗Й" ENTER = ABORT ";Q$:RC│ Й(Q$).┤·ЕQ$│"A"з270.╩ Е RC┤1 ▒ RC▓150зР/Щ"D",#1,"ACTSLOG/SYS:"лAL$:─ #1,RC:┘ #1, б(253,32):┼ #1,RC:Ъ #1/> З:З" OK, THAT ENTRY IS NOW DELETED!";:Бе615/qБж275:З:З" OK, ALL RECORDS NOW DELETED!":Бе615/╖Щ"D",#1,"ACTSLOG/SYS:"лAL$:АX│1е150:┘ #1, б(253,32):┼ #1,X:Л:Ъ #1/╜Р/╫:Г ------------------/ё":Г print userlog file0 ':Г ------------------0<,З Л(12):Ю:З:З" *** PRINT USERLOG FILE ***"0Й1З:З:З" OUTPUT TO SCREEN OR PRINTER:":╗Й" OR

? ";Q$0в6ЕQ$│"P"зDV│м2 :ДDV│00∙;З:Бж950:АX│1е300:─ #1,X:Е PW$│ б(6,32)зЛ:Бе320 :ДЗ#DV," "лNM$л" <"лIN$л"> "лPW$:Л1@Ъ #1:Бе6151#E:Г -------------------1>J:Г update messlog file1YO:Г -------------------1░TЗ Л(12):Ю:З:З" *** UPDATE MESSLOG FILE ***":З:З:З:З" ENTER YOUR CHOICE: <1/2> ?"1ЄYЗ:З" 1. KILL SYSTEM MESSAGES":З" 2. UPDATE SYSTEM MESSAGES"1№^Q$│ Т2cИ  Й(Q$)Бе365,3952hБе3502TmЗ Л(12):Ю:З:З" *** KILL SYSTEM MESSAGES ***":З:З:З2▓rЗ" ENTER THE FIRST <3> LETTERS OF":╗Й" THE MONTH TO DELETE: ";DL$:Е  З(DL$)┤▓3зР :ДБж9602рwА RC│1е300:─ #1,RC:Е О(DT$,3)│DL$з390 :ДЛ3:|З:Е KM│1зЗ" OK, THAT MONTH IS NOW DELETED!":Бе385 :ДЗ" SORRY, CAN'T FIND THAT MONTH!"3NБЪ #1:KM│0:Бе6153eЖБж945:KM│1:Л:Бе3803╣ЛЗ Л(12):Ю:З:З" *** UPDATE SYSTEM MESSAGES ***":З:З:З:З" ARE YOU SURE: ?"3сРQ$│ Т:ЕQ$│"Y"з405 :ДЕQ$│"N"зР :Д4004ХЗ:З" OK, A FEW MOMENTS PLEASE ...":Бж9604;ЪА SM│1е300:─ #1,SM:ЕTH$│ б(3,32)з420 :ДЛ4EЯБе4404vдMF│SMл1:АX│MF е300:─ #1,X:ЕTH$┤▓ б(3,32)з4304┤йЕDT$┤▓ б(10,32)з ╘ DT$│ б(10,32):┼ #1,X:Л:Бе440 :ДЛ:Бе44055оDU$│DT$:SU$│SB$:TU$│TH$:BU$│BH$:MU$│MS$:╘ DT$│ б(10,32):╘ SB$│ б(8,32):╘ TH$│ б(3,32):╘ BH$│ б(3,32):╘ MS$│ б(224,32):┼ #1,X5Р│─ #1,SM:╘ DT$│DU$:╘ SB$│SU$:╘ TH$│TU$:╘ BH$│BU$:╘ MS$│MU$:┼ #1,SM:SM│SMл1:Е SM┤300з4205┴╕Ъ #1:З" THE MESSLOG HAS BEEN UPDATED!":Бе6155┌╜:Г -----------------5є┬:Г system log editor6 ╟:Г -----------------6g╠З Л(12):Ю:З:З" *** SYSTEM LOG EDITOR ***":З:З:З" ENTER FILE NUMBER: <1/3> ?":RC│1:З6Б╤З" 1. USERLOG / SYS"6Ы╓З" 2. MESSLOG / SYS"6╡█З" 3. EXITLOG / SYS"6╒рQ$│ Т:И  Й(Q$)Бе505,645,8056▀хБе4806°ъ:Г -----------------7я:Г edit userlog file7*Ї:Г -----------------7<∙Бж950:З Л(12)7_■Ю:─ #1,RC:З:З" RECORD #"RC:З:З7─З" USERNAME: "NM$:З" PASSWORD: "PW$:З" INITIALS: "IN$:З" USERFLAG: "FL$:З" LAST USE: "LU$:З8,З:З" 1. NAME 2. PSWORD 3. INIT":З" 4. FLAG 5. DELETE 6. NEXT":З" 7. BACK 8. RETURN TO MAIN.":З8` Q$│ Т:И  Й(Q$)Бе535,540,545,550,555,560,570,5758jБе5258Щ╗Й" USERNAME: ";N$:╘ NM$│N$:┼ #1,RC:Бе5108╚╗Й" PASSWORD: ";P$:╘ PW$│P$:┼ #1,RC:Бе5108ў!╗Й" INITIALS: ";I$:╘ IN$│I$:┼ #1,RC:Бе5109&&╗Й" USERFLAG: ";F$:╘ FL$│F$:┼ #1,RC:Бе5109А+╘ LU$│ б(10,32):╘ NM$│ б(16,32):╘ PW$│ б(6,32):╘ IN$│ б(3,32):╘ FL$│" ":┼ #1,RC:Бе5109Щ0RC│RCл1:Е RC┤301з5109г5Бе5759║:RC│RCм1:Е RC▓0з5109┼?Ъ #1:Р9рD:Г -------------------9√I:Г create userlog file:N:Г -------------------:hSЗ Л(12):Ю:З:З" *** CREATE USERLOG FILE ***":З:З:З:З" ARE YOU SURE: ?":РXQ$│ Т:ЕQ$│"Y"з605 :ДЕQ$│"N"зР :Д600:╛]З:З" OK, CREATING USERLOG FILE ...":Бж950;CbАX│1е300:╘ LU$│ б(10,32):╘ NM$│ б(16,32):╘ PW$│ б(6,32):╘ IN$│ б(3,32):╘ FL$│" ":┼ #1,X:Л:Ъ #1:З" THE FILE WILL HOLD 300 USERS!";_gЗ:З" PRESS ANY KEY ...";olЕ  Т│""з620;uqР;Оv:Г -----------------;з{:Г edit messlog file;└А:Г -----------------;╥ЕБж960:З Л(12)<КЮ:─ #1,RC:З" RECORD #";RC;:З" "DT$:З";<{ЩЕ  Т│""з665<эЮЗ:З:З" 1. PRINTER 2. SUBJ 3. TO WHO":З" 4. FROM 5. MESSAGE 6. DATE":З" 7. DELETE 8. NEXT 9. RETURN.";=%гQ$│ Т:И  Й(Q$)Бе685,695,705,715,730,725,735,740,745=/иБе675=инБж940:З#DV,"SUBJECT: "лSB$:З#DV,"FOR WHO: "лTH$:З#DV,"LEFT BY: "лBH$:З#DV:З#DV,A$:З#DV,B$:З#DV,C$:З#DV,D$:З#DV=▓▓Бе650=▐╖З:З:╗Й" SUBJECT: ";S$:╘ SB$│S$:┼ #1,RC=ш╝Бе650>┴З:З:╗Й" TO WHO: ";I$:╘ TH$│I$:┼ #1,RC>╞Бе650>I╦З:З:╗Й" LEFT BY: ";L$:╘ BH$│L$:┼ #1,RC>S╨Бе650>Р╒З:З:╗Й" DATE: ? ";D$:╘ DT$│D$:┼ #1,RC:Бе650>─┌З:З:З" MESSAGE:":З:╗Й M$:╘ MS$│M$:┼ #1,RC:Бе650>╘▀Бж945:Бе650>эфRC│RCл1:Е RC┤301з650>°щЪ #1:Р?ю:Г -------------------?.є:Г create messlog file?I°:Г -------------------?Ы¤З Л(12):Ю:З:З" *** CREATE MESSLOG FILE ***":З:З:З:З" ARE YOU SURE: ?"?├Q$│ Т:ЕQ$│"Y"з775 :ДЕQ$│"N"зР :Д770?ёЗ:З" OK, CREATING MESSLOG FILE ...":Бж960@U АX│1е300:╘ DT$│ б(10,32):╘ SB$│ б(8,32):╘ TH$│ б(3,32):╘ BH$│ б(3,32):╘ MS$│ б(224,32):┼ #1,X:Л@ЗЪ #1:З" THE LOG WILL HOLD 300 RECORDS!":Бе615@а:Г -----------------@╣:Г edit exitlog file@╥ :Г -----------------@▄%Бж970A*З Л(12):Ю:─ #1,RC:З:З" RECORD #";RC;:З" "DT$:ЗA@/З" USRNAME: "NM$:З" MESSAGE:":З:З MS$AЛ4З" 1. PRINTER 2. DELETE 3. NEXT":З" 4. GO BACK 5. RETURN TO MAIN.";A│9Q$│ Т:И  Й(Q$)Бе835,845,850,860,865A╜>Бе825BCБж940:З#DV,"USRNAME: "лNM$:З#DV,"MESSAGE:":З#DV:З#DV,A$:З#DV,B$:З#DV,C$:З#DV,D$:З#DVB"HБе810BeM╘ DT$│ б(10,32):╘ NM$│ б(16,32):╘ MS$│ б(224,32):┼ #1,RC:Бе810B~RRC│RCл1:Е RC┤101з810BИWБе865BЯ\RC│RCм1:Е RC▓0з810BкaЪ #1:РB┼f:Г -------------------Bрk:Г create exitlog fileB√p:Г -------------------CMuЗ Л(12):Ю:З:З" *** CREATE EXITLOG FILE ***":З:З:З:З" ARE YOU SURE: ?"CuzQ$│ Т:ЕQ$│"Y"з895 :ДЕQ$│"N"зР :Д890CгЗ:З" OK, CREATING EXITLOG FILE ...":Бж970CяДАX│1е100:╘ DT$│ б(10,32):╘ NM$│ б(16,32):╘ MS$│ б(224,32):┼ #1,X:Л:Ъ #1DЙЗ" THE LOG WILL HOLD 100 RECORDS!":Бе615D6О:Г ------------------DPУ:Г sysop log revisionDjШ:Г ------------------D└ЭЗ Л(12):Ю:З:З" *** SYSOP LOG REVISION ***":З:З:З:╗Й" DATE: ";D$:ЗEв╗Й" SYSOP NAME: ";N$:╗Й" INITIALS: ";I$:╗Й" PASSWORD: ";P$E~зБж950:─ #1,1:╘ LU$│D$:╘ NM$│N$:╘ PW$│P$:╘ IN$│I$:╘ FL$│"A":┼ #1,1:Ъ #1:З:З" OK, SYSOP'S LOG IS NOW REVISED!";:Бе615FмDV│м2:R$│ И(RC):A$│ О(MS$,56):B$│ Р(MS$,57,56):C$│ Р(MS$,113,56):D$│ П(MS$,56):З#DV,"RECORD: #"лR$л" "лDT$:З#DV:РF_▒╘ DT$│ б(10,32):╘ SB$│ б(8,32):╘ TH$│ б(3,32):╘ BH$│ б(3,32):╘ MS$│ б(224,32):┼ #1,RC:РF╡╢Щ"D",#1,"USERLOG/SYS:"лUL$,36:╨ #1,10  з LU$,16  з NM$,6  з PW$,3  з IN$,1  з FL$F╗╗РG└Щ"D",#1,"MESSLOG/SYS:"лML$,248:╨ #1,10  з DT$,8  з SB$,3  з TH$,3  з BH$,224  з MS$G┼РGb╩Щ"D",#1,"EXITLOG/SYS:"лEL$,250:╨ #1,10  з DT$,16  з NM$,224  з MS$:РGС╧Т &H7D04,IP:Т &H7D05,OP:╙ "BBS-BORD/SYS":ОGе╘Т 113,0:в 40999G╗┘:Г --------------G╤▐:Г end of program,3  з BH$,224  з MS$G┼РGb╩Щ"D",#1,"EXITLOG/SYS:"лEL$,250:╨ #1,10  з DT$,16  з NM$,224  з MS$:РGС╧Т &H7D04,IP:Т &H7D05,OP:╙ "BBS-BORD/SYS":ОGе╘Т 113,0:в 40999G╗┘:Г --------------G╤▐:Г end of program                                                                                                                                                                                                                                                                k0 ы ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ╥ Р∙Рp ЪЩР∙РА ЪЩЩ А Щ ЩЩА Щ∙Щ А ЩкР Щ Ь∙Р Р `  ЩР Л кЩЁ   ЩРp zЩР  к∙ Р ЩкР кРЩРА x  ЩР  ЩР Р Щк Щ к∙ РА x Щ Щ  ЩРЩ  РЩ ЩР кЩ∙Щ ЩР&p x Р ЩР к ЩРЩА  Щ  Щ∙ Щ  Щ ( y Щ ЩкР Щ к ЩЩР   ЩР ЩР Щ W zЩЩ∙ЩР  ЩР Р   Щ  Щ Щ p zЩЩ   Щ  Щ   ЩР  Щg zЩЩ   Щ ЩР Я Щ  ЩРH zЩШ  ЩР ∙ Щ ЩР ЩР |ЩР  ЩР   Щ кР р l Щ Р Я кЩР   ЩРЩР  Щ кР р l Р Р   ЩР     Р ЩЦ ЯР Р  ╨ l РЩ к∙ Щ Р к∙ ЩЯк∙ЩЩЩ ЩР Р Р  ▐ lЩРЩ к∙ЩР Р Щ  Щ Р Щ Щ` ЩР РЩ  э═р j ЩР ЩР  Щ  ЩРЩРЩЩР Щ Р  ю▄╝▐р i Р РЩР к  ЩР  Р ЩРЩ РЩ  э═р i ЩЩ  Щ∙Щ  Р Р Р Р ЩР ▐ jЩР ЩЩ Щ  Щ W ИvC2Y ЩР ЩЩ ЩР  Щ   ЩР╨ i ЩЩР Щ  Щ Т4hp  И Р ЩР ЩРЩР Р  Щ р h кЩ Р ЩРР Щ  УFxИp  ЩР  ЩР ЩР  Щ р f кй Щ  Щ Р  $xЗ Щ РЩР ЩР h  ЩЩ РЩ  Щ Тh  Р Р  Щ d Ъ к ЩРЩРЩР Щ rXp   Щ  Р e  Щ  Р Р ЩРВXp кЩ Щ e Р Щ  й РЩGp   к Щ кЩР кЩ e ЩРЩ Ъй Ч &А Я к Щ  ЩР кР f Р Р к ЩР Рw   Щ  ЩР Р eЩ ЩА а РЩЩРX   ЩР Щ  ЩР b  Щ каЩРЩ   ЩР   ЩкйР  ЩЪкЩР G РЪ  й Р  Р   Щ  к∙ Щ   ЩР  к Щ Р E Щк  Р   Щ   Щ   ЩР   Щкй Щ   ЩР DЩй ЩйР Р   кй Щ   Щ    Щ    ЩР  ЩР CЩЩ Щ аР  кй Щ   Щ  ЩР Р  кйЩ  ЩР CЩй Р  Р  кйЩ   ЩР   ЩЪкйЩР  Ъ кЩР ТWd2p  Щ B й РйР  кйР   ЩР "Щ ЩР  Щ r4hpxИvC   Щ @ Рй Ра Р ЪкЩ   Щ   Щ кЁ  ЩР  Р Щ ИЗ  ЩРp < РйЩа Р Щ Щк ЩР   ЩР  Щ  v0 ЩАw <ЩРЩЩР кЩР  кйЩР  к∙ Щ  ЩР   Щ  Е0 ЩАX <ЩЩЩ Р йР  кЩР   Щ  Щ   ЩР  Щ А  ША8 <ЩЩР кйР ЩкйЩ   Щ " Щ ∙ЩР   Щ  Щ ( ; йРРЩй   ЩР  ЩР &  Щ ЩЙ X  ЩР  кйЩ ( ; Р Р  Щ  кЩР  к Щ ,  Щ  ШАg ЩИА кй ЩР =йРЩР й  кЩР  кйЩР   Щ Я кЁ  Ш ФА ЩАЩкй ЩША < ЩЩкР  кЩ  ЪйЩР ∙ Щ кйЩР  Ш'  ИА ЩШ ИА <ЩР Р й  ЪЩ ЪкЩР   Щ  Щ Р  Ш W  А Ш И ЩР 9 ЩЩРЩР   Щ   кЩ   ЩР  Щ  Ш p  А ЩР 8 ЩР  ЩР  йЩ   кйР p   Щ & Щ ША  ИЩ 8 Щ Щ  ЩйР   Щ Ч  й Щ ,  ЩкЩА    ЩРЙР 7 Р Щ   Щ ЩйЩ y  к Щ / Щ   ЩИР  ЩР 4 к ЩР  к Щ Р Щ    Щ  к Щ Я к∙ Щ  Щ  ЩШИЙ ЩР 0  Щ   ЩpЩЪкйР  p к ЩР   ЩЯ к ЩР  Щ ЩШИА 5   Щ .  ЩЪкйЩ й Щ   Т  кйЩ   ЩР Р   @Р  Р  ЩР ЩР  ЩР ШИ Xv0  Щ . Щ ЩСкЩР  ЩУ9 Щ  @  ЩР  Щй ЩР      Р  Р ЩЩ    ЩР  ЩИЩИ И FАЖ@ ЩР 2 Щ ЩУ 38 Щ  к Щ p  Ък ЩР Щ  РЩ ЩР Р РЩРЩЩЩЩЩР   Щ  ЩАА Р 4gЗ И  Щ 0 Щ  Щ8 ИЙЩР  ЪЩР   кй ЩР Щ ЩЩ  Щ  ЩР ЩРЩ Щ Щ ЩЩ Щ Р ЩР Щ ИА  7Иp  Р /∙ Щ YТ " Щ8И ЩР ЪйЩ   ЪЩйР Р  Р Р Р Щ ЩР  ЩРЩ  ШЩР Щ  Щ Щ Р   ЩРШИ $А  ИЙ + Щ3 Щ $x И  ЩР  Щ q   кЩР  Р ЩР  ЩРЩР   Р  ЩРЩЩЩРЩ T 4h  ЩШИp *∙Щ38ЩР Тh  Щ Р   ЩРР  Щй9Щ  ЩЩ  Щ Щ Щ DЩGw Иp   ЩША ) ∙У8ЙЩРЩXp  ЩР ЩР  Р кйЩР   Ща аЩ  Щ Щ #2p   ЩР  ЩР Й$gЗ  ЪР И ЩА )Щ3ИЙЩ ХА Щ  q@  кйЩ  РЩРкакаЩ   324g ИvC"#DC!  ЩР p  кР АЩРА )кУ3ИЙЩ ( Щ  P  й Щ ЩЩ РйРй Fx Иp  ИЗd2  Щ  Щ   Щ ЩАDА )∙У8ИЙЩ 8  9p YФ`  ЪЩР Щ а Р  ЩР  ТFxИЗ xИvBp  Ф  Щ  ШИ Щ Цp )∙У8ИБЩР  Щ#ET2#Fp ЩкЩ Р Р аЩк Р Щ#FxЗ ИvBР  ЩЩЪкР  ЩШИ  Щ( *∙У ИЩР Зx ИА ЩйР кР ЩР й Щ$gИЗ Иu0  Щ Щ кйР yЩ И  Ш W *ЩУ8 ИЩР  ЩР ЪйЩ Р РЩР ТWИp "ЖA   ЩР йЩ ЩИА ЩА p * Щ8 ИБ ЩР   кйР  ЩР ЩЩ Р Р Щ кФhp %З`  ЩЪк Щ Щ  ШРDА *  Щ И ЩЪйк ЩР  ЩР  ЦР ЪЩ СFxp (x Щ Щ  ШИ &p *  ЩИ Щ  Щ     ЩР ТWЗ 4ШЙ ЩИ Щ  ЩИ  H ,  ЩУ39 Щ  Щ Р  Щ ТXp   к∙Щ )ИЙ ЩРИЙЩ ЩША ФА . ЩУ 39 Щ  Щ  ЩйР Я ЩЯк ЩР $ИЙЩР Ш ЩИ H 1 ЩР  Щ 39 Щ  ка к Щ Р   ЩЯк∙ Щ  к∙ Щ  Р   Щ  &А ,  ЩУ3И3ЙЩР   Щ   кй Щ   Щ  ∙ Щ  ∙ ЩЯ Щ Й ЩР Щ $w .v0  Щ8 ИЙЩ  ЩЪ кйЩ ЪкР кЩ к ЩР Щ   Щ   ЩР   Щ к Щ  Щ 0 ЩШИЙЩР Тh /ЖBР IТ"Р  Щ3 ИЙЩ Щ  йкЩР Щ  Щ к Щ   ЩРк Щ   ЩР∙Щ  Щ HЖC)  7p 0ИvC "#FxИvC) Щ3 ИЙЩЩР Щ й Щ ЩР  ЩРк ЩР   ЩР∙ЩР  Щ  Щ  Р Щ gИЗS $А 6 ИЗ ИЗ Щ3 И Щ  ЩР й Щ Щ3 Щ   ЩРЯ Щ Щ")  ЩР  Щ 9%xv@ Щ ЩР Т  Щ p xS Тh A Щ3 ИЩР  ЩР й Щ Щ9ЩР  Т" йЩРк Щ GИЗ  ЩР ЩУwА Щ∙ЩРЩXА  ЩА xd 3 "4hp A Щ3 ИЩР  Щ Щ$` Щ Щ9Щ 9%xИ йЩР ЩР А   ЩР Щ 8  Щ∙ЩРХА   ЩА x Иp 1й кйЩкаp  Щ3 ИЩР  Щ "GИpк Щ  ЩУw   ЩР ЩРw   ЩР Щ p  Щ∙ЩРЧ  ЩА <  ЩРw  Щ3ИЙЩР ЩР А к Щ  ЩР 8   ЩР ЩРХp   ЩР  Щ А  Щ ЩР( ∙ЩА <  ЩРX ЩУ8ИЙЩ  ЩРw  Щ9Щ  ЩРp   ЩР  ЩРЧ   ЩР  Щ  Щ ЩР  ∙ЩА < Щ 3ЩР8 йУ8И Щ Щ9Щ Хp  Щ9Щ  ЩРХp к Щ  ЩР   Щ  Щ  ЩР ЩР   ЩА < Щ 3ИЩР(  й38ЙЩР Щ9Щ( ЩУ9Щ  Щ Ч й Щ  ЩР  Щ  ЩР  ЩР ЩР   ЩА < ЩУ8 ИЩР кЩ3Й Щ  Щ9Щ W кУ9Щ  ЩH  йЩР  ЩР  ∙ЩР  ЩР к Щ  Щ   ЩА <  Щ3 ИЩР  йУ Щ   Щ W  йЩ9Щ  Щ ` кйЩ   Щ к Щ   Щ Я∙ЩР  Щ А = ЩУ8ИЙЩР  к Щ  ЩР   Щ  Щ ЪйЩ   ЩР ∙ЩР   ЩР  Щ  Щ  Щ  ЩА > ЩУ И Щ Щй Щ 0 ЩР  Щ Щ  Щй Щ ЩР  Щ ЩкЩР  Щ кЩ   ЩА >  ЩЪкй ЩР @  ЩР  Щ  Щ Щ к∙ Щ  Щ  ЩР  Щ  ЩР  ЩА ? Щ й Щ Уg   Щ   Щ Щк∙ ЩР ЩР  ЩР А∙Щ А  ЩА @  Щ  ТXp  Щ Щ Щ  ЩР кЩР РЯ ЩР Щ ЩР Я ЩТP ∙ЩРА P9Фhp  Р  Щ  Щ кй Щк Щ∙ Щ  ЩР  Щ к∙Щ DА >p ЩFxp  А  ЩРкЩ кР кЩРйЩ Хк∙ Щ  ЩР ЩР  Щ Щ ЩР  Щ ∙ Щ&p >c  Щ"4gЗ v0  Ф` ЩРЩ ЩР йР∙Р йЩ ∙Р ЩЩР  Щ iЩР   Щ  Щ  H @xd2 " 4g Иp ЖC "#Fxp Щ  Щ Щ∙ ЩРйР ∙ ЩРЩ ЩР ЩР ЩР   Щ Щ 2p Ax И p   ИЗ  ЩЩР ЩР Щ  ЩРЩР Щ ЩР Щ ЩР  ЩРР ЩР   Щ Fp cЩ  Щ ЩiРЁ ЩРЯР  ЩЩ  Щ  ЩР  Щ Р Щ  Уg dЩ  ЩР  ЩРЩ Щ Щ Щ  ЩР ЩР ЩР Щ Щ  ТXp d Щ ЩРЯ Щ∙ ЩР ЩкР ЩР ЩР ЩР  ЩРЗc  Фhp e ЩР∙ Щ Щ ∙   Щ  Р Щ  Р Р eАxd2 "#Fxp iЩРЩР  Gpx ИЗ mкР Щ А R@ А `  Уg w∙Р ЩC FЗu0UC 2"#W #P"D04hp rwS    ЩР H ИЗx Иw ИЗ ИЗx Иp s ИА ФА ЭH Щu2FА Ъx ИЗ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ ■ Г 9aТ  Юm  ЮmaТaТТ)у╗Т+у╗E}╓D}╓Т)є╗В+є╗D}╓D}╓Юm  Юm  aТaТЮm  Юm  aТaТу╗В)є╗Т)}╓D}╓Dу╗Т)є╗Т)}╓D}╓D  Юm  ЮmaТaТ  Юm  ЮmaТaТ  В~┌qТЮm  Юm  qТaТЮm  Юm  }╓D}╓Т-у╗В)у╗F}╓D}╓В)у╗В)у╗qТАqТ  Юm  ЮmaТaТ  Юm  Юm}╓D}╓Dу╗ВM^9~b№     !#%(*-0369=@DHLPUY^chnsyАЖНФЬдм╡╛╚╙▐щї/@RezРи┬▀■ EnЬ╧HСхF╕?тли Ё лВ╜P @ОfЯrЖUЧq╜a╘╜eЦ╬uи ┘╜b╙╜c¤Ж0╜dIН~b%О0ОАжАБ 'за ЎьБ┴'заZ&√ щЖ<╜dI9Жк╖_V╜_~z_V╢_VБ&єЖ8╖ аL╖ б9Ж╖_[╢_V╖_W╖_X╢_[╖_\|_[╜_оz_Xz_\'}_X&Ёz_W}_X&▀9╢_X╞а=├А¤_^~aР _Y■_`■_^76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T76463T7040■_Y9}`v'╛`wпj`v;`▐`v╢■¤╖`mЖ~╖■¤╛■■┐`nО`y┐■■╜a╜`с╞ЖS╖ H╜`сZ&ї╞`sЖ╖ HНЖ%НFZ&ЁO9╜a7╛`n┐■■╢`m╖■¤94t}`▐'нЯ`▀О1?'╢ HD%Ў5Ї5tЖ╨╖ H45╢ HЖЛ 94 О"`1?&№5а4 Ж)╖ @╖`uОu04w5w1?&°5а@ @ Ж`u9Оam┐`w╛`p╢ HPЖ╖`vЖф╖ H╢`uКАЎ K└*ча╖ @ Ї╢ HўaИ╛`n┐■■пO&  │`p¤aЙO9К9Ж.╖_]Ў_WЖа=|_]Г $°├ ¤_`╢_]╖ аL╖ б╛_`0Й·┐_`~_╜╢a╥CIII╕a╥Iya╥╢a╥9к_╜aы╜aы╜aы4ОP╜f15Z&ъ╜a└╖a╙╜a└╗a╙╖a╙╜a└╗a╙╖a╙╜a└╗a╙DDО└Д0ЖжДзИ 0ИрМ$єЖ зИ 9Ж4╜dIНL╜db╠╨¤ Э╜e5P╜_bЖ<╜dI╜^9╜`╬ ~╛└oДooнЯ└ @~ё╜bН╜bx╜eЦЖ<╜dI╢┌╖'РnЯbvОА╠эБМ■%∙9MbНЖd╖bЖО^<┐bЗ╛bЗьБ┐bЗ¤bЛЖ┐_¤bЙL╖_W№bЙ│bЛ¤bЙ% L╖_X╜_оz_W&щzbЖ&╧Ж8╖ аL╖ б9P╜c=Ор2жА╖ РО ШжАзаМ а%Ў╢ "Кp╖ "Ж?╖ ╜9 ╪Ж4№dW4╛d╘ОBS0Й▀1л 4FV\1?&∙59$ 5Z4&╘'фЖ<╜dI ┘5Д╠``ОэБМ %∙9Ж¤╖ ╢ Д'Ж┐╖ ╢ Д' цЖ╖┌9┌9Ж■╖ ╢ Д@&Ї9The Quest for Thelda(C)opyright 1989Sundog SystemsWritten by Eric A. WolfAre you using an RGB monitor(Y/N)?Fи╔%ВнАа╜eЦ╜c=Оc|ОcэЖН~d+юбцА'┴@%┴`%─▀╚@ч└ ьJ&ч9Оe ┐d╪╜e5╜cK╜eЦ╢┌╞=Оdъ0Л┐d╪9Й\¤ дЛ╦¤ ж9Ь┌LА└ОdYжА╖ РО ШжАзаМ а%Ў9О_\4ьхCS├эa5┐`pБ&╜`З_ў`t╜aA%,$Оx╛`p╞жАБИ&Z&ў'1?&я'жАЙ▒`t&ИбА'Ж Ля9O9_Ъ0dъ4646#6?5#6?%$%$$?5$ e*╜e.;} } 9╞ўd╓╛d╪Оd┌ждDDНAHHзДждDН8HкДзДжаН/кДзАМdъ%▀╜e.О ░Оd┌ У} ьбэБМ └%ўО5╜f1zd╓&│9Ўd╓Z'╜f# °9╞ўd╓╜e.О ░Оe У} Ж`╖ УьБэбМ └%ўОeОd┌жД╖d╫DDНWHHзд╢d╫DНMHкдзд╢d╫НCкдзазАМe*%╪О ░Оd┌╜e. У} Ж`╖ УьбэБМ └%ўО5Н"zd╓&и9О╛fпбn>Д ' J'Б'Ж90&№9ЯP ноЖ~_ЁЭ╜eЦ╜b╙╬ёИН'╬ё┼Н&∙╜eЦ╜db|ё~e5Ж`ОзАМ&∙╠?¤ ╝Орж└' Б@$Л@зА Є╠╖ Ї &їO_¤ ╝╛└ЖзД╠э╬я╖ ╪нЯ└ @╖ ┘╠D2│9OЛ╖ ┘Чq╖ ▀╬█_Ж0╖ бў ў▄╠  ╖ бў Ж0╖ б} '|▄~єO_╖ бО чДmА&ьМ@&їLБ&ъў▄О╪╨╬Єж└зАГЄЧ&ЎОЄ■└╞жАз└Z&∙~ЄШ PLEASE FLIP THE DISK OVER AND PRESS SPACEBAR TO CONTINUE PLEASE INSERT SIDE #2 OF THE GAME DISK AND PRESS SPACEBAR~╪╨4v╛└жJJ' J'Ж╛└noж╞=ыЙГ4жБ'╠vусМ5XIXIXITTTP╖ дШ_ЛА╛└ю$ждJJ'J' -МЖзтьБэ┴ьБэ┴ьБэ┴ьБэ┴ьБэ┴ьБэ┴ьБэ┴ьБэ┴jф&▄2aЖ<╖ дп5Ў╛└ж!╖є│Оп$Ж╖єг╠¤єе╠Н╜ЁЭЖ╖єг╠#¤єе╠Н~є╛└¤єЯ}ё&Лэ"ЖЎє│эд╖ ╪нЯ└╖ ┘ЖЎєгэднЯ└№єЯ\┴&╠╞L│єе&├ @╢є│з!9╠8О азАLZ&·}▄'╜ЁЭ╛└ж╖єд╖ ╪}▄&Жз╖ ┘╬  єб╠¤єЯ╛└ЖзД№єЯ}ё&Лэ■єбя3╔ єбнЯ└m&7|єа╢єаБ%|єЯЖ╖єа■єбГ~%╛oД╖ ╪нЯ└╢єдз @~  @q╖ ╪nЯ ■ ЁЭ