page-1983-101-timex-sinclair-programming-tricks

More documents

Recommendations

Info

830 to 870. Depending upon the value of H, a slogan isselected by a jump to one of the lines 880 to 950.By the way, check line 880. You'll see a specialepitaph for players with batting averages above 900.Program Listing10 Cl.$700 LET G=55710 LET E=lOO800 PRINT "YOU GOT ";G;" RIGHT IN °;E;" TRIES"810 LET H=INT(lOOO*(G/E))820 PRINT "BATTING ";H825 PRINT "YOU ARE ••• "830 IF H
The program here has a temporary substitute forlines 10-40. Normally, you would obtain player's name andscore from some larger game program you already haveon hand, or are writing. Line 20 gets from you a name andstores it in N$. Line 30 gets a score and stores it in S. Iflines 50-230 were a subroutine to a larger program, youwould need a RETURN at line 110.To try the highlighting technique, type in this programjust as it is here. All of it, from line 10 through line2:30, and RUN it. You'll see the name and score you givethe TIMEX displayed in a box on the video screen.,IProgram Listing10 DIM A$(10)20 PRINT •PLAYERS NAME ?•25 INPUT N$30 PRINT •PLAYERS SCORE ?"35 INPUT s40 CLS50 LET S$=STR$(S)60 LET L=LEN(N$)+LEN(S$)70 LET T=L+l380 GOSUB 20085 PRINT90 PRINT .* • ;N$; •s SCORE: ";S$;• *n100 GOSUB 200110 PRINT120 PRINT130 GOTO 20200 FOR L=l TO T210 PRINT n*n;220 NEXT L230 RETURN33
Page 3: IMEX/ SJ,NCLAIRODO zx-B'IRDGRAMMING
Page 6 and 7: FIRST EDITIONFIRST PRINTING©1983 b
Page 8 and 9: TipTable of ContentsPageIntroductio
Page 10 and 11: Gee Whiz37 Gee Whiz I: Smart Adder
Page 12 and 13: 97 Draw A Line98 Box Message99 Boxe
Page 14 and 15: The 101 programs in this handbook c
Page 16 and 17: author's training in writing BASIC-
Page 19 and 20: Fun & Games
Page 21 and 22: Program Listing10 RAND100 LET A=INT
Page 23 and 24: 140 IF R
Page 25 and 26: 130 PRINT •BACKWARD:•140 FOR J=
Page 27 and 28: 110 PRINT •PRESS ANY KEY TO PLAY
Page 29 and 30: 12 60-Second TimerA one-minute time
Page 31 and 32: 210 IF A$=•• THEN GOTO 200220 I
Page 33: convert those raw numbers to a batt
Page 38 and 39: 1 Create a QuizOne of the most fasc
Page 40 and 41: line 10 for a.word. It is looking f
Page 42 and 43: program if you. don't get it right
Page 44 and 45: 90 PRINT100 PRINT "ADDRESS";TAB lO;
Page 46 and 47: 160 LET D$(7)=•sEE YOUR ANALYST"1
Page 48 and 49: 32 Sentence WriterPractice your Eng
Page 50 and 51: 160 IF GH THEN LET H=G180 GOTO 2020
Page 52 and 53: 30 PRINT A$;40 GOTO 1036 Question &
Page 55: Gee Whiz
Page 58 and 59: 38 Gee Whiz II:Three-Digit MysteryH
Page 60 and 61: 41 Gee Whiz V: SecondAlphabet Spott
Page 63: Number Crunching
Page 66 and 67: 120 LET R::R+l125 LET W=j130 LET Z=
Page 68 and 69: 10 the computer asks for a number.
Page 70 and 71: Program Listing10 PRINT •WHAT IS
Page 72 and 73: 25 INPUT Z30 IF Z=I THEN GOTO 8035
Page 74 and 75: 70 GOTO 2080 CLS90 PRINT "THE SMALL
Page 76 and 77: 60 CLS70 PRINT "THE FRACTIONAL PORT
Page 78 and 79: 30 INPUT N35 IF N>INT N THEN GOTO 5
Page 80 and 81: Line 20 generates the numbers. Line
Page 82 and 83: Random Numbers:Distr~butionEver won
Page 84 and 85:
110 PRINT "RANDOM NUMBERS TOTAL ";T
Page 87 and 88:
Money Matters
Page 89 and 90:
Shopper's FriendTake your computer
Page 91 and 92:
POST IS BEST BUYPOST UNIT=$0.08KELL
Page 93 and 94:
ending in 95 cents. For instance, a
Page 95 and 96:
100 LET D=l-0.0l*P110 LET R=W/D120
Page 97 and 98:
100 IF H>40 THEN GOTO 140110 LET W=
Page 99 and 100:
Unit price is total price divided b
Page 101:
The computer generates a table of r
Page 105 and 106:
80 Screen FullFill your video scree
Page 107 and 108:
gram lines to draw and seem to move
Page 109 and 110:
Program Listing10 CLS100 FOR L=g TO
Page 111 and 112:
There are a number of ways to get t
Page 113 and 114:
140 NEXT X200 LET X=INT(63*RND}210
Page 115 and 116:
Program Listing10 LET A$=• 1120 F
Page 117 and 118:
100 FOR Y=l5 TO 25 STEP 10110 FOR X
Page 119:
101 Random Bar GraphIf you don't ha
Page 123 and 124:
Appendix A:Sinclair BASIC WordsHere
Page 125:
StatementsCLEARCLSCONTCOPYDIMDIM $F
Page 129 and 130:
ooks from ARCsoft PublishersFor the
Page 132:
101 TIMEX 1000/Sinclair ZX-81Progra
show all

page-1983-101-timex-sinclair-programming-tricks

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?