ZX Computings - OpenLibra
ZX Computings - OpenLibra
ZX Computings - OpenLibra
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
ist for the<br />
feel good<br />
luct their<br />
5 book is |<br />
jwed the<br />
critical of<br />
vided onith<br />
many<br />
hen learntricks<br />
to<br />
ium into<br />
Wl. Roger<br />
arned the<br />
packing,<br />
t of them<br />
this little<br />
divided inte<br />
and foriore<br />
frills;<br />
lata files;<br />
; Utilities<br />
:tion titles<br />
how wide<br />
n is in this<br />
elude the<br />
s (CRAPS,<br />
RESCUE!,!<br />
of the surind<br />
useful<br />
V AT,<br />
lit Cards,<br />
id Payslip.<br />
s are very<br />
s Roulette,<br />
i very odd<br />
simulations<br />
i enter your<br />
:k as two<br />
all this is a<br />
one which<br />
tment time<br />
at Can I Do<br />
nputer Ser-<br />
<strong>ZX</strong>80 Programs<br />
AREA CALCULATOR<br />
The following program, produced<br />
for the <strong>ZX</strong>80 and using only the<br />
1K of RAM, will calculate the area<br />
within a polygon. The computer<br />
plot* the point! whose co-ordinates<br />
have been entered, using a 36<br />
symbol code, and the area is<br />
primed underneath. The sign of<br />
the area will be positive if traced<br />
anticlockwise and negative If all,<br />
or any, of the figure is plotted<br />
clockwise. On the display the<br />
plotted points are displayed in the<br />
same code as the axes and are<br />
numbered according to the order<br />
of entry.<br />
In the entry stage of line 80 and<br />
90, inputs of greater value than 32<br />
and 21 respectively will not be<br />
displayed although the area is<br />
still calculated. All the input<br />
co-ordinates are repeated after<br />
entry tor checking, NEWLINE will<br />
cause the program to continue if<br />
they are correct.<br />
10 PRINT "HOW MANY VERTICES'" 220 FOR O 0 TO V t<br />
20 INPUT V 230 lFY-Y(OIANDX X(0) 1 HEN GOTO 270<br />
X CLS 240 NEXT Q<br />
40 PRINT "GIVE CO ORDINATES" 250 PRINT "<br />
50 DIM X(V-l) 260 GOTO 280<br />
60 DIM YIV1I 270 PRINT CHRSIQ + 1561.<br />
70 FOR N = 0 TO V 1 280 NEXT X<br />
80 INPUT XIN) 290 PRINT<br />
90 INPUT YIN) 300 NEXT N<br />
100 PRINT "r,X(N);".",Y(N),"l" 310 FORN 0 10 31<br />
110 NEXT N 320 PRINT CHR$! 156 * Nl,<br />
120 INPUT AS 330 NEXT N<br />
130 CLS 340 LET Z = 0<br />
140 FOR N = 1 TO 20 350 FOR R ~ 0 TO V 1<br />
150 LET Y e 21N 360 LET S - R + 1 - ((R + ll/vrv<br />
160 PRINT CHRS( 156 + Y) 370 LET TsR+2-HR + 2I/V)*V<br />
170 FOR P = OTO V-1 380 LET Z - Z + XlSl'IYlT) Yav«<br />
n«V »0i»ntur» you * av« warn tor lha (mca of ona<br />
Comaa on ••aim wtth awtrucfeon book. (7 K<br />
CONTROL TECHNOLOGY -<br />
PERSONAL<br />
COMPUTER SCIENCE<br />
Cassette 1!4<br />
A tupa« vaiua eaaaarca o< 1W and IK tottw*>* «rm»n .<br />
Mactwia Coda and Baa*<br />
Includaa<br />
Raact invadan Phantom Al«m Man of Daatt 1<br />
Planatianctar. I C>»ng. Hangman. Invadar*. Laaat Baae.<br />
ractangla pkjl mora<br />
ALL ONLY [4 SE<br />
Tapebook 50, Version 3<br />
SO program! for (ha IKRAM 2X81<br />
Laiaat vtuun ncHxMt<br />
SQUASH BREAKOUT, COLUMBIA SPLAT,<br />
INTEGRATION. CREDIT CARD CALCULATOR BANK<br />
A C. VATCHECK, TANK BATTLE, TORPEOO<br />
HEXLOADER BINARY CONVERTER AND LOTS LOTS<br />
VOHE<br />
SM amamg yaAra at