Sinclair ZX80 / ZX81 / Z88 Forums

Hi AndiD,

"few bytes"... skills, score...

On a SPECTRUM game, i had to send this info to a second program.

I give an ASCII password (10 chars) to setup the next program.

If the password was a fake, the second program was unable to launch.

Thanks Mark,
Probably a lazy student's work, which Mark has already corrected. No code from the author, and off-topic answers...

Game over for me.

NOT ON A SPECTRUM BASIC !

Have a look to this thread: https://www.sinclairzxworld.com/viewtopic.php?f=5&t=5067 In case of DATA, you had to create an array for all lookup index data, and reduce its lenght. And read the indexed string: LET myindex=16: display team 16 LET maxindex=32 FOR T=1 TO maxindex READ T$ IF T<>myindex TH...

Hi 144kNeo, Welcome aboard. For which Spectrum ? 16k or 48k... In your exemple: Example: FOR e = 1 to 64 STEP 2 READ t,t$ DATA 1,"RAIDERS",2,"BRONCOS",3,"CHIEFS",4,"CHARGERS" etc. INPUT "How many games?";g INPUT "Home Team";h INPUT "Road Team";r Use an array from t$. It will be nice to get memory ro...

Hi,

Try to enter : 10 PRINT "MORE MORE MORE"
And change the PRINT token to REM.
10 REM "MORE MORE MORE"

I don't know if EDIT change the line.

[EDIT]10 REM "MORE" seem ok. (without poking the BASIC command)

Yep! Just place several filling points... Were is the UDG filling solution, by create a "rectangle" subroutine how put solid 8x8 pixels blocs. And tag triangulars UDG blocs on the vectorial lines... It's faster, but can't fill all over include surfaces. An ASM routine is slow too, but more convenien...

I dryed to type it... A RUN save the program, but stop after the "LET BET=100" command. (0/2)! The gosub line can't be deleted, edited or launched. It's a bug? :ugeek: No... Just move extra lines to the proper location, and the game will init the Variables. The program can't launch the initializatio...

Hi, You can't enter lines without poking the line data index. You had to renum the type-ins lines or move extra lines: 1 REM BLACKJACK 2 GOSUB 7999 3 LET B$="..." 7999 LET BET=100 8000 ... 9998 SAVE "BLACKJACK" 9999 RUN Then Line 2 is protected from the LIST/EDIT command. "LIST 2" will point to the ...

10 CLS:CIRCLE 100,100,50 20 LET X=100 30 LET Y=50 40 GO SUB 1000 50 STOP 1010 LET MIN=X:LET MAX=X 1020 IF POINT(MIN-1,Y) THEN GO TO 1050 1030 LET MIN=MIN-1:GO TO 1020 1050 IF POINT(MAX+1,Y) THEN GO TO 1100 1060 LET MAX=MAX+1:GO TO 1050 1100 PLOT MAX,Y:DRAW MIN-MAX,0:LET Y=Y+1:IF POINT(X,Y) THEN RET...