L%hh LHH` X% " ӠӠΠǠ ˮԠˠǠӬĠӠ٠٠ϠŮ+JJJJ ,,,L Lک ٥ҥ>ӥ? ( ㆭ  ؆` | A""""""QQQYV <"<Q '(h((QQQ`@GHOHO $"!$q}T@` `@@``p0 8p@@`00 |0@` `pppPox`D3 < p?|@@@|@`f ppn|>0p  qcs6<, 3['Nxxxpp0` ```@vl  ?`@:3q  AcqcCyO@  0p`@@q @p?|`3cC ? ?>|xp`p`@Acwsssssss__????????~^^ ?~~~~~~~?>~||xpp`@~| xyy{~|@`pp xpp`@yyyyyyyx~ ~x`|xpxqa` cqx|||||||cCC?>>>??<<|||~?`ppxx||<||xxpp`|||||||| |?|p`@@@@`p|? OOGgccqpxsssssssppxxx|<<~?>~||xxxxppp```@@@`?~|x|~|||||||p@@p|~><|xp`@>|x|xpx}yyyyyyyAA?~|xpp`ppx|~? ?? 33@``@@glloLL LlOgloloG @`@glolo@@gLLL GaamGGlg`GGlg`G  xL| x@@xMLLxMyyM MyxAxMx|Yq @lllLglllgG LlL`@GLOLo033366m~0>3>33~G<`G}rccb``acccq{{{{8008????~ |lL COoooog CgoooocCFFLLXXPpqa88`}}}}>????~ | ~FCCFL ____|GG|GGccp{{{{ ;1q``qp`aas{{{{8008 0y| |}}}}AAQg((h' $C@0j ed`y < I1@@q q s8EE9EE8> ` `$DC0ANPQN@'h(' WPG((H@stq q8AyEx:NPQ@GhHHG#$p# @ (*Y9AyEy: QQQO~C%%C~_DDD qAAAaq9`ppxxx|xxx|AsGN8088 CcˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L e3L &RL &QL d L4 Ne)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ)\Z ʽ LHv 3h`0h8` [L NС õ`A@` ŵL^L iõ`  \ 濭0 \  ȟ Q ^\lZl^?cqH şch`fhjõĵ@OAP`u@`@&`QR`E Ls  @DAE@u`8` %@ @A@`@`@A`Mµ ) LЦ`8@AWc@8@-@HAȑ@hHȑ@ȑ@hHȑ@Ȋ@ch8&ȑ@Hȑ@Ah@LHȑ@ȑ@ htphso`hMhL`9V8U897T6S67`INILOASAVRUCHAIDELETLOCUNLOCCLOSREAEXEWRITPOSITIOOPEAPPENRENAMCATALOMONOMOPRINMAXFILEFINBSAVBLOABRUVERIF!pppp p p p p`" t""#x"p0p@p@@@p@!y q q p@  LANGUAGE NOT AVAILABLRANGE ERROWRITE PROTECTEEND OF DATFILE NOT FOUNVOLUME MISMATCI/O ERRODISK FULFILE LOCKESYNTAX ERRONO BUFFERS AVAILABLFILE TYPE MISMATCPROGRAM TOO LARGNOT DIRECT COMMANč$3>L[dmx- ( t Ϡ@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J QL_Ls贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LʬH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / ED B / / ]ƴS0Jȴ ȴ)  紅D贅E B ƴ  / 0L Ν `HD٤DEEhiHLGh ` ŵBѵ-` ѵB-` ܫ XI볩쳢8 DH E𳈈췍Ȍ X0 · JLǵBȵC`,յp` 䯩 R-յյ`յ0` K R-յյ`ɵʵӵԵ` 4 K ( ѵҵLBȱBL8` DBHBH : ַ޵BȭߵBhhӵԵ RBܵmڵ޵ȱBݵm۵ߵ` 䯩LR˵̵ֵ׵`êĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`굎뵎쵬 뵎쵌``õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈m浍浭m䵍䵐`"L ŵ8ŵH ~(` d ֠z# u`2000&C801C80:2000!& &"THE FOLLOWING MESSAGES ARE FOR YOU:":J1MS:TDA(J),1,U$,K:KįTDA(J),0,EM$,K:KĺDA(J);" ";:(36)35ĺ:Q&::"THE FOLLOWING MESSAGES ARE FROM YOU:":J1MS:TDA(J),0,U$,K:KĺDA(J);" ";:(36)35ĺn':1)d%D"ENTER NEW DATE: (wf qq`hmxi eb`ebmmmhmmg,Q b=bi{ hmxi  hm, =mnohikdeg`abc|}~{tyxyxyuucy m~i m`c m``c{ih x, =yxyuu, =yujv,( =ONTINUE USING THE ABBS. THE SYSOP":"WILL CUT IN WHEN HE CAN":2000m$:"HI, THIS IS THE SYSOP. ";:CK,0$INLIN,248:4310$0U$SY$U$T1$U$T2$2020:4410:2000:T%:"DATE = ";DA$:"INCREMENT DATE? (Y/N) ";:INLIN,1:A$"Y"DA$((DA$)O LARGE. ";:J07#JJĺ"WILL ASSUME NO DELAY.":J255D#TJ:2000n#h"THE SYSOP IS ";:(CH)ĺ"NOT ";:C#r"AVAILABLE":(CH)2000#|"DO YOU WISH TO CALL THE SYSOP? ";:INLIN,1:A$"Y"2000D$"CALLING THE SYSOP";:J15:(7);:::KUĺ"C(Y/N) ";:J134:INLIN,1:A$"Y"J150"6FLAGS,J:J150ĺ"DELAY AFTER CARRIAGE RETURN (0-255,":"EQUAL TO 0 TO 2.55 SECONDS) ";:INLIN,3:900:JJ1256(J255):J0J256ĹCRDLY,J#@"SPEED= ( FOR NO DELAY) ";:INLIN,3:900:J255J255:"VALUE TO"DELAY AFTER CARRIAGE RETURNS IS":J(CRDLY):(J1256(J0))100;" SECONDS.":"SPEED=";256(241)!"KUĺ"YOU GET THE DELAY AFTER ONLY IF":"LINEFEED INSERTION IS ON. THE 'SPEED='":"DELAY IS IN EFFECT AT ALL TIMES."%","DO YOU NEED LINEFEEDS? AX. 65 CHARS.)";] :INLIN,65:(A$)A$(A$,1):CK,1:D$"APPEND"F$(F):FW$;F$(F):A$:FC$g 2000| KU1KU:2000:K (FLAGS)134(FLAGS)150ĹFLAGS,134:N KU4140:"CURRENTLY, LINEFEED INSERTION IS ";:(FLAGS)134ĺ"NOT"b!"ON.":11:FO$;F$(F)",D2":U$SY$3710:"LIST OPINIONS? ";:INLIN,1:A$"Y"İ300:O~"THE QUESTION IS:":800:INLIN,248:A$:FC$:KUĺ"DO YOU WISH TO ";"RESPOND? ";:INLIN,1:A$"Y"2000:INSERT CHECKING ROUTINE HERE "YOUR RESPONSE: ";:KUĺ"(MA$"1"2000:"ENTER USER # (IN 4 DIGIT FORM) ";:INLIN,4:900LJ((SY$,3(J999)))ĺ"CANNOT PRINT SYSOP'S PASSWORD":2000VJ4095ĺ"# OUT OF RANGE":2000`630:Jĺ"USER NOT ON SYSTEM":2000j701:RJ1:800:INLIN:A$:FC$:2000MtF F10:300:2000:$0U$SY$U$T2$2020:Yb"ALL OR ONE? (A/1) ";:INLIN,1:A$"A"3650{$F1:NM$:FR$;F$(F):.INLIN:(A$)02000:(A$,4)S1$ĺ(A$,4)" "(A$,5,4)" "(A$,9):36308(A$,4);" SYSOP PASSWORD DELETED "(A$,9):3630@B3370 "WP";1* (A$,1(Z0),3(Z0)):3340cH "ENTER USERID";:KUĺ" (WAPNNN OR WPNNNN):"~R INLIN,6:(A$)62000\ 600:Jĺ"SORRY, THAT USER IS NOT ON THE SYSTEM":2000f 701:RJ1:800:INLIN:"THAT USER IS ";(A$,9,15):FC$:20000:W; "ENTER FIRST TWO LETTERS ";:KUĺ"OF LAST NAME";w ":":INLIN,2:(A$)22000:J(512):K(513):701:R1 RR1:800:INLIN:(A$)0ĺFC$:"END OF NAME SEARCH":2000 J(520)K(521)3340:(A$,9,15);" ";:Z(512)48:Zĺ"WAP";:BEING ENTERED">2000! 7 F3:300:2000:BM F4:300:2000:Mc F5:300:2000:I "SELECT OPTION:":"1 - GIVE NAME, GET NUMBER";:KUĺ" (REQ. 1 MIN.)"; :"2 - GIVE NUMBER, GET NAME":"?";:INLIN,1:A$"2"3400:A$"1"3320:200ASE TRANSLATION"X*"CTRL-S - STOP PRINTING UNTIL YOU ENTER":9)"ANY OTHER CHARACTER"4"BACKSPACE (LEFT ARROW OR CTRL-H) -":9);"ERASES A CHARACTER":"RIGHT ARROW (CTRL-U) - RETRIEVES A PRE-":9);"VIOUSLY ERASED CHARACTER":"CTRL-X - CANCELS LINE "(HIT RETURN)";:INLIN::"TO RETRIEVE A MESSAGE, ENTER ITS NUMBER"::"YOU MAY USE THESE CONTROL CHARACTERS:" "CTRL-C OR CTRL K - STOP WHATEVER IS":9);"GOING ON AND GET NEW COMMAND":"CTRL-J - TURN ON LINEFEED INSERTION":"CTRL-L - TOGGLE LOWER CUMMARY OF MESSAGES":"R - ":"S - SUMMARY OF MESSAGES" "W - WHO IS ON THIS ABBS":"X - XFER FILES (FILE TRANSFER)":"$ - CLUB STORE PRODUCTS AND PRICES":"? - LETTERS OF ALLOWED COMMANDS":"+ - TOGGLE 80 COLUMN MODE"pNLIN,1:A$"E"6040:700:RJ:500:Z013:M$(Z)::FC$:"SAVED":2000i6(#2000:INSERT "R" COMMAND HEREr6' 6'"FILE TRANSFER SYSTEM":CK,17':"HELP, UPLOAD, DOWNLOAD, QUIT:":"(H,U,D,Q) ";:INLIN,1:804,A$,UL$,J:J10020,10030,11000,2000:100B$ĺ"MESSAGE NOT SENT BY YOU":2000M5K413:M$(K)""::700:RJ:800:K15KK1:INLIN:M$(K)(A$,1):(A$)0K1360305FC$:"LIST? ";:INLIN,1:KK3:A$"Y"ZJ:200:Z1K:Z10);Z;" ";M$(Z3):F65550:KK3:"EDIT MORE/SAVE? (E/CR) ":I0:F=4430:KKK1:JJ1:KK0ĺ"NO MESSAGES THAT OLD":2000z4 ZDA(JJ):200:700:RZ:300:JR:5350:JDA(JJ)JJJJ14*JJJJ1:JJKK2000:59204pKUĺ"ENTER ";:A#5z"MESSAGE # ";:INLIN,3:900:J1JMS2000:BJ,0:B$EM$5200:U$SY$U$THIS MESSAGE? ";:INLIN,1:A$"Y"JDA(KK):5350s3"ENTER A MESSAGE? (Y/CR) ":INLIN,1:A$"Y"5810:5401:58104 U$SY$2020:"DELETE MESSAGES MORE THAN HOW FAR BACK?":INLIN,2:900:J30ĺ"ARE YOU SURE "J" IS LARGE ENOUGH? ":INLIN,1:A$"Y"200:INLIN,39:ALLOWLC,0:(A$)0ĺ"YOU CAN'T ERASE A LINE":5670X20M$(J3)(A$,1):JR:p2400:KKK1:JJ0:L2KKKK1:KKMC2000:ZDA(KK):JJ1FG(Z)058102BZ,1:B$AL$B$U$U$SY$581003200:700:RZ:300:TDA(KK),1,U$,L:Lĺ"DELETE FULL":_1"ENTER LINE ";K":":INLIN,39:(A$)05630:M$(K3)(A$,1):KK1:K11M$(K3)""p1KK(K10):1RJ:900:J0(JK1(J10KJ))JR:1(M$(J3))0JR:>2&"RE-ENTER:":J10);J;"?";M$(J3);:Z1(M$(J3)):(8);::ALLOWLC,167ı(0(A$,3)"WAP"(A$,2)"WP"ıB0B$(A$,1):AJ,1,B$:0A$"S"5620:"ENTER NEW SUBJECT: ";:ALLOWLC,1:BJ,3:B$;:K(36)19:Z1K:(8);::INLIN,20:(A$)05550:A$(A$,1):AJ,3,A$:ALLOWLC,0:1A$"A"5650:K9(M$(13))ĺ"MESSAGE5401:%/A$"E"5530:5550:5500^/KUĺ"EDIT 'TO', SUBJECT, LINE #, ADD A LINE":EDIT/"(T/S/LINE #/A) ";:INLIN,2:A$"T"5610:"TO: ";:PJ,1:Z16:(8);::INLIN,6:(A$,3)"ALL"A$AL$:5600/(A$,5)"SYSOP"A$SY$:56000(512)|ALLOWLC,0:"SAVE ";:KUĺ"TO DISK? (CR/N) ";.INLIN,1:A$"N"İ700:RJ:500:MCMC1:Z013:M$(Z)::FC$:Z03:AJ,Z,M$(Z)::"SAVED":FG(J)0:.KUĺ"EDIT/RE-ENTER/CANCEL ";/"(E/R/C) ";:INLIN:A$"R"A$"C"įAJ,0,EM$:AJ,2,D1$:A$"R"DA$:"SUBJECT ";:KUĺ"OF MESSAGE (MAX 20 CHARACTERS):"-^ALLOWLC,1:INLIN,20:M$(3)(A$,1):"ENTER MESSAGE ";:KUĺ"(MAX 10 LINES OF 39":"CHARACTERS, 2 TO END):";-h:K0-rKK1:K10);K;"?";:INLIN,39:M$(K3)(A$,1):(A$)K1054900.:":"TO: ";:KUĺ"(ALL,WAPNNN,WPNNNN,SYSOP,C=CANCEL) ";c,,:INLIN,6:(A$,3)"ALL"A$AL$:5460,6(A$,5)"SYSOP"A$SY$:5460,@(512)67įAJ,0,EM$:AJ,2,D1$:,J(A$)6((A$,3)"WAP"(A$,2)"WP")54019-TM$(0)U$:M$(1)(A$,1):50:M$(2)D":C+K1MC1:DA(K)JāZKMC1:DA(Z)DA(Z1):FG(Z)FG(Z1):+K:DA(MC)J:AJ,0,EM$:AJ,2,D1$:MCMC1:KKKK1:700:RJ:500:EM$:FC$:"DELETED":+5401:2000:E+MCMSĺ"MESSAGES FILE FULL":8,"CK,1:JDA(MC1):"ENTERING MESSAGE ";J;"2000*5350:2000@*"DELETE ";:KUĺ"WHICH MESSAGE? ";:D^*INLIN,3:900:5320:2000n*J1JMSı*BJ,0:TJ,1,U$,L:B$EM$(U$SY$B$U$L)5340:*ZJ:200*KUĺ"ARE YOU ";+"SURE? (Y/N) ";:INLIN,1:A$"Y"ĺ"MSG NOT DELETEMESSAGE "J" DOES NOT EXIST":2000:MSG #x)ZTJ,1,AL$,K:KįTJ,1,U$,K:KįTJ,0,U$,K:KU$SY$ĺ"PRIVATE MESSAGE":2000)dZJ:200:700:RJ:300:TJ,1,U$,K:K2000:KUĺ"DO YOU WANT TO ";)n"DELETE THIS ";:KUĺ"MESSAGE? ";*xINLIN,1:A$"Y"Ă(400:JJ0:JKMC:ZDA(J):TZ,1,AL$,KK:TZ,1,U$,L:TZ,0,U$,F:U$SY$KKLFİ200:FGĺ"FLAG? (Y/CR) ";:INLIN,1:A$"Y"FG(Z)1:JJ1:(:JJ2000:"HIT RETURN";:KUĺ" TO REVIEW FLAGGED MESSAGES";(INLIN:KK0:5810()PTJ,0,EM$,K:Kĺ":"THE FOLLOWING MESSAGES ARE FOR ALL:":J1MS:TDA(J),0,EM$,K:KįTDA(J),1,AL$,K:KĺDA(J);" ";:(36)35ĺ':::"TOTAL MESSAGES IN SYSTEM = ";MC:2000'KUĺ"DO YOU WANT TO ";:S("FLAG MESSAGES? ";:INLIN,1:FGA$"Y":FGāJ1MS:FG(J)0:FR$;F$(9):IN:900:FC$:J8ĺ"SORRY, NO SPACE IS CURRENTLY AVAILABLE. PLEASE CALL THE CLUB PHONE OR TRY LATER.":190008GV"PLEASE ENTER UP TO 248 CHARACTERS. USE A RETURN ONLY AT THE END OF YOUR":"MESSAGE. BE SURE TO LEAVE YOUR NAME":"AND PHONE NUMBUR DAY AND EVENING PHONE NUMBERS WHERE YOU MAY BE REACHED WHEN YOUR PASSWORD IS":"ASSIGNED. YOU MAY ALSO WRITE (INSERT ADDRESS)."EVU$"GUEST":"DO YOU WISH TO LEAVE A MESSAGE FOR THE SYSOP? ";:INLIN:(A$)0(512)8919000wFVFO$;F$(9);",D2": USER FILE ACCESSKDFPJ112:MO(J)::31,28,31,30,31,30,31,31,30,31,30,31]DR"READY":110DU"TO REQUEST A PASSWORD, LEAVE A MESSAGE HERE OR CALL (INSERT YOUR PHONE NUMBER) BETWEEN THE HOURS OF (INSERT TIME)."EU"BE SURE TO LEAVE YOUR NAME AND YOPD$"BLOAD USERS.OBJ"oCPF8:800:INLIN:DA$(A$,1):"DATE = ";DA$:INLIN:BD$(A$,1):"BULLETIN DATE = ";BD$C(PINLIN:UP$(A$,1):UP$=UPLOAD PASSWORDC2PINLIN:T1$(A$,1):T1$=ALLOWS DATE CHANGED4NNM$D$"NOMONC,I,O":MI$D$"MONI":NM$:>>NSL:FLAGS1912SL:FLAGS,1282:(26):32:30:FLAGS,12842>HNACTIVE227:ACTIVE,0:ALLOWLC249:ACTIVE=$E3, ALLOWLC=$F9?RNINLIN768:CH239:CH,0:CHAT=0 IF SY-A] [CTRL-F] [RETURN]":INLIN'=p+20008=.R1500::p=8JCK,1:"THANK YOU FOR CALLING, ";U$:J1400::101y=N = NDR43624:D$"MONC":DR,1:(771)184(792)169(896)227ĺD$"BLOADABBS3.OBJ0":DR=DRIVE #+>*N(37889)3(38399)240(38M$(J):MI$:FR$;M$(J):K0E+Z73ĺ"INT". END FILE WITH 'EOF'."9'INLIN,255:A$"EOF"10140:(A$)410120:A$(A$,1):'FW$;BCM$,A$,J:B$(A$,J1)ĺ"THAT FILE NAME IN USE.":"SELECT ANOTHER.":FC$:10040`8V'KK1:100608`'FC$:K9ĺ"SORRY, NO SPACE AVAILABLE FOR UPLOADS.":20009j'"ENTER FILE TYPE: APPLESOFT, INTEGER OR":"TEXT (A/I/T) ";:INLIN,1:J(512):J65J73J10"7$'CK,0:F6:300:CK,1:10010Z7.'"ENTER UPLOAD PASSWORD: ";:INLIN,30:UP$A$200078'"ENTER FILE NAME: ";:INLIN:(A$)020007B'804,CM$,A$,J:J010040:"PLEASE WAIT":B$(A$,1):FO$;F$(7);",D2":FR$;F$(7):K0O8L'INLIN:(A$)010080:804,ԺŠάвźԠ٠ƠȠȠЮͮźŠΠ٠جϠĠ٠̬ҠĠͭҠĠЮͮЮͮӠǠ͠Һ͠ɠҮϩŠӠΠҠ׮ЮźȠŬԠ" ":D$""T240000!Tȯ30:3TPA$" ":D$""" ":D$""0:\TPA$" ":D$""=";K;" Z=";Z;" A$=";(34);A$;(34);", LEN(A$)=";(A$):"U$=";U$;" TXTPTR WAS LAST AT ";(220)(221)256S^ER9ER254ER2552000ShER101S"AAAIIIEEE! SYSTEM FAILURE!"::!!INSERT "PR#6" HERE !!S((222)52000S240000Sȯ30: TPA$YSTEM FAILURE!"::IF YOU'D RATHER HAVE THE SYSTEM REBOOT, INSERT 'PR#6' HERE`R((222)52000kR240000uRȯ30::P0RT:::34,22R? R@:(4);"PR#0":ER(222):"ERROR # "ER" IN LINE ";(218)(219)256:(34)2240100iSJ"J=";J;" K222):"ERROR # "ER" IN LINE ";(218)(219)256:(34)2240100QJ"J=";J;" K=";K;" Z=";Z;" A$=";(34);A$;(34);", LEN(A$)=";(A$):"U$=";U$;" TXTPTR WAS LAST AT ";(220)(221)256QT34,22Q^ER9ER254ER2552000QhER101MR"AAAIIIEEE! S ";:(34)0ĺ"NOT ";/Pu"O.K.":(34)30150Pu"LAST ERROR = ";(222):"DUMP SCREEN? ";:INLIN:A$"N"30150:J023:K039:(K,2J)16K,2J1));:::Pu"RESET SYSTEM?";:INLIN:A$"Y"ĺ(4);"PR#6"Py2000P? ?Q@:(4);"PR#0":ER(RASE SPECIAL MESSAGES? ";:IN,1:A$"Y"ĺD$"DELETE"F$(9):FO$;F$(9):FW$;F$(9):"0"OuFC$:43624,1:"FREE SPACE = ";(112)256(111)(110)256(109);" BYTES":SO;" USERS HAVE SIGNED ON.":"CLEAR COUNT? ";:IN,1:A$"Y"SO0:DR=1Pu"ERROR STATUS =1):K1#Nvu"PASSWORD ACCESS = "T2$^NuKĺFO$;F$(8):FW$;F$(8):DA$:BD$:UP$:T1$:T2$:FC$Nu"HIT RETURN TO REVIEW SPECIAL MESSAGES";:IN:FO$;F$(9)",D2":FR$;F$(9):IN:900:J" SPECIAL MESSAGES:":J030110:MI$:FR$;F$(9):K1J:IN::NM$SOu"EP = ";T1$:"NEW DATE CHANGE SYSOP = (CR=NO CHANGE) ";:IN,6:(A$)0(A$)630050:(A$)0T1$(A$,1):K1Nlu"DATE CHANGE SYSOP = ";T1$:"PASSWORD ACCESS = ";T2$:"NEW PASSWORD ACCESS = (CR=NO CHANGE) ";:INLIN:(A$)0(A$)630060:(A$)0T2$(A$, = ";BD$:"NEW BULLETIN DATE (CR=NO CHANGE) = ";:INLIN,4:(A$)0BD$(A$,1):K1LXu"BULLETIN DATE = ";BD$:"UPLOAD PASSWORD = ";UP$:"NEW UPLOAD PASSWORD (CR=NO CHANGE) = ";:IN,248:(A$)0UP$(A$,1):K1kMbu"UPLOAD PSWD = ";UP$:"DATE CHANGE SYSOTERS"28500:PK~m"WHO HAS THE BEST PIZZA? ";:INLIN,J:A$"GEPETTO'S"28500:xKTo"INCORRECT.":JJJJ3:JJ2ġ:101~K^oK0uU$SY$:K0:(AC)0ĹACTIVE,64:(512)191140K:u"CHANGE SETUP FILE? ";:IN,1:A$"Y"30090KDu4410RLNu"BULLETIN DATEOWN"28500:FJzm"YOUR DOG'S NAME IS? ";:INLIN,J:A$"SPOT"28500:J{m"YOUR HOME AT COLLEGE? ";:INLIN,J:A$"DORM"28500:J|m"WHAT IS THE CAPITAL OF ASSYRIA? ";:INLIN,J:A$"NINEVAH"28500: K}m"YOUR MAJOR IN COLLEGE? ";:INLIN,J:A$"COMPUITH"28500:@Ivm"YOUR SHOE SIZE? ";:INLIN,J:A$"9D"28500:Iwm"WHERE WERE YOU BORN? ";:INLIN,J:A$"ST. LOUIS"28500:Ixm"YOUR FAVORITE ICE CREAM FLAVOR? ";:INLIN,J:A$"COFFEE"28500: Jym"YOUR 1ST GRADE TEACHER? ";:INLIN,J:A$"MISS BRND";F$(9):FW$;F$(9):A$:FC$(H6V190001Hwi ^H`mU$SY$2000:"PROVE IT:":J248:JJ13HjmK((J)10)1:KKK28010:KKK:K28021,28022,28023,28024,28025,28026,28027,28028,28029,28030::30000 Ium"YOUR MOTHER'S MAIDEN NAME? ";:INLIN,J:A$"SMER IF YOU WANT A":"RESPONSE. (LONG DISTANCE CALLS, IF"G"V"NECESSARY, MAY BE MADE COLLECT! YOUR":"ADDRESS IS ADEQUATE IF YOU'RE OUT OF":"MY LOCAL CALLING AREA.)"H,V"MESSAGE:":INLIN,248:(A$)0A$(A$,1):FO$;F$(9)",D2":FW$;F$(9):J1:D$"APPEԍаа ̮ЮͮźΠӠԠĬԺΠҠŠΠϠԠ̠ՠԠ̠Š ŠԠΠά٠Ƞ٠ӠΠĠЮ̠ͮ٠ӠҮϠԠŠӠΠӠӠҠ ŠҠĩëĩ ҠˠĠשӺΠŠԠɠŠӠĠӠҲŠԠˠĩؠŠԠˠĩźˠҠĩЁ̠ԠˠĩЯ͠Ԡˠĩ٠ɠĩנîҠĠĩӠĠӺǠӠˠĩǠӠӠ͠Ӻ٩ĠĮàˠҠɠȠͭάɠгҬвάˠӺϭɠĩנũϭŠǠ̮ԮϠׯˠҠϠׯˠҠϠׯˠҠϠҠŠӺˠǠάӠҭĠʠàҠ̩̩ҠӺˠ̠ԮȠɠӠөɠѮȠɩҠٺέΠʠׯ٠Рٻ٠έŠ٠ӠʠŠĠŠׯһׯϩؠׯϠҮàŠҠҠŠӺԠغΠحׯؠحԠׯؠحׯؠΠ̠ҠҠӠҠĠϠҠŮƠĠРҠĠϠĠӬĠӠخĩӠŠӠԠԠŠĠРԠӮʠҠԠ̩ŠҠ͠ŠɠŠ̠РŠӺŠӠŠĠРȠĠǠԠӠ٠ɠҠРîŠԠԮŠԠà͠Ԡ̩ĠӠخ̩ӠԠŠ٠ӠĮˠ͠ӠΠҠӠΠĠ̩ԠڭĠ̩ϪΠŠɠ ŠԠź ŠӺŠӠŠŠ٠ԠӮԠҠӬ     ԍга ǬԠάҠͭŬŠӠӠǠՠŭǮӠ̬ɠŬōŠ٠ԠŠčŠҠŠĠϠōӠٮ덠ЍōՠǠϠҬΠĠɍ̠ΠԿŠӠ̠נԍ٠ƠΠԠӠԍՠΧԠҠǠҠӍĠӮӠŠӠٍΠŠӠӠǠҠՠύҠĠӢӠϠԠ٠ōӠŠŠԠŠՍĠήƠŬŠŠԍŠՠ̠ΠҠŠנ͍ŠӠΧԠנΠՠԍĬԠ̠Šՠ̠ӮŠԠŬҬԠ ,P(eik hA7PRB]L4   { lݠȱHȱh` 40PP` \P` SPȥȥ ` 4!PѠ   jݪL+))pL˖{ {xM)xɠLƖhhx`ɍɈr é éxɕ זxL4xɃɋLДxɊ { {4ɘ hhHHɌ I L˖ꩇ  ז)? @(L$(` H FQPʈ ⠗#  d s ɃLД30$pJ)L xLύxɁ xɚɂLДɉ I L˖ɏ O L˖ɒ/ɔ+ɕ$U S)? L˖Lx זi I ($p x@{6L܍L MxHHH J+ ɓJ0H hɃɋLhx hhhI LH ʆH0 q í{)L=à0 ʩ H hPQ ֦Ɯʆ Lש  ƠՠנƠ٠ӠԠĠŠŬŠĠŠРŮŬŠŠҠٺԠӠʠϮЮΠ̮ǠΩӠөî͠Š͠Ҡ͠ŠӠŠŠǠӧӬΠȠǠȠΠǩӠή׮ΠӮŠ٠ӠŠǠŠРǠέŠӺӬԨĠ͠àӠ͠àӠĺéԧ̠ҮӮԧ̠ҮӮ           , L uiȩiȩiL9 lݠȱȱH lݠȱȱhѠȘ jݪL+ ᥠ.iQP PP PQPQɄ  ⤄L+ ӠԠĬԺΠҠźԠ٠ƠȠȠЮͮźŠΠ٠جϠĠ٠ЮͮźΠĠͭҠĠЮͮЮͮӠǠ͠Һ͠ɠҮϩŠӠΠҠ׮ЮźȠŬԠԺŠάв)P%eik hA7PRB]L4   { lݠȱHȱh` 1-PP` \P` SPȥȥ ` 1!PѠ   jݪL+))pLȖ{ {xM)xɠLÖhhx`ɍɈr é éxɕ ԖxL4xɃɋLДxɊ { {4ɘ hhHHɌ I LȖꩇ  Ԗ)? @(L$(` H FQPʈ ⠗  d s ɃLД30$pJ)L xLύxɁ xɚɂLДɉ I LȖɏ O LȖɒ/ɔ+ɕ$U S)? LȖLx Ԗi I ($p x@{6LٍL MxHHH J+ ɓJ0H hɃɋL|hx hhhI LH ʆH0 q í{)L=à0 ʩ H hPQ ֦Ɯʆ Lש  ԺŠ̠ŠӠǠԠǩǠҠӠǩԠǩӺ̬ӠԺŠϠŠԺ٠ŠͭǺҠΠǠźӠԺӠЭӠԺŠΠǺҠΠǠźӠԺȠӠԺ̠̠ϠǺҠΠǠźՠΠԬǮΠөԺŠӠԺӠנЯ͠ǺҠΠǠźӠԺЯ͠ӠŠŠҠԠӠдҠ̠ΠؠŠǺĠӠźҠĠ٠ĮҮǠ͠Ҡ̠ӬźӠԺӠӠԺΠנӺǠ׮ЮǠźӠˠΠԺӠҠҠӠǯĺŠƠšԺ͠٠ǺҠΠǠźӠԺ٠ŠӠԺԠӠӠǺҠΠǠźӬǠŠ͠ԺΠӠԺҠӠӺҠΠǠźӬծǮìͮĠԺӬԠРǩκĠ٠ƠȬźӬǠ͠ĠҩԺ̠ŠӠԺҮϠǺĠ٠ЮͮԺ׮ЮԠǺҠΠǠźӠԺРҠӠԺŠҠΠҠ͠ˠ̠ǺҠúРԡ٠Ǻ٠ú̬٠ҮϠŠĠǺκĠ٠źŠӧŬӠŠƠԬˠ٠ĠҠЮӠ٠ˠԠǮźϠΠϠԠҠ٠ӠΠšϠҠ ŠӠΠŮԠŴӠŠĠĠӠ͠РΠΠŠͬӠΠŠŠĠǠͮҠϠźĠӠҭ٠ƠŠȠɭӠө͠ӠӠҠŠ̠̠̠ҠԠȩĠӠĠԺΠŠɠӠԠźΠǺȠ٠ƠȠȠκ      ĠŠŬŠĠŠРŮˬӠΡAGE)":"I - DETAILED INSTRUCTIONS FOR THIS ABBS":"K - KNOWLEDGABLE USER":"L - LISTS MULTIPLE MESSAGES":"M - WASHINGTON APPLE PI MEETING NOTICES"U"N - ADJUST NULLS AND LINEFEEDS":"O - ANSWER OPINION POLL":"P - PRINTS SIGNON BULLETIN":"Q - QUICK SCE . . .":"LET ME REMIND YOU OF THESE COMMANDS:":"A - AMEND EXISTING MESSAGES":"B - OTHER BULLETIN BOARD SYSTEMS":"C - CHAT WITH SYSOP":"D - DELETE A MESSAGE":"E - ENTER A MESSAGE":"G - GOODBYE (SIGNS YOU OFF)""H - HELP (PRINTS THIS MESS"?";:51,0:INLIN,3:900:J0JMS5200:804,A$,AC$,JJ6000,3000,4200,5300,5400,5900,19000,2030,3200,4000,5800,3100,4100,3700,1160,5000,9000,5100,4400,3300,10000,3600,28000,3500,4500,4600:ABCDEFGHIKLMNOPQRSTWXYZ$?+1:"PERHAPS YOU NEED ASSISTANEQUEST BULLETIN? (Y/N) ":INLIN,1:A$"Y"1190<F2:300"THE FOLLOWING MESSAGES ARE FOR YOU:":J1MS:TDA(J),1,U$,K:TDA(J),0,EM$,KK:KKKĺDA(J)" ";:(36)35ĺ:CK,1:ALLOWLC,0:32::NM$:FC$:CK,0:43624,1:KUĺ"COMMAND";6$,34,4)):JJ1(J999):50:500:(B$,23);(DA$,10);4((J)));(J);(B$,2)tFC$:CK,0:SOSO1:U$SY$SOSO1:"HELLO, SIR. "SO" USERS HAVE SIGNED ON."~(ACTIVE)0ĹACTIVE,6450:"SYSDATE.TIME: ";DA$/"LAST BULLETIN UPDATE: ";BD$:"RPSWD OR WPNNNN.PSWD:":(4);"NOMONI":INLIN,11:(A$)111060vL(514)48Ĺ513,65:514,80:CONVERT WP0001 TO WAP001`U$(A$,6):B$(A$,4):A$U$:600:J1060:701:RJ1:800:INLIN:JB$(A$,5,4):B$(A$,1):D$:J1060LjLC((B$,24,13)):J((B"NEED HELP SIGNING ON?":INLIN,1:A$"Y"1090:"TO SIGN ON, ENTER 'WAP' IF YOUR MEMBER- SHIP NUMBER IS <1000, 'WP' IF >=1000."8"THEN ENTER YOUR 3 OR 4 DIGIT MEMBERSHIP NUMBER, A '.', THEN YOUR 4 CHARACTER":"PASSWORD."=BZ422000:"ENTER WAPNNN.IN"ĹCH,1:"SYSOP NOW IN":1001JA$"OUT"ĹCH,0:"SYSOP NOW OUT":1001^(512)3İ30:::"ENTER A CARRIAGE RETURN:";:INLIN,6:ALLOWLC,0:Z0:900:J0J256ĹCRDLY,J1256(J255)INSERT PRE-SIGNON MESSAGE HERE$ZZ1:Z31090.:=804,E$,A$,J:JJ0::SPECIALIZED J=VAL(A$) FUNCTIONQJ(((A$))):Z jJ(J)(J)51,6:CK,1:255:32::FC$:CR,1:FL,134:1784SL,32:DR,1:KU0:C800:"AWAITING CALL";:INLIN,248:41000A$"SYSOP"(512)1930000:A$",3)"WAP"A$(A$,4):630; b(A$,2)"WP"A$(A$,3):630E lJ0:W v900:892,J: F0:FO$;F$(F);",L452"::OPEN MESSAGES F1:FO$;F$(F);",L40"::OPEN USERS FR$;F$(F);:F2ĺ",R";R;:OPEN & READ FILES, RECORD R IF MESSAGES OR USERS*(((DA$,5))):ZZJ: Z0460:KK1:K1JJJJ1:K12M ZZMO(K):440b JJJ1E4K100Zm KMC1 KK1:BDA(K),2:J(B$)K0470 KK1:KMCġ:"NO MESSAGES":2000  FW$;F$(F);",R";R::WRITE FILE F, RECORD R XCK,1:(A$(1319(Z2(Z2)C80));:(F0Z9)3305 TC80ĺ@ ^FC$: "SINCE ";:KUĺ"HOW MANY DAYS? (#/A=ALL/CR=SINCE LAST CALL)":DATE SEARCH INLIN,3:(A$)0JLC:465 (A$)65K0:480 900:J90400 JJ((DA$,2)):K((DA$,3,2)):ZTO ";:TZ,1,U$,L:Lĺ"[YOU]";:240- PZ,1n BZ,2:30(36))"DATE="(B$,3,4):"SUBJECT: ";:PZ,3::: ,F4F8ĺFO$;F$(F);",D2":PRINT FILE F 6FR$;F$(F);:F0ĺ",R";R; @:Z0:F0ĺFP$;F$(F)",R4":FR$;F$(F)* JINLIN:ZZ1:(A$)ĺA$;LOTt 74:4:(23)"C":INLIN,16:32:51,6:DA$(A$,9,2)(A$,3,2)(A$,6,2)"."(A$,12,2)(A$,15,2)(A$,18,2): d20000 eACTIVE,255:51,6:32:INLIN,248 n1000 "MSG "Z" FROM ";:TZ,0,U$,L:Lĺ"[YOU]";:220:MSG HEADER PZ,0# " vJi (4)"MAXFILES2":6409611256:::18);"ABBS":A$" ":J0:KJ:ZJ:D$(4):B$A$:SL3:SL=MM2 SLOTr1000:0:1002: 37888::$9400!::33,33: 2(491524256234)8(491524256236)4(491524256238)2ı:4=CPS CARD S                         z #Xհ     Π Р Š ӮʠӠӠNӠӠ ӱʰ ӳʰ"Ӡ ҠũЍĠŠӠŠɢũӠ͠ӠԠǬύƠՠŠǠԠӍӬŠԠŠ׮ɠ͠ō͠ҠЩƠӠӬĠɠ̠٠ϠŠՠҍŠɠήϠҠӠĠŠϠ׍ŠΠĠ͠ө΍٠ԠҠŠũӍĠӠĠӠŠϠō٬٠ŠϠōŠӮƠՠŠ׬Š  ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ                                        ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍĮӍ٠٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍӍ٠Į͠٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍĮӍ٠٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍӍ٠Ġ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍԠ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍĮӍ٠٠٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ" z                                    !!! ! ! ! ! !!!!!!!!!""" " " ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍĮӍ٠٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠Į͠٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍĮӍ٠٠ĮӍ٠ĮӍ٠ĮӍӍ٠ĮӍӍ٠Ġ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍааԠōҠкӠӠΠŮɠŠՠ٠ŠͮӬ͠ˍ٠ĮӍ٠ĮӍ٠ĮӍ٠ĮӍԠ٠ĮӍ٠ĮӍ