-
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…
... " method):
[code]10 DEF FN b$(n)=("0000" AND n ...
30 PRINT FN b$(INT (n/16));FN b$(n-16 ... -
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…
... /> [code] 5 RANDOMIZE
10 DEF FN b$()=STR$(INT (RND*2 ... n$=FN b$()+FN b$()+FN b$()+FN b$()+FN b$()+FN b$()+FN b$()+FN b$()
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…
... it... :)
[code]10 DEF FN b$(n,d)=VAL$ "STR ... $(INT (n/d),d/2)+FN b$(n-d*INT (n ... -255): ";n
30 PRINT FN b$(INT (n/16),4 ... );FN b$(n-16*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…
... i: PRINT : RETURN
9000 DEF FN t()=(PEEK 23672+256*PEEK ... 5000
9030 LET t1=FN t(): LET a=1: LET ... : GO SUB 4000: LET t2=FN t()
9040 GO SUB ...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…
... i: PRINT : RETURN
9000 DEF FN t()=(PEEK 23672+256*PEEK ... 5000
9030 LET t1=FN t(): LET a=1: LET ... : GO SUB 4000: LET t2=FN t()
9040 GO SUB ...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…
[B]STEP 3 -[/B] Now let's take a look at the quicksort algorithm, since we will need to properly understand it in order to find further improvements.
The basic idea behind the quicksort algorithm can be represented by the following pseudo-code ...variable variable names with VAL$It's possible to make the RH-side variable names in a LET statement be themselves variable by using VAL$. Thus, if v$ holds the [b]name[/b] of anothe…
[QUOTE=Dr BEEP;483699][code]
1 let b$="hello"
2 let v$="b$"
3 let a$=VAL$ v$
4 print a$
[/code][/QUOTE]
Very nice - scope for a [B]DEF FN[/B] there ?!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…
... i: PRINT : RETURN
9000 DEF FN t()=(PEEK 23672+256*PEEK ... 5000
9030 LET t1=FN t(): LET a=1: LET ... : GO SUB 4000: LET t2=FN t()
9040 GO SUB ...ForthTrying to search for FORTH programs and FORTH articles within the forum is proving to be a complete nightmare!! If I search for FORTH in Infoseek I …
... that's because it uses DEF FN and FN). "Mined Out", "Derby Day ... ] [INT] 1000
OP /
FN INT
OP -
OP ...inverting graphics using basic?just curious if it could be done by poking screen memory ? and what's the structure. (foreground / background for each char ? ) reason I ask is I'd …
... bit long funciton):
DEF FN O(x,y)=(128 AND ... AND INT (FN V(FN V(FN V(FN V(FN V(FN V(FN V(x ... ) OR INT FN V(FN V(FN V(FN V(FN V(FN V(FN V(y ... , this is AND:
DEF FN A(x,y)=(128 AND ... AND INT FN V(FN V(FN…inverting graphics using basic?just curious if it could be done by poking screen memory ? and what's the structure. (foreground / background for each char ? ) reason I ask is I'd …
... bit long funciton):
DEF FN O(x,y)=(128 AND ... AND INT (FN V(FN V(FN V(FN V(FN V(FN V(FN V(x ... ) OR INT FN V(FN V(FN V(FN V(FN V(FN V(FN V(y ... , this is AND:
DEF FN A(x,y)=(128 AND ... AND INT FN V(FN V(FNinverting graphics using basic?just curious if it could be done by poking screen memory ? and what's the structure. (foreground / background for each char ? ) reason I ask is I'd …
... bit long funciton):
DEF FN O(x,y)=....
FN, but how, can please somebody ... are depend on another function (FN V) and that is dependant ... itself on yet another function (FN T from memory)!BASin Problems etc.Hi Folks, Paul has asked me to open this thread to document any outstanding issues that we find within BASin. No guarantees that Paul can/will fix …
... in the IDE
[*][B]DEF FN [/B]does not work - causes ... runtime
[B]100 DEF FN a(x,y,p$)=CODE ... TO y)
110 PRINT FN a(3,4,"Paddy")
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…
...
10 DIM s$(length): DEF FN p(a)=PEEK a+256 ... +1):
DEF FN l(v)=v-256*FN h(v): DEF FN h(v ... )=INT (v/256):
LET udg=FN ...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…
... uses this technique with a DEF FN to handle copies from string ...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…
... .
[code]
10 DEF FN p(a)=PEEK a+256 ... +1):
DEF FN l(v)=v-256*FN h(v): DEF FN h(v ... )=INT (v/256)
20 DEF FN ... PEEK a>127):
DEF FN m$(a$,a,b$,b ... $(b$,b,l,1)+")":
DEF FN d$(a$,a,l,o ...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…
... value:
[code] 10 DEF FN D(o,n)=n-VAL ... /> For example [b]BEEP 1, FN D(4, C)[/b] would ...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…
... .
[code]
2 DEF FN p(a)=PEEK a+256 ... +1):
DEF FN l(v)=v-256*FN h(v): DEF FN h(v ... )=INT (v/256):
DEF FN d ... a>127)
3 DEF FN m$(a$,a,b$,b ... ,INT(l/256),1)+")":
DEF FN d$(a$,a,b,l ...That thing on ZX_Beccy's shelfI am sure I am not the only one who thinks ZX_Beccy has the most amazing Sinclair collection but has anyone else been curious about that white spectr…
[QUOTE=murtceps;534043]there's also two < Symbols and two > Where = ended up.[/QUOTE]
Also, no CIRCLE, DRAW, DEF FN, FN, OPEN#, CLOSE#, CAT, MOVE, ERASE, FORMAT :)BASin Problems etc.Hi Folks, Paul has asked me to open this thread to document any outstanding issues that we find within BASin. No guarantees that Paul can/will fix …
... =Paddy Coleman;507897]
[*][B]DEF FN [/B]does not work - causes ...BASin Problems etc.Hi Folks, Paul has asked me to open this thread to document any outstanding issues that we find within BASin. No guarantees that Paul can/will fix …
... questions...
1) ([B]DEF FN[/B]) I am using version ...Storing and displaying attributes...Hi Folks, I have a requirement to store and then redisplay a line of attributes from the screen. For example: 100 DIM a$(1,32) 110 LET line=10 120…
... delimiter character for a DEF FN definition, telling the FN variable search routine ...New Functions for Sinclair BasicA total of 52 new functions can be added to Sinclair BASIC; 26 numeric functions (A-Z) and 26 string functions (A$-Z$). Owing to the internal structu…
... $[/B]
[code]
1 def fn b$(d)=val$ (("str$ d ...
[code]
1 DEF FN b$(d)=VAL$ ((CHR$ 19 ...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…
[code]
1 DEF FN b$(d)=VAL$ ((CHR$ 19
3+"d" AND d1))
[/code]Saving and Loading from tape in MC?I'm actually having problems with saving and loading from the ROM routines for the interpreter... I'm currently using the following codes for saving…
... :
[code]
4 DEF FN p(a)=PEEK a+256 ... ):
DEF FN g(v)=v-FN h(v)*256:
DEF FN h(v ... =FN p(FN p(errsp)): LET sp=FN p(errsp):
POKE sp,FN ... errsp THEN
LET sp=FN p(errsp):
POKE sp ...
