' +JJJJ ?\>m0M='+l> /+l  H d@hLҦ L~ L  ﵪ*i BB䵊嵰`72µ- i ư&( Rp s P  LLʬLoō 鷎귭෍ᷩ췩緈JJJJx Lȿ L8ᷭ緍췩 緍i 8 `巬 췌`x (`(8`I`B` `  `>J>J>VU)?`8'x0|&HhHh VY)'&Y)xꪽ)' `Hh`V0^*^*>&` aI꽌ɪVɭ&Y&&Y& 꽌ɪ\8`&&꽌ɪɖ'*&%&,E'зЮ꽌ɪФ`+*xS&x'8*3Ixix&& 8  '  & x)*++`NG8`0($ p,&" ۿ ۿڿL흍ٿ vLQ  !"#$%&'()*+,-./0123456789:;<=>?  ( 9 +"  "*  (9"1 ( ,.(0# 2  /#0/#0 *?'#07#00/0/'#07#0:"4<*55/**5/*%5/)1/)1/)1/)'#0/#0*5/*75/**5/*:5//#0/#0'#07#0:::*::'#07#0).).*#!.*'!.8)(#/-)(#/-,,eb)++$ h( ,!!"@h !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`HH ᥠ L\HIHHHHhHH݌hHhHh݌H6 VDP (FD Z $0x8x D- ܸDD# H8`?F Vk *f???0xF Hh D#-FFF8` D ܸx D - ܸx8`-0ݩ?ʥD FFF`   LDcpq` [` ~  LӜsqu`".Q`pNФbptťܥm2<(-Py0\|e<6e< ~ vL~ JJJJj귍hI  aUL@ kU8  L  ^R(jQ0l^l\  OÌȌ`W ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQL߼YLeLXLeLee ўQ0 L&RE;BY; Ꝥ$`( R \ZLl8 ўR HH\`\Z[YS6`LxQɿu3'RͲʎRʎ]]]ɍuL͟ɍ}RLRɍg^H8 ^hZLɍR LͲɊRR% QLܤͲ Z@ -^ ş\[Z QY\[Z8`l6Lş_Ȍb_Ͳ] )Y h( ֭ͲLɍ [LLĦ__ ^ 9 LҦ3 9 a   0LjLY u< (_9 ˭ɠuɠK_9 ?LˆʎõĵL õ ĵµ aµ`` L̦µ_bJLuLz`  ȟ QlXJ̥KlV  ȟ QlV eօ3L׭Lܫ &RL &QL d L4 We)n `@-eff L f`L . tQLѤ LҦL` OPu d L Ne)noon 8ɍ` ^f\õL ^NR  RΩLҦ\L \ şL_ NLjHv 3h`0h8` [L NС õ`A@` ŵL]Lõ`  \ 濭0 ş  Q ^\lZl^\8  ş Lȟ`fhjõĵ@OAP`u@`@&`QR`F Ls  @DAF@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@ ,\Z[PRR3\ɄSɊ"RQJ(0Fw6. ^-%p 㩠RP.Q I* P\L˵B̵C8pB߮Z\ @ յյ\BIR Z-^ Jp\IZLL-( `  Р@跻~!Wo*9~~~~ɬƬ~_ j ʪHɪH`Lc (L ܫ㵮赎 ɱ^_ J LsL Q(`贩紎 DǴҵԵƴѵӵµȴ 7 ַ :ŵƴѵǴҵȴµ納贍﵎ٵ്ᵭⳍڵL^ѵ-I `  4 ò-յ!  8صٵ紭ﵝ 7L (0+BC  7L HH`LgL{0 HH` õL H hBL BH [ h`Lo õ ڬL B ڬ LH hB@ յյ [L (ȴ) ȴ 7L L ( L (ȴL{ƴѵ洩ƴǴҵ 7 ^* B0 HȱBh ӵԵ 8 L8 ݲ` ܫ  / / şFD B / / ]ƴS0Jȴ ȴ)  紅D贅F B ƴ  / 0L Ν `ND8HFFhDh N ş`, ŵBѵ`, ѵB8`  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˵̵ֵ׵`LzĪLR E( 8` R` ELRŪƪ`췌 յյI뷭鷭귭ⵍ㵍跬ª 뷰` Lf ݵܵߵ޵ ^`8ܵ i B8` 4L ֵȱB׵ ܯ䵍൭嵍 ` DȑB׵Bֵ  ַ յյ`` ᥠ hh`ĵµ`ڿ8.ڿ.ۿ`êL`õĵBCõĵ`µµ`L õBĵCصص Qƴ0"Bƴ 󮜳` 0۰ϬBƴ8`i#`ЗLw!0>ﵭ` m ﳐ 7i볍 8 ЉLw`H h ݲL~ `浍국䵍뵩嵠Jm赍嵊mjnnn浈ۭm浍浭m䵍䵩m嵍`"L ŵ8ŵH x(` d£àĠ z#  u`:BS$(8)(95)(8):D$(4):XX40:L24:ST2:MI.5{ TDI$(44,5),ST$(4):I144:J15:DI$(I,J):J,I:I04:ST$(I)::I1 ^BLİ200 h390 35,23:24:2::" [ESC] TO END [RETURN] TO CONTINUE ";::I45520 :7:A$DI$(I,1):250::A$DI$"Strength = ";::18:ST::V ::12:12:"ONE MOMENT PLEASE...":"RUNTOC"^ Y0 TE$(A$,XXY):(TE$)(A$)320 (TE$,1)" "290 YY1:260 "(TE$,XX1) ,T(A$)(TE$):T0320 6A$(A$,T):250 @A$:2 JBL$(7) T$(13)190 BL$;:706 (AN$)LĺBL$;:70J T$;:AN$AN$T$R 70i 16(AN$):868: :::41):40:2):40:2):40:41)::3:3:"UPTIME Presents: Apples Oft's Castle" 34,5::5:25:" BY: LARRY SAGE ": # 4:7:(T$)27240 2; <AN$"":T1L:"_";::T1L:(8);:b FT$:2000:T$(32)T$(96)160t P(T$)27240 ZT$(8)130 dAN$""ĺBL$;:70 n(AN$)1AN$"":BS$;:70 xAN$(AN$,(AN$)1):BS$;:70 T$(13)(AN$)0ĺBL$;:60Z4 (C) 1987 UPTIME, VIKING TECHNOLOGIES, INC _(1101)6ĺ(13)(4)"BRUN LC.CONV"m16368,0v 330(XX(A$))2:A$:35,23:24:2::" [ESC] TO END [RETURN] TO CONTINUE ";::T$:2000:T$(13)ĭ(T$)27ĺBL$;:30 (                              HEN,ON GOTO,ON GOSUB,STRINGS,PEEK,POKE,CALL,ARITHMETIC,LOW-RES,HIGH-RESK" REAL,INTEGER,STRING,ARRAYS,X,X,X,X,X,ASC,LEN,LEFT$,RIGHT$,MID$,STR$,VAL,CHR$,X,GR,COLOR=,PLOT,HLIN,VLIN,SCRN,X,X,X,HGR,HGR2,HCOLOR=,HPLOT,X,X,X,X,X,XAaginal line6J6=100,25100,95: plots a vertical lineBJ@=30::cJ NEW,LIST,SAVE,LOAD,RUN,DELGK HOME,TEXT,PRINT,HTAB,VTAB,INVERSE,FLASH,NORMAL,SPC,INT,RND,GET,INPUT,VARIABLES,SPEED =,LET,CLEAR,READ/DATA,RESTORE,GOTO,GOSUB/RETURN,POP,FOR/NEXT,IF/Te high resolution graphics screen.":PR1:120:PR0GI<15620,15670:30xI=: set graphics to high resolution page oneI=2: set color to purpleI=56,62: plots a single dotI"=25,4075,40: plots a horizontal line J,=220,10270,90: plots a di plotting on the high resolution screen. Color numbers are 0 to 7.":120:30uH<:Y10:J17:J:20,Y50,Y:YY10:H<21:A$"These are the colors available for high resolution graphics.":TX1:130:TX0:30::2I RIGHT ARROW**8_F_C11440U_MAB(T2)h_MA232MA234y_MA32MA30_L1L14BMA_ MAB1310_WBMA2_1325:0:1620:1325:3:1810:W(MA)İ1325_:BMA:1360_WBMA2)`#1)X:1880:C0:%^C0BB16:C1:;^C1BB16:C0:P^C$V$:C1C$H$V^^" In end zone...Touchback":1920:B72:T0:N20:C1B208^1260:1670:410^R5X0ġ:1900:"Fumbled....";(7):T0:G0:1920:785^_"Penalty....";12301]C0T15T0:1835:T15:G0:1210:1230I]C0T13D41230|]C1T13D4İ1260:T0:1835:1210:G0:1230]C1T15T0:1835:T15:G0:1210:1230]C1T13D41230]C0VVX:V(Q)V(Q)X:1880:C1:^C1HHX:H(Q)H(Qield goal blocked....";(7):1920:1925:1900j\R11ĺ"Offense recovers....-13 yards":1920:T13:1170\R21ĺ"Defense recovers..":1920:1210:1892:955\"Defense recovers....+15 yards":T15:1920]C0T13D4İ1260:T0:1835:1210:G0:Field goal missed....":X1100:EE(E)(E)(E)::1920:1120[V"Field goal is good....":1870:1920:X3:1200:N$"":1810:1670:305[`N$"":G0:O20B208:C1B72[eN20N20[jN80NN(20O)[oC0C1:1230[tC1C0:1230-\~"F(7):1920:4103Z1900:T0:1835:1950:R131150CZ$C0BB16SZ)C1BB16iZ.O16R15N$"G"Z3O21R13N$"G"Z8O26R10N$"G"Z=O31R8N$"G"ZBO36R6N$"G"ZGO46(R3R7)N$"G"ZLO45R18N$"G"?[QN$"G"ĺ"Y" GOOD":1920:X7:1200JYX102108:32,X38,X:242,X248,X::1810qYN$"":G0:T0:O0:1605:1670:305YTGC0F1F11YTGC1F2F21YYY ** FIELD GOAL **YZF0İ1900:"Field goal out of range....over 50 yds"; X1835:1950:R3N$"NO"X14:16::"TOUCHDOWN"::1870:14:15:11):X10016020:X,102X,111::Q5O$"OVERTIME"X6:1200X1900:"Try for extra point is...";:N$"NO"Ğ:"NO GOOD";::X150:EE(E)(E)(E)::1920:X6:1200:1005PE:DD1:1015:1230.WPE15O21PE(O2)HWPE10O11PE(O2)`WPE5O6PE(O2)fWzWC0P3PEP3:WC1P4PEP4:WC0P4PEP4:WC1P3PEP3:WM0(S30S15)(Q2Q4)SS15WWW** TOUCHDOWN **X1950:R10890*VkC0B(PE2)44İ905EVpC1B(PE2)236İ905Vu1900:925:"Penalty offense....";PE;" yards":1920:TPE:DD1:1230VzC0B(PE2)220İ905VC1B(PE2)60İ905W1900:935:"Penalty defense.... ";PE;" yards":1920:T::1920:ZZ0:L9O0L0:960=U*T0:1835:1210:G0:1230PU/C0T1T11:cU4C1T2T21:xU>C$H$:C1C$V$UCI$" Recovers...":(C$,1)"S"I$" Recover..."UHUMUR** PENALTY **UWUa945:1950:PE15:R13PE10:R7PE5Vf240:400)T C0(T2B)232T(242B)2HT C1(BT2)48T(B46)2NT TT fT** FUMBLE **lTT1950:1900:R10805T 1220:835:C$;I$;(7):1920:L9O0L0:1630T#1015:1670:410U%830:C$;I$:815:X1100:EE(E)(E)(E)T:SC1P2P2T:S,S** PUNT **2SSS1925:1955:777:1900:1898SR4ĺ"Punt blocked....";(7):1920:1925:1900:1155ST;" yard punt...":1835:L1:1260:L0:1835:T0:1210:1260:1920SR21X0İ1892:955T1950:1940:1R21T0:1210:1260:1892:955 APPLE II"::14)"<2> OPPONENT":20:"Please make selection....";2A#Z$:Z$"1"Z$"2"Ģ20:1:868:"Please answer 1 or 2...";                   򮍍褐䬠䬠砢٢ﬠ΢䮠䮠ᠢ򢬠欠嬠嬠宠ﬠ嬠Ԡ޺堹宠ޠ䠠ŠӠ֠䬠讍笠䮍嬠޺֠󩮠䡠   ҠҠ䬠嬠宍ޠ䠠àҠ䮠ﺍōɠ嬠쬠󮍍堨𤋮ɠԠàӠŠ̮ì󮠠> 765,0:766,034,236(13)(4)"RUN TOC"< 1é򿍍ԠϠŠĠƠƽ忠ɠ캍򢍍̭ĠðĠĠàİǍ̠俍￠堺堯堢ɫ俠򮍍̠󮍍Šɫ⽭宍ðñð橍̠쬠󠺍àΠŭàΠŭ穠Ԡ䮍ӬӬĠӭϠ嬠嬠쮍Šӽ렣堯à򠯯Ӭ宍ŠӍŠӽ렣ɠ堯à쬠Ӡ嬠堺̠  reen display to 160 row of high-resolution graphics with four lines of text at the bottom.":120:30:G(:14920,14950:30IBH:: sets low resolution graphicsjBR:2: set color to dark blueB\:22,17: plots in column 22, row 17Bf:1,1: plots in column 22, row 17Bp:30:::C:A$"HLIN draws a horizontal line in low resolution hese are the colors available for low resolution graphics.":TX1:130:TX0:30::B4:A$"PLOT put a single block in the current color at a specific location on the low resolution graphics screen. PLOT 12,15 will plot a block in column 12, row 15.":PR1:to black and cursor moves to beginning of the last line.":120:30:@9A$"COLOR= sets the display color to be plotted for low resolution graphics. There are sixteen colors numbered from 1 to 16.":120:30@9:::Y6:I116:I:10,Y:YY2:RA9A$"Teater than or equal >=, and less than or equal <=.":PR1:120:PR0S?914620,14650\?975f?&9125o?0987y?:9568?D930:D@l9A$"GR is used to change the screen display to 40 row of low-resolution graphics with four lines of text. Screen clears prints the character BA>8(47): prints the character /g>8(7): prints the bell soundq>830:B?9A$"Arithmetic signs are: addition +, subtraction -, multiplication *, division /, equals =, not equal <>, greater than >, less than <, grvariable into a number variable.":PR1:120:PR0A=J814420,14440Q=T8A$"174.36"]=^8A(A$)d=h8An=r830:=8A$"CHR$ gives the character that corresponds with the value of the ASCII code between the ( ).":PR1:120:PR0=814520,14540>8(66):("ROBERT T. SMITH",8,2):starts with the 8th character and then prints two charactersa<730:<7A$"STR$ changes a number variable into a string.":PR1:120:PR0<71432014340<7A45.76<7A$(A)<8A$<830:0=@8A$"VAL changes a string ters of the string!;F730:;x7A$"MID$ yields a specific number of characters starting from a given place in a string.":PR1:120:PR0;714220,14240;7A$"HOUSEWORK";7(A$,3,5):starts with 3rd character and prints five charactersW<7of the string:630:y:7A$"RIGHT$ yields a specific number of characters from the end of the string.":PR1:120:PR0:714120,14140:(7A$"HOUSEWORK":27(A$,4):prints last 4 characters of A$;<7("ROBERT T. SMITH",5):prints last five characw a word from our sponsor.",30 "Information Please","Frequently asked questions.",3,"Coming Attractions","See what's in store for you in the UPTIMEs to come.",3,"Reader Survey","Here is the feedback section where you get to be involved.",1}( Flip Side programs.",50,"Ask the Apple Wizard","Your Apple questions are answered. Press [?] in the Text Viewer for options",3"Product Reviews","This month we take a look at Moonmist and Might And Magic.",60 "Index to Advertisers","And no","Save money at the market with your computer.",1 "ADVERTISEMENTS" ,3,"The Best of Times","A collection of our best.",1,"Super Coupon","It could save you a bundle!",3,"Classifieds","You never know.",3"THE FLIP SIDE",9,"Programs","The 5 The Flip Side.",40"PROGRAMS",5,"Football","You call the plays.",1,"Basic Primer","A guide to the BASIC language.",1,"Apple's Oft Castle","An adventure in programming!",1;"Language Arts IV","Our monthly educational program.",1,"Coupon Handlerograms","The 5 front side programs.",20,"News and Views","How to get the most out of a computer salesman after the sale.",3,"Apple Techniques","Different things you can do with your Apple.",3"The Flip Side","Be sure to Flip the disk for CONTENTS",8,"Cover Page","Our 'glossy' page!",1,"Inside Cover Page","Who is who at UPTIME. Press [?] in the Text Viewer for options",3 "About This Issue","A quick recap of this issue.",3"Editorial","Our editors comments.",3,"PrE DISK OVER,":"THEN PRESS [RETURN] TO CONTINUE ";:A$::A$(27)ė:230,32:A$(27)Ĺ49234,0:49239,0:49232,0:49236,0:3288:230,32::180"ERR: "I" IN "(218)(219)256: 1=run,2=brun,3=text,> = menu# *10 6"TABLE OF 19Ė9:2);X$;20(X$))3X$40(X$)):A:;X$;q:49234,0:49239,0:49232,0:49236,0:180X$"BRUN"X$:600X$"RUN"X$X:::12:12:"ONE MOMENT PLEASE...":11:D$X$:O230,64:::5:I(222):I6ĺ"PLEASE TURN TH)::170>|(A193A225)(M2M5)İ400:X$X$".DOX"::470W49168,0:A141310}X$M$(M,N):V:IN:J14:X(S):11:X$"":L,M:L1,NI1(M$(M,N)):A((M$(M,N),I,1))::(A)(8);:AA32(A96):X$X$(A):(A);::(37):V:9::("/-\|",P,1):@ JJ110:A(49152):A128Ă:320O TV:9:" "} ^A138A149VVZ:NN1:NM(M)V11:N1 hA136A139VVZ:NN1:N1NM(M):V10N:N6V9N2 rM1M3A155M1:N(L2)::170wM4M1A155M4:N(L2215,75 115 I19:X$" ":IM(M)X$M$(M,I)V 440::M(M)6X$" ":440:\  M1M4Ģ18:33:"[ESC]":33:"Exits" " ,V10N:Z1:M(M)6Z2:V9N2 649168,0:21:X$(D$(M,N),39):460:X$(D$(M,N),40):460 @PP(P4)1):210:300::F(M,N)500,490,470@ L2,N:MF(M,N)10:N1:180U 9:10::19):u 11:I19:9::22)::: X$"PROGRAMS"Ģ18:"Feature":"Program>":7:10:"[A] About the program" 9:9:I11(X$)2::I);X$;21I(X$))::50,750:0,156278,156Z 49236,0:24::" <- -> Moves pointer [RETURN] selects ";: M(L):M(M1)(M0MC)1: Menu # N(L1):N(N1)(N0N9)1: Choice in sub-menu 18:7):33:17):33:6):7:10:25):50,6050,155! X$X$(M$(I,J),F(I,J)::' FP1:S16336:L309 KL1765:L2766L P:(21):::t Z49234,0:49239,0:49232,0:49237,0 d232,0:233,148:0:1:3 n: xI112114:1I,0::0,30279,30 5:1:"Volume 12 #7" 50,60215,60215,15550,15550,6- (C) 1987 VIKING TECHNOLOGIES, INC. ^(4)"MAXFILES1":34816:D$(13)(4):1000((1014)23ĺD$"BRUNUPTIME.ML":D$"BRUNUPTEXT,A$8F00":D$"BLOADSHAPES"2C:M(C),X$(C),M$(C,9),D$(C,9),F(C,9) <I1C:X$(I),M(I):J1M(I):M$(I,J),D          :450:350:=:12:12:"ONE MOMENT PLEASE...":"RUNTOC"k:41):40:" ";:40:" ";:40:41):3:4:"UPTIME Presents: Language Arts IV"6:20:"By: Miki Fitzpatrick"rX(Z9),RE$(Z9)K1Z9(F((1)Z9)1 2X(F)1E PREFIXES WHICH CAN MAKE WORDS MEAN THE OPPOSITE.":450:V94:440S$"STUDY EACH WORD, FIND THE CORRECT PREFIX, AND TYPE IN THE NUMBER IN FRONT OF THE ANSWER.":450:V94:440 S$"YOU MAY HAVE UP TO THREE PRACTICE ITEMS BEFORE I KEEP YOUR SCORE.":I1163:SS:4:AA$(I1)"-",:440:AA$(I11)"-",:440:AA$(I12)"-"::440:::NN:390S$XX$:V2:H6:450:V2::H11:"MIS-":350:DE15002:T$"DIRECTIONS"::470:H:LL1::340:TC37:H3:5CS$"I WILL SHOW YOU A WORD AND FOUR OF THS WHICH BEGIN WITH AN "L".B~T$T1$:2::470::H:LL1:340:5S$"SOME PREFIXES CAN BE ADDED TO WORDS TO FORM THEIR ANTONYMS, OR OPPOSITES.":TC32:H6:450:VV93:330:VV2:440:V:S$"THESE PREFIXES ARE:":1:S$:L(S$)1:1:340:V3\DE500,RELEVANT,3,1IUN,NON,IR,IM,IN,IL,MIS,NOT,THE OPPOSITE OF,BADLY,WRONGxTHE PREFIX MIS- MEANS "WRONG" OR "BADLY.",,IR- IS USED WITH WORDS WHICH BEGIN WITH "R".,"IM- IS USED WITH WORDS WHICH BEGIN WITH 'M', 'B', AND 'P'.",,IL- IS USED WITH WORDINCERE,5,1,FICTION,2,1,LITERATE,6,1,SPELL,7,4,COMPLETE,5,1,PACK,1,2,MOBILE,4,1LEGAL,6,1,RATIONAL,3,1,REGULAR,3,1,FASTEN,1,2,LEGITIMATE,6,1,POSSIBLE,4,1,VIOLENT,2,1 CONSIDERATE,5,1,ENJOYABLE,1,1,CALCULATE,7,3,RETRIEVABLE,3,1,LIVING,2,1,POLITE,4,1Z$iZ$(13)Ĭ%kZ$(27)880.m872XpT$"SEE YOU LATER, "NA$"!!":V:470cz440:m1230sANTONYMS UN=1; NON=2; IR=3; IM=4; IN=5; IL=6; MIS=7COMBATANT,2,2,TRUE,1,1,LEGIBLE,6,1,PROPER,4,1,TREAT,7,3,RESPONSIBLE,3,1NSLOOK AT THE ONES YOU MISSED, "NA$".":L12:430:230:350:860HR872\:V3:I21W:RW(I2):S$RE$(R):V:TC35:H5:450:V::H:AA$(A(R))::VV94:440:V20V5:390fhPG1:T$" [ESC] ENDS [RETURN] TO PLAY AGAIN ":23::470::16368,0:1:958:S$DF$(A4):TC32:H7:450:V1:H::AA$(A4):B*350:Y4 SCORING>3:S$"YOU GOT "(N)" RIGHT OUT OF "(G)" WORDS, "NA$".":230:?HP(((NG)100).5):L12::H:"THAT'S ";P;"%.":L$"PRE-OPP.7":L13:430:W1S$"LET'S Q$(F)" MEANS '"ER$(RE(F))SP$Q$(F)"'.":780oS$AA$(A4)Q$(F)" MEANS '"Q$(F)SP$ER$(RE(F))"'.":780 :5(C2):16:AA$(A4)::V19:V1:1:958:19:(S$)32VV1V:TC32:H7:RE$(F)S$:450:V:H::AA$(A4)::4407 DF$(A4)""ĢVJ14:13:J;". ";AA$(N(J));"-"::J;255:V(37)1o255:V(37)1:V:1:"YOUR ANSWER? ";:Z$:Z$Z(Z$):Z1Z4İ200:710GG1:N(Z)A4Ğ:5(C2):16:AA$(A4)::100:810WW1:W(W)FRE(F)760,760,770,7700S$AA$(A4) b l:1150ivK1TL::FF(K):2:T$"WHICH PREFIX CAN YOU ADD TO":470:4::T$Q$(F):470:V5:330:A4A(F):CL17:X(CL)0::C((1)4)1:X(A4)1I14ICN(I)((1)7)1:X(N(I))1660ICN(I)A4X(N(I))1::(),RE(I):/I17:AA$(I)::I14:ER$(I):8&XX$M0I16:DF$(I)::18:1:"HOW MANY WORDS DO YOU WANT? (5 - ";Z9;:") ";Z$D(Z$)5600N(Z$)Z9TL(Z$):610X20:"A NUMBER BETWEEN 5 AND ";Z9;" PLEASE.":Z$"0":V14:390:570"PLEASE ENTER A SHORTER FORM OF YOUR FIRST NAME. (NO MORE THAN 8 LETTERS)":TC38:H1:450:V10:390:500NA$""āG113:20:(7);::18::S$"PLEASE ENTER YOUR FIRST NAME. (NO MORE THAN 8 LETTERS)":TC38:H1:450:V10:390:500 I1Z9:Q$(I),A(ISS:230:NN:"SS:470:NN:bL(T$):H(40L)2:H:T$;:V9(37)1:H9(36):PG1PG0:j:T$"PREFIXES - OPPOSITES":10:470:LL1:T1$T$:H:34014:1:"WHAT IS YOUR FIRST NAME? ";NA$h(NA$)8āG113:20:(7);::18::S$ TO CONTINUE "::470::16368,0:Z$7 hZ$(13)ė:J rZ$(27)1230S |350 PG1:23:T$" [ESC] TO END [RETURN] TO CONTINUE "::470::16368,0:Z$ Z$(13)ĢV:1:958: Z$(27)1230 390 L21L1::: D1DE::TR(X$SP$)):280B I1LTR:J((S$,I,1)):(J32(J95));::b S$(S$,(S$)LTR):LI1ĺk "240 ,::(7);"WORD TOO LONG";: 6LI0:S31ĺ @: JH139:V:H:"=":: TJHHL:"-";::% ^PG1:23:T$" [ESC] TO END [RETURN]""L1(LI$):S$(LI$,L11)S2$(F)? (S$)37H5:TC35:240b L(S$):LTCT$S$:470:320 H:(S$)TCāI1(S$):J((S$,I,1)):(J32(J95E2));::H9(36):V9(37):310 LTRTC11:X$(S$,LTR,1):X$SP$X$"-"300 E2ĺ(S$,L190 T$"SUPER!":190? T$"YOU'RE REALLY GOING NOW!":190^ T$"YES! YES! YES!":190u T$"THAT'S GREAT!" 19:470::: V:1:958:(7);::"A NUMBER BETWEEN 1 AND 4, PLEASE."::390:" S$S1$(F)LI$S2$(F):TC35:H3:S31:S1$(F)40 <X(F)1:F(K)F:, FI1Z9:X(I)0: PSS255:NN255:DE2000:Z0:P0:M0:G0:N0:PD$".":SP$(32):E2(637)223:490 Z490 dNN1: REWARDS nI(6(1))1 xI130,140,150,160,170,180 T$"GREAT!":190 T$"FANTASTIC!":> COPYRIGHT (C) 1987 UPTIME, VIKING TECHNOLOGIES INC. i(1101)6ĺ(13)(4)"BRUN LC.CONV" :16368,0:2000:Z927Q$(Z9),A(Z9),F(Z9),RE(Z9),W(Z9),SE$(Z9),H(Z9),SY(Z9),Q1$(Z9),X(Z9),RE$(Z9)K1Z9(F((1)Z9)1 2X(F)1               Programmer."b: Beginning Programmer,Novice Programmer First Class,Intermediate Programmer,Advanced Programmer,Expert Programmerb(T$)96(T$)123T$((T$)32)b16362,0:2:T$:2000:T$(13)ĭ(T$)27ĺBL$;:30((T$)27240 2is..."a& "What command could be used with 4 to save a program?",CHR$," Dr. Oft shakes your hand and congradulates you. He hands you a card which says 'Expert Computer Programmer'." b0 "Dr. Oft shakes his head. You know you are still not an Experte last question."e` "No T. on the computer screen. You look at the doctor as he shakes his head."a "Dr. Oft smiles. One more correct answer and your are an Expert Programmer. He says 'Don't be nervous. Just take your time and answer. The question or a large book in back of him. He reads through the book. Finally, he looks up at you and asks..."` "If A$ equals 'Larry T. Sage' what command would be used to print T.?",MID$," T. appears on the computer screen at his side. You stand and wait for thl not an Expert Programmer."b: Beginning Programmer,Novice Programmer First Class,Intermediate Programmer,Advanced Programmer,Expert Programmerb(T$)96(T$)123T$((T$)32)b16368,0::T$:2000:T$(13)ĭ(T$)27ĺBL$;:30 ((T. The question is..."a& "What command could be used with 4 to save a program?",CHR$," Dr. Oft shakes your hand and congradulates you. He hands you a card which says 'Expert Computer Programmer'."b0 "Dr. Oft shakes his head. You know you are stiland wait for the last question."t` "No T. on the computer screen. You look at the doctor as he shakes his head."a "Dr. Oft smiles. One more correct answer and your are an Expert Programmer. He says 'Don't be nervous. Just take your time and answer. Oft reaches for a large book in back of him. He reads through the book. Finally, he looks up at you and asks..." ` "If A$ equals 'Larry T. Sage' what command would be used to print T.?",MID$," T. appears on the computer screen at his side. You stand s..."^ "What is the first word of a command used to make a decision?",IF,"The screen flashes correct decision. You wait for the next question."^ "ERROR MESSAGE flashes on the screen. You look quickly at Dr. Oft and then start to type."r_ "Drmputer screen reads correct. You wait for the next question."] "An ERROR MESSAGE flashes onto the screen. Should have spent more time with UPTIME's BASIC PRIMER."^ " Dr. Oft presses RETURN again and another question appears on the screen. It readlike your last answer."\ "The doctor turns to a computer behind him. He presses the RETURN key and then points to the information on the screen. You read..."=] "If A$ equals 'Larry T. Sage' what command would be used to print Sage?",RIGHT$,"The coks.."[ "What command stops program flow to wait for keypresses and must be terminated by pressing RETURN?",INPUT,"The doctor smiles. You sit in the chair behind you as..."\ "The doctor scratches his beard as he stares at you. You know he did not ,"LEFT$","The doctor smiles as you wait for the second question."Z "The doctor shakes his head. You dig deeply for the answer."[ "The doctor fumbles with some papers which are on the table next to him. Finally, he looks up from the papers and as corridor and enter the last room in the building. You see a tall man with a beard. He states, 'I am Dr. Apples oft. I will ask you the last six questions. The first one is..."AZ "If A$ equals 'Larry T. Sage' what command would be used to print Larry?"ut then says..."Xr "What command will yeild any number from 1 to 50?",RND,"The Binary smiles and points toward a door at the end of the corridor."X| "The Binary stares at you as you search you brain for the correct answer."Y "You walk down the not what you wanted. The hexidecimal moves toward you as you reach for your BASIC manual."Xh "You move passed a door. As you turn a corner a Binary darts in front of you. You continue to move until the Binary points a RAM card at you. He checks you ok as the hexidecimal moves toward you. He say..."VT "What command cause letters to be printed black-on-white?",INVERSE,"The computer screen behind the hexidecimal shows an inverse message. You continue down the corridor."[W^ "The printed letters arem and continue..."U@ "The display on the screen is not what you wanted. You dig for your BASIC manual and the correct answer."1VJ "Down a corridor. Suddenly, from nowhere, a Hexidecimal appears. These buggers are difficult to deal with. You step bacs with three horizontal blue lines. The girl in front of the screen inquires...."U6 "What command will draw a lo-res line up and down at column 20 from row 12 to row 32?",VLIN,"A blue line appears on the screen. Proudly you turn and walk out of the roorney to become an Expert programmer."S" "An ERROR MESSAGE flashed onto the screen. The little man stares at you as you dig deeply into your bag of tricks."QT, "As you move through the room the screen in front of you changes to low resolution graphicund the room frantically you see a little man with uncombed white hair. He stop. His name tag reads Dr. B. It. He yells..."%S "How can I get rid of the decimals in these numbers?",INT,"Integers appear on the screen. You smile and then continue your jouour right. You turn and move down the hall, then through a door. You see..."Q "Quickly, the BYTE turns. You know from his speed that you have not used the correct term. You must try again."{R "A screen filled with all types of numbers. Running aros toward a door on your right. A sign over it reads 'Expert Programmer's Degree'. You turn and walk through the opened door. A BYTE meets you. He askes..."LQ "What BASIC command will cause the Apple computer to run slower?",SPEED=,"The BYTE points to year off the paper and there it is ... your Advanced Programmer's card."O "ERROR flashes on the screen. The urge to punch becomes stronger. You take a deep breath and begin to type..."P "The library door opens and the librarian walks in. She pointu answer this question correctly you will become an Advanced Programmer. You take a deep breath and then press RETURN. There it is - the question. You read..."GO "What command will make the variable C equal X$?",VAL,"The printer starts. It stops. You tnumber 87. You know that is the ASCII value of W. Once more your press RETURN and..."M "You look at the screen. The number you see is not 87. You know you are wrong since 87 is the ASCII value of W."N "On the screen flashes 'LAST QUESTION'. If yomanual."L "And another question...yuk. You stand, stretch and look around the library. Seeing nothing that will help you, you sit down to read the next question...."UM "What command will yeild the ASCII value of W?",ASC,"On the screen you see the o green?",HCOLOR=,"Another green line appears under the question. Below it in green the word CORRECT is written. You press RETURN..."L "A line appears at the bottom of the high resolution screen. Unfortunately it is not green. You grab for your Basic lize it won't help to hit."J "You look at the screen and see a thin blue high resolution graphic line printed across the screen. Below the line on the graphic screen is your next question. You read it..."K "What Applesoft command sets the color tould send program control to a subroutines at lines 20,50 or 80?",ON T GOSUB,"Again the message CORRECT flashes. Again you press RETURN and wonder how many more questions."J "A bell rings! The computer prints ERROR. Angry, you raise your hand, but reaswer."Hx "You press RETURN and a question appears. Your eyes search the room for information about the number of questions. Suddenly your realize you're alone with the door locked. It's you against computer. You read..."I "What command, using T, col to a machine language program?",CALL,"Once again the computer flashes CORRECT. You sit back proudly wondering how many more questions."Hn "The hated ERROR MESSAGE flashes on to the screen. Your quickly search your surroundings for a clue to the anxt question jumps onto the screen. You suddenly realize you are taking your final test to become an Advanced Programmer. You take a deep breath, sit back in the chair and read the next question..."Gd "What BASIC command can be use to send program contro read 20 items. Use J as the index.",FOR J =,"The computer flashes a CORRECT message. You press RETURN again and..."EP "An ERROR MESSAGE flashes onto the screen. You rock back in your chair and make a threating jesture at the computer."FZ "The nethe end of the hall you turn left into a large library. The librarian askes for your Advanced Programmers Card. Not having one, she sends you to a computer terminal. You press RETURN and read the first question..."uEF "What command would start a loop tnd will tell me what number value is stored at location 232 in the Apple's memory?",PEEK,"C.P.U smiles as the answer appears on the screen. You head down the hall."C2 "C.P.U looks at you. An ERROR MESSAGE is flashing on the computer screen."D< "At grope for your BASIC manual."B "You see an elderly man sitting at a desk typing into a computer. He looks up at you as he continues typing. The name plate on his desk read Cornelious Paul Unger. On the computer screen is written..."C( "What commaawkes..."A  "What command will tell me how long a string is?",LEN,"The glitch return to its ledge and you continue moving up the stairs. When you reach the top ..."B "The glitch lands on your shoulder and bites at your ear. You push it away as youtch your head as you try to remember the command." A "Half way up the stairs you stop. To your left is a window. Sitting on the window ledge is a wide winged glitch. As you start to move foward the glitch leaps into the air and blocks your path. It squill not an Expert Programmer."b: Beginning Programmer,Novice Programmer First Class,Intermediate Programmer,Advanced Programmer,Expert Programmerb(T$)96(T$)123T$((T$)32)b16368,0:T$:2000:T$(13)ĭ(T$)27ĺBL$;:30 ((Ter. The question is..."a& "What command could be used with 4 to save a program?",CHR$," Dr. Oft shakes your hand and congradulates you. He hands you a card which says 'Expert Computer Programmer'."b0 "Dr. Oft shakes his head. You know you are std and wait for the last question."v` "No T. on the computer screen. You look at the doctor as he shakes his head."a "Dr. Oft smiles. One more correct answer and your are an Expert Programmer. He says 'Don't be nervous. Just take your time and answDr. Oft reaches for a large book in back of him. He reads through the book. Finally, he looks up at you and asks...""` "If A$ equals 'Larry T. Sage' what command would be used to print T.?",MID$," T. appears on the computer screen at his side. You stanads..."^ "What is the first word of a command used to make a decision?",IF,"The screen flashes correct decision. You wait for the next question."^ "ERROR MESSAGE flashes on the screen. You look quickly at Dr. Oft and then start to type."t_ "computer screen reads correct. You wait for the next question."] "An ERROR MESSAGE flashes onto the screen. Should have spent more time with UPTIME's BASIC PRIMER."^ " Dr. Oft presses RETURN again and another question appears on the screen. It ret like your last answer."\ "The doctor turns to a computer behind him. He presses the RETURN key and then points to the information on the screen. You read..."?] "If A$ equals 'Larry T. Sage' what command would be used to print Sage?",RIGHT$,"The asks.."[ "What command stops program flow to wait for keypresses and must be terminated by pressing RETURN?",INPUT,"The doctor smiles. You sit in the chair behind you as..."\ "The doctor scratches his beard as he stares at you. You know he did no?","LEFT$","The doctor smiles as you wait for the second question."Z "The doctor shakes his head. You dig deeply for the answer."[ "The doctor fumbles with some papers which are on the table next to him. Finally, he looks up from the papers and he corridor and enter the last room in the building. You see a tall man with a beard. He states, 'I am Dr. Apples oft. I will ask you the last six questions. The first one is..."CZ "If A$ equals 'Larry T. Sage' what command would be used to print Larry out then says..."Xr "What command will yeild any number from 1 to 50?",RND,"The Binary smiles and points toward a door at the end of the corridor."X| "The Binary stares at you as you search you brain for the correct answer."Y "You walk down tre not what you wanted. The hexidecimal moves toward you as you reach for your BASIC manual."Xh "You move passed a door. As you turn a corner a Binary darts in front of you. You continue to move until the Binary points a RAM card at you. He checks youack as the hexidecimal moves toward you. He say..."VT "What command cause letters to be printed black-on-white?",INVERSE,"The computer screen behind the hexidecimal shows an inverse message. You continue down the corridor."]W^ "The printed letters aoom and continue..."U@ "The display on the screen is not what you wanted. You dig for your BASIC manual and the correct answer."3VJ "Down a corridor. Suddenly, from nowhere, a Hexidecimal appears. These buggers are difficult to deal with. You step bics with three horizontal blue lines. The girl in front of the screen inquires...."U6 "What command will draw a lo-res line up and down at column 20 from row 12 to row 32?",VLIN,"A blue line appears on the screen. Proudly you turn and walk out of the rourney to become an Expert programmer."S" "An ERROR MESSAGE flashed onto the screen. The little man stares at you as you dig deeply into your bag of tricks."ST, "As you move through the room the screen in front of you changes to low resolution graphround the room frantically you see a little man with uncombed white hair. He stop. His name tag reads Dr. B. It. He yells..."'S "How can I get rid of the decimals in these numbers?",INT,"Integers appear on the screen. You smile and then continue your j your right. You turn and move down the hall, then through a door. You see..."Q "Quickly, the BYTE turns. You know from his speed that you have not used the correct term. You must try again."}R "A screen filled with all types of numbers. Running ants toward a door on your right. A sign over it reads 'Expert Programmer's Degree'. You turn and walk through the opened door. A BYTE meets you. He askes..."NQ "What BASIC command will cause the Apple computer to run slower?",SPEED=,"The BYTE points to tear off the paper and there it is ... your Advanced Programmer's card."O "ERROR flashes on the screen. The urge to punch becomes stronger. You take a deep breath and begin to type..."P "The library door opens and the librarian walks in. She poiyou answer this question correctly you will become an Advanced Programmer. You take a deep breath and then press RETURN. There it is - the question. You read..."IO "What command will make the variable C equal X$?",VAL,"The printer starts. It stops. Youe number 87. You know that is the ASCII value of W. Once more your press RETURN and..."M "You look at the screen. The number you see is not 87. You know you are wrong since 87 is the ASCII value of W."N "On the screen flashes 'LAST QUESTION'. If c manual."L "And another question...yuk. You stand, stretch and look around the library. Seeing nothing that will help you, you sit down to read the next question...."WM "What command will yeild the ASCII value of W?",ASC,"On the screen you see th to green?",HCOLOR=,"Another green line appears under the question. Below it in green the word CORRECT is written. You press RETURN..." L "A line appears at the bottom of the high resolution screen. Unfortunately it is not green. You grab for your Basiealize it won't help to hit."J "You look at the screen and see a thin blue high resolution graphic line printed across the screen. Below the line on the graphic screen is your next question. You read it..."K "What Applesoft command sets the color could send program control to a subroutines at lines 20,50 or 80?",ON T GOSUB,"Again the message CORRECT flashes. Again you press RETURN and wonder how many more questions."J "A bell rings! The computer prints ERROR. Angry, you raise your hand, but ranswer."Hx "You press RETURN and a question appears. Your eyes search the room for information about the number of questions. Suddenly your realize you're alone with the door locked. It's you against computer. You read..."I "What command, using T,trol to a machine language program?",CALL,"Once again the computer flashes CORRECT. You sit back proudly wondering how many more questions."Hn "The hated ERROR MESSAGE flashes on to the screen. Your quickly search your surroundings for a clue to the next question jumps onto the screen. You suddenly realize you are taking your final test to become an Advanced Programmer. You take a deep breath, sit back in the chair and read the next question..."Gd "What BASIC command can be use to send program con to read 20 items. Use J as the index.",FOR J =,"The computer flashes a CORRECT message. You press RETURN again and..."EP "An ERROR MESSAGE flashes onto the screen. You rock back in your chair and make a threating jesture at the computer."FZ "The t the end of the hall you turn left into a large library. The librarian askes for your Advanced Programmers Card. Not having one, she sends you to a computer terminal. You press RETURN and read the first question..."wEF "What command would start a loopmand will tell me what number value is stored at location 232 in the Apple's memory?",PEEK,"C.P.U smiles as the answer appears on the screen. You head down the hall."C2 "C.P.U looks at you. An ERROR MESSAGE is flashing on the computer screen."D< "Aou grope for your BASIC manual."B "You see an elderly man sitting at a desk typing into a computer. He looks up at you as he continues typing. The name plate on his desk read Cornelious Paul Unger. On the computer screen is written..."C( "What comquawkes..."A  "What command will tell me how long a string is?",LEN,"The glitch return to its ledge and you continue moving up the stairs. When you reach the top ..." B "The glitch lands on your shoulder and bites at your ear. You push it away as yratch your head as you try to remember the command." A "Half way up the stairs you stop. To your left is a window. Sitting on the window ledge is a wide winged glitch. As you start to move foward the glitch leaps into the air and blocks your path. It sŧӠԠō򮍍ޠޠà箠ժݪժժՊԪժЪЀЪժԁ̂֠ӆ!U*Q*U(U*T*U U*E*U"U*Q*U(U*ߪժժժՠժժժՂԂՂԪժԁ̂֠ӆ!U*Q*U(U*T*U U*E*U"U*Q*U(U*@ժժժժժժժժժժժժժժժժժժժժԁ̂֠ӆ񏀀!U*Q*U(U*T*U U*E*U"U*Q*U(U*ժժժժժժժժժժժժժժԁ̂֠ӆ!U*Q*U(U*T**_*E*U"U*Q*U(U*            9630:p96A$"LEFT$ yields a specific number of characters from the beginning of the string.":PR1:120:PR09614020,1404096A$"HOUSEWORK"96(A$,5): prints first five charactersof A$ :6("ROBERT T. SMITH",6):prints fisrt six characters value of S8630:e8L6A$"LEN is used to see how many characters are in a string.":PR1:120:PR0v8V613920,139508`6A$"WE HAVE A NEW HOUSE"8j6B$"123 SOUTH STREET IS THE ADDRESS"8t6(A$): each space is included as a character8~6(B$) The best way to fill an array is to use a FOR/NEXT loop.":120:30:W75A$(1)"HOUSE"75A$"ASC yields the ASCII code value of the first character of the string.":PR1:120:PR07513820,1383075A$"SAM" 86(A$):will print 83 which is the ASCIIunctuation marks. The name of a string variable must end with a dollar sign $ and begin with a letter. Examples: A$ D3$ NAME$.":120:30:E75A$"An array is a collection of real, integer, or string variables. DIM is used to allocate space for an array.s can hold only whole number values between -32767 and 32767. The name of an integer variable must end with a percent sign % and begin with a letter. Examples: A% F7% AMOUNT%.":120:30:6 5A$"String variables are a sequence of text, numbers, and/or p corner of the screen.":120:30:4X4A$"Real variables can hold a number with or without a decimal point. Names of real variable may consist of letters or of letters and numbers. They must always start with a letter.":120:30:54A$"Integer variable changes from full screen text to graphics without changing the graphic screen.":120:30:"43A$"CALL executes a machine language routine at a specific decimal location. Example: CALL -936 clears the text screen and moves the cursor to the top left hand2,3A$"PEEK is used to get the contents of a specific memory location. Example: PEEK (36) will tell you the current horizontal position of the cursor.":120:30:[33A$"POKE is used to store a value in a specific memory location. Example POKE 49232,0n the statement. RETURN sends the program back to the next line after the GOSUB.":PR1:120:PR0q1213020,13080y12Y112Y13050,13060,13070,13080121309012"AT LINE 13050"1213 LINE SKIPPED13 LINE SKIPPED13 LINE SKIPPED2"330: z #  Р ŧӠԠŮؠŧӠԠŠ\ ŠӠ֮ؠ ŠӠ֠ΠҮؠ ΠҠ%Ӡ ̮ؠ̠±7²ӠàҮؠàҠE ҠŠɮҠ! ŠҠŠԠӠŠ̠ ӠĠӠ ŠӠ Р à ԠŮ̠  Ӡî֠Р light you can't use your invaluable BASIC manual." "A long hall with a large door at the end. As your light searches the hall you spot a picture of Dr. Oft. Below it on a computer is written a message. Slowly, you walk closer to the picture and readsays.... "How can I store a value in a specific memory location in this APPLE?",POKE,"You press the button on the flashlight and this time it lights. As you shine it around the hall you see..."3 "That didn't work the voice says. Trouble, withoutommand before the RAM devourers you." "Slowly you go through the doorway and enter a hall. BANG! The door slams shut and you are left in blackness. Your foot hits something. You bend down and pick it up. It's a flashlight, but it won't work. A voice get the &*#$@ program on the screen so I can understand how it was written?",LIST,"She smiles and points to an opened door to your left."% "She loosens her grip on the RAM and again it moves slowly toward you. Quickly, you search your brain for the cIC manual and the elusive term which can save you."l "The figure is that of a large ROM dressed in black. She is looking at a blank computer screen. Quickly, she turns to you and with fire in her eyes and anger in her voice mutters..."v "How do Ig..."X "The correct command will put space between you and the RAM!",SPC," The chain around the RAM's neck tightens as you see a shadowy figure standing behind it..."3b "The RAM shows its teeth and moves towards you. You grab for your trusty BASYou put your hand on the key and turn it. Nothing happens. You reach into your back pocket for your BASIC manual."N "Slowly the door swings opened and you are faced by a large angry growling RAM. On the monitor behind the RAM you see a message flashinck up the key and walk toward the door. You put the key into the lock, but before you can turn it you hear...": "The password to make the key work will turn on the low resolution screen.",GR,"You put your hand on the key and slowly turn it..."rD " 'You will find a key under the computer which will help you during your quest.'"& "The screen remains a mess. At the bottom of it flashed the message 'H is the first letter.'"n0 "Suddenly the light in the room brightens and you see a door. You pi you is a computer. You see no doors or windows and very little light. You reach for the keyboard when you hear a loud booming voice say..."Q "How do I clear all these unwanted letters from this screen?",HOME,"The screen clears and flashes the message:490T$"N"(T$)27240P::BL1:12:12:"ONE MOMENT PLEASE...":330:8:A$"Congradulations on becoming a an Expert computer programmer.":250:480 "You have entered the castle of the recluse Dr. Apples Oft. On the table in front ofExpert Programmer has failed. Study UPTIME's BASIC PRIMER and your Applesoft BASIC manual and then try again.":250:ST0::5:"Status: ";ST$(((I1)11))230:17:10:"Play again? (y/n) _";:(8);T$:2000:T$"Y"T$"N"ĭ(T$)27ĺBL$;(I,2):250= :VT(37)1:230:VT:3:"Your answer: ";:60| AN$DI$(I,3)ĺ::A$DI$(I,4):250:30:II1:STST.5:390 ::A$DI$(I,5):250:30:1:VT1:958:MIMI2:STSTMI ST0460 410x:8:A$"Sorry! Your attempt to become an ժժժժժժժժժժժժժժժժժժժժԁ̂֠ӆ U*Q*U(U*T**_*E*U"U*Q*U(U*ժժժժժժժժժժժժժժԁ̪֪ӆ🀀 U*Q*U(U*T**_*}*U"U*Q*U(U*!U*Q*U(U*T**U U*E*U"U*Q*U(U*!U*Q*U(U*T**U U*E*U"U*Q*U(U*Á!U*Q*U(U*T**U U*E*U"U*Q*U(U*!U*QjnX[*T**U U*E*U"U17U(U*ժժժժժժժժժժժժժժժժժժժժŁ倀̪֠Ӫժ!U*Q*U(U*T**U U*E*U"U*Q*U(U*ǟժ!U*Qjq8\*T**U U*E*U"Uq8U(U*!U*Q*U(U*T**U U*E*U"U*Q*U(U* <"<"""<< <"""<"><$""< """"  "" 6***""""""""""<""< :< $"""2,"""""**6"""""< >>8  80""*:<"">""""""""""""">>><2"<""">""" ""  ">"6**"""""&*2""""""""""""*,"" "" ">""""""""""""""**6"""""""> >>> >00000>"(~ < (&20 *, **>> """ " >> ">> """>""""""< >> "01`02 7H6HLL—=T҈߈STb67L67LɆmɠFH)<=8< <<<&=<&=e<>i>?i?`(e$>)e?`͐` LX  ɉ 1LħŧƧ ڠ 둩MħŧƧ 0 ?@ A ٺ0 L ƏHŏH`𴴑ڏ3gg쏢 ` ` 9 X($ `)l6hh LŠۿݠ 箮庍󍍬덮䍍àР6 L폥( (ɍ툱 ɠ8eҩ `  -ɍ ?2 Ȋ B`$0 ɍL8e`" ɍ8e`%$L [ȹI  F!  X "L X (!G 둬 둭  F! ` X( ɱɸ` 9 둥F 6H7H : ;ɍ) : e L h7h'(`ɼɉ 1LħŧƧ ڠ 둩MħŧƧ 0 ?@ A ٺ0 L ƏHŏH`𴴑ڏ3gg쏢 ` ` 9 X( PILERS'. The first rises slowly and speaks ..." "What command will set all variables to zero?",CLEAR,"The first COMPILER points to his left and then dematerializes. You look to your right as...". "The COMPILER hisses and wines as you search the on the screen! You look around for help. Another mistake like that could do you in."/ "The wall opens and you move into a hugh room with a table and 5 chairs. You sit. Suddenly four entities materialize in the chairs in front of you. You gasp 'THE COMieve your eyes. It reads...." "If you know how to draw a dot on the high resolution screen safety is yours.",HPLOT,"The screen below the picture shows a beautiful blue dot. Quickly, you survey your surroundings when all of a sudden..."T "No dot MESSAGE! You should have studied UPTIME'S BASIC PRIMER." "Shocked, scared, and seeing no other exit you clutch at the Doctor's picture. This causes an envelop to fall to the floor. You pick it up. Scrawled on the back you see a message. You can't bel the message..." "What command should I use to send program control to a routine that ends with a RETURN?",GOSUB,"On the computer screen is the message 'Do not enter the door at the end of the hall.'"8 "Below the picture you see the hated ERROR ";:A$:1 &24:8:" PRESS RETURN TO CONTINUE "K 0KC,0:A$:A$(13)ı ::24:15:"RETURN";:(7);::15:"RETURN":560  12,7,FOOTBALLVNUPTIME.ML":D$"BLOAD SHAPES":D$"BRUN UPTEXT,A$8F00" 232,0:233,148:0:1:3 (KB16384:KC16315:1I,60:I, l:I118:14:I:S2$:I:L n0,103279,103:0,48279,48h pI1911:6:I:S1$:q s550 P2,0:560 :220 512,0::D$"RUNTOC" ::10:10:"PLEASE INSERT UPTIME DISK":10:"AND PRESS RETURN TO CONTINUE...68:P116300:P216299:FG16302j PS1$"VOLUME "(V)", NUMBER "(N)" ":S2$" THE MAGAZINE ON A DISK" ZI140:DH$DH$"-": d:FG,0: fI110:28,(1)256:62454:I g0:Y75391:0,Y279,Y:0,150Y279,150Y: h3: jI11315 (C) 1987 UPTIME BY VIKING TECHNOLOGIES, INC.P :::16368,0:33816bD$(13)(4)V,N,TT$:D$"BLOAD PI.COVER":(1014)23ĺD$"BRUNUPTIME.ML":D$"BLOAD SHAPES":D$"BRUN UPTEXT,A$8F00" 232,0:233,148:0:1:3 (KB16384:KC163ŠЍÍgʆhL;ɲ3Ƀ/">LȱL;ȱL;`iL sLIL'" sL\L` ɀ8 ` 6.?>?/----m)----=?'?%$$$$$$$$$$'??--5,.65.6.6565656565%%$%$%$%$%,$,$%,,--=?776666666666=7??-----M----------%$$$6667???????>???'$$$$,?><+c_u2--c~ -----??>/66666666.655-.-----,%%%,$$$$$$$$,??????7$'$$$$$=/6666666666.?>?/----mI ---------'---------MII-----??/666666666  0>3>3333300>333>3?633>03333 00000333 >kkcc33333333333>003>063333333 cckk>3 3333>0? ?𘘜8"u33?3333333333333333;33333?333? ?00003333?3?33333337;3333333333337;3333303? 33333333333 33333?333 33333 ?0 ?8p`xx``xx>8888866$$~$~$>> >B%$R! *,88888"6">~~`p83;?73  ?30 ?30038<63?00?0333?3 333333>0 ~~ < <~b0̙ñံޙఆժ!U*Q*U(U*T**_*E*U"U*Q*U(U*ժժժժժժժժժժժժժժժժժժժժ!U*Qj{X[*T**U U*E*U"U17U(U*!U*Q*U(U*T**U U*E*U"U*Q*U(U*ՊԂժݪժժՊϪЂժՊԊժԁ̂֠ӆ!U*Q*U(U*T**_*E*U"U*Q*U(U*ժժժժժժժժժժժժРՠԪԁ̂֠!U*Q*U(U*T**U U*E*U"U*Q*U(U*ժժժժժժժժ՚ԪՠՀժժժժժժԁ̂֠ӆ!U*Q*U(U*T**U U*E*U"U*Q*U(U*ߪժժժ𩅪ЀЪԁ̂֠ӆ!U*Q*U(U*T*U U*E*U"U*Q*U(U* U*Q*U(U*T**_*E*U"U*Q*U(U* U*QjqX*T**U U*E*U"U10U(U*Ԫ͈ԁ̂֠ӆ՚ U*Q*U(U*T**_*E*U"U*Q*U(U* U*Q*U(U*T**U U*E*U"U*Q*U(U*̟怛āఆժ U*Q*U(U*T**_*E*U"U*Q*U(U*ժժժժժժժժժժժժժժժժժժժժ U*QjwX[*T**U U*E*U"U17U(U* U*Q*U(U*T**U U*E*U"U*Q*U(U*ժՂժݪժժՂުժՊЊРЊԪԁ̂֠ӆ U*Q*U(U*T**_*}*U"U*Q*U(U*ժժժժժժժժժժժժՀЀՀԪԁ̂֠ӆ U*Q*U(U*T**_*E*U"U*Q*U(U*ժժժժժժժժբժՠՀЪժժժժժժԁ̂֠ӆ U*Q*U(U*T**_*E*U"U*Q*U(U*ժժժժժժժժૅЊЪԁ̂֠ӆ U*Q*U(U*T*U U*}*U"U*Q*U(U* U*Q*U(U*T**_*E*U"U*Q*U(U* U*Qjx_*T**U U*E*U"Uq?U(U*מՆਕŁت̪ƪӆت U*Q*U(U*T**U U*E*U"U*Q*U(U* U*Qjx_*T**U U*E*U"Uq?U(U*࿆ǟƁ簆ժ U*Q*U(U*T**_*E*U"U*Q*U(U*ժժժժժժժժժժժժժժժժժժժժ U*QjoX[*T**U U*E*U"U17U(U* U*Q*U(U*T**U U*E*U"U*Q*U(U*ߪժժՊުԪՊЊРЊԪԁ̂֠ӆ U*Q*U(U*T*U U*}*U"U*Q*U(U*쀀ժժժժժժժժժժժՀЀՀԪժԁ̂֠ӆ U*Q*U(U*T**_*E*U"U*Q*U(U*쏀ժժժժժժժժժժժժժժժժժժժժԁ̂֠ӆ U*Q*U(U*T**_*E*U"U*Q*U(U*ժժժժժժժժૅЪԁ̪֪ӆ U*Q*U(U*T*U U*}*U"U*Q*U(U*瀀 U*Q*U(U*T**U U*E*U"U*Q*U(U* U*Q*U(U*T**U U*E*U"U*Q*U(U*߈ՆŃت̪Ϊӆ U*Q*U(U*T**U U*E*U"U*Q*U(U* U*Qjq8\*T**U U*E*U"Uq8U(U*ժ U*Q*U(U*T**U U*E*U"U*Q*U(U*ժ U*QjnX[*T**U U*E*U"U17U(U* U*Q*U(U*T**U U*E*U"U*Q*U(U*ժݪժժՊԪժЪЀЪժԁ̂֠ӆ U*Q*U(U*T*U U*}*U"U*Q*U(U*ժժժժժժժբժժժՂԂՂԪժԁ̂֠ӆ🀀 U*Q*U(U*T**_*E*U"U*Q*U(U* 8de"" $" " 86 ::24:15:"RETURN";:(7);::15:"RETURN":560K  12,7,Footballt "It's you against your computer or"  "head to head compitition with a friend."  "Football places you on the sidelines"  "calling the plays."  "" 8with UPTIME's BASIC PRIMER.""  "The third COMPILER stands and learches toward you. His size is breathtaking. Slowly he removes his trusty 80 column card and places it's sharp edge against your throat. Your heart pounds. With a broad, toothless smile het...."  "What Applesoft command allows you to use the same DATA statement more than once?",RESTORE,"The second COMPILER turns and flows out of sight into an Apple computer."! "The COMPILER rise quickly and stares. You should have spent more time room. Shaken you realize you are on your own."  "The piercing look of the second entity makes you squirm in your chair. His large, bald head sits a top the largest shoulders you have ever seen. As he opens his month to speak fear clutches at your hear U*Q*U(U*T**U U*E*U"U*Q*U(U* U*QjnX_*T**U U*E*U"U1?U(U*ψԁ̂֠ӆ U*Q*U(U*T*U U*E*U"U*Q*U(U*ǟƁఆժ U*Qjx_*T**U U*E*U"Uq?U(U* U*Q*U(U*T**U U*E*U"U*Q*U(U* U*Qjx_*T**U U*E*U"Uq?U(U* U*Q*U(U*T**U U*E*U"U*Q*U(U*ժժժݪժժժѪժժՊԂԂЪժԁ̂֠ӆ U*Q*U(U*T*U U*E*U"U*Q*U(U*　ժժժժժժժժժժժժժժժժժժժժਕŁ̪֠Ӫժ U*Q*U(U*T**U U*E*U"U*Q*U(U*ժժժժժժժժ𿪕ժժժժժժԁ̂֠ӆ U*Q*U(U*T**_*E*U"U*Q*U(U*ߪժժՊԪժЪժԁ̂֠ӆ U*Q*U(U*T**_>E*U"U*Q*U(U* U*Q*U(U*T**U U*E*U"U*Q*U(U* U*Qjn8_*T**U U*E*U"Uq>U(U*՟ԁ̂֠ӆꀀ U*Q*U(U*T*U U*E*U"U*Q*U(U*̙Áఆժ U*Q*U(U*T**U U*E*U"U*Q*U(U* U*Q*U(U*T**U U*E*U"U*Q*U(U*ժժժժժժժժժժժժժժժժժժժժ U*Qj`8\*T**U U*E*U"Uq8U(U* U*Q*U(U*T**U U*E*U"U*Q*U(U*ՊԪժݪժժժ֪ՀՊՂԂЪժԁ̂֠ӆ U*Q*U(U*T*U U*E*U"U*Q*U(U*쀀ժժժժժժժժժժժժժժժժժժժժԁ̂֠Ӏ U*Q*U(U*T**U U*E*U"U*Q*U(U*ժժժժժժժժǪՠժժժժժժԁ̂֠ӆ U*Q*U(U*T**U U*E*U"U*Q*U(U*ժժՠݪժժժժЪժԁ̂֠ӆ U*Q*U(U*T**_>E*U"U*Q*U(U*쀀 U*Q*U(U*T**U U*E*U"U*Q*U(U* U*Qjnx^*T**U U*E*U"Uq=U(U*ЪLjԁ̂֠ӆՃ U*Q*U(U*T**_*E*U"U*Q*U(U*̙ñ󇀆̙࿆ժ U*Q*U(U*T**U U*E*U"U*Q*U(U*ժժժժժժժժժժժժժժժժժժժժ U*Qj}X[*T**U U*E*U"U17U(U* U*Q*U(U*T**U U*E*U"U*Q*U(U*ߪժժժϪԀժՊԊЪժԁ̂֠ӆ U*Q*U(U*T**_*E*U"U*Q*U(U*ժժժժժժժժժժժժՠժԁ̂֠ U*Q*U(U*T**U U*E*U"U*Q*U(U*ժժժժժժժժѪՠժժժժժժԁ̂֠ӆ U*Q*U(U*T**U U*E*U"U*Q*U(U*ժժՠݪժժժ󩁪ЪЪժԁ̂֠ӆ U*Q*U(U*T**_>E*U"U*Q*U(U*!U*Q*U(U*T**_*E*U"U*Q*U(U*!U*Qjnx]*T**U U*E*U"Uq;U(U*՞ԁ̂֠ӆ!U*Q*U(U*T**_*E*U"U*Q*U(U*     "OVERTIME"ĺ* NO$"OVERTIME"Ė37:"OT"f PH$;:14:H(1);:18:H(2);:22:H(3);:26:H(4);:32:H U"_____________________________________" Z19:X$:V$;" STATS";:19:X$;H$;" STATS" _19:X$:T$;T1;:19:X$;T$;T2 d19:X$:F$;F1;:19:X$;# (P1:P2:P3:P4:P5:P6:P7:P8= -V:H:V$:H$:R1:R2q 2H(1):H(2):H(3):H(4):V(1):V(2):V(3):V(4) 7T1:T2:F1:F2:O$ <D$"CLOSE STATS" ATYP1R1:TZP2R2 F185 K:V$;:14:V(1);:18:V(2);:22:V(3);:26:V(4);:32:V:O$; ** FOOTBALL2 **.D$(13)(4)T$"TURNOVERS: ":P$"YDS PASSING: ":R$"YDS RUSHING: ":TY$"TOTAL YARDS: ":J$"PASS ATTEMPTS: ":E$"PASS COMPLETE: ":A$"PENALTY YDS: ":X$"| ":F$"FIRST DOWNS: ":D$"OPEN STATS"#D$"READ STATS"    宠䮠嬠ޠ塍ޠ䠠ΠҠӠ宠䮠堨詠䬠g command. You should study UPTIME's BASIC PRIMER."* "You open the door and in front of you stands The Deleter. She bellows, 'I am The Deleter. I got my name because I DELETE programs and programmers. If you can't answer my question I will delete you...."( "What command will allow me to turn the number 1345 into a string?",STR$,"'Go straight ahead, but beware of The Deleter.' Slowly you proceed, not knowing what you will find when you open the door."3) "The value 0 comes up on the screen. Wron! Being a Novice Programmer you dig deeply into your bag of tricks."(z "A short hall with three doors and a computer sitting on a table. You press RETURN and a computer voice replies. Solve my problem Novice programmer and I will show you the way to goto it..."&f "To open this door you must first clear the high resolution screen so PRINT statement can be used.",TEXT,"The graphic screen clears as the door swings opened. You peek around the corner and see ..."D'p "The screen remains high resolutionovice Programmer First Class flashing before you." &\ "The room clears. On your right you see a stairway. A sign states 'Intermediate level this way'. You climb the stairs. At the top is a door. As you reach to open it a high resolution message flash on "Your final question before this panel is what command will remove the most recent GOSUB before a RETURN?",POP,"The COMPILER smiles. Congradulations! You now hold the title Novice Programm First Class."2%R "The cable tightens. You see the status of N grab for your BASIC manual."#> "The final entity stares at you. All you can see are two large eyes sunken deeply into a gaunt face. Every thing else is covered by a hood. It reaches out and places an interface cable around your neck as it says..."$H says"* "What sign would be used to have 9 times 7 equal 63?",*,"The card drops to the floor as the entity vanishes. You are shaken as you look toward the final entity."#4 "Fear clutches you as the 80 column card cuts slightly into your throat. Youter the room. You see a long table with a computer and a large red letter in front of each chair at the table. The letters spell S.C.R.E.E.N. A voice says. 'I am Subro Tine. Your question is..."_0 "What command will move the cursor down the text screentwo?",HGR2,"A message flashes on to the screen. 'You have earned the right to enter the SCREEN room. It is on your left.'". "The computer bell rings! INCORRECT COMMAND ERROR ... appears at the bottom of the monitor screen."/ "You turn left and enand turn right. In front of you is an opened door. You walk through and up a flight of stairs. At the top of the stairs is a computer with a question typed on its monitor screen..."z. "Novice programmer what command will turn on high resolution screen ,GOTO,"A cold wind blowns causing the book to turn to page 197. It states 'leave this room, then turn right.'", "A strong wind blows the book shut. You are about to goto your demise if you don't type the correct command."- "You head out the door and open a large blue book fill with computer programs that is lying on the desk. As you thumb through the book a message catches you're eye...."n, "To continue your quest you must write the command which sends control unconditional to a line number."'"* "What command is used to place items in DATA statements into an array?",READ,"The Deleter smiles. You move quickly past her and..."* "The Deleter frowns. Scared you grab for your BASIC manual."+ "See a room with a desk and chair. You sit󮍍宮宠򮍍宮ɧ蠶뿠ɫ蠴뿠宠ɫ󮠠Ҡ٠쮠ݮ󮠠堢ݠ宠򠸰򮠠ҠΠ堨䩬嬠䩬堯򮠠堯宠宠뮠󮠠򮠠šŠ󮠠󮠠嬠nter interface across his chest as he asks..."? "What command will stop program flow until a key is pressed?",GET,"The BYTE moves to his right and you begin climbing the stairs..."4@ "The BYTE snaps his interface card at you. You jump back. You scudly as an ERROR MESSAGE appears. You think back to your days at the keyboard as you search your mind for the command.".? "You arrive at the corner and as you turn you bump into another BYTE. In back of him you see stairs leading upward. He holds a priou with tears in his eyes. He begs..."= "What command will remove the lines from 5000 to 7000?",DEL,"The young programmer smiles as the program runs correctly. You continue down the hall heading toward a corner."w> "The programmer starts to cry lo "The BYTE looks at you. You look at the BYTE. You reach for your ragged edged BASIC manual."&= "Near the end of the hall you spot a young programmer working on a new program. On the screen you see the message 'OUT OF MEMORY'. The programmer looks at you are stopped by a BYTE (big young tough enforcer). He speakes..."; "What command can I use to have X unconditionally send program control to lines 20,30 or 40?",ON X GOTO,"The BYTE moves aside. Quickly, you continue your journey down the hall.]<en goes blank! You should spend move time with UPTIME's BASIC PRIMER. You search you brain for the elusive answer."C; "In front of you a sign reads 'Hall to Advanced Programmer Status'. You move foward under the sign and head down the hall. Suddenly y. He smiles and then slowly states..."9 "What symbols would be used to show 7 and 3 are not equal?",<>,"'Congradulations!' flashes on the screen. You are an Intermediate Programmer. You turn and run from the room, back into the hall."s: "The scre last panel member."s8~ "ERROR MESSAGE appears on the screen. Think! You are almost an Intermediate programer."&9 "You stop in front of the eminent programmer, Dr. Nob Ugs. He is the last obstacle between you and becoming an Intermediate Programmer has stopped many from becoming intermediate programmers. He asks..."8t "What command yields the code for the color currently displayed at loation 15,15 on the low resolution screen?",SCRN,"You look at the monitor. No error message. You move toward thecond E."f6` "E.F. shakes his head. Quickly, you run through your list on low resolution commands."E7j "You move to your right knowing two more correct answers and you become an Intermediate Programmer. You stop in front of Professor Errmes Sage. He computer screen on the table shows a dark blue horizontal line. E. F. Rom speaks...."6V "What command draws that line on the low resolution graphic screen?",HLIN,"Mr. Rom turns and points to his left. You move toward the person sitting behind then se. You have finished half of the panels questions."4B "The screen continues to flash. Trembling, you reach for the computer keyboard to try again."V5L "You move to the next location. You wipe the sweat from your brow and await the next challenge. TheRegis Ter is flashing wildly. He stares at you and in a calm voice states..."248 "If you wish to continue on your quest to become an Expert programmer stop that screen from flashing.",NORMAL,"The screen stops flashing. The Doctor gives you a quick smilet on the screen blinks. You turn and move toward the programmer sitting behind the R."2$ "The text on the screen does not blink. You fumble trying to think of the correct command."M3. "You are greeted by a smile. The computer screen in front of Dr. is a programmer! Blood shot eyes, hunched shoulders and callused fingers from years of slaving at the computer keyboard. Fear. You know he will be tough. He askes...V2 "What command will cause text printed on the screen to blink?",FLASH,"Phew! The tex?",VTAB,"The curson moves down the screen. You move to your right and stand in front of the C."0 "The cursor does not move down correctly. You think, then start to type a new command."1 "You turn to Con Catenate. You can't believe your eyes. ThisOCK ** f&fSS20:X81M14:X80Lf(M1(M2S0))(Q2Q4)SS15WfSSSSzfM0S0QQ1:M15:S0:1710fS0MM1:S60SSf:1:9:QfM10S0Ģ1:36:" ";M;":";S;"0"::1735fM10Ģ1:36:" ";M;":";S::1735gS0Ģ1(eh1900:"SAFETY....":1870:T0:1660SemC0HH2:H(Q)H(Q)2:1880:C1:1655xerC1VV2:V(Q)V(Q)2:1880:C0ewI1:G0:T0:O0:1670:305e|40,10240,108:U3038:U,102U,108::240,102240,108:U242250:U,102U,108::ef** CL3:"by: Joe Heidcamp"3 <32,2:33,37:34,2:35,21W 12:10:"One moment please..."s 103,1:104,64:16384,0 "RUN FB1"FB1"i* ** FOOTBALL ** STARTUP PROGRAM O(1101)6ĺ(4)"BRUN LC.CONV"u(1014)23ĺ(4)"BRUNUPTIME.ML"34816::(21):16302,0:::5);"** UPTIME Presents: FOOTBALL **";5)(X120:40:2):21:40): 74:1Y)12877(KY)128109(KY)12810420Y h(KY)12873(KY)128105(KY)12811450 r(KY)12875(KY)128107(KY)12821480 |(KY)12874(KY)128106(KY)1288510 (KY)12813ī540 (KY)12827110 BL$;:330VT:9):I13:C$::I139:MU$(I)::I14:J19:SM$(I,J)::E "80K , @35,24:KP,0::6:A$" SELECT A TERM "::20::8:QR113:2:MU$(QR);:14:MU$(QR13);:26:MU$(QR26): B60:8 JKP,0:VT:HZ::MU$(NU): T(KY)127340( ^(K ::80:320& (104)64265B 104,64:103,1:16384,0c (13)(4)"RUN BASIC PRIMER" (1101)6ĺ(13)(4)"BRUN LC.CONV" BL$(7):BS$(8)(95)(8):D$(4):XX40:KY16384:KP16368= HZ2:NU1:VT8:DEX1:COL1:MU$(39),SM$(4,:(4)"RUN TOC" x: Y0D TE$(A$,XXY):(TE$)(A$)200Z (TE$,1)" "170i YY1:140z (TE$,XX1) T(A$)(TE$):T0200 A$(A$,T):130 A$:TYı 7:TXāI140:"-";::PR1A$" PROGRAM LISTING ":7::20: :70Z$"1"Z$"7"2104SL(Z$):D$"PR#";SL:0RS: ":P$"YDS PASSING: ":R$"YDS RUSHING: ":TY$"TOTAL YARDS: ":J$"PASS ATTEMPTS: ":E$"PASS COMPLETE: ":A$"PENALTY YDS: ":X$"| ":F$"FIRST DOWNS: ":D$"OPEN STATS"#D$"READ STATS"11:1:868:"SCORE AND STATISTICS ('Y' OR 'N') ";:Z$ Z$"Y"Z$"y"Z$"n"Z$"N"ĺ(7):9:1:958:"PLEASE ANSWER 'Y' OR 'N'....":PA12000::190 Z$"N"Z$"n"ı :9:"What slot is your printer in? ";:16368,0:Z$Z$(27)ġOU LIKE TO PLAY AGAIN? (Y/N)";K Z$:Z$"Y"Z$"y"Z$"n"Z$"N"150t Z$"Y"Z$"y"ė::D$"RUN FOOTBALL"z 12:12:"ONE MOMENT PLEASE...":24:34,23:D$"EXEC FP": ::PA1500: 9:"WOULD YOU LIKE A PRINTOUT OF FINAL":8 F$;F2' i19:X$:A$;P3;:19:X$;A$;P4I n19:X$:J$;P5;:19:X$;J$;P7k s19:X$:E$;P6;:19:X$;E$;P8 x19:X$:P$;P1;:19:X$;P$;P2 }19:X$:R$;R1;:19:X$;R$;R2 19:X$::TY$;TY;::19:X$;::TY$;TZ: D$"PR#0" 24:1:"WOULD YXITS ":" ARROWS TO MOVE [RETURN] SELECTS ";:35,22: P:::41):40:2):40:2):40:41)::3:A$"UPTIME Presents: BASIC PRIMER":20 Z34,5::5:25:" BY: LARRY SAGE "::BZ1 d n::12:12:"ONE MOMENT PLEASE...":104,8:2048,0C5 (C) 1987 UPTIME, VIKING TECHNOLOGIES, INC > 240V(XX(A$))2:A$:35,23:24:2::" [ESC] TO END [RETURN] TO CONTINUE ";::T$:T$(13)ĭ(T$)27ĺBL$;:30((T$)271102= <23::" [I J K M] OR [ESC] E        """ " " " " """""""            HZ:MU$(NU):NUNU12VTVT1:VT20VT8:NUCOL;330XVT:HZ:MU$(NU):NUNU1zVTVT1:VT8VT20:NU13DEX330DEXDEX1:VT:HZ:MU$(NU):NUNU13:COLCOL13:HZHZ12COL39COL1:HZ2:NUNU39:DEX1330*DEXDEX1:VT6,165,69,166,70,164,71,88,76,240,253,D$(13)(4)[(1101)6ĺD$"BRUN LC.CONV"8:"Would you like to play against...."::14)"<1> APPLE II"::14)"<2> OPPONENT":20:"Please make selection....";K #Z$:Z$"1"Z$"2"Ģ20:1:868:"P9,134,70,132,71,166,7,10,10,176,4,16,62,48,4e<$ 16,1,232,232,10,134,27,24,101,6,133,26,144,2,230,27<& 165,40,133,8,165,41,41,3,5,230,133,9,162,8,160,0<( 177,26,36,50,48,2,73,127,164,36,145,8,230,26,208,2$=* 230,27,165,9,24,105,4,133,9,202,208,2256,4,2,30,34,34,28,0/; 23,62,32,16,8,4,4,4,0N; 24,28,34,34,28,34,34,28,0m; 25,28,34,34,60,32,16,14,0; 0,0,0,0,0,0,0,0,0; 7,8,8,8,0,0,0,0,0; 11,0,8,8,62,8,8,0,0; 13,0,0,0,62,0,0,0,0; 14,0,0,0,0,0,0,8,0; -1,<" 216,120,133,60,8,20,34,34,0): 57,34,34,20,8,8,8,8,0E: 58,62,32,16,8,4,2,62,0d: 16,28,34,50,42,38,34,28,0~: 17,8,12,8,8,8,8,28,0: 18,28,34,32,24,4,2,62,0: 19,62,32,16,24,32,34,28,0: 20,16,24,20,18,62,16,16,0: 21,62,2,30,32,32,34,28,0; 22,8,09 48,30,34,34,30,2,2,2,0>9 49,28,34,34,34,42,18,44,0]9 50,30,34,34,30,10,18,34,0{9 51,28,34,2,28,32,34,28,09 52,62,8,8,8,8,8,8,09 53,34,34,34,34,34,34,28,09 54,34,34,34,34,34,20,8,09 55,34,34,34,42,42,54,34,0: 56,34,34,28 40,34,34,34,62,34,34,34,088 41,28,8,8,8,8,8,28,0W8 42,32,32,32,32,32,34,28,0u8 43,34,18,10,6,10,18,34,08 44,2,2,2,2,2,2,62,08 45,34,54,42,42,34,34,34,08 26,0,0,8,0,8,0,0,08 46,34,34,38,42,50,34,34,09 47,28,34,34,34,34,34,2Y:X,Y:7 6,0:7,141/7 54,0:55,3:100257 S7 33,8,20,34,34,62,34,34,0r7 34,30,34,34,30,34,34,30,07 35,28,34,2,2,2,34,28,07 36,30,34,34,34,34,34,30,07 37,62,2,2,30,2,2,62,07 38,62,2,2,30,2,2,2,07 39,60,2,2,2,50,34,60,0al attempt...":ZZ0n 1920:Jn( 1835:O$"OVERTIME":C0:M15:S60:X81n- 14:16::O$;(7)::1920:14:15:11):X10016020:X,102X,111::30520:"Please make selection....";2A#Z$:Z$"1"Z$"2"Ģ20:1:868:"Please answer 1 or 2...";Z((1)4)1:Z2Z3/m D4B118Z5:25300*A$"PRINT is used to write text ongram. DEL 20,60 would remove all lines from line 20 to line 60 of the program in memory.":120:30:h)A$"HOME is used to clear all the text from the screen and place the cursor at the top left corner of the screen.":120i)PR1ļ10610j)30 k)P"DELETE COUPON #"/.12:I16:19:868::a8VT9:HT19:270:AN(AN$):ANDEXĺBL$;:1080B12:I16:19:ITEM$(AN,I):L1:22:958:5:"DELETE IT? ";::"(Y/N)";::" _";:(8);:T$:2000:T$"N"T$"Y"ĭ(T$)27ĺBL$;:1100VT$"NLACE$(I)AN$=AN$"NONE"ĢVT:19:868:AN$:PLACE$(I)AN$nI:I16:ITEM$(AN,I)PLACE$(I):I:690:89035,24::540:6:A$" DELETE COUPONS "::500:12:I16:2:QU$(I):I$J$"0":K$"9":L$"":M$"":N$"":O$"":P$"":Q$"":L3:9:4:VT:868::AN$;::" (";::"WRITE";::" ON COUPON)":1010I6D%(AN)1:AN$(DEX):ANDEX:19:VT:868::AN$;::" (";::"WRITE";::" ON COUPON)":1010270:I4İ430:HT:VT:AN$;:868I2QR(AN$):HT:VT:SU$(QR):AN$SU$(QR) P"":Q$"":L1TI3J$"A":K$"Z":L$"0":M$"9":N$"-":O$"/":P$(32):Q$"":L20I4J$"0":K$"9":L$"":M$"":N$".":O$"":P$"":Q$"":L6I5İ30:21:1:868:1010=I6FC0FDFD1:FCFC1:DEXDEX1:ANDD%(FD):D%(FD)1:AN$(AN):19:10:1620j:12:A$" ADD COUPONS ":500::14:I16:2:QU$(I);:19:J120:"_";:J::I:20:1:958HT19:L20:VT13:I16:VTVT1I1J$"A":K$"Z":L$"":M$"":N$(32):O$"-":P$"/":Q$"" I2J$"0":K$"9":L$"":M$"":N$"":O$"":P$"N"ıH(T$)27ġ:1620@RTKTK1:TK%(TK)(ITEM$(I,6)):\DEX0Ģ22:1:35,24:958:A$" FILE IS EMPTY "::500::510:21:1:868:1620fNU880,1040,1210,1350,1400p420zDEXDEX1:DEX500FC0ė:10::A$" FILE IS FULL ":500::5(ITEM$(I,6)):D%(I)QR%DEX0800D D%(I)0FCFC1:DD%(FC)IJt D$"CLOSE"FL$:20:1:958:NU51450*NU0:162041:22:958:"TAKE THIS COUPON? ";::"(Y/N)";::" _";:(8);:T$:2000:T$"N"T$"Y"ĭ(T$)27ĺBL$;:820>T$vD$"OPEN"FL$:D$"DELETE"FL$:D$"OPEN"FL$:D$"WRITE"FL$:DEX:SA:I1DEX:J16:ITEM$(I,J):::D$"CLOSE"FL$:76021:1:868:A$" LOADING COUPONS FILE "::500:D$"OPEN"FL$:D$"READ"FL$:DEX:SA:DEX0āI1DEX:J16:ITEM$(I,J):J:QR,T):610A$:1:22:958:3:"DO ANOTHER COUPON? ";::"(Y/N)";::" _";:(8);:T$:2000:T$"N"T$"Y"ĭ(T$)27ĺBL$;:6901:21:958T$"Y"ı(T$)27ġ:162035,24:21:1:958:22::A$" SAVING INFORMATION ":500:Sage":3:500:4:1::40);::34,4*NsX::12:12:"ONE MOMENT PLEASE...":24:34,23:(13)(4)"EXEC FP":{bY0lTE$(A$,XYY):(TE$)(A$)680v(TE$,1)" "650YY1:620(TE$,XY1):T(A$)(TE$):T0680A$(A$-> MOVE DOWN [ESC] ENDS ":" [RETURN] TO SELECT ";:35,22:023::" <-- MOVE UP --> MOVE DOWN [ESC] MENU ":" [RETURN] TO SELECT CONTINUES ";:35,22::::A$"UPTIME Presents: COUPON HANDLER":1:500$DA$"By Larry (XY(A$))2:A$:35,23:24:3::"[ESC] FOR MENU [RETURN] TO CONTINUE";::T$:2000:T$(13)ĭ(T$)27ĺBL$;:510(T$)27ġ:162024:3::"[ESC] FOR MENU [RETURN] TO CONTINUE";::35,23:O&23::" <-- MOVE UP -QR;:19:QR1:::6:QR092:4:SU$(QR);:21:SU$(QR1):QR:DF0:QR1(AN$):(AN$,QR,1)"."DF1:DDQR:QR(AN$)1:DFAN$AN$".00":(AN$)DD2AN$(AN$,DD2):(AN$)DD1AN$AN$"0":(AN$,1)"."AN$AN$"00"S$;:280*TT$(13)(AN$)0ĺBL$;:280<^T$(13)410KhBL$;:280dr(AN$)LĺBL$;:280|(AN$)0T$(32)ĺBL$;:280T$;:AN$AN$T$280VT:HT(AN$):868:KP,0:A35,24::540::5:A$" CATEGORIES ":500:QR092:2:2:50? AN$"":VT:HT:868:T1L:"_";:T:T1L:(8);:T T$:2000:T$J$T$K$T$L$T$M$T$N$T$O$T$P$T$Q$370 "(T$)27ġ:1620 ,T$(8)340 6AN$""ĺBL$;:280 @(AN$)1AN$"":BS$;:280JAN$(AN$,(AN$)1):BAN4AN6AN11AN2ĭAW31AW1A$" USE A NUMBER FROM 1 TO 31 ":250R 50 21::1:958:22:500:510:VT:24:BS$;:BS$;:AN$(AN$,(AN$)5) 21:4:958::A$" N FOR NO DATE ":500:A$" FOR NUMBER UNDER 10 TYPE A 0 FIRST ":500::VT:2I,DESSERTS/SNACKS,FROZEN FOODS,HEALTH/BEAUTY,MISCELLANEOUS,SAUCES/PASTAn+(T$)96(T$)123T$((T$)32)~+16368,0:$" FOR NUMBER UNDER 10 TYPE A 0 FIRST ":500:(AN$"":HT:VT:868:"__/__/19__";:QR110:(8);: 2T$:2000:T$"0LETE COUPONS,VIEW/SELECT COUPONS,PRINTOUT ALL COUPONS,DELETE EXPIRED COUPONS,DELETE FILE,AMOUNT SAVED* COMPANY/BRAND,CATEGORY #,PRODUCT TYPE,COUPON VALUE $,EXP. DATE,COUPON NUMBERG+BEVERAGES,BREAKFAST,CLEANING/PAPER,CANNED FOODS/SOUPS,DAIRY/DEL12813ī1770")(KY)128276002)BL$;:1640O)VT:HZ:MU$(NU):NUNU1k)VTVT2:NU7NU1:VT8u)1640)VT:HZ:MU$(NU):NUNU1)VTVT2:NU1NU7:VT20)1640)KP,0:NU880,860,860,860,860,1470,1530)e* ADD COUPONS,DE70 (J750$(TTK0:NU1DEXDEX1(^35,24:KP,0:HZ14::6:1:868:A$"SELECT AN OPTION":500:8:QR17:HZ:MU$(QR)::QR:550:8:NU1:VT8(hKP,0:VT:HZ::MU$(NU):(r(KY)1271650(|(KY)128211710((KY)12881740 )(KY)TAL OF $"AN$".":610:510:1620x'BL$(7):BS$(8)(95)(8):D$(13)(4):KY16384:KP16368:XY40:FL$"COUPONS"'MU$(7),QU$(6),ITEM$(500,6),D%(500),SU$(9),PLACE$(6),DD%(500),TK%(100):I17:MU$(I):I:I16:QU$(I):I:I09:SU$(I):I("5::A$" DELETING FILE ":500:w&D$"OPEN"FL$:D$"DELETE"FL$:D$"OPEN"FL$:D$"WRITE"FL$:"0":"0":D$"CLOSE"FL$:1620&35,24::5::A$" AMOUNT SAVED ":500::AN$(SA):430!'8:A$" WITH THE COUPONS YOU HAVE SO FAR REDEEMED YOU HAVE SAVED A TOOVED FROM THE FILE AND A NEW COUPON FILE WILL BE CREATED WITH NO COUPONS IN IT.":610%1:18:958:"DELETE THE FILE? ";::"(Y/N)";::" _";:(8);:T$:2000:T$"N"T$"Y"ĭ(T$)27ĺBL$;:1490%T$"N"(T$)271620&35,24:18:1:958:2215::A$" NO EXPIRED COUPONS ":500::1460w$:6::A$" NUMBERS OF EXPIRED COUPONS DELETED ":500::9:A$AA$:610$510:1620$35,24::A$" DELETE THE FILES "::5:500::10::540U%8:A$" IF YOU DELETE THE FILE ALL COUPONS WILL BE REMTED":500z#9:7:"TYPE DATE: ";:VT9:HT19:40:B$(AN$,4)(AN$,6):AA$"":I1DEX:C$(ITEM$(I,5),4)(ITEM$(I,5),6)#B$C$ITEM$(I,5)"EMPTY":J14:ITEM$(I,J)"":J:ITEM$(I,6)"0":TKTK1:AA$AA$(I)" - ":(AA$)245IDEX#I:TK730,$271620?"d1:22:958:A$" TURN ON THE PRINTER "::500:510"n:24:33,1::T:H1DEX:I16:1:QU$(I);:18:ITEM$(H,I):I::H:0:TK0:33,40:1620 #x35,24::540:5::A$" DELETE EXPIRED COUPONS ":500:::A$"COUPONS BEFORE DATE WILL BE DELE1::T:H1TK:JTK%(H):I16:1:QU$(I);:18:ITEM$(J,I):I::H:0:TK0:33,40:1620!F:35,24:8:A$" PRINTOUT ALL COUPONS "::500::540!P1:22:958:"TYPE PRINTER SLOT #? ";:T$:2000:T(T$):T$"1"T$"7"ĭ(T$)27ĺBL$;:1360"Z(T$)"N"T$"Y"ĭ(T$)27ĺBL$;:1290C T$"N"(T$)27TK0:1620 1:22:958:"TYPE PRINTER SLOT #? ";:T$:2000:T(T$):T$"1"T$"7"ĭ(T$)27ĺBL$;:1310 ((T$)271620 21:22:958:A$" TURN ON THE PRINTER "::500:510W!<:24:33,15:VTVT1:VT:19:868:ITEM$(I,J):J:19::ITEM$(I,6)::820I:CT0Ģ22:1:35,24:958:A$" NOTHING FOR THAT CATEGORY "::500:510:1620TK01620# 1:22:958:"PRINTOUT COUPONS SELECTED? ";::"(Y/N)";::" _";:(8);:T$:2000:T$"ĭ(T$)27ĺBL$;:1220+(T$)271620P15:1:958:I16:2:QU$(I):T$"A"āI1DEX:VT14:J15:VTVT1:VT:19:868:ITEM$(I,J):J:19::ITEM$(I,6)::820:I:1280ACT0:T(T$):TT$SU$(T):I1DEX:TT$ITEM$(I,2)VT14:CTCT1:JVA2SASAVAQITEM$(AN,5)"EMPTY":I14:ITEM$(AN,I)""::ITEM$(AN,6)"0"`690:107035,24::540:420:2::"A";::" SHOW ALL"::::A$" SELECT COUPONS ":500:1:16:958:"WHICH CATEGORY _";:(8);:T$:2000:T$"0"T$"9"T$"A"1200`(T$)271620|j1:22:958:5::"N";::"OT REDEEM ";::"R";::"EDEEM ";::"D";::"OUBLE _";::(8);tT$:2000:T$"N"T$"R"T$"D"ĭ(T$)27ĺBL$;:1140~T$"N"1200(T$)271620VA(ITEM$(AN,4)):T$"D"VAle in the statement.":PR1:120:PR050n212920,12960=0x2X3V02X12940,12950,12960j02 LINED SKIPPED~02 LINED SKIPPED02"LINE 12960 PRINTED"0230:`12A$"ON...GOSUB chooses a subroutine to branch to according to the value of the variable iN/2X4ĺ"STATEMENT 12830": X does not equal 8 so this line is skipped/(2X8ĺ"STATEMENT 12840 IS PRINTED":this statment is true and isprinted/2230:$0d2A$"ON...GOTO chooses the line number to branch to according to the value of the variabthe ending value is reached.":PR1:120=.1PR0:12720,12740H.1I15O.1IU.1_.130:.2A$"IF...THEN executes a statement if the condition is true. If the condition is not true the statement is skipped.":PR1:120:PR0. 212820,12840/2X8T LINE 12670"4-1:removes return to line 12680:-1D-130:'.1A$"FOR/NEXT is used to create a loop. FOR is used to start the loop and identify the index variable and the starting and ending values. NEXT is used to continue loop execution until e next RETURN statement sends the program to the statement following the second most recently executed GOSUB.":PR1:120:PR0,B112620,12690,L112640,V1"RETURNED TO LINE 12630",[112695,`1"AT 12640",j112670,t1** NOT EXCUTED ** -~1"NOW Ad after the GOSUB.":PR1:120:PR03+012510,12550>+012540\+0"RETURNED TO LINE 12520"g+012560|+0"AT LINE 12540"+1:returns program execution to line 12520+130:},81A$"POP removes the most resent RETURN address and on seeing th12430"*012470&*0"AT LINE 12450"1*012430O*0"FINISHED AT LINE 12470"Y*030:"+0A$"GOSUB executes a subroutine at the line number following the GOSUB. RETURN is used at the end of the subroutine to return program execution to the next comman̠±²宠㮮Ů̠㮮Ů̠Ů̠art reading from the first item of the first DATA statement in the program.":120:30:)p0A$"GOTO is followed by a line number and sends control unconditionally to the line with that number.":PR1:120:PR0)z012420,12470)012450*0"NOW AT LINE variable FAITH from the DATA*(/A$" ";\(/A:reads real variable 7.23 from the DATAi(/A" ";(/A%:reads integer variable from the DATA(/A%" "(/ FAITH,7.23,6(030:W) 0A$"RESTORE is used to cause the next READ statement to st$"READ/DATA are separate commands that work together. DATA is used to create a list of items and then READ is used to use them in the program. DATA is read in the order it is placed in the program.":PR1:120:PR0'/12220,12280:(/A$:reads string &.A6&/A37: assignment statement without LET=&/AG&/30:&D/A$"CLEAR is used to reset all the variables and internal control information to its state at the beginning of the program. Program code is not affected by clear.":120:30:'/A0%."SPEED = ZERO"%.1001%."SPEED = 100":%.255M%."SPEED = 255"W%.30:%.A$"LET is an assignment statement which is used to assign a value to the variable after it. It is an optional statement.":PR1:120:PR0%.12020,12050&.A45y pressed.":PR1:120:PR0+$".11820,11830B$,."TYPE NAME: ";NA$K$6.NA$U$@.30:$|.A$"SPEED = sets the speed at which text characters will be sent to the screen. 0 is the slowest rate. 255 is the fastest rate.":PR1:120:PR0$.11920,11970%.and after the keypress continues.":PR1:120:PR0B#-11720,11760U#-"PRESS A KEY"]#-T$v#-"PRESS ANOTHER KEY"~#-T$#-T$#-30:$.A$"INPUT accepts a line of characters from the current input device. It must be ended with the [RETURN] ke