Return

EDWARDS ** 31 REDESDALE RD ** IVANHOE 3079 ** 60 RANDOM I IE DEFI NT I, J, G, K , Q CLE AR800 RE STORE CLS L0CATE25,9 PRINTSTAR TREK FO RI 1T01000 NEXT DEF FNR(RA) INT(RND(1)*M AX ) +1 70 CLS SCREENO,,1 LOCATE19,9 PRINTDO YO U REQUIRE INSTRUCTIONS, (Y,N) G0SUB102 O IFQ* YTHEN1lOO STAR TREK * R.O. EDWARDS ** 31 REDESDALE RD ** IVANHOE 3079 ** 80 LOCATE19,10 PRINTNO OF KLINGONS, ( 1 (LOW)-5(HIGH) ) GOSUB1320 1FN< 1ORN > 5TH G ALAXY Q 1.8 N 90 K9 0 B1 0 K1 0 MAX 20 TO FNR(RA)...

Sensors Indicate No Damage On Klingon At

SECTOR K(I,1),K(I,2) G0T0650 640 K(I,3) K(I,3) H PRINTUSING , UNI TS OF ENERGY HIT KLINGON AT SECTOR . ( , LEFT) H,K(I,1),K(I,2),K(I,3) IF DESTR OYED< < G0SUB930 650 NE X TI G0SUB960 G0SUB860 G0T0220 660 PC 0 IFP< 1THEN L0CATE7,14 PRINTBAD LUCK, YOUR OUT OF TORPEDOES FORI 1TO1O OO NEXT G0T0400ELSEIFP 1THEN LOCATE7,15 PRINT LAST TORPEDO 670 G0SUB440 LOCATE7,14 PRINTTORPEDO CO URSE 690 FOR 1 1 T0300 NEXT IFPCOO AND D (1) > OT 700 Y> S.5THEN LOCATE7,16 PRINTBAD LUCK YOU R TORPEDO MISSED...

Info

I would appreciate your publishing this plea for help in the Input Output section of your magazine in the hope that a reader may have overcome the problem that I have been experiencing. I have a System 80 to which I have attached a TC8 Cassette Operating System via a Syspand 80 bus converter. The system will only enable switching of the remote cassette motor and not transfer of programs or data. The TC8 has been tested and operates perfectly on the TRS-80. I removed the Syspand 80 and connected...

Departments

This month's programs for the Colour Computer (Aristocrat and Startrek) show some ways to get around the limiting text display. Although we have received one or two programs from our readers, we hope to see a lot more in the near future. Here are some more hints you may find helpful on your Colour Computer. Don't be alarmed or discouraged if your program produces a syntax error for no apparent reason. Evidently, there is a bug in the BASIC ROM that sometimes causes a program using the PCLEAR...

O O

870 FORI S1-1TOSI +1 FORJ S2-1TOS2+1 IFQ( I, J) < > 3THENNEXTJ,I 60T0890 880 E 3500 P 10 D 500 FORI 0T05 D(I) 5 N EXT C* DOCKED IFK > 0THENCLS Q 1 LOCATE1 9,10 PRINTSTARBASE SHIELDS PROTECT THE 890 IFK< 1THENRETURNELSEQ 1 CLS FOR1 1T03 s 10 D D-H PRINT PRINTUSING , UNITS OF ENERGY HIT ENTERPRISE FROM KLINGON AT S ECTOR H,K(I,1),K(I,2) 900 K(I,3) INT(X X 4*RND(1)+.5) IF D> 0 T HEN PRINTTAB(23) PRINTUSINGSHIELDS REM AINING D G0T0920 910 MAX 6 R FNR(RA) R R-1 H1 INT((-D*(RN D(R)-H1 E E-H...