i>?Ek?>Q>;>:8o>oȑ>ppȑ>> :op` {KpnͶ@p;=po:*Ie
f`8` yP־ǾҾ,G0C =W)_``\"پӾؾھ pD`־ǾYؾOW)ݩȾɾʾ pD`8`W)CB)
۵ 5W) )W)@! pZ}ȾȾ,N0MHhHh p' ,NHCNh`M`MN `Lp yh־Ҿ,G0^W)TP)ecfdپھؾӾ p$c
d pccddީ8`ȾɾʾNfne`_ 2Ͼ pH h8`jGMоM
G):_`蹀:`V)8`MN; ;`;C N8`
G)̀#:蹀:`V)R y pH h8`Ͼо־ǾҾ_` EӾ pW) |LC`CN `9V) ß `V) y p` y
(8`
8`8`(W)`_V)Ij!؍Í`_ jЭW)з#Ͼ pо־Ǿ`
8`
8`ɾ)ɾ̸
ɾɾ0miȾ p pY)ικ`lP y*,N!ǾȾɾʾ pǾ~H Uh8`8`,C U
8` 2ȾɾM$
mHݓǾ phϾ A ԟ ` ])Y `Ⱦɾ0Ǿ p)莼 * 6 w= l& l8Hh l` 6Yؾ+پھ p|پɾʾ`HV)jh츾$-ˌھپLp
k
V)@W0!XY aX6Y7` aYX`X:Y;τ<::<`:8`'OV)Jj *f a ԟ ԟ ⟭
+ +:ji ԟɃ
B
, ԩ p`SW)0پȾھɾ p p 3LjÍ L I 9 1ؾ p p 3 H h(`ؾ` ߭t8퍼mؾŰ펼t폼 L8` `F`4W)ɐ/XYjV) *8` h e`l XYW0V):Wؾ_`)0%I0)3]8X^YȰ8`8` p
Ⱦɾʾ8`پھW)@%ZȾ pSɐ"jÍgh I @8gȾhɾʾghؾ p hgͺ칾`L3V)jC
mMjà
Lp`VJJ°LyLp *)< LA *
LAW)8VJưϥ3 ⟢BT eօ ܬ L sS3 Ly B# e $L? L Ykimljn` pgmȾXhؾmɾYtѮȾɾ YX`8g M
CgIY2m*b6>BSAVERIFYBLOADELETECATALOGOPENWRITEXECREATEFRESBLOCKS ";:R:" "JV'L:" ";:M:" ";:R:" "{`'L:" ";:M:" COPYRIGHT 1983 ";:R:" "j'L:" ";:M:" MECA ";:R:" "t'L:" ";:M:" ";:R:" "~'L:" ";:R:" "
'L:" ''L8:R31:3::M10@'L:" "U$'L:" ";:R:" ".'L:" ";:M:" ";:R:" "8'L:" ";:M:" BASIC ";:R:" "B'L:" ";:M:" BUILDING ";:R:" "L'L:" ";:M:" (16302)
30000
1
(4);"BLOAD BDT"B
MARK:768,2M
4105h
(4);"OPEN SESAME,D2"
(4);"READ SESAME"
4100
DRIVES
(4);"CLOSE SESAME"
(4);"BRUN HIRESC,D1"
(4);"DELETE SESAME,D2"
768,1:40303:<>?@A,P:1,TL:MUSIC:2 200:0,P:1,TL:MUSIC:= 10000~ (4);"BLOAD OPENSCREEN":100:(4);"BLOAD OPENMECA1,A$4000" 100 I(16304):I(16297):I(16302):I(16299) 20000 I1400:I
I(16300):I(16297):I(16304):I :332801 **********************N * 13-JAN-84 *k **********************
768,0:CHECK24612:MUSIC24592:MARK24576:(4);"BLOAD PREBDT":1000dCHECK:(768)03000nCHECK:(768)04000 ,100:0
PRESS "E" TO EXIT BDTL5LLL"L KN)_ `@S8`
ԠŬLL<[B?I>孓`仫6VtCicQĿUKqtVt
Nʮq$6,⨁
K6,
VtI=v!gNVt
Vt
lg~TŠӠŠҠüϠž(+@ABCDEFGHIKLMNPSV
T[fouu~ՠٯ*
PWN*]ĿNTz @n6VC/+A>@I5gN
Oz @n[Dz @nd0,~z @`$仫@v$⩔,CTORENAMEBRUNLOCKCHAIN#FLUSHREADPOSITIONOMONPR#PREFIXCLOSEAPPENDx{[{0ǭ0hЫ}wA
Xw孶fl@@-!S
!C-
!ABELSDFRV@@ !$(19@E ""
':18:6F
'"PROGRAM LOADING, PLEASE WAIT"w
':2:"PRESS ANY KEY TO BYPASS INTRODUCTION"
'(637)255ĺ:8::"BE SURE CAPS LOCK IS DOWN"
'
NT50:P191:L1:300:P101:L3:300
*NP152:L1:300:P128:L3:3004NP171:L1:300:P114:L2:300>>NP135:L1:300:P85:L3:300zHNP101:L1:300:P95:300:P85:300:P95:300:P101:300RNP114:L2:300:P101:L1:300\NP128:L3:300:P203:L1:300fNP191:300:P171:300:P255:L5:300pN*0uT23:P191:L1:
`% Lmɿ
`Jme L L ` L 8
L L&( ```````ȱɁ#ɨ8 m e a
`=LSMLS t01?@ԍALn , A $ , D 1:
/
H2/
1!2:
01R
ɍ
L01`s ` Ɂ ` RH2
m
I
H hIhhh 0L# L`)
H
H`hh`n
&~
ӌȄ L8
u c0- ) c8 m m`/(
L 8 HH
eȱe`
JJJ`
JJJL!s@t 1 A `Z SVQ Slef4@A W,R,W,T,Pghgg K CEFGHIJIC/BDT or ? for help Place disk in drive and press any key ;:MACHIDMACHID48:INSLOT$(0)L$:500
MACHID32ĺ"64K ";:MACHIDMACHID32:E:OVm%3J(
#5@Uu3-jLgLLARGE.FONT6E00SMALL.FONT7E00TOC6C00HELP8420L. 44001800BLOADSpace bar to move on or ? for help Space bar for example or ? for help Space bar for BASîӠhh`0 L``,\,, a0 ɑH aH?QT X`0&aa ȘeiLT`(L}``ĠٺͮˮǮ95:400:P85:400:P63:400WuP67:400:P85:400:P114:400:P128:400:P135:400uuP171:400:P255:L6:400{u1:400:P171:400:P101:L2:400bbuP114:400:P128:400:P152:400:P128:400:P114:L1:400luP152:400:P101:L2:400:P95:400::P85:400:P75:400vuP85:400:P95:L1:400:P152:400:P101:L8:400:P1:L1:400uP152:400:P101:L2:400:P400:P135:L2:400:P128:400:P114:400^:uP101:400:P114:400:P128:L1:400:P191:400DuP135:L2:400:P128:400:P114:400:P101:400:P114:400NuP128:L1:400:P171:400:P101:L2:400:P114:400:P128:400#XuP152:400:P128:400:P114:Lө8JfL@0``00`,@ 8@ 8,), 8 8*+ȱ` `1(TCBF?/
ɞ La`"# Lk 8HHhHhh` &I&( L LZ,- yLTLT ,-T
lhhLC
DhhLB0 ./ɟɠhhLF LM ɟhhL/?Y,- ,-TB). We can also test conditions other than equality like A>7 which tests if A is greater than 7. Altogether there are 6 possibilities to test:A=777?L,`&'L"# ɀɝ`*+ `()`,-$%`,-&'`()`,-` ɡɧ
ɢ`hhL` ɢ`P =BC<>?L,Ph j L W
Hi0r
hi0r
./r
./ L e : e⨥ : 8ʤ : 8 : L H hL:$%L0F,B(C$/? Ly./hhLLa ` )hhL>PLhgid SDhhL H ,-r
詎r
詆r
r
r
Ɂr
r
r
r
.r
詀r
,- 4r equal to 7A>=7=7, we can test for combinations using the operators AND and OR. These work in a way consistent with their names. This expression:(A>0) AND (A<11)would only be true if A were greater than zero AND less than 11. That is 1, 2, 3... 9, 10. Similarly we would use OR to test if one OR the other of two conditions were true:(A=3) OR (A>=10)would be true if A were equal to 3 OR A were greater tharogram using BDT to help you.(1) Input a number and print it out only if it is greater than zero.(2) Input two numbers and print out the smaller of the two.(3) Print out the numbers 1-10 using GOTO and a loop.Well, that's it for thisons of a program based on a variable's value.Execute the following temperature conversion program which is an extension of the one in the last chapter.E4CHCFNow write your own program. Pick one of the examples below, go into BASIC and write the prough the program in BDT.E3COUNTSUMGAVERAGEYou've seen the IF...THEN command act as a filter -- a device to reject values it doesn't like.The IF...THEN command can also be used as a switch to direct the computer to process different secti This program calculates change for a cashier.E2CPCHANGEThe next example will calculate your grade average. An IF...THEN command is used to leave the loop that is accumulating your test scores when you enter "-1".Observe this as you Step th:10 A=3 : B=6 : C=A+BThis is useful with the IF...THEN command because it allows for more than one command to be executed if the condition is true.10 IF N=6 THEN PRINT "N EQUALS 6" : GOTO 100Step through the following program in BDT. am. Use the P key to see how the IF...THEN commands control the printing on the BASIC screen.E1ABCBefore we go on, a little something extra. BASIC allows you to put more than one command on a line by separating them with a ":". For example15 AND B=3) THEN A=4550 END 1 A equals 7 2 A equals 15 3 A equals 45What is your choice?1232We will now enter BDT and see some of these IF...THEN commands in action.Step through the following sample progrls 44 2 A equals 43 3 $ There is no way of knowing what A will equal as it must be input when the program is RUN.What is your choice?1233Space for more.-10 A=720 B=330 IF NOT(A=7) OR B=3 THEN A=1540 IF NOT(A=40 END 1 A equals 2 2 A equals 10 3 $ This example will never end because A will never be greater than 9.What is your choice?1231Space for more.-10 INPUT A20 IF A<44 THEN GOTO 1030 END 1 A equa-10 A=320 IF A=3 THEN A=A-230 IF A=1 THEN A=4440 IF A>42 THEN A=1250 END 1 A equals 3 2 A equals 44 3 A equals 12What is your choice?1233Space for more.-10 A=020 A=A+230 IF A>9 THEN GOTO 20Space for more.-10 A=720 A=A+130 IF A<14 THEN GOTO 2040 END 1 A equals 7 2 A equals 14 3 $ This program will never end as we will keep branching to line 20.What is your choice?1232Space for more.---------------------------------------------Right! Wrong, try again.Enter 1, 2, or 3 only.10 A=720 IF A=7 THEN GOTO 4030 A=2340 END 1 A equals 7 2 A equals 23 3 A equals 40What is your choice?~1231instance:NOT (A=7)is true if it is NOT true that A equals 7, or in other words if A is not equal to 7. From this you see that:NOT (A=7) is equivalent to (A<>7).Let's see if you understand how the IF...THEN command is used in a program.n or equal to 10.There is one last operator to consider, NOT. We can use this with any condition to achieve the opposite effect of the condition. That is, if we placed the NOT operator before a true expression then the result would be false. For chapter. If you want to write a another program, backup and pick a different example.Writing programs and testing ideas is the fun part of using computers.+U:+Uj,U*U*U:@U*U.U*+uV*UzU*+U,U:0U*U*U*U*U*U*U:+U*@U*+U,U:0U*U*UX*U*U*00U*UNU*+U,U:0U*U*U*U*U*U*U:X*U*@U*@U*U:,U*U^*U*upU*U:V*U*FcCq0<pAGcC0`x<0*