-
St. 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…
... 5:for c=6 to 12 step 3
610 let ... *j-1:gosub 4000:print chr$(n)
920 let n ... next n:let u$=chr$144:let z$=chr$145
1020 ... next n:let u$=chr$144:let z$=chr$145
1020 ... -
Computer SpacegamesBook Title: [B][URL="http://www.worldofspectrum.org/infoseekid.cgi?id=2000089"]Computer Spacegames[/URL][/B] Authors: [B]Daniel Isaaman & Jenny Tyler…
[CODE]
10 cls
20 print "starship take-off"
30 let g=int(rnd*20+1)
40 let w=int(rnd*40+1)
50 let r=g*w
60 print "gravity= ";g
70 print "type in force"
80 for c=1 to 10
90 input ... -
Computer BattlegamesBook Title: [B][URL="http://www.worldofspectrum.org/infoseekid.cgi?id=2000080"]Computer Battlegames[/URL][/B] Authors: [B]Daniel Isaaman & Jenny Tyle…
... print
80 let c$=chr$(64+int(rnd*26+1 ...
90 let m$=m$+chr$(int(rnd*26+65))
110 for i=1 to 12
120 ket i$=inkey ... *15)
80 let p$=chr$(int(rnd*58+33))
490 print chr$(w(x,y));
500 ... -
How to get a TAP directory listing?I want to be able to list a summary of the contents of a TAP file to a text file so that I can add comments to it. I've got several utilities and emu…
If you're just after .tap rather than all tape formats, it's a 10 minute job...
[code]
#!/usr/bin/perl
use warnings;
use strict;
undef $/;
my @block_types = ( 'Program', 'Number array', ' ... -
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 …
... =0
10 LET a$=CHR$ 14+"azsxcfvgbhnmk,l./'"
20 ... 20
100 LET f=12*o+n-1: PRINT AT ... -
Reading from the 128 Serial PortDon't shout at me if this is a silly question. I have Googled extensively, and searched the forums, but I can't find anything discussing what seems t…
... test file holding 6912 times CHR$ 51, and "Splitcom" found at ... />
loopaddr IN A,(C) ;12
JP P,loopaddr ;10 ... -
z80 format: ED ED xx yyI've just been studying the documentation for the z80 file format: [url]http://www.worldofspectrum.org/faq/reference/z80format.htm[/url] I have a d…
... /> if version == 1 and header[12] & 32 == 0:
ram ... in data:
f.write(chr(b))
def _write_z80_v1 ... (f, header, ram):
header[12] = header[12] & 223
_write_data ... -
The Chuntey InitiativeIt's the start of a new year and with it brings a new wave of optimism and hope! :) In light of the relative success of twitter/speccynews (in the s…
Arjun, the upper$ and lower$ functions only return the first letter of the string capitalized. Something like this will do the whole word:
DEF FN u$(s$)=VAL$ "CHR$ ((CODE s$)-(32 AND CODE s$>96 AND CODE s$ -
The Chuntey InitiativeIt's the start of a new year and with it brings a new wave of optimism and hope! :) In light of the relative success of twitter/speccynews (in the s…
... /> DEF FN u$(s$)=VAL$ "CHR$ ((CODE s$)-(32 AND CODE ... -
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…
... REM DEF FN c$(a)=CHR$ (PEEK (a)-FN t(a ... p=42: DIM z(12): DIM x(12,10): DIM y$(15 ... )
9135 LET n$(i0)=CHR$ (PEEK v0-(INT (PEEK v0 ...
9185 LET n$(i0)=CHR$ (PEEK v0-INT (PEEK v0 ... -
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…
Hi Battle Bunny,
Never ceases to amaze me the difference in performance between BASIC and MCODE. Sounds like you have a powerful routine there.
I have modified my demo version so that it can be used (for future generations ;)) as ... -
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…
Hi Dr Beep etc.
Come on guys - you know more about Sinclair BASIC than is healthy! :smile: Surely you have some tips to optimise/speed up the following code.
[CODE]100 GO SUB 250
110 REM SHELL SORT V4
120 LET b=INT (n ... -
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…
[QUOTE=JamesD;482918]If you can use ELSE it should look like this.
[CODE]110 REM COMB SORT V2
...[/CODE][/QUOTE]
Hi James,
Coded up your V2 Comb Sort and got the following results:
Paddy's original V1 Comb ... -
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…
... n:
LET a$(a)=CHR$ (65+RND*25):
NEXT ... ;a$(a+1);
AT 12,a;a$(n-32+a ... -
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…
... TO n: LET p$(i)=CHR$ (RND*25+65): NEXT i ... [B]n=50[/B], and 12.0 seconds for [B]n ... -
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…
... n:
LET a$(a)=CHR$ (65+RND*25):
NEXT ... ,a;a$(a+1);AT 12,a;a$(n-32+a ... -
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 …
Hi Folks,
Been playing with this and made a few improvements.
[Code]100 REM *---------------------*
110 REM PSS-XINPUT DEMO
120 REM PeaSea Software \*2010
130 REM *---------------------*
140 GO SUB 9315: ... -
SE Basic Type-ins^Pete suggested creating a sticky thread for SE Basic discussion. I thought a Type-ins thread might also be useful. Up to the mods if they want to ma…
... 90 FOR x=1 TO 12
100 READ n
9902 DIM n$(8,12,2)
9903 FOR ... LET n$(o,n,p)=CHR$ a
9908 NEXT ... 9912 FOR n=1 TO 12
9913 READ a
9920 DATA 13,16,12,85,11,164,10,252 ... : LET Bb=11: LET B=12: RETURN
9934 REM ... -
SpecBAS 0.638 available now - NEW STUFF!Actually, there's nothing new in the interpreter - but there [i]is[/i] the beginnings of a new editor. Go get it from: [url]https://sites.google.co…
... +CHR$ 255;INK 14;PAPER 10;CHR$ 1+CHR$ 255;INK 12;PAPER 14;CHR ... $ 1+CHR$ 255;INK 13;PAPER 12;CHR ... $ 1+CHR ... $ 255;INK 0;PAPER 13;CHR$ 1+CHR$ 255 ... -
SpecBAS 0.638 available now - NEW STUFF!Actually, there's nothing new in the interpreter - but there [i]is[/i] the beginnings of a new editor. Go get it from: [url]https://sites.google.co…
... +CHR$ 255;INK 14;PAPER 10;CHR$ 1+CHR$ 255;INK 12;PAPER 14;CHR ... $ 1+CHR$ 255;INK 13;PAPER 12;CHR ... $ 1+CHR ... $ 255;INK 0;PAPER 13;CHR$ 1+CHR$ 255 ... -
SE Basic Type-ins^Pete suggested creating a sticky thread for SE Basic discussion. I thought a Type-ins thread might also be useful. Up to the mods if they want to ma…
... =VAL "11": LET B=VAL "12"[/code]
Notes ... "37"+(o-SGN PI)*VAL "12"[/code]
For ... /> 20 DIM n$(8,12,2)
30 FOR ... : LET n$(o,n,p)=CHR$ a
50 NEXT ... 8: FOR n=1 TO 12: READ a
70 ... /> 200 DATA 13,16,12,85,11,164,10,252 ... -
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. …
Hi Folks,
Well I have almost finished my Model Railway Timetable program and thoughts are starting to move on to project #2. A requirement is likely to be a full screen input routine and to this end I have rewritten my XINPUT code from a few ... -
New Tool: CheqEdit[b]CheqEdit[/b] it's a simple and small program that helps you to draw 64x48 graphics on screen in GRAPHICS MODE. Program can output as text in CHR$ …
... 12,2;CHR$ 129;CHR$ 131;CHR$ 131;CHR$ 143;CHR$ 143;CHR$ 143;CHR$ 143;CHR$ 143;CHR$ 136;" ";" ";" ";" ";CHR ... ,12;CHR$ 136;" ";" ";CHR$ 132;CHR$ 143;CHR$ 130;" ";" ";" ";" ";" ";CHR$ 129;CHR$ 143;CHR$ 143;CHR$ 143;CHR$ 143;
fog
September 2011
Announcements
