' +JJJJ ?\>m0M='+l> /+l   d]@ŵLҦ]]LF L}BBL] X  ` 鷎귭෍ᷩ췩緈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)*++`FG8`0($ p,&"ųųೳŪŪųųij  !"#$%&'()*+,-./0123456789:;<=>?   1 '" *"( (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"):$(%"%:$(%"%$$2%4%$$2%4%$(2()!)E(!8b $!H(+ "@H !D)"E` @ $ C ` DQ &J80^݌Hh ü ü݌ ռ ռ ռA ļD ļ? ļAEDE?HJ>h Լ ռ ռ ռ`HJ>݌h Hh݌`葠葠ȔЖȔЖȠHIHHHHhHH݌hHhHh݌H6 VDP (ED Z $0x8x D- ܸDD# H8`?E Vk *f???0xE Hh D#-EEE8` D ܸx D - ܸx8`-0ݩ?ʥD EEE`   LDcpq` [` ~  LӜu`".Q`pNФbptťܥm2<(-Py0\|e<6e<g< JJJJj귍hI  aUL@ kU8  L  Q^R(jQ0l^l\  wUuW ԧ H h@ [_ /QSIRb_L`LLLL`ª`LQLYLeLXLeLee ўQH\(h0L& Ꝥ$`( 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 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õ`  \ 濭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-.#(#p @àΠ̠@跻~!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䵍䵩m嵍`"L ŵ8ŵH ~(`( d ֠Ġz# u`:"THAT STUDENT NUMBER WAS NOT FOUND":"TRY AGAIN OR EXIT"::I11800:I:5020D$;"READ "N9$;",R";RC;",B0":S,CO$,NM$:CO$"E"5020CO$"N"5130AV0:K13:PT(K)0:KK13:J1NU(K):D$;"READ "N9$;",R";RC;",B";(100K55J5):SC:PU":RC1D$?:15);"YOUR CHOICE";:Q:Q5050,5080,5140z::B$;"1 TO 3 ONLY---TRY AGAIN":I11500:I::5020:"WHAT IS THE STUDENT NUMBER";:SND$;"READ "N9$;",R";RC:S,CO$,NM$:CO$"E"5070SSN5080RCRC1:5060P:3:PP(I)0:I:D$;"OPEN "N9$;",L350":I13:D$;"READ "N9$;",R0,B";100I55:NU(I):J1NU(I):D$;"READ "N9$;",R0,B";(100I55J5)SC:PP(I)PP(I)SC:J:I:"DO YOU WISH AVERAGES FOR:"::"1 ONE STUDENT"::"2 ALL STUDENTS"::"3 RETURN TO MEN"RETURN TO CONTINUE,K FOR KEY";:C$:C$"K"ıCD$;"OPEN "N8$IhD$;"READ "N8$:I$:4600D$:I$:CV(37):CV204570:"HIT RETURN TO CONTINUE";:C$:4560:"PRESS RETURN TO CONTINUE";:C$D$;"CLOSE "N8$ I1 ";NM$::"TESTS";15);"HOMEWORK";30);"CLASS PART":34,3:33,10vI13:32,(I1)15::J1AS(I):BYI100555JD$;"READ "N9$;",R0,B";BY:PP:D$;"READ "N9$;",R";RC;",B";BY:SC:D$(J64);" ";SC;"/";PP:J:I/32,0:33,40:34,0:(24):UMBER";:SN@D$;"READ "N9$;",R";RC:S,CO$,NM$:CO$"E"4130SCO$"O"4100aQ14110k4500}RCRC1:4060SSN41004500:4010"Q14150,40106"NOT FOUND--- TRY AGAIN OR EXIT":I11800:I:4010A:5);S;" W\\a+q`q\f+qqm\\k+qr\\p+q\\ s+qu+q\.[qq`\\*+qqm\/+qqr\\4+qq\9+qUq`\\\>+qqm\C+qqr\\H+qq\M+UVWYR+qq\\W+q`\\\+q%\(#'_*<(\**UVWY*[*]à*qq\\+q`\\+qW\\ +q`q\+qmq\\+qr\\#+qKq\\\\ +qq\%+'ijk!'f7'ijk ijk l m nl m n'ijk''ijkijk''g hgh''g hgh'`$<('`6%\@'`t'ij!ky'ij!k~'ij!k'ij k'ij k'ij k'i jk'i jk'i jk'i jk'i jkQ'i jki jk ijk!ijk"ijk#ijk$$'ijk)'ijk.'i jk3'i jk8'i jk='i jk B'i jk G'i jk L'i jk Q'ij k V'ij k['ij k`'ij!ke'ij!kj'ij!ko'ij"kWQ @]Jqqd\Oq_\TqK\Yq?q\^qKqd\cq?q\'#[(#]Ǡ2#dede <#M[!']ŽҠĠҠ 'Lf'ijk'ijkؠ٠)_ ca(נɠנ٠ çӠԠŠΧԠՠǠȠŠ)D a(ӠϠ)  d6?e& `.?6@r<()r$& 0 q6q\' : KM6 D d6?e o+ a(ՠŠנĠŠ)0 oa(נԠŠҠϠ)! a(ŠԠǠȠš) a(ŠŠŠӺ)n ca( àĠŠƠǠȠɠʠˠ̠͠ΠϠРѠҠӠԠՠ֠נ.?6@r<()r$  *d6?e4KM6d#e&>oa(ӠϠР)Ho Rd6?e"\q.?6@r`<()r<()r$\f`<()r$ p`<()r%bE()G'z`<()r%a@*#rE()G_R d6?e KM6ME$,L25"|BI1LA0BD$;"READ ASSNAME$,R";IABASSNAME$(I)HBIaBD$;"CLOSE ASSNAME$"gBPF GET ASSIGNMENT WEIGHTSZFD$;"OPEN ASSWT%,L4"dFI1LAnFD$;"READ ASSWT%,R";IxFW(I)FIFD$;"CLOSE ASSWT%"FG8J SUBROUTIG(N)((T(W100))1000)10&:M(N)M,:O> SUBROUTINE TO GET ALL GRADES[>A1LAu>D$;"OPEN G%";A;",L4">N1LN>D$;"READ G%";A;",R";N>G(N,A)>N>D$;"CLOSE G%";A>A>hB GET ASSIGNMENT NAMESrBD$;"OPEN ASSNAE$,L25"6I1LN,6D$;"READ NAME$,R";I:6NAME$(I)A6IW6D$;"CLOSE NAME$"]6: SUBROUTINE TO SORT WEIGHTED AVERAGES:M0:W0:T0:I1LA:G(N,I)1MM1:G(N,I)1ī15060:WWW(I):TTG(N,I)W(I):I:AVNT NUMBER.D$;"OPEN L%,L4"3.D$;"READ L%,R2";.LAN.D$;"CLOSE L%"T/}2 SUBROUTINE TO GET LAST ROSTER NAME2D$;"OPEN L%,L4"2D$;"READ L%,R1"2LN2D$;"CLOSE L%"26 SUBROUTINE TO READ ROSTER NAMES6D$;"OPEN NAM)* SUBROUTINE TO PRINT PAGE HEADINGS/*B+"PERIOD ";P$;\ +40(CLASS$))CLASS$g+Q0ı +"DATE OF RUN: ";TIME$*+"INCLUDES ASSIGNMENTS TO #";LA4+"LAST ASSIGNMENT NAME IS: ";ASSNAME$(LA)>+ . SUBROUTINE TO GET LAST ASSIGNMEASS DATA FOR SHEET HEADINGS9'D$;"OPEN CLASSPOOP$,L25"D'I12b.'D$;"READ CLASSPOOP$,R";Iu8'CLASSPOOP$(I)|B'IL'D$;"CLOSE CLASSPOOP$"V' CLASSPOOP$(1)=PERIOD`' CLASSPOOP$(2)=CLASS$j'P$CLASSPOOP$(1)t'CLASS$CLASSPOOP$(2)~'0:"DO YOU WANT TO CHANGE ANOTHER WEIGHT ";8C$TC$"Y"C$"YES"5000^5700iX11000tb12000lA1LAvD$;"OPEN G%";A;",L4"D$;"WRITE G%";A;",R";N0D$;"CLOSE G%";AA'' SUBROUTINE TO GET CLREAD ASSWT%,R";AW(A)1D$;"CLOSE ASSWT%"_:"THE CURRENT WEIGHTING FOR ASSIGNMENT"|"NUMBER ";A;" IS ";W(A):"WHAT IS THE NEW WEIGHTING ";W(A)D$;"OPEN ASSWT%,L4"D$;"WRITE ASSWT%,R";AW(A)D$;"CLOSE ASSWT%"800:X::6230>$jD$;"WRITE "N9$;",R";RC;",B0":SN:W$:NM$e$tD$;"WRITE "N9$;",R";RC;",B31":Y$~D$;"CLOSE "N9$:6000$@D$;"CLOSE "N9$: GET OUT$J:(20):10);"THANK YOU":20"::RC1g#L"WHAT IS THE STUDENT NUMBER ":SN::"WHAT IS THE NAME ":NM$::"WHAT IS THE GRADE ":Y#VD$;"READ "N9$;",R";RC:S,CO$:CO$"E"6240#WSSN6250#XRCRC1:6230$`::"STUDENT NUMBER ";SN;" NOT FOUND--- TRY AGAIN OR EXIT":X110J:"N":"NO NAME"f"J:LJJ3:RCRC1:D$;"WRITE "N9$;",R";RC;",B0":H100L:"N":"NO NAME":L"K:RCRC1:D$;"WRITE "N9$;",R";RC;",B0":"999":"E":"END OF FILE":D$;"CLOSE "N9$:6000"8Q2W$"O""=Q3W$"D" #BD$;"OPEN "N9$;",L35;" ";:KDT!J1KD:RCRC1:D$:"INPUT STUDENT ";J;"'S NAME ":NM$:(NM$)26140p!"INPUT THE GRADE ";:Y!D$;"WRITE "N9$;",R";RC;",B0":H100J:"O":NM$!D$;"WRITE "N9$;",R";RC;",B31":Y:D$:6150"D$;"WRITE "N9$;",R";RC;",B0":H10Y CLASSES ARE TO BE INCLUDED IN THE FILE ";:CL:RC0 D$;"OPEN"N9$;",L350":D$;"WRITE"N9$;",R0,B0":"000":"O":"GRADE KEY":D$ X13:D$;"WRITE "N9$;",R0,B";100X55:"0":X !:K1CL:D$:"WHAT HOUR ";:H::"HOW MANY STUDENTS IN HOUR ";H FILE NAME":N9$:(N9$)86050U:B$;" TOO LONG-- TRY AGAIN":I11800:I:6040sN8$N9$"GD":N9$N9$"LI"D$;"OPEN"N8$:D$;"WRITE"N8$:" A LISTING OF CODE LETTERS, POINTS POSSIBLE AND CONTENTS OF ";N9$:D$;"CLOSE"N8$:D$4 ::"HOW MANISH TO:"iz:"1 MAKE NEW FILES"::"2 ADD A NEW STUDENT"::"3 DROP A STUDENT"::"4 RETURN TO MENU":15);"YOUR CHOICE";:Q:Q6040,6200,6200,400::"1 TO 4 ONLY---TRY AGAIN"::I11800:I:6010 ::"IN 8 LETTERS OR LESS INPUT THE NEWT(K)PT(K)SC:J8AV(K)PT(K)100PP(K):AVAVAV(K)3?KD$::S;" ";NM$:"TEST AVE ";AV(1):"HW AVE ";AV(2):"CP AVE ";AV(3)::"TOTAL AVE ";AVL13000:L:Q15020 RCRC1:5080D$;"CLOSE "N9$:400p::"DO YOU WWALT JON,4,WM& STOPPEL BILL,4,WM> WATSON ANDY,4,WM[ WILKERSON MISSIE,4,WFu WILLCUT SCOTT,1,WM GREGORY SAMMIE,4,BM PALMERTREE DONNA,4,WF BLANKENSHIP T A,5,WM CHESSER SCOTT,5,WM CRUMP BERNARD,5,BM4,BM2 GREGORY ERIC,4,BM7< HINES CYNTHIA,4,BFQF LAMPKIN BRIAN,4,WMlP MATTHEWS KENNY,4,BMZ MCCAFFERTY RENEE,4,WFd MCMURRAY JOHN,4,WMn NORWOOD SABRINA,4,BFx POWERS WESLEY,4,BM SIMPSON KEVIN,4,BM  STIRE"YES"20040,n28200#,MqN1LN+,yQ16,y20040>,|yQ0I,y20040O,} +Pn:RLN11!+UnK(RLN)1)+ZnK;?+dn10)NAME$(X(R));T+fnM(X(R))128270^+gn" ";o+hnI1M(X(R))y+in"*";+jnI+nn36)AVG(X(R))+xnK13(K13)İ19000+nR+nQ1Ċ0+n:"DO YOU WANT TO SEE THEM AGAIN";+nC$ ,nC$"Y"C$mP1*mB1LN)*mAVG(H)AVG(B)PP1F*mAVG(H)AVG(B)HBPP1M*mBX*nX(P)H_* nHk*nQ1Ċ2v*(n11000*2n:"********* RANKED AVERAGES *********"*(&fA1LAF(0fA;T(:f6)W(A);j(Df10)ASSNAME$(A);z(If25)MA(A);(Nf36)ASSTAVG(A)(XfA13(A13)İ19000(bfA(cfT0(dfW0(efI1LA(ffTTASSTAVG(I)W(I)(gfWWW(I)(hfI)ifCAVGЭG(N,A)1ī26070'eTTG(N,A)+'eNTNT1M'eNAME$(N)"AVAILABLE"NTNT1T'eNu'eASSTAVG(A)(T(NT100)100)'eMA(A)MA'eA'eQ1Ċ2'e11000'e:"********** ASSIGNMENT SUMMARY *********"'f:" ASSIGNMENT NUMBER CLASS"^Q1Ċ00&^:"DO YOU WANT TO SEE THEM AGAIN";8&^C$U&^C$"Y"C$"YES"20040`&^24100&e SUBROUTINE TO CALCULATE CLASS AVERAGES BY ASSIGNMENT, AND WEIGHTED CLASS AVERAGE&eA1LA&eT0:NT0&eMA0&eN1LN&eG(N,A)1MAMA1'eY ************"=%8^"ROSTER STUDENT CURRENT"j%B^"NUMBER NAME AVG."p%L^|%V^I1LN%`^I;%j^7)NAME$(I)%k^" ";:M(I)124180%l^J1M(I)%n^"*";%p^J%t^36)AVG(I)%~^I13(I13)İ19000%^I&"C$"YES"ī20040$V220305$V:"CHECK ANOTHER";=$VC$[$VC$"Y"C$"YES"ī20040f$V22000$] SUBROUTINE TO CALCULATE AVERAGES, PRESENTED BY ROSTER NUMBER$]N1LN$]15000$]N$^Q1Ċ2$$^11000%.^:"************ CLASS SUMMAR#TVA;5)W(A);9)ASSNAME$(A);4#VVG(N,A)122106G#XV33)"MISSING"R#YV22115b#ZV37)G(N,A){#cVA13(A13)İ19000#fVA#hV15000#rV(20)#|V"AVERAGE TO DATE IS: ";AVG(N)#}VQ1Ċ0#~V"DO YOU WANT TO SEE THEM AGAIN";#VC$$VC$"Y "U11000;"U:"WHAT ROSTER NUMBER DO YOU WANT TO SEE ";B"VNN" VQ1Ċ2Y"V11000u"V:"ROSTER NUMBER: ";N;""V40(NAME$(N)))NAME$(N)",V:" ASSIGNMENT STUDENT""6V"NO. WT. NAME MARK""@V#JVA1LALASS AVERAGES BY STUDENT";!N" 5. RETURN TO BASIC MENU"S!N" 6. PRINTER ON"l!N" 7. PRINTER OFF"!N:"PICK ONE: ";!NC!NC22000,24000,26000,28000,60,31000,31100!U SUBROUTINE TO OUTPUT INDIVIDUAL STUDENT MARKS WITH AVERAGE TO DATE THE DATE? ";TIME$$ *N12000:130006 4N14000:16000H >N17000:18000S HN11000 RN:"DISPLAY OF DATA IS IN FOUR FORMATS:" \N" 1. STUDENT FILE" fN" 2. CLASS AVERAGES BY STUDENT" pN" 3. CLASS AVERAGES BY ASSIGNMENT"!zN" 4. RANKED CNE TO DISPLAY 13 LINES OF OUTPUT FOR CRT USE DELETED WITH PRINTER USAGER:JQ1ıv=J:"PRESS RETURN TO CONTINUE ";~BJC$LJVJ N"DO YOU WANT HARD COPY? ";C$"NC$"Y"C$"YES"Q1$NC$"Y"C$"YES"ĺ"TURN ON PRINTER NOW!" %N"WHAT ISF A PRODUCTION LINE.""~"ALL MEMBERS SHOULD TAKE PART IN THE PRODUCTION PROCESS AND SHOULD BE ASSIGNED SOME OPERATION TO PERFORM."""MAKING SURE THAT FINISHED PRODUCTS ARE FREE OF DEFECTS IS THE RESPONSIBILITY OF THE QUALITY CONTROL MANAGER."v#"E BEGINNING TO MAKE PLANS FOR STORAGE."!j"IN PREPARING A WORK SCHEDULE YOU SHOULD TAKE INTO CONSIDERATION TIME ALLOWED TO CLEAN UP THE LAB AND PUT UP ALL MATERIALS EACH WORK DAY.""t"IN PRODUCING YOUR PRODUCT YOU SHOULD ALWAYS TRY TO AVOID THE USE OOME DISTANCE AWAY." V"AN INVOICE OR SALES SLIP SHOULD ACCOUNT FOR EVERYTHING BOUGHT BY THE CORPORATION. THIS IS THE METHOD USED TO ACCOUNT FOR THE MONEY SPENT BY THE CORPORATION."'!`"YOU SHOULD WAIT UNTIL THE PURCHASED MATERIALS ARE DELIVERED BEFORNOW WHO WAS ABSENT ON WHAT DAY. BY DOING THIS HE WILL NOT HAVE TO CALL ROLL EVERY DAY."B"SOMETIMES BIDS CAN BE OBTAINED BY PHONING LOCAL STORES." L"ALL PURCHASES SHOULD BE KEPT LOCAL BECAUSE OF THE DELAY REQUIRED IN CORRESPONDING WITH COMPANIES SE PURCHASING DEPARTMENT AND WILL NEED A STAFF OF TWO OR THREE EMPLOYEES."$"YOUR CORPORATION SHOULD BE RUN JUST LIKE A REAL BUSINESS."."ALL REQUISITION FORMS SHOULD BE GIVEN TO THE PRESIDENT."X8"REQUISITION FORMS ARE KEPT SO THE TEACHER WILL KION OCCURS, PREFERRED STOCKHOLDERS ARE PAID OFF FIRST."{"THE TWO MOST IMPORTANT DEPARTMENTS ARE PRODUCTION AND SALES.""IF ONE DEPARTMENT DOES NOT WORK CORRECTLY, IT SLOWS DOWN THE WORK OF OTHER DEPARTMENTS."I"THE PRESIDENT IS THE HEAD OF THNS OR UNSAFE ACTS ON THE PART OF THE WORKER.""MARKET RESEARCH IS A PROCESS BY WHICH SALES ARE STUDIED BEFORE THEY ARE ACTUALLY MADE.""THERE ARE 3 PARTS OF MARKET RESEARCH: MARKET ANALYSIS, MARKET SURVEY, AND SALES FORECAST."7"WHEN LIQUIDATT."@"SALE SLIPS ARE NEEDED TO ACCOUNT FOR THE MONEY SPENT.""MATERIALS AND SUPPLIES THAT ARE DELIVERED SHOULD BE CHECKED CAREFULLY FOR DAMAGES."-"IT IS THE DUTY OF THE SAFETY DIRECTOR TO ALWAYS BE ON THE ALERT TO SPOT UNSAFE WORKING CONDITIORIALS NEEDED TO BUILD ONE UNIT.""THE MARK-UP IS THE DIFFERENCE BETWEEN THE COST OF PRODUCTION AND DISTRIBUTION OF THE PRODUCT, AND THE SELLING PRICE.""A PURCHASE ORDER IS THE COMPLETE LISTING OF THE ITEM, PRICE, AND PLACE WHERE IT WILL BE BOUGH PURCHASING DEPARTMENT IS TO BUY ALL PRODUCTS TO INSURE SUCCESS.""THE PARTS LIST IS A LIST OF THE PARTS GIVING THE PART NUMBER, THE PART NAME, AND NUMBER OF PARTS NEEDED TO COMPLETE ONE UNIT." "THE MATERIAL LIST IS A COMPLETE LISTING OF THE MATEPz"MORE INCOME CAN BE EXPECTED IF EACH PRODUCT IS CONSTRUCTED INDIVIDUALLY.""THIS CORPORATION CAN BE A SUCCESS EVEN IF YOU SIT AROUND AND TALK ALL THE TIME.""A CORPORATION IS A BUSINESS THAT IS OWNED BY ONE PERSON."A"THE PURPOSE OF THENG TO HOLD YOU BACK."P\"THE COST OF A SHARE OF COMMON STOCK IS TWO DOLLARS."f"THE VICE PRESIDENT OF SALES IS RESPONSIBLE FOR MAINTAINING THE CHECKING ACCOUNT AND HANDLING ALL COMPANY MONIES."p"ADVERTISING IS HELPFUL IN GETTING PRODUCTS SOLD."N,6,WM!& SIMPSON RICHEY,6,WM:0 YOUNG JOHNNY,6,BMT: BISHOP FENTON,6,BMoD WILLIAMS JAMES,6,WMN PATE WALTER,5,WMX END,0,0ADY CALVIN,6,BM$ HALL LONN,6,WM> HARRIS J PAUL,6,WMV HAWKINS KEN,6,WMq JOHNSON PEGGY,6,BF JONES JOE,6,BM KOHERS GERALD,6,WM NASCE RICHARD,6,WM OUTLAW VANESSA,6,BF PAYNE GREG,6,WM SCALES JOH WARE DENISE,5,BF-^ WELCH DENNIS,5,WMFh WRIGHT BUTCH,5,WM_r COLEMAN ERIC,5,BMx| HOWIE DARREN,5,WM BASSETT MIKE,6,WM BELL BARRY,6,BM CARTER CARY,6,WM COLEMAN LYNDON,6,BM FORSIDE JAMES,6,BM GAN HOWELL BARBARA,5,WF/ HUNT DENTON,5,WMJ MITCHELL MITCH,5,WMd NETTLES DUANE,5,WM PETERSON JONATHAN,5,WM" PUTT BRUCE,5,WM, RONE DAVID,5,WM6 RUSSELL BILLY,5,WM@ SMITH LINDA,5,BFJ TRIPLETT OTIS,5,BMT WHEREBY A PREDICTION OF FUTURE SALES IS MADE?","SALES FORECAST","SALES TALLY","MARKET RESEARCH","MARKET ANALYSIS""MARKET ANALYSIS, MARKET SURVEY, AND SALES FORECAST ARE THREE PARTS OF:","MASS PRODUCTION","MARKET SURVEY","MARKET RESEARCH","SALES"qEY","NONE OF THE ABOVE","ALL OF THE ABOVE""WHAT IS THE NAME GIVEN TO THE PROCESS BY WHICH SALES ARE STUDIED BEFORE THEY ARE ACTUALLY MADE?","SALES FORECAST","SALES TALLY","MARKET RESEARCH","MARKET ANALYSIS"r"WHAT IS THE NAME GIVEN TO THE PROCESSFORECASTS."e0"A MARKET SURVEY IS IMPORTANT BECAUSE A PRODUCT MUST BE MADE WHICH PEOLE WILL LIKE."0"IT IS SUGGESTED THAT THE PRICE FOR A SHARE OF STOCK IN YOUR CORPORATION BE KEPT AS LOW AS POSSIBLE."URING PRESIDES AT ALL COMPANY MEETINGS."c/"TARGET DATES CAN BE USED AS A GOOD PLANNING DEVICE."/"SINCE THE VP OF MANUFACTURING GIVES DIRECTIONS TO BEGIN PRODUCTION, HE DOES NO WORK." 0"MANY IMPORTANT DECISIONS ARE MADE ON THE RESULTS OF SALES N A STUDENT OPERATED BUSINESS IS 50%."."WHEN SELECTING A PRODUCT TO PRODUCE, IT IS WISE TO CONSIDER THE EQUIPMENT AVAILABLE TO YOU."."THE CORPORATION SECRETARY IS RESPONSIBLE FOR PUBLISHING THE ANNUAL REPORT."(/"THE VICE PRESIDENT OF MANUFACTPORATE AFFAIRS."[-"PREFERRED STOCKHOLDERS HELP ELECT THE OFFICERS OF YOUR CORPORATION."-"THE BOARD OF DIRECTORS IS THE BODY WHICH DECIDES HOW MUCH TO PAY IN WAGES, SALARIES, AND COMMISSIONS."&."THE USUAL PERCENTAGE PAID FOR SALES COMMISSIONS IORT TO THE BOARD OF DIRECTORS."p,"COMMON STOCK IS THE ONLY VARIETY OF STOCK THAT CARRIES VOTING PRIVILEGES.","ANY MEMBER OF YOUR CLASS CAN BUY AS MANY SHARES OF COMMON STOCK AS HE PLEASES."-"ALL COMMON STOCKHOLDERS HAVE EQUAL VOICE IN THE CORj+d"OFTEN A STUDENT CORPORATION WILL SELECT A NAME WHICH REFLECTS THE TYPE OF PRODUCT THEY ARE SELLING."+n"THE BEST WAY TO GET CAPITAL IS TO TAKE OUT A LOAN AT THE BANK.",x"VICE PRESIDENTS HAVE TO KEEP A DAILY PROGRESS RECORD SO THAT THEY CAN REPl*F"THE PRESIDENT OF YOUR CORPORATION IS THE OFFICER WHO IS RESPONSIBLE FOR PREPARING THE ANNUAL REPORT."*P"STOCK REPRESENTS OWNERSHIP IN A CORPORATION."*Z"EACH STUDENT WHO BUYS A SHARE OF COMMON STOCK OWNS AN EQUAL AMOUNT OF THE CORPORATION." CE PRESIDENT OF MANUFACTURING IS RESPONSIBLE TO SEE THAT PLENTY OF RAW MATERIALS ARE ON HAND TO KEEP PRODUCTION GOING.")2"PRODUCTION OF BAD PARTS AND PRODUCTS IS EXPENSIVE."*<"THE WHOLESALER USUALLY BUYS AT A HIGH PRICE AND SELLS AT A LOWER PRICE."TO BE COMPLETED BEFORE PACKAGING THE PRODUCT."("A TRIAL RUN IS THAT PART OF PRODUCTION WHERE THE WORKERS DECIDE WHERE TO GO IN THE EVENT OF A FIRE DRILL."("IF PROPER PLANNING HAS BEEN DONE, PRODUCTION SHOULD GET OFF TO A GOOD START."w)("THE VICORPORATION WILL PERFORM IN CASE YOU DECIDE TO DO MEDICAL WORK."'"A FLOW CHART IS USEFUL TO SHOW HOW EASILY PAINT FLOWS ON THE PRODUCT."'"FINAL ASSEMBLY OF PARTS SHOULD BE THE LAST STEP IN MASS PRODUCTION.".( "QUALITY CONTROL IS THE LAST STEP ]&"WHILE YOU ARE WAITING FOR SUPPLIES TO ARRIVE, YOU SHOULD SIT AROUND AND SHOOT THE FAT."&"WHEN SUPPLIES ARRIVE, YOU SHOULD HAVE ALREADY MADE ARRANGEMENTS FOR STORAGE OF THEM."@'"AN OPERATION ANALYSIS IS A STUDY OF THE VARIOUS OPERATIONS YOUR ING AGENT SHOULD GET BIDS ON THE SUPPLIES."%"WHEN SUPPLIES ARE PURCHASED, IT IS VERY IMPORTANT THAT THE PURCHASING AGENT RECEIVE A SALES SLIP TO VERIFY THE CAPITAL EXPENDITURE."%"YOUR CORPORATION SHOULD HAVE AN ITEMIZED RECORD OF ALL PURCHASES."SEMENT CAMPAIGN IS TO BRING THE PRODUCT TO THE ATTENTION OF YOUR CLASSMATES."$"WHEN SUPPLIES ARE NEEDED, A REQUISITION FORM SHOULD BE FILLED OUT."+%"IF YOUR CORPORATION HAS A CHOICE OF TWO OR THREE SUPPLIERS FROM WHOM TO BUY SUPPLIES, ;THE PURCHASTHE VICE PRESIDENT OF SALES AND HIS STAFF HAVE THE JOB OF PLANNING THE ADVERTISEMENT CAMPAIGN AND MANAGING THE SALES."#"ONLY THE VICE PRESIDENT OF SALES AND HIS STAFF WILL BE ALLOWED TO SELL THE CORPORATION'S PRODUCT."M$"THE PURPOSE OF THE ADVERTIӠ̠Š)$ca(ŠźŠԠ)%&a(ՠԠϠŠՠԠ)*0a(ՠ͠Ƞ̠Š)-:a(ԠŮϠӠԠŠ)"Da(Ơ٠נǠ)Q)&ca(ȠԠ٠Š)#a(ӬĠ͠))ca(ԠŠԠŬŠ)&a(ӠԠԠРҠҮ)#a(ŠŠԠ̠ŠĮ))a(ϠҠӠҠ)%a(ĠҠ|R@ M6(ca(ՠ٠ŠРϠ)'a(ΠҠŮΠՠŠ)*a(ϠԠŬϠԠŠ) a(ŠŠ͠Π§)$a(ԠŠĠԠ̩)+a(ȠԠ̠ŠҠ)a(ϠΠ)*6a(Ӡ̠ŠΠàŠ)'@a(̠ΠŠԠƠŠ)Jc,Ta(ΠŠàŮŠĠŠ)#^a(Ġ٠)+ha(Ơ̠ŠӠŠ)rca(ԠΠϠ)))a(ȠӠԠŠĠ̱) a(ȠӠĠ)ca(ŠԠРӠϺ)#a(Š̱̱)-ca(ԠӠԠҠԠӠ),"a(ΠŠŠɮŮ)-,cca(ŠԠРӠ)xa(Š) a() a()a(ӠĠ) a()a() a()a()ca(ԠΠϠ)R@ M6+ca(ϠΠŠӬՠԠ)+a(̠ŠӠԠҠŮҬϮ)%cca(ԠΠϠ)R@ #M6((a(ŠǠӠŠ)'2a(ҠϠנŠҠ)*<a(РŠΠӠҠ)Fa(Ӯ)Pca()Za(̱) da(Ů)na(]̠Ǡ] ]׮ȠŮ]ҬϮ] M6*a(̠Ǡ͠)ca(ˠέ͠)ca( )a(׮ȠŮ)a(     "WHAT IS THE TERM USED FOR CLOSING OR DISSOLVING A BUSINESS?","LIQUIDATION","MONOPOLY","ARBITRATION","COLLAPSE""END","END","END","END","END"DHH@@@@@H);"RUN SCHOOLMENU"NU"$1 FILE HAS BEEN DELETED"B u::"PLEASE WAIT FOR A LITTLE WHILE"m v"UNTIL THE NEW FILE HAS BEEN CREATED" xI2600038000 I,0 I D$"BSAVE SCHOOL1,A26000,L12000" :::"THE NEW BLANK FILE HAS BEEN CREATED" I12000:I (4 #"DELETE";:2 %" ANY EXISTING STUDENT FILE."\ F"TO RUN THE PROGRAM TYPE THE WORD ";k K:"YES": N"ANY OTHER WORD WILL RETURN YOU" P"TO THE MENU" ZA$ dA$"YES"110 iD$;"RUN AAA" nD$;"DELETE SCHOOL1" s:::"THE SCHOOL BOB LOWREY? 4640 W. 110 TH AVE.;WESTMINSTER, COLO.N 469-2924ZD$(4)q STUDENT FILE INI:::"STUDENT FILE INITIALIZATION PROGRAM":::"THIS PROGRAM WILL CREATE A BLANK" "STUDENT FILE. WHEN RUN, IT WILL ""  oPa(ԠҠĠŠӮ)7oS(ӠçϠԠΩϠ)&@`@:()$ ,KM6Z6dedede.?6rde.?7rq ]ͫΠƠŠâ]@dedede(deM6(oPa(٠Ӡ)4oP S(ҠԺ)'`$4oP S(Ҡź)'`$4o P S(ŠԺ)'`$4o P S(Šź)'`$/]ӠΠŠϠҠŠŠ͠`]Ӡ٠ǠϠٮӠԠ٠ŠĠǠϠӮH]ԠӠΠŠӠŠԠӠŠa@E(Πìɬ) Kedeidedededefdedeide@dedededededededefd ehd!ed"ed#e`d$ed%ed&ed'ed(ed)ed*e`@Qdq@p()q.?Jr.?KrN@"rD42rD42r@p()]Ĥ̩Ģnd e@p@]Ѥ]xde8deHdededededede ded efd eid ed ed e`ded %a()GR`%a@E()G \bG[]ؠԭ&q`" ]ˠϠˠҠ]٠Π]ΠҠE(]Ӡ̠͠ҠҬԠҠ٠(2]̠Ŭ̮Ϯ٠@p()[]έ deq.?r`$de\a@G[X]Ǿbq.?r`%qlq.?r[ ]̠ԭ%qq1?r*`'%a()G4`%a()G>`d%a()GH`d eM`.? r%[a(ˠҺ)F.? rQ] ӭUVWa()GY[]ҭҤq8rañq.?ròq.?r8ñrdOñ8òr8ò8òrre"]ҠҠңŠ# ]Ġǭ#]Šŭ #]Š̠Ơŭ'#]Ġ٠Πέ(_#d]ŠϠ̠ӭndexdeD@H@@@@@@PG@@@@@@@@WG@׍ԠŠӬְıζ ]ӠΠŠϠҠŠŠ͠`]Ӡ٠ǠϠٮӠԠ٠ŠĠǠϠӮH]ԠӠΠŠӠŠԠӠŠa@E(Πìɬ) Kedeidedededefdedeide@dedededededededefd ehd!ed"ed#e`d$ed%ed&ed'ed(ed)ed*e`@Qdq@p()q.?Jr.?KrN@"rD42rD42r@p()]Ĥ̩Ģnd e@p@]Ѥ]xde8deHdededededede ded efd eid ed ed e`dedS;" ";( I115:H(IR):(H);:I:/ G< G530G RE,G\ ::RR50:SS1e 165165ETURN" P"YOU TO THE MENU"3 ZA$:A$"YES"110E dD$;"RUN AAA"K nr x:"ENTER STUDENT STARTING NUMBER"y S RS:RR50A50 :"ENTER TEST NUMBER. (1 - 20) E:EE15 :: "ENTER TEST GRADE, TYPE -5 TO END": :"# ";:I I1Y$ XI,((B$,I,1))+ I6 P(0)G ZZ1:XX50P 160i D$;"RUN SCHOOLMENU"NU"SHAN 200.)" X% X0X1991209 ZX:XX50A50h :::"ENTER NAME, 15 CHARACTERS OR LESS" "ENTER ";::"END";::" TO RETURN TO THE MENU" "STUDENT # ";Z B$ B$"END"270 Y(B$) Y15160 IX1X15:I,0 ";::" YES";::" TO CONTINUE. ANY OTHER"S <"WORD WILL RETURN YOU TO THE MENU"[ FA$m PA$"YES"100 ZD$;"RUN AAA" d nX(0) x:::"ENTER THE STUDENT NUMBER YOU WISH" "TO BEGIN WITH.(MUST BE GREATER THAN" "ZERO AND LESS Tk BOB LOWREY? 4640 W. 110TH AVE.; WESTMINSTER, COLO.N 469-2924ZA26050rD$(4): CONTROL D~ :::" STUDENT NAME PROGRAM"::"THIS PROGRAM WILL ALLOW YOU TO ENTER"("THE NAMES OF THE STUDENTS.+ 2"TYPEŠd8re1`@*#r9()$]ӠԠ٠Ϳ@p@*#;@rrha(Ġ)E@E(֬)FE()Fa(Š)E@E(֬)FE()F]Ϡ̠ĢӮŧŠǠϠŮY` a()a(q_vNa@E(Š)a@E(Π)a@E(Š)O]נŠנԠӠŠŠǬԧŠ͠ΠԠ_UVWq--rrUVW$d8re.?rY]ͫӠΠƠ e.?ra@GYc$]ͫΠƠŠ¤0`.?%r$d!ed eM6oYXKd"e bq4loa(Ҡ͠٠ҺϠԩ)>vM6a(͠)FGS()'`$`$v-rqԠԠϠŠήM6o,qUVW8.?r.?rrX&W]ȠŠǠӠԠŠԠԠŠԠΧԠԠ̠`.?r<()r$ -rq bE()G` %a()GqUVWd]ԠŠŠϠɯϠӠΠ;Ja@E(Ǡ)FE()F]ŠǠԠϠWTa@E(ң)a@E(Σ)]ԠŠŠ͠͠ɯϠӠΠ^Ѱqѱq :]ŠǠӠΠٮנЍͺΠύŠŮō A$ LA$"NO"110 MIAA8, N:::I,03 OIB PI1(A$)] Z:::AI1,((A$,I,1))d dIv nD$;"RUN AAA"NU"Wx BOB LOWREY@ 4640 W. 110 TH AVE.; WESTMINSTER, COLO.O 469-2924gD$(4): CONTROL D DATE ENTERING PROGRAMA26000<F:::"ENTER THE DATE (E.G. 1-23-80)"H"TYPE ";::"NO";::" TO RETURN"I"TO THE MENU" K  WALTER BJOHNSON BPAYTON WALZADO LZENITH TBONNEI BSANDFORD JRESIDENT KMAYBERRY FWALTER DBANKS EMARTIN BQUIIUM JSIMPSON JAPPLE IIBLOWREY EWILLIAMS RMAASKE PREESE SMARTELL MRIFFITH T(MASSAROTTI MWAY GMICHELS BLOWREY MLOWREY e.8-12-79ANDERSON Jb-2dBINSON J2c<KJOHNSON AAAPWSANDERSON GK#d,G                               dQURN TO CONTINUE" T$ 2121;:K: L120! Z(RL15). Z01898 WW1B CZCI Lk W0ĺ21);"NO AVERAGE ":200} VCW:21);V C0:RR50:SS1: W0 M19210 :"HIT RETURN TO CONTINUE":T$ M0::: MM1 I  "HIT RETU TO THE MENU" 2A$' <A$"YES"809 FD$;"RUN AAA"? Ph Z::"ENTER STUDENT STARTING NUMBER"o dS n:"ENTER STUDENT ENDING NUMBER" xE zC0:W0:M0 }:: RS:RR50A50 ISE "# ";S;7); K115:P(RK):(P)" BOB LOWREY? 4640 W. 110 TH AVE.;WESTMINSTER, COLO.N 469-2924c D$(4): CTRL DnC(20)zA26050S10::S);"STUDENT GRADE AVERAGES"::"TO CONTINUE TYPE ";::"YES";::" ANYTHING ELSE WILL" ("RETURN YO  ԍȠĠՠſӠŠ۠ˠ٠͍ĠΠǍԠ٠ŠҠî̠Ӡ芊ƠŠǠӍþ٠ӍľŠӍ˾Ǎ̾ˠӍӾŠΠˍվˠӍѾӿԠŠˠĠӠԠΠˠĠӠ٠ϠՠԠǿōϠӠćˠ̍ˠŠŠčŠϠįōĠōԠ٠ϠΠӠþϠԠҠ٠Ҡ٠Ϡ΍٠ӮŠΠנŠŠҠŠ٠ҍξϠŠǠŠҍ̭þξϠٍ̠ҮŽĠՠŠϠŠҠٿӠӠ٠ΠϠ v̢ø*+Umsr=7APŠԿſΠԿſſԠӠΠef L{hhh`HHHd` `( jL{hhh` : :  9"1") $!&ɀ& t  L t L @`pŠǠŭӠ`K `cdKK w KL`[\ `HHHΕ0+>@jj9hhh`A(  ގA@З L{HHH6 - MORE SHIFT SYMBOLS"l:"A MINUS WILL GIVE LETTERS FROM ONLY THE":"INDICATED ROW, AND THE FINGERING" "WILL BE GIVEN IMMEDIATELY. NO MINUS":"SIGN WILL GIVE LETTERS FROM THAT ROW""AND ALL LOWER ONES. A 0 LEVEL WILL":"ASK FOR RIGHT OR LUCTIONS, YOU WILL BE":"ASKED FOR A LEVEL. TYPE A NUMBER"\"FROM 0 TO 6, PLUS OR MINUS":"THE LEVELS REFER TO THE KEY ROWS."::" 1 - HOME ROW, AS - L;"" 2 - BOTTOM ROW":" 3 - UPPER ROW":" 4 - TOP ROW":" 5 - SHIFT SYMBOLS"" "AFTER 100 LETTERS A SUMMARY OF ERRORS":"AND SPEED IS GIVEN. THE SPEED HAS NO" "'WORDS PER MIN' MEANING - IT IS JUST A":"MEASURE OF YOUR PROGRESS. IT IS MORE" "IMPORTANT TO REDUCE THE ERRORS!!" :CU$ P2$::"AFTER THESE INSTRNGER. DO NOT LOOK AT THE" "KEYBOARD - IF YOU DO NOT KNOW THE RIGHT":"FINGER, YOU WILL BE TOLD AFTER ABOUT":"A SECOND": "EVERY TIME THAT THE WRONG KEY IS HIT,":"THE PROGRAM BEEPS. IF THE CORRECT KEY" "IS HIT, A NEW LETTER IS SHOWN":S YOU WANT INSTRUCTIONS?": CU$"HIT ANY KEY TO CONTINUE"R P2$:(P2$)15000j (P2$,1)"Y"5000 :"DURING THE EXERCISE, A LETTER WILL BE":"ADDED TO THE SCREEN. YOU SHOULD PRESS" "THE CORRECT KEY FOR THAT LETTER WITH":"THE CORRECT FI3500 J113030 P2$" ": P3$LV$(I):P4$FG$(J)R I5J9P3$LV$(2)m P2$:P1$;P3$;" ";P4$; :J5J7ĺ"REACH" I3(J1J11)I1J0ĺ"REACH" H P3$LV$(2):P4$FG$(I5) 3200 :"TOUCH TYPING EXERCISES -"::"DO" ERER1:1025' $AVAV(GAV)N- .7 7NN1N 8:N;" LETTERS":c BER;" ERRORS": L"SPEED INDEX = ";((10000AV))10  P1$RT$:P2$SH$LF$:J5(J1I4)3020 P1$LF$:P2$SH$RT$ I53030 I43029 J0"% TYPING PRACTICE 2.1 10/21/78/4000<N1100^J((AD)CD):I((AD)EF)tFF2J11(J6)A$(J,I);G0GG1GGXİ3000H(16384):H1281025 16368,0 HH128Y(A$(J,I))HY1060 "     x BOB LOWREY@ 4640 W. 110 TH AVE.; WESTMINSTER, COLO.O 469-2924gD$(4): CONTROL D DATE ENTERING PROGRAMA26000<F:::"ENTER THE DATE (E.G. 1-23-80)"H"TYPE ";::"NO";::" TO RETURN"I"TO THE MENU" K% $ $-- -7.# :L-`9 \-% $ $a9 -.x :L4-a9` :a Q=`9 b Q=a9 ` .. . ɛBɍ1 I i) .. .. .L- : $L- . ..`8`HJJJJ -h) ɺi2)?? @ 00,MqN1LN,yQ1!,y20040),|yQ04,y20040:,} ) %` \-VW_>>UVW/?;@rr>q/?;@rr>@Brp@*#rY>[W>]ΠϠŠŠƠΠϠҠŠƠӠ֮>]>]ԠĮ٠>]>]ǠŧQԠ)66a(ҠŠŠӠ)F8dr8rE()6Q:]Ԡ:]:o:P8';@rr:R@v>[#>]ԠĠƠԠȠ%>@p()`$>UVW_>>`$>UVW_>>`$>U̬Ԡ)52a(ϠĠͬԠ)d"ecq@3o J3P8';@rrT3a@^3[6]6]ĠƠŠ6] 6M86r6a(ĠƠŠǠ)56ca(ՠĠ)FE(ԠӠԠƠ)F'6a(ՠĠ)FE()H+TR+`%q7U+S(ҠŠӠՠȠϠŠĠΠ)&@V+[.].]Ԡ.] .M86r.o .P /a(Ԡ٠)/[2]2]ԠԠ2]2M86r`$@3%2ca(ϠŠ֠Ǯ).'o8'P B'a(ǠŠ)o'[*]*]Š*]*+c54+qa(Ԡ̠ϠՠԿԠҩ)D+a(Š)E+a(Ҡ)F+a(Ҡ)G+a(ӠƠ͠Y] bN@"r lN@"r vN@"r\']ԠŠ\*]ԠƮ[?](#]Ġ٠)#] 2#M86r<#o P#P a(Ԡ)d#[']͠Ҡ']'M86r]Ҡ$'a(ͺp() `%@p() `%@p() `%@p()* `%@p()* `%@p(): `%@p() [ ]X]Š ed ed ededededeLdedede`1deddePMdedePMdeddeM ]ϠϠŠ̠ [ ]ĠԠ ] `%@p() `%@?r.?6?r.?6?r.?6?r;q.?6?r.?6?r @Y_]]ԠԠ\> jM86rto ~P8';@rra@[]Š̠]Tdede0dededededed ed e]d2]Ԡ\:]Ԡ٠Πä`@:()$ \*]Ԡ_x ]`@9()$6]Ġ`@:@$, q\(#]Ԡ٠!]"\]̠ #q$UVWY_x,UVWd%6q.?6?6@r$d6?eM6[M#d6?eM6o P a(ŠĠ)Q]ĠĠZ]Ǡ\P;@r^a@`cb['d\X]ŠԠϠ'x\]ԠŠԠϠ¤\ KN@"(rM6\ _d'o@p(ǠŠ)\Z@p(Ҡ)\Z1@p(Ӡ̠ŠҠǠ)\Z oa(ӠçϠ),a(ӠŠŠҠϠŮ)`.?6@r$#`.     DATION","PRESIDENT AND BOARD OF DIRECTORS" "WHICH OF THE FOLLOWING IS NOT PART OF THE BUSINESS CYCLE?","ORGANIZING","PRODUCTION","RAMADA INN","LIQUIDATION" * "WHICH OF THE FOLLOWING IS PART OF MARKET RESEARCH?","MARKET ANALYSIS","MARKET SURVTS IS THE RESPONSIBILITY OF THE:","QUALITY CONTROL MANAGER","PRESIDENT","VP OF MANUFACTURING","NONE OF THE ABOVE"* "THE TWO MOST IMPORTANT DEPARTMENTS IN A CORPORATION ARE:","SALES AND MANUFACTURING","ENGINEERING AND PRODUCTION","ADVERTISING AND LIQUIRESPONSIBLE FOR SEEING TO IT THAT EACH WORKER IS ASSIGNED AN OPERATION TO PERFORM AND UNDERSTANDS EXACTLY WHAT TO DO?","PURCHASING AGENT","VP OF MANUFACTURING","VP OF PERSONNEL","NONE OF THE ABOVE"q"MAKING SURE THAT FINISHED PRODUCTS ARE FREE OF DEFECULD YOU HAVE IN YOUR RECORDS?","A REQUISITION FORM","A PURCHASE ORDER","AN INVOICE","ALL THE ABOVE" "WHAT IS THE AID USED TO SHOW THE ROUTING OF WORK ALONG THE PRODUCTION LINE?","ROUTER","FLOW CHART","ASSEMBLY LINE","NONE OF THE ABOVE" "WHO IS IN A HURRY WITHOUT DISCUSSING THE WORTH OF EACH IDEAS IS CALLED:","MARKET RESEARCH","GATHERING","COMPOSITION","BRAINSTORMING"c "RECORDS MUST BE KEPT ACCURATELY IN YOUR CORPORATION. IF A BOTTLE OF GLUE IS PURCHASED FOR $.59, WHICH OF THE FOLLOWING SHOIMED AND AUTOMATIC""THE MONEY LEFT OVER FROM A SALE AFTER ALL COST OR EXPENSE OF MANUFACTURING AND DISTRIBUTING THE PRODUCT HAS BEEN SUBTRACTED IS CALLED:","COLLATERAL","EQUITY","PROFIT","ALIMONY"~ "THE PROCESS BY WHICH A LOT OF IDEAS ARE LISTEDL ALLOW YOU TO MEET EXPENSES UNTIL RECEIPTS FROM SALES COME IN IS CALLED:","EARNEST MONEY","WORKING CAPITAL","A LOAN","STOCK" "THE TWO TYPES OF STOCK WHICH CAN BE HELD IN A CORPORATION ARE:","COMMON AND PREFERRED","FIRST AND SECOND","LIVE AND GUN","T A CORPORATION IS THE:","PRESIDENT","FOREMAN","EXECUTIVE COMMITTEE","BOARD OF DIRECTORS""THE MOST COMMON WAY OF ORGANIZING A BUSINESS TO PRODUCE GOODS IS TO ESTABLISH A:","MUTUAL TRUST FUND","PARTNERSHIP","MONOPOLY","CORPORATION"}"MONEY THAT WIL WHICH IS GAINED FROM THE SALE OF STOCKS IN A CORPORATION IS CALLED:","CAPITAL","INVENTORY","INCOME","INVESTMENT""THE SIMPLEST TYPE OF INDUSTRIAL OWNERSHIP IS:","INDIVIDUAL","PARTNERSHIP","CORPORATION","MONOPOLY"X"THE HIGHEST ELECTED POSITION IN";E$(X) X10);"C. ";F$(X)3 Y10);"D. ";Y$(X); Z:L ^X(IN)370U h375\ rXk wD$;"PR#0" |"REMOVE PRINTED MASTER AND INSERT NEW":"MASTER INTO THE PRINTER. PRESS THE":"'RETURN' KEY WHEN YOU ARE READY TO GO!";P$ q"THE MONEY 9P$"": P$=CTRL B TO DESELECT ENHANCED PRINT8 :Q$ @"****DIRECTIONS--PUNCH OUT THE SLOT CORRESPONDING TO THE":" BEST ANSWER!!" AP$ E: JX(I1)(IN) T3);C(X);". ";G$(X) U V10);"A. ";S$(X) W10);"B. 220 120: ::"LOAD THE PRINTER WITH A STENCIL OR"g "DITTO MASTER AND PRESS THE RETURN KEY" "WHEN READY TO PRINT ";P$ D$"": D$= CONTROL D D$;"PR#2" 1914,132 1: 6: 8Q$"": Q$=CTRL A TO SELECT ENHANCED PRINT0: 5);"A. ";Z$' 5);"B. ";V$9 5);"C. ";Q$K 5);"D. ";R$S : "DO YOU WANT TO KEEP THIS QUESTION? (Y/N) ";B$ B$"Y"120 DD1 C(D)D G$(D)A$ S$(D)Z$ E$(D)V$ F$(D)Q$ Y$(D)R$ DIN(100):Y$(100) iC(100)& jI(100)` n"HOW MANY QUESTIONS DO YOU DESIRE ON YOUR TEST? ";N p:"WHAT SHOULD THE FIRST NUMBER BE? ";I sII1 tDI xA$,Z$,V$,Q$,R$ 936 A$"END"ĺ"THAT'S ALL THE QUESTIONS YOU HAVE!!":220 A$: D$""* TEST GENERATION PROGRAM4936`"************************************"h(:o-82"TEST GENERATION PROGRAM"<:F"************************************"PX12000:XZ936 dG$(100):S$(100):E$(100):F$     z #?    حŠحԠӠ حԠӠӠحԠӠӠҠ' Ф  حŮŠ حŠ حŠԠحǠҠ حϠĠح̠ՠĠ ح̱0  !ԠΠǠ "ԠҠ*ԠҠɠŠǠŠ ǠŭӠˠ حӠ حŠ ̠ŠàȠŠϠҠΠ̠ǠԠŠŠԠĠԠ ԠĠԠààΠ̠ԠĠӠ٠̠ϠӠŠˠӠҠ&ӠҠŠ̠Š2]Ԡ\:]Ԡ٠Πä`@:()$ \*]Ԡ_x ]`@9()$6]Ġ`@:@$, q\(#]Ԡ٠!]"\]̠ #q$UVWY_x,UVWd%6q.?6?6@r$d6?eM6[M#d6?eM6o P a(ŠĠ)Q]ĠĠZ]Ǡ\P;@r^a@`cb['d\X]ŠԠϠ'x\]ԠŠԠϠ¤\ KN@"(rM6\ _d'o@p(ǠŠ)\Z@p(Ҡ)\Z1@p(Ӡ̠ŠҠǠ)\Z oa(ӠçϠ),a(ӠŠŠҠϠŮ)`.?6@r$#`.     "WHAT IS THE TERM USED FOR CLOSING OR DISSOLVING A BUSINESS?","LIQUIDATION","MONOPOLY","ARBITRATION","COLLAPSE""END","END","END","END","END"D WHEREBY A PREDICTION OF FUTURE SALES IS MADE?","SALES FORECAST","SALES TALLY","MARKET RESEARCH","MARKET ANALYSIS""MARKET ANALYSIS, MARKET SURVEY, AND SALES FORECAST ARE THREE PARTS OF:","MASS PRODUCTION","MARKET SURVEY","MARKET RESEARCH","SALES"qEY","NONE OF THE ABOVE","ALL OF THE ABOVE""WHAT IS THE NAME GIVEN TO THE PROCESS BY WHICH SALES ARE STUDIED BEFORE THEY ARE ACTUALLY MADE?","SALES FORECAST","SALES TALLY","MARKET RESEARCH","MARKET ANALYSIS"r"WHAT IS THE NAME GIVEN TO THE PROCESSDATION","PRESIDENT AND BOARD OF DIRECTORS" "WHICH OF THE FOLLOWING IS NOT PART OF THE BUSINESS CYCLE?","ORGANIZING","PRODUCTION","RAMADA INN","LIQUIDATION" * "WHICH OF THE FOLLOWING IS PART OF MARKET RESEARCH?","MARKET ANALYSIS","MARKET SURVTS IS THE RESPONSIBILITY OF THE:","QUALITY CONTROL MANAGER","PRESIDENT","VP OF MANUFACTURING","NONE OF THE ABOVE"* "THE TWO MOST IMPORTANT DEPARTMENTS IN A CORPORATION ARE:","SALES AND MANUFACTURING","ENGINEERING AND PRODUCTION","ADVERTISING AND LIQUIRESPONSIBLE FOR SEEING TO IT THAT EACH WORKER IS ASSIGNED AN OPERATION TO PERFORM AND UNDERSTANDS EXACTLY WHAT TO DO?","PURCHASING AGENT","VP OF MANUFACTURING","VP OF PERSONNEL","NONE OF THE ABOVE"q"MAKING SURE THAT FINISHED PRODUCTS ARE FREE OF DEFECULD YOU HAVE IN YOUR RECORDS?","A REQUISITION FORM","A PURCHASE ORDER","AN INVOICE","ALL THE ABOVE" "WHAT IS THE AID USED TO SHOW THE ROUTING OF WORK ALONG THE PRODUCTION LINE?","ROUTER","FLOW CHART","ASSEMBLY LINE","NONE OF THE ABOVE" "WHO IS IN A HURRY WITHOUT DISCUSSING THE WORTH OF EACH IDEAS IS CALLED:","MARKET RESEARCH","GATHERING","COMPOSITION","BRAINSTORMING"c "RECORDS MUST BE KEPT ACCURATELY IN YOUR CORPORATION. IF A BOTTLE OF GLUE IS PURCHASED FOR $.59, WHICH OF THE FOLLOWING SHOIMED AND AUTOMATIC""THE MONEY LEFT OVER FROM A SALE AFTER ALL COST OR EXPENSE OF MANUFACTURING AND DISTRIBUTING THE PRODUCT HAS BEEN SUBTRACTED IS CALLED:","COLLATERAL","EQUITY","PROFIT","ALIMONY"~ "THE PROCESS BY WHICH A LOT OF IDEAS ARE LISTEDL ALLOW YOU TO MEET EXPENSES UNTIL RECEIPTS FROM SALES COME IN IS CALLED:","EARNEST MONEY","WORKING CAPITAL","A LOAN","STOCK" "THE TWO TYPES OF STOCK WHICH CAN BE HELD IN A CORPORATION ARE:","COMMON AND PREFERRED","FIRST AND SECOND","LIVE AND GUN","TdQ";E$(X) X10);"C. ";F$(X)3 Y10);"D. ";Y$(X); Z:L ^X(IN)370U h375\ rXk wD$;"PR#0" |"REMOVE PRINTED MASTER AND INSERT NEW":"MASTER INTO THE PRINTER. PRESS THE":"'RETURN' KEY WHEN YOU ARE READY TO GO!";P$ q"THE MONEY 9P$"": P$=CTRL B TO DESELECT ENHANCED PRINT8 :Q$ @"****DIRECTIONS--PUNCH OUT THE SLOT CORRESPONDING TO THE":" BEST ANSWER!!" AP$ E: JX(I1)(IN) T3);C(X);". ";G$(X) U V10);"A. ";S$(X) W10);"B. 220 120: ::"LOAD THE PRINTER WITH A STENCIL OR"g "DITTO MASTER AND PRESS THE RETURN KEY" "WHEN READY TO PRINT ";P$ D$"": D$= CONTROL D D$;"PR#2" 1914,132 1: 6: 8Q$"": Q$=CTRL A TO SELECT ENHANCED PRINT0: 5);"A. ";Z$' 5);"B. ";V$9 5);"C. ";Q$K 5);"D. ";R$S : "DO YOU WANT TO KEEP THIS QUESTION? (Y/N) ";B$ B$"Y"120 DD1 C(D)D G$(D)A$ S$(D)Z$ E$(D)V$ F$(D)Q$ Y$(D)R$ DIN(100):Y$(100) iC(100)& jI(100)` n"HOW MANY QUESTIONS DO YOU DESIRE ON YOUR TEST? ";N p:"WHAT SHOULD THE FIRST NUMBER BE? ";I sII1 tDI xA$,Z$,V$,Q$,R$ 936 A$"END"ĺ"THAT'S ALL THE QUESTIONS YOU HAVE!!":220 A$: D$""* TEST GENERATION PROGRAM4936`"************************************"h(:o-82"TEST GENERATION PROGRAM"<:F"************************************"PX12000:XZ936 dG$(100):S$(100):E$(100):F$     dQ(NA$(0),1)" "Ģ12:868:"!!! ERROR - UNABLE TO READ DIRECTORY !!!":T |:1000o 1:" 80N":0,63998:0X23:D$T$A$(A) 4 NAME$(105),A$(105),T(105)L "X138:B$B$"=":j ,X10511:NAME$(X)B$: 6NAME$(0)(B$,19) @D$(4) E12:12::"READING CATALOG"::12:29 Y63075 ^2054:D$"CATALOG" c216,0:D$"PR#0":D$"IN#0":H h00 L40  MAXX) 85:34,227 23:958s "SELECT A FILE BY NUMBER (X TO END->";A$:A$"X"ĉ:: A(A$):AMAX2010 A1Ĭ T(A)66T$"BRUN " T(A)84T$"EXEC " T(A)65T(A)73T$"RUN "  23:T$A$(A) ((NA$(N),8,1))6520006 ((NA$(N),8,1))942000@ XX1Y A$(X)(NA$(N),8,30)s T(X)((NA$(N),2,1)) X20İ30:2000 X20X58X96İ80 X39İ40:2000 $X39X77İ90 .X58İ30:2000 8X77İ40:2000 BX96İ30:20,21:32,19:2:1::0 U33,40:32,0:23:1::v Z85:23:"IS YOUR PROGRAM LISTED HERE? Y/";::"N";::" ";:A$: dA$"Y"MAXN1:N105::2000 n23:958:34,2:35,21::35,24: 60:X0 N1105 (NA$(N),8,1)"="N105:2000 p8(ST6UVk,ȱk-`)E,-`b ::12:12:"ALIGNING MEMORY":63000xY140:"=";:::X;::5:A$(X):(" ";::X;::" ";:6:(A$(X),15):<1:9:"COMPUTER LEARNING CENTER":20:22:20:34,2:3: P33      KM6&oa(ӠϠŠҺ)-a(נԠŠҠӠ)+a(ŠˠĠĠŬ)-a(͠ҠԠ٠٠Šٮ)7 ca(ŠŠҠӠϠԮ) d6?e `$qq\' KM6 oP #a(ŠԠҠӠ)FUVWY?oP a()_lq6q\' KM6lY]٠Za(ԠŠҠƠ)E@*#rE(Ӡ)dcca(Šź)ccnUVWa@*-r#-rrG a()GY)ca(ӠŠҠ) d6?e!q.?6@r`$ d6?e]ٺ`ҠӠŠҠϠ) d6?e`.?6@r<()r$ d6?e M6UVWq/?r`$ q2UVW<-rq/?rA`-r%qFYK` $Po/ӠϠŠҺ)jo,ta(ɧ͠ǠϠŠ͠ˠ),~a(ĠҠΠŠŮŠ).a(Ԡנ٠ӠŠҠ)(a(ΠŠŮŠ͠Ӡ) a(̠ԠӮ)Dcca(ŠŠ\@_ ]\' KM6Aa(ĠՠŠϠ٠)a(Ӡ٠ҠӠҠΠҠ) d6?e$q.?6@r`$$ .d6?e8`<()r$B`<()r$$L]ˠĠĠ VKM6+`oPa(ϱ?eq.?6@r`$ d6?e ^q q &q0`-r$&:`$X DM6Ica()J\(#K_XM6ca()Y-rq bd"e lo\rv]٠٠r%a@*#rE()GY[co-a(ŠŠҠӠŠ)&a(ӠΠ̠Ү)GUVWY d"e qq`$`-r$_M6a(ӠԠ)G d6ՠ̠ΠŠ)@UVW-rqYJUVWT`/? r%-rq^Yhom\rn_rUVW |`-r%a()G"`-r%a@*#rE()GYcccUVW`-r%a()G"`-)Ha(ӠŮ)ca(ŠŠҠӠŠҠϠ) d6?e`.?6@r$ d6?e,M6\' 6KM6&8ca(Ԡ)c;\P/=a()%>a(_dedeM[ M6+ccPa(̠ΠŠǠ)cc!a(ӠϠŠҺ)cc.a(ԠŠҠϠŠΠ)(a(ǠӮ٠٠Š)+a(ԠĠŠŠŠŠҠӠŠ̠)G,xa(ΠՠŠĠӠ) yd6?ez`.?6@r$z {d6?e}qnqd\~qq2\\qqU\qqs\qxqd\qnq2\a(ԠȠŠҠ)0Fa(ǠϠȠҠĠǠ)G G\P_d3Pccca( àĠŠƠǠȠɠʠˠ̠͠)Ucc,Za(ΠϠРѠҠӠԠՠ֠נؠ٠)_[(dccca(ӠҠŠҺ)ic0na(`3M6o Pa(ԠנĠ)/cPa(٠ΠĠĠΠ) UVWY q6q\' KM6 qP a(Ԡ)c(cc,2a(ӺנŠӠƠ)'<{N@"rC@"r O4(r'@p()KTdede0dededededed ed e]d ed ed ededededeLdedede          WALTER BJOHNSON BPAYTON WALZADO LZENITH TBONNEI BSANDFORD JRESIDENT KMAYBERRY FWALTER DBANKS EMARTIN BQUIIUM JSIMPSON JAPPLE IIBLOWREY EWILLIAMS RMAASKE PREESE SMARTELL MRIFFITH T(MASSAROTTI MWAY GMICHELS BLOWREY MLOWREY e.8-12-79ANDERSON Jb-2dBINSON J2c<KJOHNSON AAAPWSANDERSON GK#d,G                   )100 G((CG)C)100< ::" PERCENTAGE OF GIRLS",B] ::" PERCENTAGE OF BOYS",Ge "24 ,"DO YOU WANT TO SEE SOME MORE? ";Z$ 6Z$"Y"ī110 @: J" GOOD-BYE" TB : "NUMBER OF BOYS ";B, :::F "NUMBER OF GIRLS ";GL V :: "****************************************"::: " NUMBER OF BOYS ",B : " NUMBER OF GIRLS",G CBG ::" TOTAL IN CLASS ",C B((CB)C ******************3 PERCENTAGE9(O2 PAUL CHASTAINU<iF APRIL 1980oPZ******************_MODIFIED BY CAROL SIMMONS DEC 1981dn: CLEAR SCREENx10:"****************PERCENTAGE**************"  TO SEE GRADES OF: "::"1 ONE STUDENT"::"2 ALL STUDENTS"::"3 RETURN TO MENU":ZD$15);"YOUR CHOICE";:Q:RC1:Q4050,4060,4040::B$;"1 TO 3 ONLY---TRY AGAIN"::I11800:I:4010D$;"CLOSE "N9$:400 :"WHAT IS THE STUDENT N"N9$;",R";RC;",B";BY:SC(0 C223130V1 D$:"HIT ANY KEY TO CONTINUE";:C$:C0:: D$:SN;" ";NM$;30);SC:RCRC1:3070D D$;"CLOSE "N9$:3000D$;"OPEN "N9$;",L350":I13:D$;"READ "N9$;",R0,B";I10055:AS(I):IR:"DO YOU WISH ",L350"_ D$;"READ "N9$;",R";RC;",B0":SN,CO$,NM$:CC1:SC0:H(SN100):D$:CO$"E"3080 "DONE-- HIT RETURN TO CONTINUE":C$:3140 HHR3100 D$ HRH:"HIT ANY KEY TO CONTINUE":C$:C0::"HOUR ";HR CO$"N"3120& D$;"READ :"4 RETURN TO MENU":I 15);"YOUR CHOICE";:Q:Q3040,3040,3040,400 ::"1 TO 4 ONLY---TRY AGAIN":II1800:I::3000 :"WHAT IS THE CODE LETTER FOR THE ASSIGNMENT (A-S)";:L$ RC0:BYQ100505((L$)65):C0:HR0 D$;"OPEN "N9$;1)"Y"2120:>D$;"WRITE "N9$;",R";I;",B";BY:GD:2020H"THERE SEEMS TO BE A PROBLEM-- TRY AGAIN OR EXIT ":J11800:J:2020RD$;"CLOSE "N9$:400 :"DO YOU WISH TO READ/CHECK:" :"1 TESTS"::"2 HOMEWORK"::"3 CLASS PARTICIPATION":FOUND-- TRY AGAIN OR EXIT":J11500:J:2020:"WHAT WAS THE CODE LETTER OF THE ASSIGNMENT (A-T)";:L$::"WHAT IS THE NEW SCORE";:GD:BYQ10050(5((L$)65)) D$;"READ "N9$;",R";I:S,CO$,NM$:D$*:S;" ";NM$;" CORRECT";:Q$ 4(Q$,TION"::"4 RETURN TO MENU"#D$X:15);"YOUR CHOICE";:Q:Q2050,2050,2050,2130::B$;"1 TO 4 ONLY--- TRY AGAIN":I11500:I::2020:"INPUT THE STUDENT NUMBER";:NU:I1IX:SN(I)NU2070I- B$;" THAT STUDENT NUMBER WAS NOT BY:GDCO$"E"1230*RCRC1:1170ED$;"CLOSE "N9$:1000eD$;"OPEN "N9$;",L350":I1D$;"READ "N9$;",R";I:SN(I),CO$:CO$"E"2020IXI:II1:2010:"DO YOU WISH TO EDIT:"::"1 TESTS"::"2 HOME WORK"::"3 CLASS PARTICIPA10050(5((L$)65))?D$;"WRITE "N9$;",R0,B";BY:PT$:D$|D$;"READ "N9$;",R";RC;",B0":SN,CO$,NM$:CO$"O"1210H2(SN100):HRH21190:HRH2:D$:"HOUR ";HRD$:SN;" ";NM$;30);"SCORE";:GDD$;"WRITE "N9$;",R";RC;",B";1W$"TEST:" MQ2W$"HW:"0 NQ3W$"CP:"W VD$;"APPEND "N8$:D$;"WRITE "N8$ `W$;L$;" ";PT$;" ";I$:D$;"CLOSE "N8$ jD$;"OPEN "N9$;",L350":RC1:HR0 tD$;"READ "N9$;",R0,B";BY:SC:SCSC1~D$;"WRITE "N9$;",R0,B";BY:SC:BYQE";:Q:Q1070,1070,1070,400U $:B$;"1 TO 4 ONLY-- TRY AGAIN":I11000:I::1000 .:"INPUT THE CODE LETTER FOR THE ASSIGNMENT (A-T)";:L$: 8"INPUT THE NUMBER OF POINTS POSSIBLE ";:PT$: B"DESCRIBE THE ASSIGNMENT";:I$ LBYQ10055:Q8000E :B$;" 1 TO 8 ONLY--- PLEASE TRY AGAIN":I11000:I::400t :5:"DO YOU WISH TO UPDATE"::: UPDATE 10);"1 TESTS": 10);"2 HOMEWORK": 10);"3 CLASS PARTICIPATION": 10);"4 RETURN TO MENU": 15);"YOUR CHOIC"3 READ/CHECK ADDED SCORES":B "4 DISPLAY STUDENT GRADES":` "5 CALCULATE AVERAGES":| "6 CREATE NEW FILES": "7 GET ANOTHER CLASS FILE": "8 EXIT THE PROGRAM": 10);" YOUR CHOICE";:Q Q1000,2000,3000,4000,5000,6000,40,960_ 2:B$;N9$;" IS TOO LONG---PLEASE TRY AGAIN WITH 8 LETTERS OR LESS ":I12000:I::40} <N8$N9$"GD":N9$N9$"LI" F :3:15);"MENU"::"DO YOU WISH TO :":: "1 ADD SCORES TO UPDATE": "2 EDIT SCORES IN EXISTING FILLES": :10:15):"CLASS GRADE BOOK"5 15:15M "BY STEVE TEBOW":^ I11500:Id xD$(4):B$(7)SN(150)"DO THE GRADE FILES ALREADY EXIST ";:Q$:(Q$,1)"Y"70 (:"WHAT IS THE NAME OF THE GRADE FILE ";:N9$:(N9$)          ASSNAME$(A)&D$;"CLOSE ASSNAME$"T:"DO YOU WANT TO CHANGE ANOTHER NAME ";\C$x&C$"Y"C$"YES"500005500D11000N:"WHAT ASSIGNMENT DO YOU WANT TO CHANGE"X"THE WEIGHTING ON ";bAlD$;"OPEN ASSWT%,L4"vD$;"D$;"READ ASSNAME$,R";A'ASSNAME$(A)@D$;"CLOSE ASSNAME$"p:"THE CURRENT NAME FOR ASSIGNMENT NO. ";A"IS ";ASSNAME$(A):"WHAT IS THE NEW ASSIGNMENT NAME ";ASSNAME$(A)D$;"OPEN ASSNAME$,L25"D$;"WRITE ASSNAME$,R";A @D$;"WRITE G%";A;",R";N(JG(N,A)=TD$;"CLOSE G%";Al^:"DO YOU WANT TO CHANGE ANOTHER GRADE ";thC$mC$"Y"C$"YES"ī5000r5300|11000:"WHAT ASSIGNMENT DO YOU WANT TO CHANGE ";AD$;"OPEN ASSNAME$,L25"AD$;"OPEN G%";A;",L4":D$;"READ G%";A;",R";NFG(N,A)[D$;"CLOSE G%";A:"THE CURRENT GRADE FOR ROSTER NUMBER ";N"FOR ASSIGNMENT NUMBER ";A;" IS ";G(N,A)":"WHAT IS THE NEW GRADE ";,G(N,A)6D$;"OPEN G%";A;",L4"D$;"WRITE NAME$,R";N"ZNAME$(N)8nD$;"CLOSE NAME$"fx:"DO YOU WANT TO CHANGE ANOTHER NAME ";nC$C$"Y"C$"YES"5000510011000:"WHAT ROSTER NUMBER DO YOU WANT ";N:"WHAT ASSIGNMENT NUMBER DO YOU WANT ";DO YOU WISH ";N.D$;"OPEN NAME$,L25"G D$;"READ NAME$,R";NUNAME$(N)kD$;"CLOSE NAME$"("NAME NUMBER ";N;" IS NOW ";NAME$(N)2"WHAT IS THE NEW NAME ";<NAME$(N)ANAME$(N)"AVAILABLE"İ7000FD$;"OPEN NAME$,L25"PO CHANGE?"&:" 1. STUDENT NAME"A" 2. STUDENT GRADE"^" 3. ASSIGNMENT NAME"}" 4. ASSIGNMENT WEIGHT"" 5. RETURN TO MAIN MENU":"WHAT DO YOU WISH, MASTER";CC5100,5300,5500,5700,60"WHAT ROSTER NUMBER %,R";AW(A)'D$;"CLOSE ASSWT%"211000G D$;"OPEN L%,L4"] D$;"WRITE L%,R2"d Aw$ D$;"CLOSE L%". 110008 "ANOTHER SET OF MARKS";B C$L C$"Y"C$"YES"60V 12000` 201011000 "WHAT DO YOU WANT TpIzD$;"OPEN G%";A;",L4"+I1LNGD$;"WRITE G%";A;",R";ISG(I,A)ZIoD$;"CLOSE G%";AD$;"OPEN ASSNAME$,L25"D$;"WRITE ASSNAME$,R";AASSNAME$(A)D$;"CLOSE ASSNAME$"D$;"OPEN ASSWT%,L4"D$;"WRITE ASSWT"WHAT IS THE ASSIGNMENT NAME ";1 ASSNAME$(A)^ "WHAT IS THE WEIGHTING FOR THIS WORK ";h *W(A)s 411000 >:"AFTER THE ROSTER NUMBER AND NAME, YOU" H"ARE TO ENTER THE SCORE FOR THAT STUDENT." RI1LN \I;5)NAME$(I); fG(I,A) FI PD$;"CLOSE NAME$"1 ZD$;"OPEN L%,L4"G dD$;"WRITE L%,R1"O nLNb xD$;"CLOSE L%"h p 60 11000:12000:13000:14000  "THE LAST ASSIGNMENT NUMBER WAS: ";LA "WHAT IS THIS ASSIGNMENT NUMBER "; A 11000 NG ROSTER NAME. WHEN YOU"D "HAVE EXHAUSTED THE NAMES, THEN TYPE"S "'LAST'."_ I140g I;u NAME$(I) NAME$(I)"LAST"LNI1 NAME$(I)"LAST"I40 I D$;"OPEN NAME$,L25" (I1LN 2D$;"WRITE NAME$,R";I <NAME$(I) $C1100,5000 L11000I V:"WHICH OF THE FOLLOWING DO YOU WISH?:"k `:" 1. ENTER CLASS ROSTER" j" 2. ENTER CLASS SET OF MARKS" ~:"PICK ONE: ";C C1200,2000 11000: "AS EACH NUMBER APPEARS, ENTER THE" "CORRESPONDI INPUT" Z" 2. READ OUTPUT"< d" 3. TERMINATE WORK"_ n:"WHAT IS YOUR PLEASURE? ";Cw xC1000,20000,32000}  11000 :"NEXT CHOICE:" " 1. ENTER NEW DATA" " 2. CHANGE EXISTING DATA" :"WHAT IS YOUR PLEASURE? ";CQ$ "";"NOMON I,O,C"1D$"": D$=CONTROL D\NAME$(40),G(40,50),W(50),ASSNAME$(50)i#AVG(40)t$M(40)%MA(50)&X(40)'ASSTAVG(50)(210000<11000AF"YOU HAVE THREE INITIAL OPTIONS:"KQ0 P:" 1. MAKE           CONTROL B RETURNS TO NORMAL PRINT: ,:I167:"-";:ID 6::J @W JA$,B,D$j TA$"END"ī540t ^TT1 hB1Q1 rB2Q2 |B3Q3 B4Q4 B5Q5 B6Q6 D$"BM"450 A(Q)A(Q)1 330 D$"BF"480HOOL":::8);"STUDENT HEADCOUNT PROGRAM"::::15);"DESIGNED BY" :7);"INDUSTRIAL ARTS DEPARTMENT":12);"COMPUTING CENTER": 19);"FOR": 20((TN$)9)2);"TEACHER: ";TN$  20((TD$)3)2);"DATE: ";TD$ # "Y$"":Y$: :< "WHAT IS TODAY'S DATE? (EX:MARCH 5 1985) ";TD$h TN$=TEACHER'S NAME TD$=TODAY'S DATEn u 2 CS$(29):CS$: 10 CPI Z$"":Z$: CONTROL A PROVIDES ENHANCED PRINT FOR HEADINGD I110::I:6);"HENDERSON JUNIOR HIGH SC" ***************************(H STUDENT HEADCOUNT PROGRAMd( LARRY S. ANDERSONj2< FEB. 11, 1980FP***************************ZdnxA$(N)330 7:"TEACHER'S NAME (EX:MRS. JONES): ";TN$     0 "S",91"W",74%"W",81/ ENDM GEORGE THOMPSON #122,0Y"H",70e"W",72q "W",77|"A",0 "A",0*"A",04"A",0>"A",0H"A",0R"A",0\"A",0f"A",0p"A",0z"A",0 ENDI,0"H",65"H",73&"H",722&"S",68<0 ENDV: EARL ROGERS #120,0bD"H",55nN"H",75zX"H",62b"S",63lF"W",74v "W",80"A",0"A",0 END STANLEY SMITH #121,0 "H",87 "H",88"H",85 T END(^ ANTHONY PRATER #117,04h"H",48@r"H",58L|"H",62X"S",63d"W",77n END JOSEPH PRATER #118,0"H",58"H",68"H",68"S",67"W",70"W",78"A",0 END LAWAYNE RICH #119"A",0 END+ STACY JACKSON #113,07"H",65C"H",60O"H",60["S",60g"W",71s"W",79~"A",0"A",0 END STEVE MCKEE #115,0"H",75"H",75""H",73,"H",746"S",81@"W",95J"W",9 END# FELETHA HOWARD #111,0/"H",73;"H",80H"H",80 T"S",75` "W",77j END DARREN HOWIE #112,0("H",752"H",68<"H",72F"S",79P"W",85Z"W",80d"W",95n"A",0x"A",0"A",0] +]׮ȠŮҬϮ]! ]͠ϠŠàa(ΠŮ)a(ŠŮ) 2a()4a(ͺ)<a(Π)Fa(ŠŮ)PQ  D$;"WRITE ASSWT%,R";I" 09 "D$;"CLOSE ASSWT%"R ,D$;"OPEN NAME$,L25"^ 6I140x @D$;"WRITE NAME$,R";I J" " TI ^D$;"CLOSE NAME$"SD$;"CLOSE CLASSPOOP$"1 D$;"OPEN ASSNAME$,L25"= I140Z D$;"WRITE ASSNAME$,R";Ic " "j I D$;"CLOSE ASSNAME$" D$;"OPEN L%,L4" I12 D$;"WRITE L%,R";I 0 I D$;"CLOSE L%" D$;"OPEN ASSWT%,L4" I140 D$"": D$=CONTROL D1"";"NOMON I,O,C"7Z("WHAT IS THE PERIOD NUMBER? "a2P<"WHAT IS THE CLASS NAME? "FCLASS$PD$;"OPEN CLASSPOOP$,L25"ZD$;"WRITE CLASSPOOP$,R1"dPnD$;"WRITE CLASSPOOP$,R2"xCLASS$      *"W11000:W100-Z124::Z_"****** THAT ' S ALL FOLKS ****"::::evEW1000:{B14C85AB15C86,AB15C872B936:::o" FINAL GRADES FOR STUDENT NUMBER- ";NS::"COURSE AVERAGE = ";GC::"NUMBER OF ABSCENCES- ";ABD0:C80::"************* USE 3103 ROUTINE FOR IED 4253 ***OP TEST POINTS- ";PT5"NUMBER OF ABSECENCES- ";AB?1100^GC((T1T2PGFEPT)4)C8h2000pNSy100LAB0C83VAB1C82`AB2C81jAB3C80tAB10C81~AB11C82AB12C83AB13C84 Af1100zTA(T1T2)21|LA(LG.75)(PG.25)KGC(TA.6)(LA.4)C8Y2000:NSb100936:"FINAL GRADES FOR IED 3703"::"TEST #1 GRADE- ";T1"TEST #2 GRADE- ";T2"PROJECT GRADE- ";PG"FINAL EXAM GRADE- ";FE"PTA.6)(LA.4)C82000#NS,100S 936:"FINAL GRADES FOR IED 3103"Y%t*"TEST #1 GRADE-- ";T14"TEST #2 GRADE-- ";T2>"TEST #3 GRADE-- ";T3H"PROJECT GRADE-- ";PGR"LAB GRADE-- ";LG\"NUMBER OF ABSCENCES-- ";ABGRADES FOR IED 2103"5::" TEST # 1 GRADE-- ";T1P"TEST #2 GRADE-- ";T2k"TEST #3 GRADE-- ";T3"LAB GRADE-- ";LG"PROJECT GRADE-- ";PG"NUMBER OF ABSCENCES-- ";AB 1100 TA(T1T2T3)3LA((LG.75)(PG.25))GC(00TA(T1T2)2!EP07350EP4D1>EP4D2LEP8D3[EP12D4jEP16D5yEP20D6PA((FFCOSLCBSPPWCTCEAEBSSGK1K2)13)DGC(TA.45)(PA.5)(CU.05)2000NS100936:" FINAL ;AE'"BRASS SCHULPTURE GRADE-- ";BSF"ST IN GLASS GRADE-- ";SGo"LEATHER KEY FOB/RIVET GRADE-- ";K1"LEATHER KY FOB/SNAP GRADE--";K2"CLAEN UP GRADE-- ";CU"NUMBER OF EXTRA PROJECTS-- ";EP"NUMBER OF ABSCENCES-- ";AB11q"FREE FORM GRADE-- ";FF1 v"COIL GRADE--";COI {"SLAB GRADE-- ";SLb "COMBO GRADE-- ";CBy "SLIP GRADE--";SP "POTTER'S WHEEL GRADE--";PW "COPPER TOOLING GRADE-- ";CT "COPPER ENAMELING GRADE-- ";CE"ALUMINUM ETCHING GRADE--"L(I), hI m:5 r"READY TO CONTINUE?? ";X$B R1600O R2760\ R3800i R4900w R54000 !R63020 X936 ]"GRADES FOR IED 1123": b"TEST #1 GRADE-- ";T1 g"TEST #2 GRADE-- ";T2 l"TEST #3 GRADE-- ";T3 HOW MANY TOTAL DAYS ABSENT? ";NOC "TYPE THEM IN ONE AT A TIME "c I1NO:"DATE -- ";L(I):Iq K1NO1 J1NOK L(J)L(J1)300 TL(J) L(J)L(J1) L(J1)T ,J 6K @ J"THE SORTED LIST IS: " TI1NO ^ R650006 "NUMBER OF STUDENTS IN CLASS-- ";NB NS1Nx ::"**************************************":: ::"READY FOR NEW STUDENT DATA INPUT "::: :" DO YOU WANT TO SORT AND TOTAL ABSENCES? (Y/N) ";S$ S$"N"500 "***********"::6 n"COMPUTE FINAL GRADES FOR: "::P x" 1. IED 1123"j " 2. IED 2103" " 3. IED 3103" " 4. IED 3703" " 5. IED 4253" " 6. EXIT PROGRAM" :" YOUR CHOICE-- ";R: R5540x NO(100)( FINAL GRADE PROGRAM2936b"****************************************"h(-" FINAL GRADE PROGRAM "0:2"****************************************"ZY11000:Yd: i"****************************     ]͠Ǯ"]Ġ٠ŠҠ]ΠϬ# ]ҠΠ)]ΠŠàҠϠҠcN@"2rC@"rC@"r#]Ҡ!(a(ϠŠ̠Ԡ) 2a(ϠĠ   0N$"NELSON"13001:"NO, I'M SORRY"1)N$@L221280W"2 PLUS 2 ARE 22"a1290w"2 PLUS 2 ARE 4" :"WOULD YOU LIKE TO TRY AGAIN? Y/N" V$:V$"Y"1200 V$"N"20:"THAT'S RIGHT, MR. GOTHIE IS ALWAYS RIGHT"129gSjM1L tM;1);L$&~/255T:"WOULD YOU LIKE ANOTHER? Y/N"\Q$mQ$"Y"1100|Q$"N"20:8:"SPECIAL COMPUTER ADDING":"WHAT IS YOUR NAME":N$:"HOW MUCH IS 2 PLUS 2"1)N$:LN$"MR. GOTHIE"1300$YYS:ZZS:S0:RR1!81000qL:7:"THIS SECTION ALLOWS THE PRINTING OF ANY MESSAGE ANY NUMBER OF TIMES"V:"ENTER THE MESSAGE":L$`:"ENTER THE NUMBER OF TIMES YOU WISH THE MESSAGE PRINTED":Le:"ENTER THE SPEED":SfS255S255(J)pY$(J)X$zF1.JJ1:JN1860;F1855SJ2N:16)Y$(J):y:"DO YOU WISH ANOTHER? Y/N":Q$Q$"Y"806Q$"N"20R0SY11R21030YS(YS)1050SZS(ZS)10601020K20384& L(FR):K);L;:RR1/ K:9 RR5C QQ1Q Q11180u :"HIT RETURN TO CONTINUE":Z$} Q1 ::"# NAME": FF50 I :"HIT RETURN TO CONTINUE":Z$ 2828 :TESTS 1 - 5":"2 :TESTS 6 -10":"3 :TESTS 11 - 15":"4 :TESTS 16 - 20":Ub zU1R16:126u {U2R21:126 |U2R26:126 }R31 ~FA50E50:::"# NAME"  Q1 IAB I;4); J115 S(FJ):(S); J :" TO CONTINUE. ANY"C 2"OTHER WORD WILL RETURN YOU TO THE MENU"K <A$\ FA$"YES"90n PD$;"RUN AAA" Z:::"ENTER STUDENT STARTING NUMBER":A dA0A20090 n:"ENTER STUDENT ENDING NUMBER":B xBAB200110O y::"ENTER:":"1 BOB LOWREY@ 4640 W. 110 TH AVE.; WESTMINSTER, COLO.O 469-2924g D$(4): CONTROL DsE26050{X7:X);"STUDENTS NAMES AND GRADES"#::"IF YOU WISH TO LIST THE STUDENTS NAMES" ("AND GRADES, TYPE ";::"YES";:  "& " DRAWER NU"R " MISS. STATE, MS."s " 39762"y FHOWEVER, IT WILL NEED SOME CUSTOMIZING"V d"TO SERVE THE PARTICULAR NEED OF A GIVEN"| n"TEACHER AND HIS/HER SITUATION." x "ANY QUESTIONS, COMMENTS, SUGGESTIONS" "CAN BE DIRECTED TO: DR. DAN BROOK" " IND. ED. DEPT.z  ::5@"GRADE LAST IS A PROGRAM WRITTEN BY DR."n("DAN BROOK, WA5FHT, A PROFESSOR OF IND."2"EDUCATION AT MISS. STATE UNIVERSITY."<F"THIS PROGRAM IS DESIGNED TO ALLOW A"P"TEACHER TO COMPUTE GRADES FOR A CLASS."' Z"  g BOB LOWREY= 4640 W. 110TH AVE.;WESTMINSTER,COLO.L 469-2924a D$(4): CTRL DmA26050x:::(S102S);"ENTERING TEST GRADES"<::"TO ENTER TEST GRADES TYPE ";::"YES";::" TO" F"CONTINUE. ANYTHING ELSE WILL R  0N$"NELSON"13001:"NO, I'M SORRY"1)N$@L221280W"2 PLUS 2 ARE 22"a1290w"2 PLUS 2 ARE 4" :"WOULD YOU LIKE TO TRY AGAIN? Y/N" V$:V$"Y"1200 V$"N"20:"THAT'S RIGHT, MR. GOTHIE IS ALWAYS RIGHT"129gSjM1L tM;1);L$&~/255T:"WOULD YOU LIKE ANOTHER? Y/N"\Q$mQ$"Y"1100|Q$"N"20:8:"SPECIAL COMPUTER ADDING":"WHAT IS YOUR NAME":N$:"HOW MUCH IS 2 PLUS 2"1)N$:LN$"MR. GOTHIE"1300$YYS:ZZS:S0:RR1!81000qL:7:"THIS SECTION ALLOWS THE PRINTING OF ANY MESSAGE ANY NUMBER OF TIMES"V:"ENTER THE MESSAGE":L$`:"ENTER THE NUMBER OF TIMES YOU WISH THE MESSAGE PRINTED":Le:"ENTER THE SPEED":SfS255S255(J)pY$(J)X$zF1.JJ1:JN1860;F1855SJ2N:16)Y$(J):y:"DO YOU WISH ANOTHER? Y/N":Q$Q$"Y"806Q$"N"20R0SY11R21030YS(YS)1050SZS(ZS)10601020Q$"N"206 :7:"ALPHABETICAL LIST OF WORDS">&N0H'NN1d*:"ENTER WORD NUMBER"N/"IF NO MORE WORDS ENTER 'A'"4Y$(N)>Y$(N)"A"850H807R BEGIN SORTWF0:J1\Y$(J)Y$(J1)900fX$Y$(J1)kY$(J1)Y$Z !T(T)&YY(TZ)#+999)0HX:8:"MULTIPLY FRACTIONS"Qb410alYBD:ZCEjv53510)B20)D30)Y10)"-"15)"*"20)"-"25)"="29)T30)"-"10)C20)E30)Z:"WOULLD YOU LIKE ANOTHER? Y/N"Q$Q$"Y"600  520 490! 5156 10)B20)D30)Yd 10)"-"15)"+"20)"-"25)"="29)T30)"-"y 10)C20)E30)Z  :"WOULD YOU LIKE ANOTHER? Y/N" Q$ Q$"Y"ī400 Q$"N"ī20 Y(BE)(CD) ZCE T0YZTY LIKE ANOTHER? Y/N" |Q$+ Q$"Y"200: Q$"N"20X :8:"FRACTION ADDITION"a 410j 485 "ENTER FIRST NUMERATOR" B "ENTER FIRST DENOMINATOR" C "ENTER SECOND NUMERATOR" D "ENTER SECOND DENOMINATOR" EHIS SECTION WILL PRINT YOUR NAME MANY TIMES VERY QUICKLY"T :"WHAT IS YOUR NAME"\ N$q N1100:N$1);w N12000 N N150 N$, " ,N12000 6N @N124 JN)N$ T ^N12000 hN r:"WOULD YOU#"2. ANYTHING PRINT". ("3. ADD FRACTIONS"K 2"4. MULTIPLY FRACTIONS"g <"5. ALPHABETICAL LIST" Z:"ENTER THE NUMBER OF THE DESIRED PROTION":A dA1200 iA21100 nA3400 xA4600 A5800 A61200 209 :8:"TE PROGRAM FOR ADDITION AND MULTIPLICATION OF FRACTIONS SHOULD HAVE MANY USESX Y$(50) EDUCATIONAL DEMO PROGRAM FOR ROY'S FOURTH GRADE WRITTEN MAY 1979 BY N.K. GOTHIE : :6:"THIS PROGRAM WILL DO THE FOLLOWING:" :"1. NAME PRINT"  [ NOTE THAT THERE IS A SECTION FIVE OF THIS PROGRAM WHICH DOES NOT APPEAR ON THE MENU THIS UNLISTED PORTION OF THE PROGRAM IS AT LINE 1200 ET SEQ. FOR USE BY PERSONS OTHER THAN THE AUTHOR THIS SECTION SHOULD BE MODIFIEDL  THE PORTION OF TH     D$;"CLOSE ASSWT%"110002 D$;"OPEN L%,L4"H D$;"WRITE L%,R2"O Ab$ D$;"CLOSE L%"m. 110008 "ANOTHER SET OF MARKS";B C$L C$"Y"C$"YES"60V 12000` 201011000"WHAT DO YOU WANT TO CHANGE?":" %";A;",L4"I1LN2D$;"WRITE G%";A;",R";I>G(I,A)EIZD$;"CLOSE G%";AvD$;"OPEN ASSNAME$,L25"D$;"WRITE ASSNAME$,R";AASSNAME$(A)D$;"CLOSE ASSNAME$"D$;"OPEN ASSWT%,L4"D$;"WRITE ASSWT%,R";AW(A)ENT NAME "; ASSNAME$(A)I "WHAT IS THE WEIGHTING FOR THIS WORK ";S *W(A)^ 411000 >:"AFTER THE ROSTER NUMBER AND NAME, YOU" H"ARE TO ENTER THE SCORE FOR THAT STUDENT." RI1LN \I;5)NAME$(I); fG(I,A) pI zD$;"OPEN G NAME$" ZD$;"OPEN L%,L4"2 dD$;"WRITE L%,R1": nLNM xD$;"CLOSE L%"S [ 60{ 11000:12000:13000:14000  "THE LAST ASSIGNMENT NUMBER WAS: ";LA "WHAT IS THIS ASSIGNMENT NUMBER "; A 11000 "WHAT IS THE ASSIGNMYOU"/ "HAVE EXHAUSTED THE NAMES, THEN TYPE"> "'LAST'."J I140R I;` NAME$(I)| NAME$(I)"LAST"LNI1 NAME$(I)"LAST"I40 I D$;"OPEN NAME$,L25" (I1LN 2D$;"WRITE NAME$,R";I <NAME$(I) FI PD$;"CLOSE110004 V:"WHICH OF THE FOLLOWING DO YOU WISH?:"V `:" 1. ENTER CLASS ROSTER"| j" 2. ENTER CLASS SET OF MARKS" ~:"PICK ONE: ";C C1200,2000 11000: "AS EACH NUMBER APPEARS, ENTER THE" "CORRESPONDING ROSTER NAME. WHEN EAD OUTPUT"' d" 3. TERMINATE WORK"J n:"WHAT IS YOUR PLEASURE? ";Cb xC1000,20000,32000h s 11000 :"NEXT CHOICE:" " 1. ENTER NEW DATA" " 2. CHANGE EXISTING DATA" :"WHAT IS YOUR PLEASURE? ";C $C1100,5000 L%D$(4): D$=CONTROL DGNAME$(40),G(40,50),W(50),ASSNAME$(50)T#AVG(40)_$M(40)k%MA(50)v&X(40)'ASSTAVG(50)(210000<11000AF"YOU HAVE THREE INITIAL OPTIONS:"KQ0P:" 1. MAKE INPUT" Z" 2. R          !!!!!!UVW cY[`@:@$"]Ԡ,UVW(a()GY_*]ΠƠҠҠĠ͠ q;@rq/?r@p@*#r_.@p@*#rq`@9()%q_/@p@*#rq`@9()%q_ ])]ΠƠ$`$`$`$`%_8]ԠŠҠҠĠŠΠҠƠ\Pa@\]ŠĠ PR@`@9()$<`@9()%Q]ĠӠdT"n`%@p()`%@p()x`%@p()`%@p()`%@p()*`%@p()*`%@p():`%@p(͠Ԡ)5<qca(Ԡ̠ϠՠԿԠҩ)4Fa()ca(Ӭ)ca(ӬĬѬ׬Ŭڬج)cHPa(ŬƬҬԬǬ֬¬٬)ca(լɬϬЬʬˬ̬ά)ca(̠)c/Za(Ҡ)ca(Ҡ)c_]Π]͠Ǯ"]Ġ٠ŠҠ]ΠϬ# ]ҠΠ)]ΠŠàҠϠҠcN@"2rC@"rC@"r#]Ҡ!(a(ϠŠ̠Ԡ) 2a(ϠĠ     ADINGS$'D$;"OPEN CLASSPOOP$,L25"/'I12M.'D$;"READ CLASSPOOP$,R";I`8'CLASSPOOP$(I)gB'IL'D$;"CLOSE CLASSPOOP$"V' CLASSPOOP$(1)=PERIOD`' CLASSPOOP$(2)=CLASS$j'P$CLASSPOOP$(1)t'CLASS$CLASSPOOP$(2)~'* SUBROUTINE TOTO CHANGE ANOTHER WEIGHT ";#C$?C$"Y"C$"YES"5000I5700TX11000_b12000klA1LAvD$;"OPEN G%";A;",L4"D$;"WRITE G%";A;",R";N0D$;"CLOSE G%";AA'' SUBROUTINE TO GET CLASS DATA FOR SHEET HEW(A)D$;"CLOSE ASSWT%"J:"THE CURRENT WEIGHTING FOR ASSIGNMENT"g"NUMBER ";A;" IS ";W(A):"WHAT IS THE NEW WEIGHTING ";W(A)D$;"OPEN ASSWT%,L4"D$;"WRITE ASSWT%,R";AW(A)D$;"CLOSE ASSWT%":"DO YOU WANT ;"CLOSE ASSNAME$"?:"DO YOU WANT TO CHANGE ANOTHER NAME ";GC$c&C$"Y"C$"YES"5000m05500xD11000N:"WHAT ASSIGNMENT DO YOU WANT TO CHANGE"X"THE WEIGHTING ON ";bAlD$;"OPEN ASSWT%,L4"vD$;"READ ASSWT%,R";AAASSNAME$(A)+D$;"CLOSE ASSNAME$"[:"THE CURRENT NAME FOR ASSIGNMENT NO. ";Ar"IS ";ASSNAME$(A):"WHAT IS THE NEW ASSIGNMENT NAME ";ASSNAME$(A)D$;"OPEN ASSNAME$,L25"D$;"WRITE ASSNAME$,R";AASSNAME$(A)D$;",R";NJG(N,A)(TD$;"CLOSE G%";AW^:"DO YOU WANT TO CHANGE ANOTHER GRADE ";_hC$|mC$"Y"C$"YES"ī5000r5300|11000:"WHAT ASSIGNMENT DO YOU WANT TO CHANGE ";AD$;"OPEN ASSNAME$,L25"D$;"READ ASSNAME$,R";%";A;",L4"%D$;"READ G%";A;",R";N1G(N,A)FD$;"CLOSE G%";Av:"THE CURRENT GRADE FOR ROSTER NUMBER ";N"FOR ASSIGNMENT NUMBER ";A;" IS ";G(N,A)":"WHAT IS THE NEW GRADE ";,G(N,A)6D$;"OPEN G%";A;",L4"@D$;"WRITE G%";A ZNAME$(N)#nD$;"CLOSE NAME$"Qx:"DO YOU WANT TO CHANGE ANOTHER NAME ";YC$uC$"Y"C$"YES"5000510011000:"WHAT ROSTER NUMBER DO YOU WANT ";N:"WHAT ASSIGNMENT NUMBER DO YOU WANT ";A D$;"OPEN GD$;"OPEN NAME$,L25"2 D$;"READ NAME$,R";N@NAME$(N)VD$;"CLOSE NAME$"("NAME NUMBER ";N;" IS NOW ";NAME$(N)2"WHAT IS THE NEW NAME ";<NAME$(N)ANAME$(N)"AVAILABLE"İ7000FD$;"OPEN NAME$,L25"PD$;"WRITE NAME$,R";N1. STUDENT NAME"," 2. STUDENT GRADE"I" 3. ASSIGNMENT NAME"h" 4. ASSIGNMENT WEIGHT"" 5. RETURN TO MAIN MENU":"WHAT DO YOU WISH, MASTER";CC5100,5300,5500,5700,60"WHAT ROSTER NUMBER DO YOU WISH ";Nr&@p@*-r#-rr[Lf/?rijk ijkl mnl mnf/?rgh gh  ghf "ijkghghUVWYK[)?M6o8 r7Da(ԠӠŠǠ)a(Ҡ)E@E()cR@IcN`@:@$XSa()@p@\_UXUVWdq.?6?rYa(ϡԠӠ)E@E()UVWY_?]ԠĠq/?()$-rqqY]ĠƠq[]͠\q;@r`@9@$UVW`@*#r9@*#r$&Y @p@#@B;@rrp@*#r_:&@p@*#r:@B;@rrp(C@"rD4drC@"rC@"rC@"r@p()~@p(РΠРԠŠŠРРРΠРРΠҠР ŠРΠǠҠ͠РР)]ĠӠƠ qUVW;@r`@*#r:dK\M6o8r xa(ɠ̠נՠĮ)cNa(ՠŠŠǠ͠ƠŠ)a(ĠΠӠŠΠٮ)Ecca(ΠՠŠ٠ϠԠˬ)a(ӠŠΠٺ)R@_]ԭР;N@"r    0 "S",91"W",74%"W",81/ ENDM GEORGE THOMPSON #122,0Y"H",70e"W",72q "W",77|"A",0 "A",0*"A",04"A",0>"A",0H"A",0R"A",0\"A",0f"A",0p"A",0z"A",0 ENDI,0"H",65"H",73&"H",722&"S",68<0 ENDV: EARL ROGERS #120,0bD"H",55nN"H",75zX"H",62b"S",63lF"W",74v "W",80"A",0"A",0 END STANLEY SMITH #121,0 "H",87 "H",88"H",85 T END(^ ANTHONY PRATER #117,04h"H",48@r"H",58L|"H",62X"S",63d"W",77n END JOSEPH PRATER #118,0"H",58"H",68"H",68"S",67"W",70"W",78"A",0 END LAWAYNE RICH #119"A",0 END+ STACY JACKSON #113,07"H",65C"H",60O"H",60["S",60g"W",71s"W",79~"A",0"A",0 END STEVE MCKEE #115,0"H",75"H",75""H",73,"H",746"S",81@"W",95J"W",9 END# FELETHA HOWARD #111,0/"H",73;"H",80H"H",80 T"S",75` "W",77j END DARREN HOWIE #112,0("H",752"H",68<"H",72F"S",79P"W",85Z"W",80d"W",95n"A",0x"A",0"A",0"H",66"S",79 $"W",79*. ENDD8 GARY GAMBLE #109,0PB"H",63\L"H",73hV"H",72t`"S",79j"W",90t"W",83~ END DAVID HALL #110,0 "H" ,77 "H",88 "H",90 "W",90"W",87"S",87TH COOPER #106,0f"H",55)p"H",906z "H",72C "W",78P "W",50\"S",72g"A",0q END DAVID CROW #107,0 "H",83"H",70"W",80"S",79 END RENEE ETHERIDGE #108,0"H",60 "H",80,67  END' CORKY BERCH #103,04 "H",60A "H",63M"H",68Z "W",87f"S",81r "A",0| END BOBBIE BOSTICK #104,0 "H",53"H",78 "H",72*"S",804"A",0>"A",0H"A",0R END\ KENNE DATA." ' JOHN BANKS #101,0 3"H",70?"H",56K"W",70X "S",76d& "A",0p0 "A",0|: "A",0D "A",0N "A",0X ENDb TERRY BELL #102,0l "H",55v"H",68"H",62 "W",79 "W",73 "S"90AV100ĺ"YOUR LETTER GRADE IS A"S AV80AV89ĺ"YOUR LETTER GRADE IS B" AV70AV79ĺ"YOUR LETTER GRADE IS C" AV60AV69ĺ"YOUR LETTER GRADE IS D" AV59ĺ"YOUR LETTER GRADE IS F"  20"END OF SECTION. LOAD NEWY0360& ^TGY: T=PROJECT AVERAGE@ h"PROJECT AVERAGE ";TY r"SIX WEEKS TEST ";Iq |"# OF ABSENCES ";O~ T0410 AVE(((R(2I))3)(T2))3:415 AVE((R(2I)))3 AV(AVE) "YOUR SIX WEEKS AVERAGE IS ";AV  & AV 80 IIB9 I0ĺ"SIX WEEKS TEST NOT TAKEN YET"A 80_ OO1: O COUNTS ABSENCESl B1280t 80~ JJB "CJ3 ,80 6REX: R=HOUR TEST AVERAGE @R0ĺ"HOUR TEST AVERAGE--DATA INCOMPLETE" J"HOUR TEST AVERAGE ";R T 80V EEB: E=INCREMENTED TOTAL OF HOUR TESTS--B HOLDS CUMULATIVE TEST TOTALS XX1: COUNTER INCREMENTS TO USE AS DENOMINATOR 80 GGB: G=INCREMENTED TOTAL OF PROJECT GRADES--B ACCUMULATED GRADE TOTAL YY1: Y COUNTS PROJECTSURN TO CONTINUE";L$:" (A$::5. 2A$::@ <A$"END"480I F100Q PA$c ZA$"END"310j dB nA$"H"160: H=HOUR TEST GRADE xA$"W"190: W=WORK GRADE, I.E. PROJECTS A$"S"220: S=SIX WEEKS TEST A$"A"250: A=EACH ABSENCE8 "THIS NEEDS SOME CLEANING UP BEFORE IT IS USED PERMANENTLY. IT HAS DATA ONLY FOR FIRST PERIOD CLASS FOR THE SECOND SIX WEEKS OF SCHOOL."E0:X0:G0:Y0:I0:F0:C0:A0:O0:J0:K0:R0:T0:B0:Q0:U0:M0:N0:AVE0 :"PRESS RET     SS TRENNIS,3,BM% POWE RYAN,3,WM? SUDBURY SCOTT,3,WMW VIRGIL DOUG,3,BMr WILLIAMS BRUCE,3,BM SCOTT CHRIS,3,WM ASHFORD TERRI,4,BF  BEVILL CALVIN,4,BM COOK LYNN,4,WM DAWSON TONY,4,BM( ELLIOTT DON,ROWN BOBBY,3,BM(j CANTRELL JOHN,3,WMCt CHILDS DERRICK,3,BM[~ GAYDON DOUG,3,WMr HARDY PHIL,3,WM HARRIS DONALD,3,BM JOHNSON ANTHONY,3,BM JONES FREDDIE,3,BM MCGOVERN SUSIE,3,WF PARKER ROBBY,3,WM PARD FELETHA,1,BF* HICKS BARBARA,1,BFD JACKSON STACY,1,BM\ MCKEE STEVE,1,WMw$ PRATER ANTHONY,1,BM. PRATER JOSEPH,1,BM8 RICH LAWAYNE,1,BMB ROGERS EARL,1,BML SMITH STANLEY,1,BMV THOMPSON GEORGE,1,BM` BL$" ":L$: FORM FEED$180:600< BANKS JOHN,1,BMT BELL TERRY,1,BMm BERCH CORKY,1,WM BOSTICK BOBBIE,1,WF COOPER KENNETH,1,BM CROW DAVID,1,WM ETHERIDGE RENEE,1,WF HALL DAVID,1,WM HOWAHITES : ";(T(9)T(10))3>"BLACKS : ";(T(7)T(8))PH"MALES : ";(T(7)T(9))nR"FEMALES: ";(T(8)T(10))\0: RETURN CONTROL TO KEYBOARDf::"ANOTHER COPY? (Y OR N)";:C$pC$"Y"910zC$"Y"900:"END OF PROGRAM":2)));A(6);19((B(6))));B(6);25((C(6))));C(6);31((D(6))));D(6);39((T(6))));T(6)bw I140:"-";:I} "TOTAL ";13((T(7))));T(7);19((T(8))));T(8);25((T(9))));T(9);31((T(10))));T(10);39((T)));T*:4"W(A(4))));A(4);19((B(4))));B(4);25((C(4))));C(4);31((D(4))));D(4);39((T(4))));T(4)h" 5TH ";13((A(5))));A(5);19((B(5))));B(5);25((C(5))));C(5);31((D(5))));D(5);39((T(5))));T(5)\" 6TH ";13((A(6)13((A(2))));A(2);19((B(2))));B(2);25((C(2))));C(2);31((D(2))));D(2);39((T(2))));T(2)n" 3RD ";13((A(3))));A(3);19((B(3))));B(3);25((C(3))));C(3);31((D(3))));D(3);39((T(3))));T(3)b" 4TH ";13(TA$l9);"STUDENT HEADCOUNT DATA"*vn"SECTION";11);"BM";17);"BF";23);"WM";29);"WF";35);"TOTAL"t" 1ST ";13((A(1))));A(1);19((B(1))));B(1);25((C(1))));C(1);31((D(1))));D(1);39((T(1))));T(1)h" 2ND ";(6)B(6)C(6)D(6):T(7)A(1)A(2)A(3)A(4)A(5)A(6):T(8)B(1)B(2)B(3)B(4)B(5)B(6):T(9)C(1)C(2)C(3)C(4)C(5)C(6) :T(10)D(1)D(2)D(3)D(4)D(5)D(6) D PLACE PRINTER ONLINE,THEN HOME N140 X PR#2bFS$(28):FS$: 8.3 CPI FOR DA B(Q)B(Q)1 330* D$"WM"510: C(Q)C(Q)1C 330U D$"WF"530e D(Q)D(Q)1n 330t  &T(1)A(1)B(1)C(1)D(1):T(2)A(2)B(2)C(2)D(2):T(3)A(3)B(3)C(3)D(3):T(4)A(4)B(4)C(4)D(4):T(5)A(5)B(5)C(5)D(5){ 0T(6)A CONTROL B RETURNS TO NORMAL PRINT: ,:I167:"-";:ID 6::J @W JA$,B,D$j TA$"END"ī540t ^TT1 hB1Q1 rB2Q2 |B3Q3 B4Q4 B5Q5 B6Q6 D$"BM"450 A(Q)A(Q)1 330 D$"BF"480HOOL":::8);"STUDENT HEADCOUNT PROGRAM"::::15);"DESIGNED BY" :7);"INDUSTRIAL ARTS DEPARTMENT":12);"COMPUTING CENTER": 19);"FOR": 20((TN$)9)2);"TEACHER: ";TN$  20((TD$)3)2);"DATE: ";TD$ # "Y$"":Y$: :< "WHAT IS TODAY'S DATE? (EX:MARCH 5 1985) ";TD$h TN$=TEACHER'S NAME TD$=TODAY'S DATEn u 2 CS$(29):CS$: 10 CPI Z$"":Z$: CONTROL A PROVIDES ENHANCED PRINT FOR HEADINGD I110::I:6);"HENDERSON JUNIOR HIGH SC" ***************************(H STUDENT HEADCOUNT PROGRAMd( LARRY S. ANDERSONj2< FEB. 11, 1980FP***************************ZdnxA$(N)330 7:"TEACHER'S NAME (EX:MRS. JONES): ";TN$       "ROSTER STUDENT CURRENT"U%B^"NUMBER NAME AVG."[%L^g%V^I1LNo%`^I;%j^7)NAME$(I)%k^" ";:M(I)124180%l^J1M(I)%n^"*";%p^J%t^36)AVG(I)%~^I13(I13)İ19000%^I%^Q1Ċ0&^:"DO YV22030 $V:"CHECK ANOTHER";($VC$F$VC$"Y"C$"YES"ī20040Q$V22000$] SUBROUTINE TO CALCULATE AVERAGES, PRESENTED BY ROSTER NUMBER$]N1LN$]15000$]N$^Q1Ċ2$$^11000$.^:"************ CLASS SUMMARY ************"(%8^SNAME$(A);#VVG(N,A)1221062#XV33)"MISSING"=#YV22115M#ZV37)G(N,A)f#cVA13(A13)İ19000m#fVAx#hV15000#rV(20)#|V"AVERAGE TO DATE IS: ";AVG(N)#}VQ1Ċ0#~V"DO YOU WANT TO SEE THEM AGAIN";#VC$#VC$"Y"C$"YES"ī20040$AT ROSTER NUMBER DO YOU WANT TO SEE ";-"VN9" VQ1Ċ2D"V11000`"V:"ROSTER NUMBER: ";N;~""V40(NAME$(N)))NAME$(N)",V:" ASSIGNMENT STUDENT""6V"NO. WT. NAME MARK""@V"JVA1LA #TVA;5)W(A);9)ASENT"&!N" 5. RETURN TO BASIC MENU">!N" 6. PRINTER ON"W!N" 7. PRINTER OFF"l!N:"PICK ONE: ";s!NC!NC22000,24000,26000,28000,60,31000,31100!U SUBROUTINE TO OUTPUT INDIVIDUAL STUDENT MARKS WITH AVERAGE TO DATE!U11000&"U:"WH*N12000:13000! 4N14000:160003 >N17000:18000> HN11000k RN:"DISPLAY OF DATA IS IN FOUR FORMATS:" \N" 1. STUDENT FILE" fN" 2. CLASS AVERAGES BY STUDENT" pN" 3. CLASS AVERAGES BY ASSIGNMENT"!zN" 4. RANKED CLASS AVERAGES BY STUDS OF OUTPUT FOR CRT USE DELETED WITH PRINTER USAGE=:JQ1ıa=J:"PRESS RETURN TO CONTINUE ";iBJC$oLJuVJ N"DO YOU WANT HARD COPY? ";C$"NC$"Y"C$"YES"Q1$NC$"Y"C$"YES"ĺ"TURN ON PRINTER NOW!"%N"WHAT IS THE DATE? ";TIME$ BD$;"READ ASSNAME$,R";I,BASSNAME$(I)3BILBD$;"CLOSE ASSNAME$"RBoPF GET ASSIGNMENT WEIGHTSZFD$;"OPEN ASSWT%,L4"dFI1LAnFD$;"READ ASSWT%,R";IxFW(I)FIFD$;"CLOSE ASSWT%"F28J SUBROUTINE TO DISPLAY 13 LINE00)10:M(N)M::> SUBROUTINE TO GET ALL GRADESF>A1LA`>D$;"OPEN G%";A;",L4"l>N1LN>D$;"READ G%";A;",R";N>G(N,A)>N>D$;"CLOSE G%";A>A>hB GET ASSIGNMENT NAMESrBD$;"OPEN ASSNAME$,L25"|BI1LA6D$;"READ NAME$,R";I%6NAME$(I),6IB6D$;"CLOSE NAME$"H6s: SUBROUTINE TO SORT WEIGHTED AVERAGES{:M0:W0:T0:I1LA:G(N,I)1MM1:G(N,I)1ī15060:WWW(I):TTG(N,I)W(I):I:AVG(N)((T(W100))10EN L%,L4".D$;"READ L%,R2"&.LA9.D$;"CLOSE L%"?/h2 SUBROUTINE TO GET LAST ROSTER NAME}2D$;"OPEN L%,L4"2D$;"READ L%,R1"2LN2D$;"CLOSE L%"26 SUBROUTINE TO READ ROSTER NAMES6D$;"OPEN NAME$,L25"6I1LN PRINT PAGE HEADINGS*-+"PERIOD ";P$;G +40(CLASS$))CLASS$R+Q0ım +"DATE OF RUN: ";TIME$*+"INCLUDES ASSIGNMENTS TO #";LA4+"LAST ASSIGNMENT NAME IS: ";ASSNAME$(LA)>+. SUBROUTINE TO GET LAST ASSIGNMENT NUMBER .D$;"OP. ANDERSON" "607 SYCAMORE"< "STARKVILLE, MS. 39759"B ATEMENTS WHICH": Z"CONTAIN 3 FIELDS: A$=STUDENT NAME; "h d"B=PERIOD NUMBER WHEN THE STUDENT IS IN" n"YOUR CLASS; AND C$=RACE AND SEX OF" x"THE STUDENT (EX:BM FOR BLACK MALE)" "FOR CLARIFICATION OR FURTHER INFO WRITE:" "LARRY SC  ::!16);"HEADCOUNT"):X("HEADCOUNT IS A PROGRAM WRITTEN BY LARRY"2"S. ANDERSON, AN INDUSTRIAL ARTS TEACHER"<"IN STARKVILLE, MS. IT IS DESIGNED TO"F"RUN WITH A PAPER TIGER PRINTER. ALSO," P"THE PROGRAM USES DATA ST  nK(RLN)1+ZnK;*+dn10)NAME$(X(R));?+fnM(X(R))128270I+gn" ";Z+hnI1M(X(R))d+in"*";k+jnI~+nn36)AVG(X(R))+xnK13(K13)İ19000+nR+nQ1Ċ0+n:"DO YOU WANT TO SEE THEM AGAIN";+nC$+nC$"Y"C$"YES"20040,n282AVG(H)AVG(B)PP11*mAVG(H)AVG(B)HBPP18*mBC*nX(P)HJ* nHV*nQ1Ċ2a*(n11000*2n:"********* RANKED AVERAGES *********"*a(ɧ̠ˠРŠŠӠ)*Ha(ՠϠ٠ҮɠŠɠΠ)(Ra(ՠΠŠԠǮ)\ca(ŠҬ̡),pa(ҠԠڠ̠ŠΠ).za(ŠŠƠĠӠ)Q*a(̡) qcc`$ `$.a(ԠĬԠՠĠϠĠ), a(ŠǠŠԠΠԮ)Q# a(סԧӠҬ)E@E()#*a(ՠ٠נҠơ)'4ca(ԧӠ̠Š̠ϠҠ׮ YvM6o (a(ԠŠƠĠӠĠҠ)a(Ŀ)c.a(Ԡ٠٠)GT`$c.a(٠ԡŠŠǠ)*a(ĠҠŠĠԮ)_ca(ĠĿ)#ca()GT`$N&c(0a(ϡՠĠŠԠ)-:a(ԬΠϠϠҠԠӠ).Da(ŠƠŠĠӠҮ)_lNc!Xa(ԡԧӠŠά)E@ bqlUVWĠ̠)a()GT`$1ca(ϠĮԠӠԠĠ׮)_c)a(٠ġԧӠϠҠŮ) qUVW YM6o +a(ԠԠƠҠĠՠ)a(ŠΠҠc.Ja(ٮԠӠϠԮՠ)#Ta(ŠĠȠ)_|^c*ha(٠Ĭ)E@E(ŧӠҮ) rq|UVW YM6o (a(ԠŠƠנӠĠΠ)a(Ŀ)c-a(ĠĠŠڮՠ)$a(̠ŠΠҠӮ)%a(ŠҠҠ)a(Πˮ)!ca(Ġˬ)E@E()cc0"a(ԠŠƠԠӠĠҠŠǿ)c/,a(ϠРԠŠĠ)G6T`$^@ dq nN@"r xM6o S(ԠӠҠſ)&@ M6oPa(Ϭ)E@E()UVWYo .a(ӠӠԠƠҠŠƠ)%a(ĠǠԮ)+a(ӠӠŠ!! ! ! ! ! !!!SES."H>"OVERCROWDED WORKING CONDITIONS CREATE A REAL SAFETY HAZARD."H"WHEN A BUSINESS GOES BANKRUPT, EACH STOCKHOLDER CLEARS AT LEAST $5.00 PROFIT."R"THE TERM 'FREE ENTERPRISE' MEANS THAT IF YOU WANT TO GO INTO BUSINESS THERE IS LEGALLY NOTHIO THESE PROBLEMS IN CASE THEY DO HAPPEN."*"ALL EXPENSES IT TAKES TO MAKE A PRODUCT SHOULD BE THOUGHT OF WHEN FIGURING THE COST OF THE PRODUCT."4"WORKING CAPITAL IS THE MONEY NEEDED TO MEET EXPENSES UNTIL THE RECEIPTS FROM SALES OVERCOME THE EXPEN"LIQUIDATION IS THE TERM USED WHEN A BUSINESS CLOSES OR DISSOLVES.""PROFIT IS THE MONEY LEFT OVER FROM A SALE AFTER ALL EXPENSES HAVE BEEN SUBTRACTED.") "CAREFUL PLANNING INVOLVES THINKING ABOUT PROBLEMS THAT COULD HAPPEN, AND GETTING AN ANSWER TTIME.""THE MAIN DUTY OF THE TEACHER-ADVISOR IS TO SEE THAT ALL MATERIALS AND SUPPLIES NEEDED TO OPERATE THE BUSINESS ARE GOTTEN AND DELIVERED TO THE CORRECT DEPARTMENT.""THE MAIN DUTY OF THE PERSONNEL DEPARTMENT IS TO FIRE THE EMPLOYEES."C OF GETTING THE FINISHED PRODUCT FROM THE MANUFACTURER TO THE CUSTOMER WHO USES IT.""BREAKING EVEN MEANS THAT IN SELLING A PRODUCT, NO MONEY IS MADE AND NO MONEY IS LOST.""A BREAK-EVEN CHART SHOWS HOW MUCH PROFIT OR LOSS THE BUSINESS HAS AT ANY Y."<"A SALES FORECAST IS A PREDICTION OF FUTURE SALES.""IN CASE THE PRESIDENT IS ABSENT, THE VICE PRESIDENT OF SALES TAKES OVER THE CORPORATION.""THE MAIN REASON FOR GOING INTO BUSINESS IS TO MAKE MONEY."S"DISTRIBUTION IS THE PROCESS ENCE BETWEEN COMMON AND PREFERRED STOCK IS THAT THE PREFERRED STOCK CERTIFICATE IS LARGER.""A MARKET SURVEY WILL DETERMINE PEOPLE'S LIKES AND DISLIKES ABOUT A PRODUCT.""MARKET ANALYSIS TELLS THE ECONOMIC CONDITIONS OF THE TIMES IN YOUR COMMUNITSTUDENT BUSINESS, THE TEACHER IS REFERRED TO AS THE ADVISOR."r"COMMON STOCK COSTS LESS THAN PREFERRED STOCK.""BRAINSTORMING PRODUCES A LOT OF IDEAS IN A HURRY.""IN YOUR CORPORATION, YOU WILL USE ONLY PREFERRED STOCK."["THE MAIN DIFFERS BEFORE PRODUCTION IN THE BUSINESS CYCLE."b"FOR YOUR BUSINESS TO BE CONDUCTED CORRECTLY, HORSEPLAY HAS NO PLACE IN THE CLASSROOM OR LAB."l"IN ORDER FOR YOUR BUSINESS TO OPERATE MOST EFFICIENTLY, YOU MUST HAVE LEADERS AND WORKERS."=v"IN YOUR ::IZ385 |"REMOVE PRINTED MASTER AND INSERT NEW MASTER INTO THE PRINTER. PRESS THE RETURN KEY WHEN YOU ARE READY TO CONTINUE TO PRINT. ";P$ }D$;"PR#2" ~I D$;"PR#0" :::"WELL, THAT'S ALL THERE IS TO IT!!!": +X"SALES COME ;? @"DIRECTIONS--PUNCH OUT THE SLOT CORRESPONDING TO THE"\ A16);"CORRECT ANSWER!!"d B:l EZ$w JX1N T3);C(X);". ";G$(X) U ^XN370 rX t wI1Z:Y$" ": Y$=CONTROL L x290 yIZĺY$ zD$;"PR#0" {:ODAY'S DATE ";L$3 :"ENTER THE CLASS NAME ";M$M D$"": D$=CONTROL D\ D$;"PR#2"e 375 "Y$"": Y$=CTRL A SELECT ENHANCED PRINT #Z$"": Z$=CTRL B DESELCT ENHANCED PRINT $Y$ %J$;:40);L$ ' ,K$;:40);M$ 1 6C(D)D G$(D)A$# DN215, 1202 "LOAD THE PRINTER WITH A STENCIL OR DITTO MASTER AND PRESS THE ENTER KEY WHEN READY TO PRINT ";P$ :"ENTER THE NUMBER OR CODE FOR THIS TEST ";J$ :"ENTER THE TEST NAME ";K$ :"ENTER T00:X Z936$ dG$(100):C(100)^ n"HOW MANY QUESTIONS DO YOU DESIRE ON YOUR TEST? ";N s"HOW MANY COPIES DO YOU WANT PRINTED? ";Z xA$ 936 A$::: "DO YOU WANT TO KEEP THIS QUESTION? (Y/N) ";B$ B$"Y"120 DD1 ( D$""* TEST GENERATION PROGRAM4936`"************************************"h(:o-82"TEST GENERATION PROGRAM"<:F"************************************"H:::"THERE ARE NOW 95 QUESTIONS AVAILABLE" PX120"" " " " " """""""""