)Т > AddrOf - Find address of variable 6Т Simulates ^varname available on other BBC BASICs : (1Т Initialise with addrof%=FNAddrOf_ 2+Т Use with CALL addrof%,result%,varname <-Т result% gets set to address of variable F: PщєAddrOf_65:ч A% 31:P%=A% Z2[OPT2:LDA &601:STA &70:LDA &602:STA &71:LDY #0 d5LDA &604:STA (&70),Y:INY:LDA &605:STA (&70),Y:INY n0LDA #0:STA (&70),Y:INY:STA (&70),Y:RTS:]:=A% x: ┌щєAddrOf_Z80:ч A% 23:P%=A% ▄8[OPT 2:LD L,(IX+2):LD H,(IX+3):LD A,(IX+5):LD (HL),A √8INC HL:LD A,(IX+6):LD (HL),A:INC HL:LD (HL),0:INC HL ═LD (HL),0:RET:]:=A% ╙: ЄщєAddrOf_32:=0 Ў: хNщєAddrOf_PDP:ч A% 15:!A%=&81D80:A%!4=&C1D81:A%!8=&A311009:A%!12=870002:=A% р: эщєAddrOf_DOS:ч A% 19:P%=A% Ф;[OPT 2:MOV AX,DS:[BP+5]:MOV BX,DS:[BP+2]:MOV DS:[BX],AX П(MOV AX,0:MOV DS:[BX+2],AX:RETF:]:=A% З: щєAddrOf_Win:=0 : : "щєAddrOf_ARM:ч A% 15:P%=A% , [OPT2: 60LDR R0,[R9,#8] :\ r0=address of second param @/LDR R1,[R9] :\ r1=address of first param J.STR R0,[R1] :\ store addr of 2nd in 1st TMOV PC,R14:]:=A% ^: Ъ