-
DEF FN DirectivesI am looking at using some machine code functions from the DK Graphics Pack. They are machine code but they are called via Basic with the function de…
... the function defined such as DEF FN g(x, y, p, q ... -
Can you improve this recursive DEF FN?I came up with this function to scan strings for characters without needing to use FOR...NEXT and IF...THEN, but it seems rather long-winded. Can any…
... ?
Using:
DEF FN w(w$,o$,c)=VAL ... (("FN w(w$,o$,c+1)" ... />
with:
w$(FN w(w$,o$,1))
FN w(w$,o$,1)*100). -
BASin v.15 DEF FN bugThe bug would appear to be in "BASSupport.pas : Procedure ProcessDEFFN"; as it's not inserting the 6-byte variable place holder after each parameter …
... after each parameter in the DEF FN definition. There's code there ... -
Confounded DEF FNCan anyone see why this is going wrong? I've been tinkering with it since tea time and got nowhere. [code] 2 DEF FN t$(n,t,d) =STR$ INT (n/t)…
... nowhere.
[code]
2 DEF FN t$(n,t,d)
+VAL$ (("FN t$("
+STR$ (n-INT ... -
Fix for the DEF FN bug of zmakebasSome months ago I discovered a bug in zmakebas: it does not include the 5 bytes required after every parameter of a DEF FN. By the time, the WoS f…
... after every parameter of a DEF FN.
By the time ... -
BASIC Bug: DEF FN after REMHello all, Having mused the Spectrum ROM disassembly by Drs Logan ad O'Hara, I wondered about how good ZX BASIC was at locating the DEF FN when call…
... BASIC was at locating the DEF FN when called upon.
[code]
10 DEF FN a()=10
20 PRINT ... :
[code]
10 REM : DEF FN a()=10
20 PRINT ... ROM routine that looks for DEF FN, DATA and (oddly) NEXT appears ... -
Is there much ?Do you think there`s much cooperation, and in fact co-development now goes on within the 8-bit community.. in fact is there any? I know that`s a daf…
... , apart from sharing bits of `fast` code... and with the time ... a thing or two regarding Def FN and special pokes etc etc ... -
fn bug in basin?Hi. I was just trying to make myself some functions in basin and when i tryed them, the progam stopped on call. So i've tryed this simple thing: 10 …
... simple thing:
10 def fn a(x)=x*10
20 print fn a(10)
and ... -
FN nesting error?While playing with FN functions that call assembly, I've found something weird. Check out this code: [code]10 DEF FN f(a,b)=a+b 20 PRINT FN f(FN f(…
... this code:
[code]10 DEF FN f(a,b)=a+b ... , if I change the DEF FN to: DEF FN f(a,b)=a, the ... call.
[code]10 DEF FN f(a,b)=a+b ...
20 DEF FN g(a,b)=a+b ... !
40 PRINT FN f(FN f(2,FN g(3,1)),4 ... !
100 PRINT FN g(FN g(2,FN g(3,1)),4 ... -
Random Numbers, USR Return Values & Timing BASICI've been trying out Jon Ritman's random number routine, published in Your Sinclair Aug'87. Apart from a timing comparison I also did a frequency ana…
... Heels. The routine is quite fast and returns a reasonable random ... /> 9999 LET t1=FN t(): LET t2=FN t(): LET t0=t1 ... -
Random-Access to Microdrive FileI am working on a BASIC program to backup a microdrive text-file to standard tape array-file. To backup a text-file from one microdrive to a secon…
... in this post) is very fast: it glues together three ...
[code]
1 DEF FN p(a)=256*PEEK (a ... REM DPEEK(a)
2 DEF FN m(n,d)=n-d ... br /> 3 DEF FN l(v)=v-256*FN h(v): DEF FN h(v ... buf)
1312 DATA FN l(512),FN h(512)
... -
Why are we here? (At WoS)No, not a deep philosophical question about the nature of life, the universe and human existence. The thread “what does your partner think of …
... (except for recursive use of DEF FN, if I remember my [B ... to it you could type fast. And I loved the look ... -
Disappearing/appearing effectI remember doing a small routine in BASIC which could be used to cover the attributes section randomly, until all 704 characters were filled with the…
... 10, 7, 1
10 DEF FN l(v,a,b) = INT ... if it is
20 DEF FN t(x,n) = INT(x ... LET val = FN l(val,FN t(val,8),FN t(val,1 ... -
Dim commandI try o find a BASIC COMPILER for ZX SPECTRUM 128 that use DIM command with two or more letter as 10 DIM AB(10) instead of 10 DIM A(10) Any iforma…
... write your own functions with DEF FN. There's a fairly comprehensive ... />
They're not as fast or flexible as the ones ... -
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…
... quicksort implementation...
[code] 1 DEF FN t()=(PEEK 23672+256*PEEK ... 1000
30 LET t1=FN t(): LET fr=1: LET ... : GO SUB 4000: LET t2=FN t()
40 GO SUB ... the [FONT="Courier New"]REM fast[/FONT] mode - am I missing ... -
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")
FAST[/B] mode
[*]Program execution ... -
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 ... slow even if using [B]FAST[/B] mode[/quote]
maybe ... -
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 ... 40.
4) ([B]FAST mode screen updates[/B]) Tried ... -
checking bits in BASICThe question of manipulating bit patterns in BASIC was raised recently in this [thread=35728]Keys redefine routine and key check[/thread] thread. I s…
... in basic but very fast in assembler, so why ... />
[CODE]
DEF FN b$(b,u)=("" AND USR ... string "0000000000000000" inside the DEF FN, so if you change ... /> 7 DEF FN h(h$)=16*FN n(h$(1))+FN n(h ... its starting address using the DEF FN x(a$).
INSTR function...Hi Folks, Another little program that people might find useful: [CODE]100 DIM i(4) 110 LET a$="This is some sample text" 120 LET b$="text" 130 GO S…
... position p, defined as a DEF FN plus a *small* (117 bytes ... .
[CODE]
1 DEF FN i(n,t$,s$)=USR ... s$
5b3f edb1 CPIR ; fast search inside t$
5b41 ...
3 DEF FN h(h$)=16*FN n(h$(1))+FN n(h ...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…
... integrate your "LDIR Basic fast copy RAM block" ... 59999
3 DEF FN p(a)=PEEK a+ ... 1): DEF FN l(v)=v-256*FN h(v): DEF FN h ... (v)=INT (v/256)
4 DEF FN ... q(a$,b$,l)=5: RESTORE 4: LET fnq=FN ... BAS2TAP don't interprete "FN p(a+3)"...
...TAPlist - the emulator versionI've got this working reasonably well; there's just a couple of small extra features which I want to add. (Recall that TAPlist writes a formatted lis…
... to assembler, but it's fast enough.
[ ... DEF FN p(a)=PEEK a+256*PEEK (a+1):
DEF FN v()=FN ... AND (PEEK FN v()193 OR FN p(FN v()+4)1900 ... OR tabs> PEEK (FN v()+11))):
RANDOMIZE ... tabs=USR (FN p(FN v()+6)-(63600-(FN v()+6)))):
Block RoutineHi Folks, I want to draw a block on the screen dependent on providing the X,Y,W,H values. I came up with the following: [CODE]100 LET l$=" …
... DEF FN a(x,y,h,v)=USR 63000
2 REM FAST ... 0
25 LET i=FN a(5,5,20,15 ...im looking for a horizontal scroll routinehi, im looking for a horizontal scroll routine. i read somewhere that you can do it with at 'to' statement, somewhere in a print routine. althoug…
... using lots of space is fast(ish) (due to having few ... attribute copy parameters
101 DEF FN a$(w$)="":
RESTORE 101 ... : LET da=FN p(23639)+9: POKE da ...
