-
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…
... =2 OR k=4:
PRINT AT 5+10*(k>2 ... :
FOR p=-23 TO 0:
PLOT 232*e-88 ... -
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…
... />
[CODE]
PRINT AT 10,14;"SIMON";AT 0,0;"Max:";p-1:
[CODE]
PRINT AT 10,14;"SIMON";AT 12,16;p-1 ... -
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…
... />
[CODE]
PRINT AT 10,14;"SIMON";AT 0,0;"Max:";p-1:
[CODE]
PRINT AT 10,14;"SIMON";AT 12,16;p-1 ... that 39 over the limit at this point. -
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…
... =-1 TO 0:
FOR v=4 TO 7:
PRINT AT v ... />
[CODE]
FOR b=0 TO 1:
BEEP b ... v=4 TO 7:
PRINT AT v+9*(q>2 ... -
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…
... />
[code]
FOR b=0 TO 1:
BEEP b ... v=4 TO 7:
PRINT AT v+9*(q>2 ...
[code]
FOR v=0 TO 7:
BEEP (v ... -8-3*(q=4):
PRINT AT v+4*(v2),16*(q ... -
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…
... =2 OR k=4:
PRINT AT 6+10*(k>2 ... :
FOR p=-23 TO 0:
PLOT 232*e-88 ... -
DivIDE+ and 128K HeatsinkI got my DivIDE+ yesterday and i tried it on a 48K+ at first, it worked marvelously on it, no problems at all. Today i desided to try it on my 128 H…
... i do the OUT and PRINT USR 0 stuff? I mean i ... to use the OUT and PRINT USE 0 to put DivIDE Plus ... does not support 128K mode at all.
Anyway, a ... -
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…
[QUOTE=Digital Prawn;251872]Save 1 character by inserting statement [b]LET f=b-d[/b] into the code.[/QUOTE]
[QUOTE=Digital Prawn;251883]DIM m(2e3) would save another character.[/QUOTE]
Good thinking!
Now I found a way ... -
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…
I got it!
Since we are now using variable [B]f[/B], we don't really need variable [B]b[/B] anymore. We can eliminate it and thus save another 6 positions!
Here's the new version again, now 2 positions [B]under[/B] the limit:
... -
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…
My algorithm sofar (numbers in front are statementnumbers, except the line below which is the display routine)
No check on field already used yet
[code]
1 DIM m(600):
2 LET m(42)=1:
3 FOR r=1 TO 9:
4 ... -
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…
Einar,
your algorithm looks short and promising.
This is what I made until now
[code]
Statements:
1 DIM m(999):
2 LET m(66)=1:
3 FOR r=1 TO 10:
4 FOR c=1 TO 15:
5 RESTORE :
6 ... -
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…
... TO 10:
PRINT AT 10,10;r-1;"0% ready":
FOR ... -
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…
... to provide 256 scrolls, at which point the terrain could ... for one aggressive alien at a time, hopefully which ... )="I":
POKE 23692,0:
LET f=PEEK ... /> POKE 23689,g:
PRINT r$(1 TO 32):
PRINT OVER 1;AT 0,s;" W ":
... -
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…
... ]
1 INK 7: PAPER 0: CLS : DIM a$(1200): FOR ... FOR f=1 TO 6: PRINT AT 10+f,10; PAPER 1 ... ): NEXT f
30 PRINT PAPER 2;AT y,13;" "
40 ... -
Announce: BASin r14b availableHere's the fix mentioned earlier for those of you that either are too lazy to update your OS (XP SP2 has been out aaaaages, Arjun!) or even junk that…
... $(p+8)="I": POKE 23692,0: LET f=PEEK 23688: LET ... a=0 TO 255: POKE 23688,f: POKE 23689,g: PRINT r ... 32): READ f,g: PRINT OVER 1;AT 0,s;" W ": READ r ... -
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…
... =0 TO 31: PRINT INK 6;AT 19,f;CHR$ 131;AT ... CHR$ 140: NEXT f: PRINT AT 20,11;"SCORE:";p
50 PRINT AT 18,c; BRIGHT 1; INK ... THEN PRINT AT x,y;" ": LET x=x-1: PRINT AT x, ... a(y-1)=x-3: PRINT AT x,y;" ": LET ... b+1
90 PRINT AT 20,17;p: RETURN< ... -
Microdrive Help...Hi All, I need a little help.. I would like to transfer one of my all time favorites to microdrive "Atic Atac" (for which I have an original tap co…
... . It just came up with "0" :-x !
I then ... me, but doing a PRINT USR 0 then LOAD *"m";1;"ATIC ... load it higher up, say at 32000 then use a small ... -
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…
... I wanted to print "score" at (0,0), move the cursor to (0,10) and ... (g_textBuffer, score);
d_Print(0, 0, INK_BLACK | PAPER_WHITE, 0, g_textBuffer);
[/code]
print. This little aggravation causes text ... -
IF2 Rom snapshot creationHi, is it possible convert a Speccy 16k snapshot to a Interface 2 Rom file? I've the original Ultimate Pssst, Cookie, Trans-am and Jetpac tapes and …
... to below 32768. Assemble at $A000 and PRINT USR it (otherwise output ... goes to channel #0). You will ... /> LD DE,$0000 ;number starts at 0
getval1:
LD A ... $30 ;convert ASCII "0" to "9" into 0-9
PUSH HL ... -
Porting C64 text adventures to ZX Spectrum?I would like to port some of my text adventures from the C64 on over to the ZX Spectrum. Is this easy to do? Can someone with knowledge of the Spectr…
I wrote them in BASIC 2.0 on the Commodore 64. They are fairly easy to port, assuming the C64 and Spectrum BASICs share similar commands (although I noticed that Spectrum BASIC uses PRINT AT and apparently lacks a READ command).
Paul -
Porting C64 text adventures to ZX Spectrum?I would like to port some of my text adventures from the C64 on over to the ZX Spectrum. Is this easy to do? Can someone with knowledge of the Spectr…
... wrote them in BASIC 2.0 on the Commodore 64. They ... noticed that Spectrum BASIC uses PRINT AT and apparently lacks a READ ... sure you're not looking at ZX81 BASIC, which doesn't ... -
How to claim back the border space in basic?Hey, I'm wondering if there is a way to reclaim the space the border usually occupies in BASIC? I am sure I have hit BREAK on some games and ended up…
... the border by POKE 23659,0
Be aware that ... can now use PRINT AT 22,0 and PRINT AT 23,0 to print there.
PRINT #0;AT 0,0;
and
PRINT #0;AT 1,0; -
Sudoku on ZX Spectrum 48KZX Spectrum 48К Sudoku game 25 years Spectrum and 300 years Leonhard Euler anniversary. 6000 (and more) puzzles, 8 levels. [url]http://www.t…
... LET e=100: LET m=0.4: RANDOMIZE
120 INPUT ': PRINT #0;" LONG ... q$="": LET t$="": FOR x=0 TO 255: LET q$=q ... $+CHR$ 0: LET t$=t$+CHR$ x ... x
140 FOR y=0 TO 175: LET p$=q ... t$
150 FOR x=0 TO 255: LET p=1 ... INT (e*p/(p+1)+0.5): LET l=x-INT ... -
Sudoku on ZX Spectrum 48KZX Spectrum 48К Sudoku game 25 years Spectrum and 300 years Leonhard Euler anniversary. 6000 (and more) puzzles, 8 levels. [url]http://www.t…
... the body and the fin at the bottom is the same ...
...
if you look at the background they do disappear ... 't be there whilst looking at the shark[/QUOTE]
PRINT AT 20,1+4;TAB 32 ... *o-2,y: DRAW 3,0: NEXT y: NEXT x
'orange' on a spectrumalways wondered why spectrums could never seem to achieve the colour orange? wasn't one of the default colours, and don't remember seeing anything th…
... LET n=85: FOR i=0 TO 7: POKE USR "a ... x=0 TO 31: FOR y=0 TO 21
30 PRINT AT y ... : NEXT x
50 PAUSE 0
[/code]'orange' on a spectrumalways wondered why spectrums could never seem to achieve the colour orange? wasn't one of the default colours, and don't remember seeing anything th…
... LET n=85: FOR i=0 TO 7: POKE USR "a ... x=0 TO 31: FOR y=0 TO 21
30 PRINT AT y ... : NEXT x
50 PAUSE 0
[/code][/QUOTE]
CSSCGC 2008 has now officially begunFor coming last in the 2007 crap game compo, I have the honour and privilege of hosting CSSCGC 2008! I have now put up the CSSCGC 2008 website at …
...
Reset and type "PRINT PEEK 50000"
0.62 0
RealSpectrum 0
EightyOne 1.0 Various ...
POKE 50000,100:PRINT PEEK 50000 :- result= ... br /> POKE 50000,100:PRINT PEEK 50000 :- result=100
Print ATHello, Can someone please tell me how to do a Print AT command? Thanks,
PRINT AT Y,X;"Foo"
Where X is 0 to 31 and Y is 0 to 21 (assuming no funny poking around in the system variables...)Print ATHello, Can someone please tell me how to do a Print AT command? Thanks,
... , all those different ways to PRINT AT!!
How about a ... long winded way to do PRINT AT, :D[/QUOTE]
[code ... )*2048
1030 FOR g=0 TO 7
1040 POKE ... x=32 THEN LET x=0: LET y=y+1
