-
Let a=val "1"I see some basic programs which use Let a=val "1" instead of let a=1 syntax. what is the difference between val "1" and 1? is it an effect of some …
I see some basic programs which use Let a=val "1" instead of let a=1 syntax.
what is the difference between val "1" and 1?
is it an effect of some compiler or converter?
just curious. -
BASIC: Fast way of filling a string?Recently I decided to use string slicing to extract random numbers from a sequence in the one-liner Lottery picker: [quote] 20 RANDOMIZE : LET a$=""…
... to extract random numbers from a sequence in the one-liner ... /> 20 RANDOMIZE : LET a$="": FOR f=1 TO 49: LET a$=a$+CHR$ (f): NEXT ... );":": FOR f=1 TO 6: LET b=1+INT (RND*LEN ... a$): PRINT AT g-1,8+(( ... f-1)*3);" "( TO (CODE a$(b) -
So you want to make a cardgame......but you haven't got a good deck to display. Well here is a fully relocatable routine that will do the job for you. Place the code anywhere in me…
... the routine:
LET A$="QH": PRINT USR adres;A$
PRINT AT ... -
A tidy loader for minigamesThe minigame competition doesn't permit the use of separate loaders like [code]10 LOAD "": RAND USR 32768[/code] The loader must be included in the b…
... afterwards[/i][/b].
[code]LET a = PEEK 23635 + 256 * PEEK ... USR
6 97 a
7 13 Carriage ...
1018 65 Variable name (a)
1019 0 Mantissa
===========
There's a way to squeeze out another ... -
Copying a SCREEN$ in ZX BASIC in 1 second?!Following on from the revived "[thread=20207]Saving a complete SCREEN$ in BASIC[/thread]" thread (although Arjun really only needed a suitable POKE i…
... />
How can the LET s$=a$ (the bit that does the ... =16384: LET dl=6912: LET defadd=23563
30 FOR a=udg TO ... +1,FN h(udg):
LET s$=a$:
POKE defadd,0 ... +1,FN h(udg):
LET a$=s$:
POKE defadd,0 ... -
Drawing a "window"...Hi Folks, I want to display a blank window over an existing screen. It then draws a border around it but that is not the point of my question. Ini…
... $ 0:
FOR a=3 TO 19:
LET m$=m$+CHR ... 0:
CLS
110 LET a$=CHR$ 17+CHR$ 7+CHR ... LET c$=""
130 FOR a=1 TO 10:
LET c$=c$+a ... $:
NEXT a:
LET c$=CHR$ 19 ... -
Can anyone see a way to speed up the following line of code?Hi Folks, Been looking at bottle necks in my code using BASin's Profiler and the following line (well the 2nd LET statement) is somewhat slow. [COD…
... following line (well the 2nd LET statement) is somewhat slow.< ... =INT (CODE z$(a,4)/16)
LET a$=(("D" AND h ... )+("DP" AND z$(a,o)=CHR ... +CODE z$(a,6)*256+CODE z$(a,5)))[/CODE]< ... />
Does anyone see a way to speed it up ... -
Is there a limit to the numberof variables you can have in BASIC..... Reason I ask is I've got an idea....but using my "lowest common denominator" approach to code I fear that I'…
... upwards of 200 variables (LET a=1, LET b=2...etc etc) to ... this kind of thing....basically a maze with walls held as ... -
How much space does a number take?Hi Folks, Could someone please remind me how much memory a number takes up in a BASIC listing. For example, if you had: [CODE]100 LET a=3000[/CODE…
... how much memory a number takes up in a BASIC listing. For ... had:
[CODE]100 LET a=3000[/CODE]
does the ... -
Overflow Detection while Scanning a Number from a StringI've got some strange behaviour from a subroutine that reads a number from a string and converts it to a 32-bit long. It's C's strtol if it helps to…
... a subroutine that reads a number from a string and converts it to a ... It's certainly true within a base system. Eg within base ... what about a representation of a base X number in a binary ... to proving this:
Let a = the running total, b = base ... -
A "bit" of a curiosityHaving to use a bit of m/code to do the AND in that key check function, I was prompted to revisit the "AND,XOR,OR,...for BASIC" topic and came up wit…
... )=g:
RESTORE llll: LET da=PEEK 23639+256*PEEK ... LET ba2=INT (a/2): LET bb2=INT (b/2):
LET ba=a-ba2 ... *2: LET ... bb=b-bb2*2:
LET a=ba2: LET b ... -
Omitting LETAn untested thought. Changing: [code]1B34 SUB $CE ; Reduce command code by $CE to ; give 00 to 31 for comman…
... to REPORT-C if not a
; command[/code]to
LD (CHADD),HL
LD A,'LET'-$CE ; Set current code to ... LET to be omitted, allowing [b]a=1[/b] instead of [b]LET a ... -
A 128 Routine to Put Tokens in StringsI was writing a DEF FN on the +128k and decided that I'd had enough of not being able to put function tokens in strings without a great palaver and s…
... : LET a=FN p(23639):
LET la=256*PEEK (a+1)+PEEK (a+2): LET ... ll=FN p(a+3): RESTORE 9990:
LET ... ae=a+4 ... +ll: LET ... -
need some help with a small programHi you all, maybe someone can quickly help me on this small program, I just did a really small program for a presentation, I want the letters to ch…
... 1
120 let a$="blablabla"
130 let b$="blablabla"
140 ... print at 9,11; ink i; a ... $="T120"
205 let o$="O3"
210 let d$="t$+o ... $+"abcdef"
215 let e$=t$ + "O4abcdef"
220 ... -
Saving a file and removing the title (Program:)I remember when saving a program how I could construct a string such as: 10 let a$=chr$ 8+ chr$ 8+"name" 20 save a$ In order to remove the "Program…
... when saving a program how I could construct a string such as ... :
10 let a$=chr$ 8+ chr$ 8+"name ... "
20 save a$
In order to ... the "Program:" title to display a different loading header.
quick RAM copy using LET in BASICI'm in the process of reviewing, revising and refining all the programming tips & utility routines which I've posted on this forum over the last eigh…
... is the source, as in LET a$=b$. a$ & b$ contain either ... /> IF FN p(a+3)=5 THEN
LET loc=VAL VAL ... $ (CHR$ PEEK (a-3)+"$"):
POKE a+1 ... (l)
35 POKE a,0: NEXT a: LET a$=b$: POKE da+1 ...Can a guy that traveled on the short bus learn machine code...Hmmm So after some soul searching I figured it was time to finaly nail spectrum machine code. Its so frustrating to sit infront of a basic listing w…
... LET A$=""
30 IF A$="" THEN INPUT A$
40 LET Y=CODE A$-48 ... : IF Y>9 THEN LET ... =Y-7
50 LET Z=CODE A$(2)-48: IF Z ... >9 THEN LET Z=Z ...
70 LET X=X+1
80 LET A$=A$(3 TO )
A game from an other machine.if someone interesting, this is a game I created in 1989. this is the basic source, maybe somebody can convert to specy. An image: http://www.ep128.…
... AT X,Y:"š":LET X$(X,Y)=" ":LET A=X:LET S=Y:GOTO ... AT TA1,TA2:"‘":LET TAI=1
810 !LET A=3:LET S=19 ... CALL RASZT
880 LET A=KEZA:LET S=KEZS:CALL EMB
A-1,S)="-" THEN CALL EMB:LET A=A-1:CALL EMB ... OR X$(A-1,S)="-" THEN CALL EMB:LET A=A-1:CALL ...Tomb Raider - LegendSeven and a half hours. Seven and a half bloody hours. Seven hours and a tad over thirty mins TOTAL. Great Graphics. Great Story. A GRAND TOTAL …
... Dictionary.
TOMB RAIDER: A very poor game which disappointed ... as Resident Evil or Dino Crisis. but I'm sure you ... finished game - but then why let a little thing like facts spoil ... slur.
Saw a fantastic program a while back - Brass Eye ...Speeding up select processing...Hi Folks, I have the following code in my program and it works fine but is rather "sluggish". I have even moved it to the beginning of the program …
Hi BB, Crisis,
Thank you for ... REM
260 LET t(1)=2:
LET t(3)=t ... /> POKE 23560,0
280 LET t(2)=PEEK 23560:
numbers to binaryHi everyone, I have looked through the manual and have found nothing. How do you change a number to binary easily? I know you can go binary to decim…
[QUOTE=Crisis;541408][code]
5 CLEAR ... : LET a=BIN 11011011: PRINT "a=";a'"a$=";
25 LET a$=FN b$(a,15): PRINT a$
I know a working RECURSIVE function like this ... for your STOP-question.
A recursive formula in BASIC needs ...Can anyone see a way to speed up the following line of code?Hi Folks, Been looking at bottle necks in my code using BASin's Profiler and the following line (well the 2nd LET statement) is somewhat slow. [COD…
[QUOTE=Crisis;547615]Nested FOR:NEXT are very slow as well, better change that in several GOTO's
[code] IF xCan anyone see a way to speed up the following line of code?Hi Folks, Been looking at bottle necks in my code using BASin's Profiler and the following line (well the 2nd LET statement) is somewhat slow. [COD…
[QUOTE=Crisis;547615]Not ... steady variables, plan this (a little) ahead
... [code]
let a=b+c: let d=(a>g): let a=a-d
... [/code]or
[code]
let a ... QUOTE]
Hi Crisis,
Already do ...Can anyone see a way to speed up the following line of code?Hi Folks, Been looking at bottle necks in my code using BASin's Profiler and the following line (well the 2nd LET statement) is somewhat slow. [COD…
[QUOTE=Crisis;547723]Hi Paddy,
Hi Crisis,
Well assuming that ... ]100 DIM a$(1,1)
110 LET a$(1,1)="A"
... 120 IF a$(1,1)= ... "
140 IF a$(1,1)="A" THEN PRINT "Hello"[/CODE ...
