-
Cool BASIC tricks and tips!Following on from Dunny's excellent suggestion of a compendium of BASIC tips + tricks, I believe it would be better to have a topic dedicated to it. …
... Paramters:
300 REM p(1)=Year(YYYY)
305 REM ... p(2)=Month(MM)
310 REM ... Day
320 REM p(5)=Temp1
325 REM p ... :
IF p(3)=1 OR p(3)=2 THEN LET p(2)=p(8)-4715 ... /> On exit p(2) contains the year, p(3) the month and ... -
Cool BASIC tricks and tips!Following on from Dunny's excellent suggestion of a compendium of BASIC tips + tricks, I believe it would be better to have a topic dedicated to it. …
...
320 REM p(5)=Temp1
325 REM ... /> IF p(3)=1 OR p(3)=2 THEN LET p(2)=p(8)-4715 ... 3)="Thursday":
LET d$(4)="Friday":
LET d$(5 ... of the week=";p(2);", ";d$(p(2))
...
... 2)=Weekday
1030 LET p(2)=(p(1)-7*INT(p(1)/7))+0.5 ... -
Location of variableHi everyone When basic makes an array how to you find out the location in the ram of where the data is stored. :) Also, does it store the values in…
... bla=0: LET blu=1: LET red=2: LET mag=3: LET ... 5 THEN GO TO 9240: REM ** COULD BE 2,4,6 OR ... 7
9160 REM --------------------------
9165 REM 5 ... TO 9285: REM ** 2,4 OR 6
9250 REM ... --------------------------
9280 REM 2,4 OR 6
9285 ... -
Schematic ErrorThere appears to be an error in the Schematic for the 128k +2A and +3 the error is present in both the redrawn TIF version and the original drawing …
... schematic is riddled with errors, or the manual is.
0 AUX pin 2 (out) 1 AUX pin 4 (out) 2 RS232 pin 5 ... (CTS out) 3 RS232 pin 3 ... (RXD out) 4 AUX pin 3 (in) 5 ... -
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;AT a-1,b*3;" ";AT a,b*3;" "; PAPER p;AT a+2 ... /> POKE n,6+4*(t(5)=0)
[/CODE]
... br /> LET p=1:
POKE n+73,5:
CLS :< ... 0:
LET d=j+5*(j>1):
FOR e=0 TO 1 ... /> POKE n,6+4*(t(5)=0)
[/CODE]
... -
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 x*3-2,y*3;" ";AT x*3-1,y*3;" ";#0;AT 0,y*3;y:
2,b*3;" ";AT a-1,b*3;" "; PAPER t(k);AT a+1,b*3 ... ;" ";AT a+2,b*3 ... ;" ":
LET t(k+5)=t ... =g+s*(gs)*(s=16 OR s=256):
NEXT j ... -
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 x*3-2,y*3;" ";AT x*3-1,y*3;" ";#0;AT 0,y*3;y:
2,b*3;" ";AT a-1,b*3;" "; PAPER t(k);AT a+1,b*3 ... ;" ";AT a+2,b*3 ... ;" ":
LET t(k+5)=t ... =g+s*(gs)*(s=16 OR s=256):
NEXT j ... -
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=Einar Saukas;480658]Even better, replace this:
[CODE]
POKE (g=0 OR g>256)*n,12:
[/CODE]
with this:
[CODE]
POKE (g*(257-g) -
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.e. when a row or column is moved in one ... and each player must achieve 5 pieces in-a-row (instead ... [CODE]
1 LET p=3:
POKE 23693,5:
CLS :
3-2,23;CHR$ (64+y)," ";y;AT 0,y*3;CHR ... 3+1;CHR$ (78+y); PAPER 1; AT x*3-2,y*3;" ";AT x*3-1,y*3 ... -
The Programmers Development System (PDS)Hi everybody, I recall this system has been mentioned several times on WoS forums. Last time was, I think, when those sources from Maz Spork (Buggy …
... the resolution can never be 1:1, also multi-monitor support ... DOS 5.0 / Windows 3.1 or above.
P2 works with MS-DOS 3.2 and ... above / Windows 98 or below.
< ...
download serial
or
download serial1
The Programmers Development System (PDS)Hi everybody, I recall this system has been mentioned several times on WoS forums. Last time was, I think, when those sources from Maz Spork (Buggy …
... to hack games. The 2 or 4 megabytes of memory ... colours are available (RGB 3:3:3). The default number of ... example; 2 x 4, 1 x 4, 2 x 2, 4 x 3 etc ... >-----------------------------
org 0
dc.l ... 3
dc.l rte ; 4
dc.l rte ; 5 ...Sorting an array...Hi Folks, Over the weekend I had a play with sorting algorithms - takes me back to my student days! :-o My first try was with the good old Bubble S…
... a:
IF c OR b>1
THEN
... f=a:
PRINT AT 5,0;"Finish : ";f;
AT ... /> PRINT AT 0,0;"COMB SORT v4.8";
AT 2,0;"Generating data ... rather than 1.3. This is quicker than using 1.3 although not ...Games in machine codeHi everyone, How do go about doing multiple shots like a machine gun, do you have to store every x and y position of each bullet? When you kill som…
... 0 = none / 1 = player one / 2 = player two / 3 = point to point / 4 = rotating / 5 ... The object X and/or Y position is subtracted from ... ability to add or remove a whole ... a machine gun kills or hits the main player ... all bullets keep going or do they keep hitting ...General purpose full screen input routineHi Folks, One of the things that annoyed me back in the 1980s with most BASICs was the lack of a full screen "formatted" input function. You could …
... I(2)=5: LET I(3)=15: LET I(4)=3:
LET I(5)=0 ... (2)=9: LET I(3)=8: LET I(4)=1:
LET I(5)=0 ... (2)=11: LET I(3)=8: LET I(4)=2:
LET I(5)=0 ... (2)=13: LET I(3)=15: LET I(4)=3:
LET I(5)=1 ...Games in machine codeHi everyone, How do go about doing multiple shots like a machine gun, do you have to store every x and y position of each bullet? When you kill som…
... /> 31 1 BIT RGB mode, 0 ARGB1555 / 1 ARGB4444.
Table 2.3 - Playfield ... Description
0 ~ 4 0 5 BIT Blue componant.
5 ~ 9 0 5 BIT Green ... ARGB1555 or ARGB4444.
Bit Byte Size Description
0 ~ 4 0 5 ...Games in machine codeHi everyone, How do go about doing multiple shots like a machine gun, do you have to store every x and y position of each bullet? When you kill som…
... /> ; ------------
.set: or ecx,ebx
mov [edi ... /> .slow_across: mov al,[esi+3] ; Read alpha
mov ... br />
; c3 = 1.5 * (y1 - y2) + 0.5 * (y3 - y0)
... ,[ebp+hermite_and] ; (SAMPLES*oversample*2)-1
fld1 ; ...Learning Assembly LanguageHow easy would it be to learn assembly language for someone who has a decent grasp of Basic? I mean how long do you think it would take before I coul…
... ; Length = length - 1
ld a,c ;
or a,b ; Best ... way to check if BC = 0
1
ld a,c ;
or a,b ; Best ... /> ; 247 5 4 3 2 1
; 239 6 7 8 9 0
; 223 ...Transferring games into MicrodriveLast week a big pack of empty microdrive cartridges arrived, and now I'm ready to playing with my little microdrive equipped speccy. One of my aim w…
... a,c
db 176 ; or a,b
db 32 ... equ 1 ; WORD
SNA_dex equ 3 ; WORD
SNA_bcx equ 5 ; WORD ... /> mov byte [reg_pc+1],0 ; NOP
mov byte [reg_pc+2],0 ; NOP
Transferring games into MicrodriveLast week a big pack of empty microdrive cartridges arrived, and now I'm ready to playing with my little microdrive equipped speccy. One of my aim w…
... />
*Detailed usage:
1. Click "OPEN SNA" and select ... taken to save window.
5. select target: if you want ... games into one microdrive cartridge or +3 disk.
Sadly, this ... , so you'll need .net 2.0+.
As this ...Learning Assembly LanguageHow easy would it be to learn assembly language for someone who has a decent grasp of Basic? I mean how long do you think it would take before I coul…
... ; Length = length - 1
ld a,c ;
or a,b ; Best ... way to check if BC = 0
1
ld a,c ;
or a,b ; Best ... /> ; 247 5 4 3 2 1
; 239 6 7 8 9 0
; 223 ...Learning Assembly LanguageHow easy would it be to learn assembly language for someone who has a decent grasp of Basic? I mean how long do you think it would take before I coul…
... ]
DEVICE ZXSPECTRUM48 ; Must indent or will be seen as a ... ; Length = length - 1
ld a,c ;
or b ; Best way ... ; Length = length - 1
ld a,c ;
or b ; Best way ... /> ; 247 5 4 3 2 1
; 239 6 7 8 9 0
; 223 ...What model next ?Hi All I already have two 48k rubber kyed 48k Spectrums and a Grey +2 What to get next. ZX Spectrum + ZX Spectrum 128 Toast Rack ZX Spectrum +3
... 2A mode also (ram 0-3 is fast and ram 4 ... ZX128+2A/+3 (A15=0,A14=1,A1=0,IORQ=0,RD=1,WR=0).
... 1) remove original chip PAL10H8 or HAL10H8 in your ZX128/+2(grey)
2 ... file to GAL16V8
5) connect GAL16V8 to new ... and fast ram pages. 0-3=fast ram/4-7= ...Favourite Boxing Game?There were a surprising number of them. Andy's (sirclive1) review of BarryMcGuigan in the Spectrum Bible says that's the best and I'm tempted to agr…
... 19 9 3 5 4 9 )
By Fair Means Or Foul __ ... Simulation ____ 64.5 __ 62 ... 9 9 3 1 1 5 9 )
Boxing _______________ Simulation ____ 35.5 __ ... _____________ Simulation ____ 18.0 __ 10 __ ( 15 4 4 3 2 1 1 1 1 1 3 )Z88DK/SP1 library u_malloc() questionHi All, It may possibly be more appropriate for me to post this on the Z88DK forum, but I know quite a few WoSSers have used Z88DK, so here goes:- …
... anything other than level data, or bitmapped screens. Music is usually ... in FRC).
[QUOTE]3. A shift from algoritm-driven ... br /> Map: 2.5K
5 sprites in memory: 1.5K
PutTiles ... x);
}
ua_list[i]=0;
[/code][/QUOTE]This looks ...Supertest 128 - Loader QuestionI wonder if someone could explain (in simple terms please) :) , the purpose of the switch code. I see what is doing (going to 48k mode via spectrum)…
... title screen, then memory banks 0,1,2,3,4,5,6,7. These are ... 're in the order 0,1,2,3,4,6,7,5.
The ... bank 2 at 2:8000: 0x4000 bytes
; 5. Load bank 3 at 3:C000 ... /> res 4,a ;ROM2
or 7 ;RAM7
di
DivIDE in emulators - the best choiceI tried briefly [B]FUSE [/B]and I don't understand how to get DivIDE working. What exactly do I need, and what exactly should I open. I want to simul…
... ZXCF (Sami Vehmaa) and residos 2.25 (Gary Lancaster) working with ... ZXCF or DIVIDE + (from rwap software)
within Speculator (7.0.1) but ... detailed below.
3. In Windows XP, click the ... up an MSDOS prompt.
5. Reformat the Compact Flash card ...Sprites masterclassHi All, You guys are probably tired of explaining sprites but I'd like to clarify a few things if possible. I've sorted the vertical aspect of scro…
... if anyone's interested (1 down 2 up 3 left 4 right and ... 0,0,0
defb 3,248,0
defb 4,6,0
defb 8,1,0 ...
defw 16544 ;row 5
defw 16800
defw ... 19104;if screen starts here or before, sprite misses third screen ...Sprites masterclassHi All, You guys are probably tired of explaining sprites but I'd like to clarify a few things if possible. I've sorted the vertical aspect of scro…
... /> demo_bank1 db 1,0,0,1
db 2,10,5,2
db 3,20,10,1
and c
or (hl)
ld (hl),a ... ,(de)
and c
or (hl)
ld (hl),a ... a
and 24
or #40
ld h,a ...Compiling Basic to MCHello, I have a lot of long Basic programs. These are mostly strategy programs, good but slow. I was thinking about how to speed them up without com…
... only converts strings to numbers (or 0 if nonsense) as most BASICs ... KEY": PAUSE 0
20 LET a = 1000 * (1 + RND * 3): REM 1000 ... , 2000, 3000
30 LET x = 5: RESTORE ... /> 1000 DATA x * x, x ^2, "HELLO"
2000 DATA x ...+2: 128k enhanced games no longer loading (but OK in 48k mode) :-/Having a spot of bother with my +2, a couple of my favourite games are now refusing to work in standard "Tape Loader" based 128k mode - Marauder (Hew…
... : OUT 32765,19 (for bank 3) or OUT 32765,23 (for bank ... br /> OUT 32765,17 (Bank 1)
OUT 32765,18 (Bank ... br /> OUT 32765,19 (Bank 3)
OUT 32765,20 (Bank ... as well just test banks 1, 3, 4, 6 and 7 ... your 48K stuff works, then 0, 2 and 5 are probably OK.
