Sinclair ZX80 / ZX81 / Z88 Forums

"Your computer" 04/82 " Nim " / Basic game/ Contributor : Antipontifex. 1000 GOTO 1030 1010 SAVE "NIM" #1020 STOP 1030 GOSUB 2510 1040 GOSUB 1760 1050 GOSUB 1900 1060 IF G(1)+G(2)+G(3)+G(4)+G(5)=0 THEN PRINT "ROTTER. YOU WON." 1070 IF G(1)+G(2)+G(3)+G(4)+G(5)=0 THEN STOP 1080 GOSUB 1280 1090 IF G(1)...

"Your computer" 06/82

"ZXMinbug" John Sylvester Jun'82 page 50

/ ASM Tool/

Yu know what… it is not a minibug, but several big one.


Unable to launch it...

Contributor : XavSnap.

"Your computer" 01/82 " Memory economy: OXO 1k " / Basic game/ Contributor : XavSnap. # REM ·º½=*,ADG*·G*½A=A·*ºD.½Gr00O 0 REM [HEX:\ 02,05,08,14,17,1A,26,29,\ 2C,17,02,2C,17,08,26,14,\ 26,02,17,05,29,1B,08,2C,\ B7,68,7A,34 ] 2 PRINT"˜ «™ «š " 3 PRINT"««««««««" 4 PRINT"› «œ « " 5 PRINT"««««««««" 6 ...

"Your computer" 01/82 " Moon Lander " / Basic game/ Contributor : Antipontifex. 0 REM MOONLANDER 1 PAUSE 100 5 LET F=200 10 LET X=INT(RND*36) 20 LET H=20 30 LET S=0 38 CLS 39 PRINT AT 20,0;"°®«®ªª®®®®®®®®®®³³³³³³®®®®®ªª«»¬" 40 PLOT X,H 41 PLOT X+1,H 45 IF F>0 THEN IF INKEY$="S" THEN GOSUB 1000 48 IF...

"Your computer" 06/83 " Matrix Mover " (KIMCALC) / Basic tool / Contributor : Antipontifex. 1 DIM A$(19,4,7) 2 DIM B$(19,4,31) 9 STOP 10 SLOW 11 PRINT AT 0,23;"«kimcalc«" 12 DIM D$(7) 15 PRINT AT 2,0;"««««««a««««««b««««««c««««««d«««" 20 FOR A=1 TO 19 21 IF A<10 THEN PRINT AT A+2,0;"0";A; 22 IF A>9 T...

"Your computer" 04/82 "LOWE MYSTERY PROGRAM " /? Basic tool ?/ Contributor : XavSnap. 0 REM LOWE MYSTERY PROGRAM 10 LET A=16509 15 PRINT TAB 2;PEEK A*256+PEEK(A+1);" "; 20 LET L = PEEK (A+2)+ 256* PEEK(A+3)-1 29 LET A = A + 3 30 FOR N=1 TO L 35 IF PEEK (N+A)<>126 THEN GOTO 50 40 LET N=N+5 45 GOTO 55...

"Your computer" 05/82 "Magic Square" /Basic game/ Contributor : Antipontifex. 1 SLOW 10 PRINT AT 0,8;"< MAGIC SQUARES >" 12 PRINT AT 2,14;"816" 13 PRINT AT 3,14;"357" 14 PRINT AT 4,14;"492" 16 PRINT AT 6,1;"IN THE MAGIC SQUARE SHOWN ABOVE" 17 PRINT AT 7,0;"EACH ROW, COLUMN AND DIAGONAL" 18 PRINT AT ...

"Your computer" 07/82 "Plotter-Planner" /Basic tool/ Contributor : XavSnap. 500 CLS 505 LET B$=E$ 510 GOTO 520+60*(CODE B$(1)>=128) 520 FOR J=CODE B$(2) TO CODE B$(3) STEP SGN(CODE B$(3)-CODE B$(2))+1*(B$(2)=B$(3)) 530 PLOT J,CODE B$(1) 540 NEXT 550 LET B$=B$(4 TO ) 560 GOTO 510+120*(B$="") 580 FOR ...

"Your computer" 06/83 "Quick Load" /ASM tool/ Contributor : XavSnap. 0 REM [HEX: \ CD,E7,02,21,\ A0,0F,10,FE,\ 3E,7F,DB,FE,\ 1F,30,3D,2B,\ 7C,B5,20,F2,\ 21,0A,40,4E,\ 37,CB,11,28,\ 21,9F,E6,03,\ C6,02,5F,D3,\ FF,06,22,10,\ FE,3E,7F,DB,\ FE,1F,30,1C,\ 06,20,10,FE,\ 1D,20,EC,06,\ 6E,A7,10,FD,\ 18,DB,2...

"Your computer" 09/82 "REM memory" /Basic tool/ Contributor : XavSnap. 1 REM .. 2 REM .... 10 LET TL1=256*PEEK 16512+PEEK 16511 20 LET LL1= 4+TL1 30 LET PTL2 = 16508+LL1+3 40 LET TL2=256*PEEK(PTL2+1)+PEEK PTL2 50 LET NTL=TL1+4+TL2 60 POKE 16512,INT (NTL/256) 70 POKE 16511,(NTL-256*PEEK 16512) 80 POK...