-
Lerm MicroMate - SDPHi All, I'm having a go at preserving a microdrive version of Lerm MicroMate. I?ve got a few problems, though, as the software has been unbelievably…
... LERM cartridge header "???TRANS??? [CHR$ 16,17,21,84,82,65,78 ... -
Writing for MultifaceI was just wondering, is it possible to write a BASIC program, compile it and use the Multiface to run it? I'd like to write a small util to edit te…
[quote]
On 2005-11-29 08:54, aowen wrote:
I once made a ROM game for the crap games competition by replacing the tape routines with a simple compiled BASIC game. I'm not sure anyone ever played it, but it demonstrates that it is possible.
... -
Lesser used BASIC commandsAre there any interesting articles or books that explore some of the lesser used BASIC commands/functions e.g. DEF FN, IN, OUT etc? The Spectrum BAS…
... 30
50 PRINT AT 21,0; INK 7;a$
CHR$ (128+8*POINT (x,y ... -
Ways to use double buffering in basicI was meddling with woody's print stream code where you can print characters at any pixel location on screen. I was playing with 12 sprites, very ann…
... /> 1280 let h$=chr$ 17+chr$ 6+chr$ 20+chr$ 1+s$
1290 ... ****** bombs **********
3610 print at 21,pos;"Y";
3620 if ... -
Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... ,x;CHR$ 144: PRINT AT 21,INT (RND*32); INK 2;CHR$ 145 ... -
Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... ,x;CHR$ 144: PRINT AT 21,INT (RND*32); INK 2;CHR$ 145 ... ;"Get ready!!":
FOR f=21 TO 85: LET u(f ... : POKE 23692,255: FOR f=21 TO 85: LET b=u ... (f-20):
PRINT AT 21,u(f);"*": PRINT : PRINT AT ... -
Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... AT 0,x; INK 6;CHR$ 144: FOR g=0 TO ... /> PRINT AT 21,RND*31; BRIGHT 1; INK 7-g;CHR$ (145 ... -
Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... ,g; BRIGHT 1; INK f;CHR$ (145+s): LET s=NOT ... ): PRINT AT x,y;CHR$ 144;AT 21,p;" _____ ":
LET ... =s+t: LET f=(x=21 AND (yp+5)):
LET ... +2*(x=0)-2*(x=21): NEXT f:
PRINT AT ... -
Game OptimisationBelow is a section of code Im using for movement enermy display and collision detect. What happens is that you move the sight with ,.qa and space do…
... /> 100 PRINT AT playery,playerx;CHR$ 144
105 LET A ... IF newy21 THEN LET newy=21
191 IF newx = playerx ... /> 196 PRINT AT playery,playerx;CHR$ 144
200 ... as before ... -
Game OptimisationBelow is a section of code Im using for movement enermy display and collision detect. What happens is that you move the sight with ,.qa and space do…
... /> 100 PRINT AT b,a;CHR$ 144
105 IF a ... /> 210 PRINT AT f,e;CHR$ 145
220 IF e ... =0: LET f=INT (RND*21)+1
240 LET e ... =0: LET f=INT (RND*21)+1: LET g=0
Game OptimisationBelow is a section of code Im using for movement enermy display and collision detect. What happens is that you move the sight with ,.qa and space do…
... =0: LET f=INT (RND*21)+1: LET g=0: LET ... /> 60 PRINT AT b,a;CHR$ 144
70 LET a ... THEN PRINT AT b,a;CHR$ 144: LET c=0
CHR$ 144+" ": GO TO 160
CHR$ 144: GO TO 160
21)+1: PRINT AT f,e;CHR$ 145
Game OptimisationBelow is a section of code Im using for movement enermy display and collision detect. What happens is that you move the sight with ,.qa and space do…
... : LET f=INT (RND*21)+1: LET g=0: ... /> 60 PRINT AT b,a;CHR$ 144
65 FOR ... (z,2)=INT (RND*21)+1: LET d(z, ... THEN PRINT AT b,a;CHR$ 144: LET c=0 ... -1: PRINT AT b,a;CHR$ 144+" ": GO TO 160 ... 1: PRINT AT b,a;CHR$ 144: GO TO 160 ... =INT (RND*21)+1: PRINT AT f,e;CHR$ 145
Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... : BORDER 0: CLS : PRINT AT 21,0; INK 1;"~~~~~~~~~~~~~~TTT~~~~~~~~~~~~~~~";: INK ... ;" ";AT y/9,x/9;CHR$ 144;: LET o=x: LET ...Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... ;-9);AT 12-b,a;CHR$ (144+b/17);AT 11 ... -b,a;CHR$ 145:
NEXT b:
CHR$ 148 AND (j>0 ... -9);AT 12-b,a;CHR$ (144+b/17);A
T 11-b,a;CHR$ 145: NEXT b: NEXT
j,i;CHR$ 148 AND (j>0 ...Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
[QUOTE=Digital Prawn;208732]Yes, it's a great improvement, and as always you are welcome to improve any of my games as you see fit.[/QUOTE]
Thanks! Tonight I also improved your "Titan Lander" game by implementing limited fuel, support for ...Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... y/5,x/5;CHR$ 144;AT 21,0;"Fuel:";f,"Wind ...Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... 3582+8,c; FLASH h;CHR$ (147+i); FLASH 0;AT ... 0,28;t;"s";AT 21,RND*29+1; INK 3 ... >.1);CHR$ (46+98*(r>.1));AT 21,29*r ... ; INK 2;CHR$ 145+"_"+CHR$ 145 AND ...Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... 3582+8,c; FLASH h;CHR$ (147+i); FLASH 0;AT ... 0,28;t;"s";AT 21,RND*29+1; INK 3 ... >.1);CHR$ (46+98*(r>.1));AT 21,29*r ... ; INK 2;CHR$ 145+"_"+CHR$ 145 AND ...Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... ;AT y*3,x*3;CHR$ c(a);AT w*3 ... ,v*3;CHR$ c(b) AND c(b ... ,v*3;" " AND s;AT 21,0;"Lives:";l,"Score:";t ...Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... ;AT y*3,x*3;CHR$ c(a);AT w*3 ... ,v*3;CHR$ c(b) AND c(b ... ,v*3;" " AND s;AT 21,0;"Lives:";l,"Score:";t ...Oneliner contestHello to you all, I dare you to make a program on 1 BASIC line. Here is the place to sent your ONELINERS [url]http://www.zxspectrum.00freehost.co…
... ,...
DATA ...,b-d,b=21,...
[/CODE]
to ... ,d-d*2*z,b=21,...
[/CODE]
[/quote]
New oneliners for 2008[INDENT][INDENT][INDENT]Here's my attempt at a first-person-perspective 3d game in one line of BASIC. It's called 'wormhole', and you've got to get t…
... AT 10,p;CHR$ 144;AT p,10;CHR$ 145;AT 10 ... /> NEXT p:
PRINT AT 21,0;"Score:";p-20:
New oneliners for 2008[INDENT][INDENT][INDENT]Here's my attempt at a first-person-perspective 3d game in one line of BASIC. It's called 'wormhole', and you've got to get t…
Here are the improvements I mentioned:
[CODE]
1 READ n,a$:
FOR c=0 TO 8:
POKE USR "b"-c,SIN (c/3)-1:
POKE USR "c"-c,129:
LET q=INT (c/2)+1:
CIRCLE 91,92,CODE " $LS "(q):
POKE (cSt. Michael Micromasters: Computer GamesHi, The [URL="http://www.worldofspectrum.org/infoseekid.cgi?id=2000988"]St. Michael Micromasters: Computer Games[/URL] book doesn't currently have a…
... br /> 290 gosub 4000:print chr$(n+48):gosub 5000:print ... chr$(51):let s(n)= ... /> 320 data 17,21,23,12,16,21,8,12,15,14 ... w:next z:if k$=chr$(m+48) then let ... (m)=s(m)-1:print chr$(s(m)+48)
... next n:let u$=chr$144:let z$=chr$145
...
