spectrum utility - OpenLibra

More documents

Recommendations

Info

Greg Turnbull, our regular adventure columnist, presents a program which will assess your ability to cope with those knotty problems! 42 'IIIIIMmilUI/IMHKIUMir, Part 1 1 PrM STARTER PRO 2 PRINT AT 0,91 t I INK
300-360 400-420 500-520 600-640 650-690 700-730 800-815 900-915 1000-1 140 1116-1910 Double number answer. (X,Y) Single number answer (XI Single word answer. Personality test (P.TEST) no.1. Answer and score (A$ ,PT1 A) Personality test (P.TEST) no.2. Answer and score (A$ ,PT2B) Load UDG. Graphic "A" = "" P.TEST no.1 results/comments P.TEST no.2 results/comments I.Q. Test. Introductory message (Y$), as above. Start test, choose question number, update clock, check to see if question already answered, goto question line number (1000 +(16 * Question number)) ie the main question loop. The 50 I.Q. test questions. Print question, GOSUB for an answer, check to see if question was passed on 1 PRW I.O. TEST. 1950-1990 2000-2310 3000-3540 4000-4230 5000-5130 9990-9999 ISPECTRUM DOMESTIC) fanswer = 0), remove question from screen, return to main loop (line 1040). Time-upAest completed, GOSUB for results, return to menu. P.TEST no.1 . Set-up screen, and print intro message (Y$). Start test, print questions in sequence, check each answer, increase score. End test, GOSUB for result, print result/comments and return to menu. P.TEST no.2. As per P.TEST no.1 except no message and there are 30 questions. I.Q. test results. Get I.Q. value from score, print score, print I.Q. value and comments, return to menu. I.Q. test examples. Auto-save/Verify routine: By GOTO 9900, and REM for program size: 34.6 K RNKE 236O«?F250: POKE 23561, 6: POKE 23562,3: LET SIZE=(PEEK ?762 - '+256*PEEK 23628-23^55) / 1000 : LET FREE=< 65536 USR "'962)/ 1000 3 REM 4 REM *********************** 5 REM ***I.Q. TEST PROGRAM*** 6 REM **** By G.Turnbul1.**** REM **For 48K ZX Spectrum** 8 REM *********************** 9 REM 10 REM INITIAL SCREEN. 11 LET A«=- mm mm mm 12 LET B*=' 13 LET C«=' LS : PRINT AT - ',0;E«;AT 12,11; ••: BEEP .6,35: PAUSE 75 20 REM LOAD M.C. 21 CLEAR 65110: RESTORE : FOR A-65110 TO 65128: READ B: POKE A ,B: NEXT A: READ C: LET C=C+6512 8: FOR A=65129 TO C: READ B: POK E A,B: NEXT A 22 DATA 62,9,237,71,237,94,201 ,0,0,0,62,62,237,71,237,86,201,0 , 0 23 DATA 21,229,213,197,245,17, 16,0,33,16,0,205,181,03,241,193, 209,225,243,195,56,0 25 REM INTRO. 76 PAPER 4: BORDER 4: INK 0: C LS : PRINT "INTELLIGENCE QUOTIEN T (1.0) TEST'; OVER 1;AT 0,05" 2- LET Y»= INS ONE I.Q. ALITY TESTS. F 50 Q'S, T NR 70 MINS OK). IT MUST FSTS CANNOT LY ACCURATE. W POTENTIAL D ONCE. VERY VARIED THIS PROGRAM CONTA TEST AND TWO PERSON THE TEST CONSISTS O AND HAS A TIME LIMI (BY A REAL TIME CLO BE NOTED THAT I.Q T BE REGARED AS TOTAL THE TESTS ONLY SHO AND CAN ONLY BE USE INTELLIGENCE IS A INDIVIDUAL FACTOR A ND IS RELATEDTO A GENERAL LEVEL OF ABILITY, AS SHOWN IN THE PER FORMANCE OF AWIDF RANGE OF DIFFE RENT TASKS." 28 RANDOMIZE USR 65110: FOR Z= 1 TO LEN Y*: IF Y*(Z)=" * THEN PRINT " •;: GO TO 30 29 PRINT Y*(Z);: BEEP .05,25: PAUSE 3 70 NEXT Z: RANDOMIZE USR 65120 : PAUSE 25: GO SUB 50 75 REM TEST MENU. 36 PAPER 0: INK 7: BORDER 0: B PTGHT L: CLS : PRINT "I.Q. TEST MENU:"; OVER I;AT 0,0;" T. \ 7~* 78 • < » PRINT "PRESS 1 FOR I.Q. TES * F O R PERSONALITY TEST No. "7 FOR PERSONALITY TEST No.2 4 FOR I.Q. TEST EXAMPLES."'' INPUT "TEST No.";X: IF X=4 I, • I 1 • THEN GO TO 5000 le 14 LET • • mm • 7-9 TF X4 THEN GO TO 3 0 • • • 3 IS LFT wmm u wmm m • 40 GO TO X*1000 >S wmm 1 • • P 50 REM CONT. ROUTINE. 16 LET F«=A* + B« C« • D*
Page 1 and 2: Special New Supplement ^ ^ ^ ^ The
Page 3 and 4: THE FASTEST WAY TO GET THE BEST PRO
Page 5 and 6: 3MW ZX Coin puling is published bi-
Page 7 and 8: How to play Valhalla Dear Sirs, t l
Page 9 and 10: Bugs Dear ZX Computing My children
Page 11 and 12: S$ Mid$ (S$, 7,4) becomes: LET S$ =
Page 13 and 14: 4-00 FOR - = i "0 INT ( RND»7 4-£
Page 15 and 16: and 'new paragraph' in the text so
Page 17 and 18: POWERFUL AND INEXPENSIVE BUSINESS S
Page 19 and 20: PASS ALL THE QUESTIONS AND DISCOVER
Page 21 and 22: one to review it right away! Our co
Page 23 and 24: "nn 1 COMMM JOYSTICKS MMM The Cheet
Page 25 and 26: 1010 PRINT "INPUT THE LENGTH 1020 I
Page 27 and 28: Meet the Gang! IsT EVER MULTI-ROLE
Page 29 and 30: had a vague idea that professional
Page 31 and 32: PAUL MCCARTNEY'S When the ^ music s
Page 33 and 34: This message is transmitted in stan
Page 35 and 36: SPECTRUM UTILITY A PRESENT FROM UNC
Page 37 and 38: (S^ JZ i f ratte A b faa 32256 7E00
Page 39 and 40: 3606,0: POKE 2360-', 60: STOP LET y
Page 41: REWRITE THE HIGH SCORE TABLES So, y
Page 45 and 46: 312 IF PT1 A—1 THEN PRINT * VERY
Page 47 and 48: 1266 GO SUB 90 1267 FOR A=2 TO 5: P
Page 49 and 50: 1550 PRINT AT 5,2;"1";TAB 9; "2"; T
Page 51 and 52: Well take you beyond the Spectrum.
Page 53 and 54: ething • congame, :US Ex a God le
Page 55 and 56: mm e. Ca^® ROCKET MAN LOOK! NOW TH
Page 57 and 58: twenty entrants who make up the mos
Page 59 and 60: •'LEVELS not iust revision but al
Page 61 and 62: Educational Software are at: 20 Bea
Page 63 and 64: , >. 5 OR ATTR =62 THEN LE T it=ltM
Page 65 and 66: • 8115 DATA 24,24,24,60,126,126,2
Page 67 and 68: 985 SPECIAL FEATURE come on in Prog
Page 69 and 70: TT You are Captain of the Earthship
Page 71 and 72: HOPE YOU HNYT A NOTE OF ^HE" R.E YW
Page 73 and 74: ZX PROGRAMMING CREATING AN ADVENTUR
Page 75 and 76: FIGURE 5. ZX8 7 VERB SET UP 8000 DI
Page 77 and 78: (SPECTRUM ADVENTURE! ITS A full adv
Page 79 and 80: 145 IF b»( TO 3>=n«( TO 3) THEN G
Page 81 and 82: 5 URN 1199 REM ** GET 1200 IF tell
Page 83 and 84: ND x 3 2350 2332 10 THEN 7 THEN SPE
Page 85 and 86: he path, to"*"prepare your peopl e
Page 87 and 88: 5 furolrj * C/e Of Bain raor t e Fa
Page 89 and 90: tions. Last time, I described the s
Page 91 and 92: Fig. 2. Demonstration of Z80 Arithm
Page 93 and 94:
ZX PROGRAMMING The hexloader places
Page 95 and 96:
The Collins Collection Collins have
Page 97 and 98:
5 of saving the creatures on this p
Page 99 and 100:
varying degrees of Artificial Intel
Page 101 and 102:
• GENERAL ARTICLE SCREEN MACHINE
Page 103 and 104:
n. et or 985 cancelled by bad weath
Page 105 and 106:
variable string A$, the last two di
Page 107 and 108:
SHARP'S INVADES ENGLAND! WAR in the
Page 109 and 110:
VK R v . m > FX:;,* N ' 4 - 4 i A'*
Page 111 and 112:
Alphabetical order Dear David, I ha
Page 113 and 114:
SK1 • connected. When you are sat
Page 115 and 116:
[SOFTWARE REVIEWS! An extended sect
Page 117 and 118:
the program come in the form of a f
Page 119 and 120:
SPECTRUM GAME PATIENCE V — PAIRS
Page 121 and 122:
1630 FOR N- ; PAPER 6 i 1640 640 IF
Page 123 and 124:
Getting a program typed in is often
Page 125 and 126:
[PROGRAMMING TIPS) ZX81 Spectrum Co
Page 127 and 128:
up with codes 63 and 64 the same as
Page 129 and 130:
Lineage: 40p per word. F^ 1 mSmm Se
Page 131:
NAVIGATOR Shy. StAil and InMligmt-P
show all

spectrum utility - OpenLibra

Create successful ePaper yourself

Delete template?

Save as template?