... />
[CODE]
1 DEF FN r(x)=IN x191 AND ... IN x0)*FN r(32766):
LET b ... =(f>a)*(FN r(57342)-FN r(64510)):
LET ...

...
[CODE]
1 DEF FN z$(x)=CHR$ 22+CHR ... (x/7)):
DEF FN m(x)=CODE m$(x ... FN p$(x)=FN z$(x)+CHR$ 16+CHR$ FN m(x)+CHR$ (FN ... br /> READ n:
POKE USR "a"+f,n:
NEXT ... 7 TO 55:
PRINT FN p$(f):
NEXT ... i=6):
LET a=FN m(z+d):
...

... />
[CODE]
1 DEF FN z$(x)=CHR$ 22+CHR ... (x/w)):
DEF FN m(x)=CODE m$(x ... FN p$(x)=FN z$(x)+CHR$ 16+CHR$ FN m(x)+CHR$ (FN ... br /> READ n:
POKE USR "b"+w+4,n:
PRINT FN p$(z+31):
NEXT ... i=6):
LET a=FN m(z+d):
...

...
[CODE]
1 DEF FN z$(x)=CHR$ 22+CHR ... (x/7)):
DEF FN m(x)=CODE m$(x ... FN p$(x)=FN z$(x)+CHR$ 16+CHR$ FN m(x)+CHR$ (FN ... br /> READ n:
POKE USR "a"+f,n:
NEXT ... 7 TO 55:
PRINT FN p$(f):
NEXT ... i=6):
LET a=FN m(z+d):
...

... />
[CODE]
1 DEF FN z$(x)=CHR$ 22+CHR ... (x/7)):
DEF FN m(x)=CODE m$(x ... FN p$(x)=FN z$(x)+CHR$ 16+CHR$ FN m(x)+CHR$ (FN ... br /> READ n:
POKE USR "a"+z+5,n:
PRINT FN p$(f):
NEXT f ... i=6):
LET a=FN m(z+d):
LET ...

... that was via a DEF FN.
I defined the ... like:[CODE]DEF FN P(A,B,A$)=USR 32768[/CODE]and ... called it with:[CODE]LET A=FN ... the parameters of the DEF FN function are to look at ... which points to the DEF FN function in use.

... the parameters of the DEF FN.
So in order to ... :
[CODE]DEF FN P(A,B$)=usr 32768[/CODE]
The ... gets called, and calling the FN from BASIC. Just look at ...

... nice thing about DEF FN + some USR call is that they'll ...

I like the DEF FN method of calling USR functions. Always think it is worth having a distinct m/c entry point to go with it though.

... :let n=11:let m=fn r(8)
410 ... =y(m):let p=2*fn r(2)
420 ... =r+1:let c=c+fn r(3)-2
... to 15:read d:poke usr"a"+n,d
... 1020 return
2000 def fn r(n)=int(rnd*n ... 1
220 let r=fn r(16)+2
... 230 let c=fn r(16)+4
...

... 0
190 let m=fn r(11)-6:let l ... at r,c;" ":let a=usr z
290 let c ... 3
610 let k=fn r(10)-1:ink k ... /> 1020 return
2000 def fn r(n)=int(rnd*n ... /> 1020 return
2000 def fn r(n)=int(rnd*n ... gosub 700
240 if fn r(2)=1 then let ...

... />
[code]
1 DEF FN a(r,n)=r-INT ... $(x)-40):
LET c=FN a(3+PEEK 23673,256 ...

[code]
1 DEF FN a(r,n)=r-INT (r/n)*n:
READ c$,m,n,v,p:
LET x=RND*36+10:
POKE n*(c$(x)>"O"),3:
LET c$(x)=CHR$ (CODE c$(x)-40):
LET c=FN a(3+PEEK 23673,256):
CLS :
LET x=x+n*(c$(p)

... Shift, then 'D'
DEF FN Caps Shift+Symbol Shift, then ... Symbol Shift and 'V'
FN Caps Shift+Symbol Shift, then ... Symbol Shift and 'F'
USR Caps Shift+Symbol Shift, then ...

[code]
1 DEF FN a(r,n)=r-INT ( ... ;"O"),3:
LET c=FN a(3+PEEK 23673,256 ... $(p)=x$):
PRINT "Room:";FN a(CODE c$(p),40 ... x$=h$;"NESW"(g);":";STR$ (FN a(CODE h$,40)^2 ...

... /> DATA : E : D
DEF FN : E : SYM + 1
DIM ... /> FLASH : E : SYM + V
FN : E : SYM + 2
FOR ... /> TO : KLC : SYM + F
USR : E : L
VAL : E ...

[code]
2 DEF FN r(u)=z+z*u*( ... =l+5-4*m(q+FN r(1)*((l=15)-(l ...

... ,j,q:
FOR f=USR 7766^0 TO 25:

[QUOTE=Crisis;283339]
...could a decent DEF FN l(start,adres)=usr Call:REM Call.... work ve(snip)
[/QUOTE]

Can you elaborate on this? I'm not sure what you mean!

... =Crisis;116568]Using a DEF FN for executing MC in a ... />
1 DEF FN c(a,x)=USR (( PEEK a + VAL "256 ... /> [QUOTE]
30 LET other= FN c(NXTLIN,-datalenght): REMxxxDATA-1xxxxxxxxxxxxxDATA ...
...
1000 let other= FN c(NXTLIN,-lenght): RETURN: REM ...

... ][code]
DEF FN r(x,y)=(USR 7766 AND 11)+INT ... replace the computed value of USR 7766 with 0.[/quote]
[code]
DEF FN r(x,y)=(USR 7766 *0)+INT (RND ...

... } N = 0..7
FLASH {fN} N = 0..1
INVERSE ... really great idea, but does USR \a return the adress of ...

...
RANDOMIZE 40000:LET Z=USR 43983
LET TF=1 ...

... a DEF FN?[/quote]

Due to the USR function some ...

... /> [code]
DEF FN w(x,y,a$)=USR 32768
[/code ... />
[code]
LET n=FN w(0,0,a$+CHR ...

... /> [code]
DEF FN w(x,y,a$)=USR 32768
[/code ...