29.12.2012 Views

spectrum utility - OpenLibra

spectrum utility - OpenLibra

spectrum utility - OpenLibra

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

ZX EDUCATIONAL<br />

A suite of programs which can be used<br />

for any Sinclair computer, devised by<br />

lan Howland and Damian Clay of Avon.<br />

These programs are a suite,<br />

either to be put individually into a<br />

IK ZX81, or to be put in<br />

together with the menu in a 1 6K<br />

ZX81 or Spectrum. Each program,<br />

with your measurements<br />

will work out the area of the<br />

following shapes:<br />

1 SQUARE/RECTANGLE<br />

2 TRIANGLE<br />

3 CIRCLE<br />

4 SEMICIRCLE<br />

5 RING<br />

Each program follows the same<br />

pattern. First the screen clears<br />

and then asks for the first<br />

measurement, it then displays<br />

the measurement given and the<br />

programs:- SQUARE/RECT-<br />

ANGLE, TRIANGLE and RING<br />

ask for a second measurement.<br />

Once all the measurements<br />

have been entered and verified,<br />

the screen is cleared and the formulae<br />

displayed. The computer<br />

then works out the answer and<br />

displays it. If you use the menu<br />

and ail of the programs, then<br />

change each set of lines which<br />

say:-<br />

PRINT AT 1 5,5:"HIT A KEY TO<br />

CONTINUE"<br />

PAUSE 4E4<br />

GOTO (1 000)(2000)(3000)<br />

(4000X5000) (depending on<br />

which routine it is in)<br />

Alter these lines to:<br />

"PRESS C TO CARRY ON OR M<br />

FOR MENU"<br />

G$ = INKEY$<br />

IF G$ = "M" THEN RETURN<br />

IF G$ = "C" THEN GOTO<br />

(1000)(2000H3000){4000)<br />

(5000) (as appropriate)<br />

GOTO (3 lines back)<br />

24 ZX COMPUTING APRIL/MAY 1985

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!