-
Yesteryear's Computers.Ahhhh ... [URL="http://www.computerworld.com/action/article.do?command=printArticleBasic&articleId=9023960"]back in the day[/URL] when a 300mb system…
... Pentium D 940 with 1.5GB RAM, 0.75TB hard disk space ... -
Project: M.u.l.e.Wokani came up with a great idea about trying an open-development approach for spectrum games, and I thought why not try with a game I have under dev…
... /> Constant 195 1
Constant 195 1
Constant 195 0
Constant ... 195 6
Constant 195 1 ... :\DOCUME~1\ADRIAA~1.ERA\LOCALS~1\Temp\s1dg_1.opt C:\DOCUME~1\ADRIAA~1 ... -
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…
... code]
1 PRINT AT 0,0;"QWERT": FOR i=0 TO 1 STEP 0:
LET ... TO 1 STEP -1: LET a$="-*"(1+(k(b-1)): LET b=1+(b ... NEXT b:
PRINT AT 1,0;a$: NEXT i
[/code ... your post:-
(1) As you stated, it's ... why you chose keys 1,2,3 and 0,9,8. If ... -
Project: M.u.l.e.Wokani came up with a great idea about trying an open-development approach for spectrum games, and I thought why not try with a game I have under dev…
... ++;
break;
case -1:
if ((--blank_counter)!=0) {
do_scroll();
scroll_mode = 1;
install_next_char(mess);
scroll_count = 0;
}
break ... -
Project: M.u.l.e.Wokani came up with a great idea about trying an open-development approach for spectrum games, and I thought why not try with a game I have under dev…
... {
dbuf = zx_cyx2saddr(23,0);
[/code]
... /spectrum/zx_cyx2saddr_callee.asm?revision=1.1&view=markup"]zx_cyx2saddr_callee[/ ... times so b = 1 and c = 0. Then there are 8 ... /spectrum-customize.asm?revision=1.10&view=markup"] ... -
Project: M.u.l.e.Wokani came up with a great idea about trying an open-development approach for spectrum games, and I thought why not try with a game I have under dev…
... ++;
break;
case -1:
if ((--blank_counter)!=0) {
do_scroll();
scroll_mode = 1;
install_next_char(mess);
scroll_count = 0;
}
break ... -
Project: M.u.l.e.Wokani came up with a great idea about trying an open-development approach for spectrum games, and I thought why not try with a game I have under dev…
... // return random number from 0..range-1
extern int u_binomial( ... -2 0.105%
-1 16.063%
0 67.664%
+1 16 ... u_binomial(0) always returns 0 (the amplitude 0 case above), u_binomial(1) returns ... as parameter a number 0,1 or 2 in amp that ... -
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…
... />
[code]
1 DIM a$(3,8):
0:
LET d=0:
FOR l=1 TO 10 ... br /> PRINT "Rock blunts scissors!"(1 TO 21*r);"Paper covers ... cut paper!"(1 TO 19*s);"Tied!"(1 TO 5*(1-t)): ...
PRINT #1; FLASH 1;"Key!":
PAUSE 0:
NEXT l ... -
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…
... *(a(5)>0)*(.5-d-(a(5)=0))
... =p+s*(a(5)>0)*(.5-d)
[/QUOTE]< ... mind:
[CODE]
1 DEF FN v(o$)=2 ... 1900 TO
2e3 STEP .1: LET k$=INKEY$: LET
1 TO c>0: LET a(c)=a(c)+1
/(7-c): LET s=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…
... like two things about this (1) The game cursor is now ... forums
[code]
1 DEF FN v(o$)=2 ... p,d,s: FOR e=0 TO m:
PRINT ... e=1900 TO 2e3 STEP .1: LET k$=INKEY$:
... r=1 TO c>0: LET a(c)=a(c)+1/(7 ... -c):
LET s=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…
... :
[CODE]
PAPER 0: INK 7:
[/CODE]
1:
[/CODE]
with ... TO e STEP e/12-1:
[/CODE]
LET l=(z=0)+z*(1+a-x):
[/CODE ... />
[CODE]
LET b=(1-h)*(b+19*(IN 327660 ... -
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…
... :
[CODE]
PAPER 0: INK 7:
[/CODE]
1:
[/CODE]
... TO e STEP e/12-1:
[/CODE]
[/QUOTE]
LET l=(z=0)+z*(1+a-x):
[/CODE ... />
[CODE]
LET b=(1-h)*(b+19*(IN 327660 ... -
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…
... b+1,a;" ";AT b,a;"| "(1+h+(b=0));AT g-1,x ... +3;" ";AT g,x+4;"| "(1 ... ,,AT b+1,a;" ";AT b,a;"| "(1+h+(b=0));AT 20 ... ,p-1;" ^ ":
[/CODE ... ]
j) Save 1 ... -
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…
... b+1,a;" ";AT b,a;"| "(1+h+(b=0));AT g-1,x ... +3;" ";AT g,x+4;"| "(1 ... ,,AT b+1,a;" ";AT b,a;"| "(1+h+(b=0));AT 20 ... ,p-1;" ^ ":
[/CODE ... ]
j) Save 1 ... -
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…
... ":
PRINT AT g-1,x+3;" ";AT g,x ... b+1,a;" ";AT b,a;"| "(1+h+(b=0));AT ... 20,p-1;" ^ ":
IF ... P
RINT AT g-1,x+3;" ";AT g,x ... 0;s,,AT b+1,a;" ";AT b,
a;"| "(1+h+(b=0 ... ));AT 20,p-1 ... -
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…
... ):
[CODE]
1 READ i,j:
FOR ... /> CLS :
FOR m=1 TO 99:
FOR a ... /> FOR x=1 TO 25+4*(y0)*(j"")*(j=0)*y:
LET i=i+(x+1-i)*(j=0):
LET c=ATTR ... FOR x=1 TO 25+
4*(y0)*(j"")*(j=0)*y ... i=i+
(x+1-i)*(j=0): LET c=ATTR (y ... -
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…
... to try combining both methods 1 and 2 into the same ... />
[CODE]
1 BORDER 0:
POKE 23693,1:
DIM p ... q(6):
FOR l=0 TO 4:
RESTORE :
CLS :
FOR a=1 TO 10:
LET p ... a:
LET m$(p(1)+1)="":
LET k=CODE INKEY ... -
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…
... version 1:
[CODE]
1 BORDER 0:
POKE 23693,1:
CLS :
DIM p(10):
FOR l=0 ... )=52+a-(a=1):
PRINT AT a,0;m$(a*w ... a:
LET m$(p(1)+1)="":
LET k=113-CODE ... =(a=1)*((k=1)-(k=2)+w*((k=16)-(k=0)))+SGN r*(1 ... -
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…
... version 1:
[CODE]
1 BORDER 0:
POKE 23693,1:
CLS :
DIM p(10):
FOR l=0 ... )=52+a-(a=1):
PRINT AT a,0;m$(a*w ... a:
LET m$(p(1)+1)="":
LET k=113-CODE ... =(a=1)*((k=1)-(k=2)+w*((k=16)-(k=0)))+SGN r*(1 ... -
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…
... />
[CODE]
1 BORDER 0:
POKE 23693,1:
CLS :
DIM p(10):
FOR l=0 ... t:
LET m$(p(1)+1)="":
LET k=113-CODE ... INKEY$:
FOR a=1 TO l+2:
LET ... a=1)*((k=1)-(k=2)+w*((k=16)-(k=0)))+SGN i*(1 ... -
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…
... was possible to combine methods 1+3, and I think I ... all other versions (even the 1+2 we had before).
...
...SGN i*(1+11*(i*i0))...
[/CODE ... -
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…
... was possible to combine methods 1+3, and I think I ... all other versions (even the 1+2 we had before).
...
...SGN i*(1+11*(i*i0))...
[/CODE ... -
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…
... />
[CODE]
1 BORDER 0:
POKE 23693,1:
CLS :
0)))+SGN (ABS i-2+SGN (p(1)-g))*(1+11*(i>0 ... ))*(gp(1)):
LET ... c=CODE m$(g+i+1)-45 ... (g/w);m$(g+1);AT w,0;l*58+s;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…
... /> LET o=o*(k0)+(1-o)*(k=0):
[/CODE]
LET o=o+(1-2*o)*(k=0):
[/CODE]
[CODE]
TO 3*(o+1)*(k=0)
[/CODE]
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=Dr BEEP;210195]There is also PAPER (and INK) 9.[/QUOTE]
Right!
This kind of stuff even works for other attributes:
[CODE]
PRINT AT 0,0; FLASH 1;"12"; FLASH 0;"34";AT 0,1; FLASH 8;"ab"
[/CODE]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…
... br /> ...
DATA ...,c*(1-2*(e=0 OR e=31)),ATTR ... 0,d*(1-2*(z OR f=0)),ATTR (b+d,a+c)=0 ... />
[CODE]
c*(1-2*(e=0 OR e=31))
1,1) instead of always at the ... meaning of variable d, so (1,1) will move the ball up ...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…
... br /> ...
DATA ...,c*(1-2*(e=0 OR e=31)),ATTR ... 0,d*(1-2*(z OR f=0)),ATTR (b+d,a+c)=0 ... />
[CODE]
c*(1-2*(e=0 OR e=31))
1,1) instead of always at the ... meaning of variable d, so (1,1) will move the ball up ...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…
... />
[CODE]
1 BORDER 2:
POKE 23693 ... br /> LET s=0:
LET t=1:
LET h ... =3:
LET d=0:
1:
LET w=0:
LET c=0:
... (i); INK 6;"o@"(1+(i=h)):
NEXT ... /> IF (x>-1)*(x-1)*(y4)-(d0),y(h)+(d ...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…
... />
[CODE]
1 BORDER 2:
POKE 23693 ... br /> LET s=0:
LET t=1:
LET h ... =3:
LET d=0:
1:
LET w=0:
LET c=0:
... (i); INK 6;"o@"(1+(i=h)):
NEXT ... /> IF (x>-1)*(x-1)*(y4)-(d0),y(h)+(d ...
