>map ================================================================================ Description : drop anchor, !try, !result (must be bytecodes 0..3) Lut base $000, 8 Bit bytecode, BC = $00 = BC[7:4] < bbbb : [aiiiiiiii] = $00 (0) LUT $0: $000002d3 = JMP #j1 : Skip mask = %0 $0 2D3: F543C9F6 j1 OR pbase,PA 2D4: F603C7E8 MOV z,x 2D5: F603CFD9 MOV y,dcall 2D6: F607D000 MOV x,#spin2 2D7: FD640A28 SETQ #$5 2D8: FC67C765 WRLONG z,PTRA++[5] 2D9: F603B3F8 MOV dcall,PTRA 2DA: 0563C9F6 _RET_ XOR pbase,PA ================================================================================ Description : drop anchor, !try, result Lut base $000, 8 Bit bytecode, BC = $01 = BC[7:4] < bbbb : [aiiiiiiii] = $01 (1) LUT $1: $000002d3 = JMP #j1 : Skip mask = %0 $0 2D3: F543C9F6 j1 OR pbase,PA 2D4: F603C7E8 MOV z,x 2D5: F603CFD9 MOV y,dcall 2D6: F607D000 MOV x,#spin2 2D7: FD640A28 SETQ #$5 2D8: FC67C765 WRLONG z,PTRA++[5] 2D9: F603B3F8 MOV dcall,PTRA 2DA: 0563C9F6 _RET_ XOR pbase,PA ================================================================================ Description : drop anchor, try, !result Lut base $000, 8 Bit bytecode, BC = $02 = BC[7:4] < bbbb : [aiiiiiiii] = $02 (2) LUT $2: $000002d3 = JMP #j1 : Skip mask = %0 $0 2D3: F543C9F6 j1 OR pbase,PA 2D4: F603C7E8 MOV z,x 2D5: F603CFD9 MOV y,dcall 2D6: F607D000 MOV x,#spin2 2D7: FD640A28 SETQ #$5 2D8: FC67C765 WRLONG z,PTRA++[5] 2D9: F603B3F8 MOV dcall,PTRA 2DA: 0563C9F6 _RET_ XOR pbase,PA ================================================================================ Description : drop anchor, try, result Lut base $000, 8 Bit bytecode, BC = $03 = BC[7:4] < bbbb : [aiiiiiiii] = $03 (3) LUT $3: $000002d3 = JMP #j1 : Skip mask = %0 $0 2D3: F543C9F6 j1 OR pbase,PA 2D4: F603C7E8 MOV z,x 2D5: F603CFD9 MOV y,dcall 2D6: F607D000 MOV x,#spin2 2D7: FD640A28 SETQ #$5 2D8: FC67C765 WRLONG z,PTRA++[5] 2D9: F603B3F8 MOV dcall,PTRA 2DA: 0563C9F6 _RET_ XOR pbase,PA ================================================================================ Description : ABORT result (2 LSBs must be 0/1/2/3) Lut base $000, 8 Bit bytecode, BC = $04 = BC[7:4] < bbbb : [aiiiiiiii] = $04 (4) LUT $4: $000012f5 = JMP #retn : Skip mask = %100 $4 2F5: F603F1E6 retn MOV PTRA,dbase 2F6: FD640A28 SETQ #$5 2F8: FB07C75B RDLONG z,--PTRA[5] 2F9: 341FC801 IF_NC BITL pbase,#$1 WCZ 2FA: 3D9FFFE8 IF_NC JMP #retn 2FB: F41FC800 BITL pbase,#spin2 WCZ 2FC: 3603D1E3 IF_NC MOV x,z 2FD: CC67D141 IF_c WRLONG x,++PTRA 2FE: 0C7801E7 _RET_ RDFAST #$0,y ================================================================================ Description : ABORT x Lut base $000, 8 Bit bytecode, BC = $05 = BC[7:4] < bbbb : [aiiiiiiii] = $05 (5) LUT $5: $00000af5 = JMP #retn : Skip mask = %10 $2 2F5: F603F1E6 retn MOV PTRA,dbase 2F7: FD640828 SETQ #$4 2F8: FB07C75B RDLONG z,--PTRA[5] 2F9: 341FC801 IF_NC BITL pbase,#$1 WCZ 2FA: 3D9FFFE8 IF_NC JMP #retn 2FB: F41FC800 BITL pbase,#spin2 WCZ 2FC: 3603D1E3 IF_NC MOV x,z 2FD: CC67D141 IF_c WRLONG x,++PTRA 2FE: 0C7801E7 _RET_ RDFAST #$0,y ================================================================================ Description : RETURN result Lut base $000, 8 Bit bytecode, BC = $06 = BC[7:4] < bbbb : [aiiiiiiii] = $06 (6) LUT $6: $000012f5 = JMP #retn : Skip mask = %100 $4 2F5: F603F1E6 retn MOV PTRA,dbase 2F6: FD640A28 SETQ #$5 2F8: FB07C75B RDLONG z,--PTRA[5] 2F9: 341FC801 IF_NC BITL pbase,#$1 WCZ 2FA: 3D9FFFE8 IF_NC JMP #retn 2FB: F41FC800 BITL pbase,#spin2 WCZ 2FC: 3603D1E3 IF_NC MOV x,z 2FD: CC67D141 IF_c WRLONG x,++PTRA 2FE: 0C7801E7 _RET_ RDFAST #$0,y ================================================================================ Description : RETURN x Lut base $000, 8 Bit bytecode, BC = $07 = BC[7:4] < bbbb : [aiiiiiiii] = $07 (7) LUT $7: $00000af5 = JMP #retn : Skip mask = %10 $2 2F5: F603F1E6 retn MOV PTRA,dbase 2F7: FD640828 SETQ #$4 2F8: FB07C75B RDLONG z,--PTRA[5] 2F9: 341FC801 IF_NC BITL pbase,#$1 WCZ 2FA: 3D9FFFE8 IF_NC JMP #retn 2FB: F41FC800 BITL pbase,#spin2 WCZ 2FC: 3603D1E3 IF_NC MOV x,z 2FD: CC67D141 IF_c WRLONG x,++PTRA 2FE: 0C7801E7 _RET_ RDFAST #$0,y ================================================================================ Description : call obj.sub Lut base $000, 8 Bit bytecode, BC = $08 = BC[7:4] < bbbb : [aiiiiiiii] = $08 (8) LUT $8: $0180b2db = JMP #callnin : Skip mask = %110000000101100 $602C 2DB: FC67D161 callnin WRLONG x,PTRA++ 2DC: FD63CE13 callobj RFVAR y 2DF: FD63C613 callsub RFVAR z 2E1: F067CE02 SHL y,#$2 2E2: F103CFE4 ADD y,pbase 2E3: FD640228 SETQ #$1 2E4: FB03CFE7 RDLONG y,y 2E5: F103C9E7 ADD pbase,y 2E6: F103CBE8 ADD vbase,x 2E7: F603CDD9 callptr MOV dbase,dcall 2EA: F067C602 SHL z,#$2 2EB: F103C7E4 ADD z,pbase 2EC: FD640228 SETQ #$1 2ED: FB03CFE3 RDLONG y,z 2EE: F603F1E6 MOV PTRA,dbase 2EF: FB07B31F RDLONG dcall,PTRA[-1] 2F0: FD63C634 GETPTR z 2F1: FC67C71F WRLONG z,PTRA[-1] 2F2: F103CFE4 ADD y,pbase 2F3: FC7801E7 RDFAST #$0,y 2F4: 0103F1E8 _RET_ ADD PTRA,x ================================================================================ Description : call obj.sub[] Lut base $000, 8 Bit bytecode, BC = $09 = BC[7:4] < bbbb : [aiiiiiiii] = $09 (9) LUT $9: $00c01adc = JMP #callobj : Skip mask = %11000000000110 $3006 2DC: FD63CE13 callobj RFVAR y 2DF: FD63C613 callsub RFVAR z 2E0: F103C7E8 ADD z,x 2E1: F067CE02 SHL y,#$2 2E2: F103CFE4 ADD y,pbase 2E3: FD640228 SETQ #$1 2E4: FB03CFE7 RDLONG y,y 2E5: F103C9E7 ADD pbase,y 2E6: F103CBE8 ADD vbase,x 2E7: F603CDD9 callptr MOV dbase,dcall 2EA: F067C602 SHL z,#$2 2EB: F103C7E4 ADD z,pbase 2EC: FD640228 SETQ #$1 2ED: FB03CFE3 RDLONG y,z 2EE: F603F1E6 MOV PTRA,dbase 2EF: FB07B31F RDLONG dcall,PTRA[-1] 2F0: FD63C634 GETPTR z 2F1: FC67C71F WRLONG z,PTRA[-1] 2F2: F103CFE4 ADD y,pbase 2F3: FC7801E7 RDFAST #$0,y 2F4: 0103F1E8 _RET_ ADD PTRA,x ================================================================================ Description : call obj[].sub Lut base $000, 8 Bit bytecode, BC = $0a = BC[7:4] < bbbb : [aiiiiiiii] = $0a (10) LUT $a: $00c052dc = JMP #callobj : Skip mask = %11000000010100 $3014 2DC: FD63CE13 callobj RFVAR y 2DD: F103CFE8 ADD y,x 2DF: FD63C613 callsub RFVAR z 2E1: F067CE02 SHL y,#$2 2E2: F103CFE4 ADD y,pbase 2E3: FD640228 SETQ #$1 2E4: FB03CFE7 RDLONG y,y 2E5: F103C9E7 ADD pbase,y 2E6: F103CBE8 ADD vbase,x 2E7: F603CDD9 callptr MOV dbase,dcall 2EA: F067C602 SHL z,#$2 2EB: F103C7E4 ADD z,pbase 2EC: FD640228 SETQ #$1 2ED: FB03CFE3 RDLONG y,z 2EE: F603F1E6 MOV PTRA,dbase 2EF: FB07B31F RDLONG dcall,PTRA[-1] 2F0: FD63C634 GETPTR z 2F1: FC67C71F WRLONG z,PTRA[-1] 2F2: F103CFE4 ADD y,pbase 2F3: FC7801E7 RDFAST #$0,y 2F4: 0103F1E8 _RET_ ADD PTRA,x ================================================================================ Description : call obj[].sub[] Lut base $000, 8 Bit bytecode, BC = $0b = BC[7:4] < bbbb : [aiiiiiiii] = $0b (11) LUT $b: $00c002dc = JMP #callobj : Skip mask = %11000000000000 $3000 2DC: FD63CE13 callobj RFVAR y 2DD: F103CFE8 ADD y,x 2DE: FB07D15F RDLONG x,--PTRA 2DF: FD63C613 callsub RFVAR z 2E0: F103C7E8 ADD z,x 2E1: F067CE02 SHL y,#$2 2E2: F103CFE4 ADD y,pbase 2E3: FD640228 SETQ #$1 2E4: FB03CFE7 RDLONG y,y 2E5: F103C9E7 ADD pbase,y 2E6: F103CBE8 ADD vbase,x 2E7: F603CDD9 callptr MOV dbase,dcall 2EA: F067C602 SHL z,#$2 2EB: F103C7E4 ADD z,pbase 2EC: FD640228 SETQ #$1 2ED: FB03CFE3 RDLONG y,z 2EE: F603F1E6 MOV PTRA,dbase 2EF: FB07B31F RDLONG dcall,PTRA[-1] 2F0: FD63C634 GETPTR z 2F1: FC67C71F WRLONG z,PTRA[-1] 2F2: F103CFE4 ADD y,pbase 2F3: FC7801E7 RDFAST #$0,y 2F4: 0103F1E8 _RET_ ADD PTRA,x ================================================================================ Description : call sub Lut base $000, 8 Bit bytecode, BC = $0c = BC[7:4] < bbbb : [aiiiiiiii] = $0c (12) LUT $c: $01bfbadb = JMP #callnin : Skip mask = %110111111101110 $6FEE 2DB: FC67D161 callnin WRLONG x,PTRA++ 2DF: FD63C613 callsub RFVAR z 2E7: F603CDD9 callptr MOV dbase,dcall 2EA: F067C602 SHL z,#$2 2EB: F103C7E4 ADD z,pbase 2EC: FD640228 SETQ #$1 2ED: FB03CFE3 RDLONG y,z 2EE: F603F1E6 MOV PTRA,dbase 2EF: FB07B31F RDLONG dcall,PTRA[-1] 2F0: FD63C634 GETPTR z 2F1: FC67C71F WRLONG z,PTRA[-1] 2F2: F103CFE4 ADD y,pbase 2F3: FC7801E7 RDFAST #$0,y 2F4: 0103F1E8 _RET_ ADD PTRA,x ================================================================================ Description : call sub[] Lut base $000, 8 Bit bytecode, BC = $0d = BC[7:4] < bbbb : [aiiiiiiii] = $0d (13) LUT $d: $001bf2df = JMP #callsub : Skip mask = %11011111100 $6FC 2DF: FD63C613 callsub RFVAR z 2E0: F103C7E8 ADD z,x 2E7: F603CDD9 callptr MOV dbase,dcall 2EA: F067C602 SHL z,#$2 2EB: F103C7E4 ADD z,pbase 2EC: FD640228 SETQ #$1 2ED: FB03CFE3 RDLONG y,z 2EE: F603F1E6 MOV PTRA,dbase 2EF: FB07B31F RDLONG dcall,PTRA[-1] 2F0: FD63C634 GETPTR z 2F1: FC67C71F WRLONG z,PTRA[-1] 2F2: F103CFE4 ADD y,pbase 2F3: FC7801E7 RDFAST #$0,y 2F4: 0103F1E8 _RET_ ADD PTRA,x ================================================================================ Description : call @ptr Lut base $000, 8 Bit bytecode, BC = $0e = BC[7:4] < bbbb : [aiiiiiiii] = $0e (14) LUT $e: $000002e7 = JMP #callptr : Skip mask = %0 $0 2E7: F603CDD9 callptr MOV dbase,dcall 2E8: FD640428 SETQ #$2 2E9: FB03C7E8 RDLONG z,x 2EA: F067C602 SHL z,#$2 2EB: F103C7E4 ADD z,pbase 2EC: FD640228 SETQ #$1 2ED: FB03CFE3 RDLONG y,z 2EE: F603F1E6 MOV PTRA,dbase 2EF: FB07B31F RDLONG dcall,PTRA[-1] 2F0: FD63C634 GETPTR z 2F1: FC67C71F WRLONG z,PTRA[-1] 2F2: F103CFE4 ADD y,pbase 2F3: FC7801E7 RDFAST #$0,y 2F4: 0103F1E8 _RET_ ADD PTRA,x ================================================================================ Description : jmp rfvars Lut base $000, 8 Bit bytecode, BC = $0f = BC[7:4] < bbbb : [aiiiiiiii] = $0f (15) LUT $f: $0003faff = JMP #branch : Skip mask = %11111110 $FE 2FF: FD63CE14 branch RFVARS y 307: F103EFE7 ADD PB,y 308: 0C7801F7 _RET_ RDFAST #$0,PB ================================================================================ Description : jz rfvars Lut base $000, 8 Bit bytecode, BC = $10 = BC[7:4] < bbbb : [aiiiiiiii] = $10 (16) LUT $10: $000392ff = JMP #branch : Skip mask = %11100100 $E4 2FF: FD63CE14 branch RFVARS y 300: F7CBD1E8 TEST x WZ 302: FB07D15F RDLONG x,--PTRA 303: 5D64002D IF_NZ RET 307: F103EFE7 ADD PB,y 308: 0C7801F7 _RET_ RDFAST #$0,PB ================================================================================ Description : jnz rfvars Lut base $000, 8 Bit bytecode, BC = $11 = BC[7:4] < bbbb : [aiiiiiiii] = $11 (17) LUT $11: $0001d2ff = JMP #branch : Skip mask = %1110100 $74 2FF: FD63CE14 branch RFVARS y 300: F7CBD1E8 TEST x WZ 302: FB07D15F RDLONG x,--PTRA 306: AD64002D IF_z RET 307: F103EFE7 ADD PB,y 308: 0C7801F7 _RET_ RDFAST #$0,PB ================================================================================ Description : tjz rfvars Lut base $000, 8 Bit bytecode, BC = $12 = BC[7:4] < bbbb : [aiiiiiiii] = $12 (18) LUT $12: $0003c2ff = JMP #branch : Skip mask = %11110000 $F0 2FF: FD63CE14 branch RFVARS y 300: F7CBD1E8 TEST x WZ 301: 5D64002D IF_NZ RET 302: FB07D15F RDLONG x,--PTRA 307: F103EFE7 ADD PB,y 308: 0C7801F7 _RET_ RDFAST #$0,PB ================================================================================ Description : djnz rfvars Lut base $000, 8 Bit bytecode, BC = $13 = BC[7:4] < bbbb : [aiiiiiiii] = $13 (19) LUT $13: $00007aff = JMP #branch : Skip mask = %11110 $1E 2FF: FD63CE14 branch RFVARS y 304: F18FD001 SUB x,#$1 WZ 305: AB07D15F IF_z RDLONG x,--PTRA 306: AD64002D IF_z RET 307: F103EFE7 ADD PB,y 308: 0C7801F7 _RET_ RDFAST #$0,PB ================================================================================ Description : pop #rfbyte Lut base $000, 8 Bit bytecode, BC = $14 = BC[7:4] < bbbb : [aiiiiiiii] = $14 (20) LUT $14: $0001f172 = JMP #popx : Skip mask = %1111100 $7C 172: FD63D010 popx RFBYTE x 173: F183F1E8 SUB PTRA,x 179: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : CASE value Lut base $000, 8 Bit bytecode, BC = $15 = BC[7:4] < bbbb : [aiiiiiiii] = $15 (21) LUT $15: $000000e0 = JMP #cog_code : Skip mask = %0 $0 0E0: FD63D213 cog_code RFVAR w 0E1: F603CFE8 MOV y,x 0E2: FB07D15F RDLONG x,--PTRA 0E3: F20BCFE8 CMP y,x WZ 0E4: 5D64002D IF_NZ RET 0E5: FD900034 JMP #casex ================================================================================ Description : CASE value1..value2 Lut base $000, 8 Bit bytecode, BC = $16 = BC[7:4] < bbbb : [aiiiiiiii] = $16 (22) LUT $16: $000000e6 = JMP #caser : Skip mask = %0 $0 0E6: FD63D213 caser RFVAR w 0E7: FD640228 SETQ #$1 0E8: FB07D95E RDLONG t,--PTRA[2] 0E9: F253D1EC CMPS x,t WC 0EA: FD6C186F MODZ _c WZ 0EB: 5253D7EC IF_NZ CMPS u,t WC 0EC: 1253D1EB IF_NC_AND_NZ CMPS x,u WC 0ED: A253D7E8 IF_z CMPS u,x WC 0EE: 2253D9EB IF_NC_AND_Z CMPS t,u WC 0EF: 3D90000C IF_NC JMP #casex 0F0: 0603D1EB _RET_ MOV x,u ================================================================================ Description : CASE done Lut base $000, 8 Bit bytecode, BC = $17 = BC[7:4] < bbbb : [aiiiiiiii] = $17 (23) LUT $17: $000000f1 = JMP #cased : Skip mask = %0 $0 0F1: FD640228 cased SETQ #$1 0F2: FB07D15E RDLONG x,--PTRA[2] 0F3: F103D3E4 casex ADD w,pbase 0F4: 0C7801E9 _RET_ RDFAST #$0,w ================================================================================ Description : LOOKUP (target : ,,,value,,,) Lut base $000, 8 Bit bytecode, BC = $18 = BC[7:4] < bbbb : [aiiiiiiii] = $18 (24) LUT $18: $000000f5 = JMP #lookupv : Skip mask = %0 $0 0F5: FD640428 lookupv SETQ #$2 0F6: FB07D35D RDLONG w,--PTRA[3] 0F7: F20BD7EA CMP u,v WZ 0F8: AD9FFFE8 IF_z JMP #casex 0F9: F603D1EB MOV x,u 0FA: F107D001 ADD x,#$1 0FB: 0107F008 _RET_ ADD PTRA,#$8 ================================================================================ Description : LOOKDOWN(target : ,,,value,,,) Lut base $000, 8 Bit bytecode, BC = $19 = BC[7:4] < bbbb : [aiiiiiiii] = $19 (25) LUT $19: $000000fc = JMP #lookdnv : Skip mask = %0 $0 0FC: FD640428 lookdnv SETQ #$2 0FD: FB07D35D RDLONG w,--PTRA[3] 0FE: F20BD1EA CMP x,v WZ 0FF: F603D1EB MOV x,u 100: AD9FFFC8 IF_z JMP #casex 101: F107D001 ADD x,#$1 102: 0107F008 _RET_ ADD PTRA,#$8 ================================================================================ Description : LOOKUP (target : ,,,value1..value2,,,) Lut base $000, 8 Bit bytecode, BC = $1a = BC[7:4] < bbbb : [aiiiiiiii] = $1a (26) LUT $1a: $00000103 = JMP #lookupr : Skip mask = %0 $0 103: FD640628 lookupr SETQ #$3 104: FB07D35C RDLONG w,--PTRA[4] 105: F1D3D1EC SUBS x,t WC 106: FD6C186F MODZ _c WZ 107: F6C3D1E8 NEGZ x 108: F213D5EB CMP v,u WC 109: F103D1EB ADD x,u 10A: 3213D1EA IF_NC CMP x,v WC 10B: 3603D1EC IF_NC MOV x,t 10C: 33E3D1EB IF_NC SUMNZ x,u 10D: 33C3D1EA IF_NC SUMZ x,v 10E: 3D9FFF90 IF_NC JMP #casex 10F: F107D001 ADD x,#$1 110: 0107F008 _RET_ ADD PTRA,#$8 ================================================================================ Description : LOOKDOWN(target : ,,,value1..value2,,,) Lut base $000, 8 Bit bytecode, BC = $1b = BC[7:4] < bbbb : [aiiiiiiii] = $1b (27) LUT $1b: $00000111 = JMP #lookdnr : Skip mask = %0 $0 111: FD640628 lookdnr SETQ #$3 112: FB07D35C RDLONG w,--PTRA[4] 113: F253D1EC CMPS x,t WC 114: FD6C186F MODZ _c WZ 115: 5253D5EC IF_NZ CMPS v,t WC 116: 1253D1EA IF_NC_AND_NZ CMPS x,v WC 117: A253D5E8 IF_z CMPS v,x WC 118: 2253D9EA IF_NC_AND_Z CMPS t,v WC 119: 36E3D1EC IF_NC NEGNZ x,t 11A: 3103D1EB IF_NC ADD x,u 11B: 33C3D1EA IF_NC SUMZ x,v 11C: 3D9FFF58 IF_NC JMP #casex 11D: 5183D1EC IF_NZ SUB x,t 11E: A2C3D1EC IF_z SUBR x,t 11F: F123D1EB ADDX x,u 120: 0107F008 _RET_ ADD PTRA,#$8 ================================================================================ Description : LOOKUP/LOOKDOWN done Lut base $000, 8 Bit bytecode, BC = $1c = BC[7:4] < bbbb : [aiiiiiiii] = $1c (28) LUT $1c: $00000121 = JMP #lookd : Skip mask = %0 $0 121: F607D000 lookd MOV x,#spin2 122: 0187F008 _RET_ SUB PTRA,#$8 ================================================================================ Description : COGINIT(mode,pgm,ptr) (no push) Lut base $000, 8 Bit bytecode, BC = $1d = BC[7:4] < bbbb : [aiiiiiiii] = $1d (29) LUT $1d: $01f9e17f = JMP #pop2 : Skip mask = %111111001111000 $7E78 17F: F603CFE8 pop2 MOV y,x 180: FD640228 SETQ #$1 181: FB07D15E RDLONG x,--PTRA[2] 186: FD63CE28 SETQ y 187: FCF3D1E9 COGINIT x,w WC 18E: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : COGINIT(mode,pgm,ptr) (push) Lut base $000, 8 Bit bytecode, BC = $1e = BC[7:4] < bbbb : [aiiiiiiii] = $1e (30) LUT $1e: $0001e17f = JMP #pop2 : Skip mask = %1111000 $78 17F: F603CFE8 pop2 MOV y,x 180: FD640228 SETQ #$1 181: FB07D15E RDLONG x,--PTRA[2] 186: FD63CE28 SETQ y 187: FCF3D1E9 COGINIT x,w WC 188: 0447D01F _RET_ BITC x,#$1f ================================================================================ Description : COGSTOP(cog) Lut base $000, 8 Bit bytecode, BC = $1f = BC[7:4] < bbbb : [aiiiiiiii] = $1f (31) LUT $1f: $0000398a = JMP #cogstop_ : Skip mask = %1110 $E 18A: FD63D003 cogstop_ COGSTOP x 18E: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : COGID Lut base $000, 8 Bit bytecode, BC = $20 = BC[7:4] < bbbb : [aiiiiiiii] = $20 (32) LUT $20: $0000798f = JMP #pushv : Skip mask = %11110 $1E 18F: FC67D161 pushv WRLONG x,PTRA++ 194: 0D63D001 _RET_ COGID x ================================================================================ Description : COGCHK(cog) Lut base $000, 8 Bit bytecode, BC = $21 = BC[7:4] < bbbb : [aiiiiiiii] = $21 (33) LUT $21: $0000099a = JMP #cogchk_ : Skip mask = %10 $2 19A: FD73D001 cogchk_ COGID x WC 19C: 0583D1D8 _RET_ MUXC x,_ffffffff ================================================================================ Description : GETRND Lut base $000, 8 Bit bytecode, BC = $22 = BC[7:4] < bbbb : [aiiiiiiii] = $22 (34) LUT $22: $0000198f = JMP #pushv : Skip mask = %110 $6 18F: FC67D161 pushv WRLONG x,PTRA++ 192: 0D63D01B _RET_ GETRND x ================================================================================ Description : GETCNT Lut base $000, 8 Bit bytecode, BC = $23 = BC[7:4] < bbbb : [aiiiiiiii] = $23 (35) LUT $23: $0000398f = JMP #pushv : Skip mask = %1110 $E 18F: FC67D161 pushv WRLONG x,PTRA++ 193: 0D63D01A _RET_ GETCT x ================================================================================ Description : POLLCNT(tick) Lut base $000, 8 Bit bytecode, BC = $24 = BC[7:4] < bbbb : [aiiiiiiii] = $24 (36) LUT $24: $000031a3 = JMP #cntp : Skip mask = %1100 $C 1A3: FD63CE1A cntp GETCT y 1A4: F2B3CFE8 CMPM y,x WC 1A7: 0583D1D8 _RET_ MUXC x,_ffffffff ================================================================================ Description : WAITCNT(tick) Lut base $000, 8 Bit bytecode, BC = $25 = BC[7:4] < bbbb : [aiiiiiiii] = $25 (37) LUT $25: $000001a3 = JMP #cntp : Skip mask = %0 $0 1A3: FD63CE1A cntp GETCT y 1A4: F2B3CFE8 CMPM y,x WC 1A5: CD9FFFF4 IF_c JMP #cntp 1A6: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : WPIN(pin,val) Lut base $000, 8 Bit bytecode, BC = $26 = BC[7:4] < bbbb : [aiiiiiiii] = $26 (38) LUT $26: $0000097e = JMP #wpin_ : Skip mask = %10 $2 17E: F7D7D001 wpin_ TEST x,#$1 WC 180: FD640228 SETQ #$1 181: FB07D15E RDLONG x,--PTRA[2] 182: 0D63D25A _RET_ DRVC w ================================================================================ Description : LPIN(pin) Lut base $000, 8 Bit bytecode, BC = $27 = BC[7:4] < bbbb : [aiiiiiiii] = $27 (39) LUT $27: $00007974 = JMP #lpin_ : Skip mask = %11110 $1E 174: FD63D058 lpin_ DRVL x 179: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : HPIN(pin) Lut base $000, 8 Bit bytecode, BC = $28 = BC[7:4] < bbbb : [aiiiiiiii] = $28 (40) LUT $28: $00003975 = JMP #hpin_ : Skip mask = %1110 $E 175: FD63D059 hpin_ DRVH x 179: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : TPIN(pin) Lut base $000, 8 Bit bytecode, BC = $29 = BC[7:4] < bbbb : [aiiiiiiii] = $29 (41) LUT $29: $00001976 = JMP #tpin_ : Skip mask = %110 $6 176: FD63D05F tpin_ DRVNOT x 179: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : ZPIN(pin) Lut base $000, 8 Bit bytecode, BC = $2a = BC[7:4] < bbbb : [aiiiiiiii] = $2a (42) LUT $2a: $00000977 = JMP #zpin_ : Skip mask = %10 $2 177: FD63D050 zpin_ FLTL x 179: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : RPIN(pin) Lut base $000, 8 Bit bytecode, BC = $2b = BC[7:4] < bbbb : [aiiiiiiii] = $2b (43) LUT $2b: $0000017a = JMP #rpin_ : Skip mask = %0 $0 17A: FD73D040 rpin_ TESTP x WC 17B: 0D63D06C _RET_ WRC x ================================================================================ Description : WRPIN(pin,val) Lut base $000, 8 Bit bytecode, BC = $2c = BC[7:4] < bbbb : [aiiiiiiii] = $2c (44) LUT $2c: $0000217f = JMP #pop2 : Skip mask = %1000 $8 17F: F603CFE8 pop2 MOV y,x 180: FD640228 SETQ #$1 181: FB07D15E RDLONG x,--PTRA[2] 183: 0C03CFE9 _RET_ WRPIN y,w ================================================================================ Description : WXPIN(pin,val) Lut base $000, 8 Bit bytecode, BC = $2d = BC[7:4] < bbbb : [aiiiiiiii] = $2d (45) LUT $2d: $0000617f = JMP #pop2 : Skip mask = %11000 $18 17F: F603CFE8 pop2 MOV y,x 180: FD640228 SETQ #$1 181: FB07D15E RDLONG x,--PTRA[2] 184: 0C13CFE9 _RET_ WXPIN y,w ================================================================================ Description : WYPIN(pin,val) Lut base $000, 8 Bit bytecode, BC = $2e = BC[7:4] < bbbb : [aiiiiiiii] = $2e (46) LUT $2e: $0000e17f = JMP #pop2 : Skip mask = %111000 $38 17F: F603CFE8 pop2 MOV y,x 180: FD640228 SETQ #$1 181: FB07D15E RDLONG x,--PTRA[2] 185: 0C23CFE9 _RET_ WYPIN y,w ================================================================================ Description : AKPIN(pin) Lut base $000, 8 Bit bytecode, BC = $2f = BC[7:4] < bbbb : [aiiiiiiii] = $2f (47) LUT $2f: $00000178 = JMP #akpin_ : Skip mask = %0 $0 178: FC0803E8 akpin_ WRPIN #$1,x 179: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : RDPIN(pin) Lut base $000, 8 Bit bytecode, BC = $30 = BC[7:4] < bbbb : [aiiiiiiii] = $30 (48) LUT $30: $0000017c = JMP #rdpin_ : Skip mask = %0 $0 17C: 0A8BD1E8 rdpin_ _RET_ RDPIN x ================================================================================ Description : RQPIN(pin) Lut base $000, 8 Bit bytecode, BC = $31 = BC[7:4] < bbbb : [aiiiiiiii] = $31 (49) LUT $31: $0000017d = JMP #rqpin_ : Skip mask = %0 $0 17D: 0A83D1E8 rqpin_ _RET_ RQPIN x ================================================================================ Description : EXEC(hubaddr) Lut base $000, 8 Bit bytecode, BC = $32 = BC[7:4] < bbbb : [aiiiiiiii] = $32 (50) LUT $32: $000201ac = JMP #cogx : Skip mask = %10000000 $80 1AC: FAC3CFE8 cogx RDBYTE y,x 1AD: F107D001 ADD x,#$1 1AE: F9B365E7 SETD reg'0041,y 1AF: FAC3D3E8 RDBYTE w,x 1B0: F107D001 ADD x,#$1 1B1: FD63D228 SETQ w 1B2: FB0001E8 reg'0041 RDLONG spin2,x 1B4: FB07D15F RDLONG x,--PTRA 1B5: FD63CE2C JMP y ================================================================================ Description : CALL(cogaddr) Lut base $000, 8 Bit bytecode, BC = $33 = BC[7:4] < bbbb : [aiiiiiiii] = $33 (51) LUT $33: $000001b3 = JMP #cogc : Skip mask = %0 $0 1B3: F603CFE8 cogc MOV y,x 1B4: FB07D15F RDLONG x,--PTRA 1B5: FD63CE2C JMP y ================================================================================ Description : STRSIZE(adr) Lut base $000, 8 Bit bytecode, BC = $34 = BC[7:4] < bbbb : [aiiiiiiii] = $34 (52) LUT $34: $00000151 = JMP #str_siz : Skip mask = %0 $0 151: F603CFE8 str_siz MOV y,x 152: F607C600 MOV z,#spin2 153: FD643E28 block'0016 SETQ #$1f 154: FB0181E8 RDLONG $c0,x 155: F96FC6C0 byte'0016 ALTGB z,#$c0 156: F8E3D400 GETBYTE v,spin2,#0 157: FB97D404 TJZ v,#$4 (+4) 158: F717C67F INCMOD z,#$7f WC 159: 3D9FFFEC IF_NC JMP #byte'0016 15A: F107D080 ADD x,#$80 15B: FD9FFFDC JMP #block'0016 ================================================================================ Description : STRCOMP(adra,adrb) Lut base $000, 8 Bit bytecode, BC = $35 = BC[7:4] < bbbb : [aiiiiiiii] = $35 (53) LUT $35: $0000015e = JMP #str_cmp : Skip mask = %0 $0 15E: FB07CF5F str_cmp RDLONG y,--PTRA 15F: F607C600 MOV z,#spin2 160: FD641E28 block'0017 SETQ #$f 161: FB0181E8 RDLONG $c0,x 162: FD641E28 SETQ #$f 163: FB01A1E7 RDLONG $d0,y 164: F96FC6C0 byte'0017 ALTGB z,#$c0 165: F8E3D400 GETBYTE v,spin2,#0 166: F96FC6D0 ALTGB z,#$d0 167: F8E3D200 GETBYTE w,spin2,#0 168: F20BD5E9 CMP v,w WZ 169: AB97D406 IF_z TJZ v,#$6 (+6) 16A: 5D900018 IF_NZ JMP #no'0017 16B: F717C63F INCMOD z,#$3f WC 16C: 3D9FFFDC IF_NC JMP #byte'0017 16D: F107D040 ADD x,#$40 16E: F107CE40 ADD y,#$40 16F: FD9FFFC0 JMP #block'0017 ================================================================================ Description : ROTXY(x,y,t) (returns x,y) Lut base $000, 8 Bit bytecode, BC = $36 = BC[7:4] < bbbb : [aiiiiiiii] = $36 (54) LUT $36: $000183be = JMP #rotxy : Skip mask = %1100000 $60 3BE: F187F004 rotxy SUB PTRA,#$4 3BF: FD640228 SETQ #$1 3C0: FB07D31F polxy RDLONG w,PTRA[-1] 3C1: FD63D028 SETQ x 3C2: FD43D3EA QROTATE w,v 3C5: FD63D018 GETQX x 3C6: FC67D11F WRLONG x,PTRA[-1] 3C7: 0D63D019 _RET_ GETQY x ================================================================================ Description : POLXY(r,t) (returns x,y) Lut base $000, 8 Bit bytecode, BC = $37 = BC[7:4] < bbbb : [aiiiiiiii] = $37 (55) LUT $37: $00005bc0 = JMP #polxy : Skip mask = %10110 $16 3C0: FB07D31F polxy RDLONG w,PTRA[-1] 3C3: FD43D3E8 QROTATE w,x 3C5: FD63D018 GETQX x 3C6: FC67D11F WRLONG x,PTRA[-1] 3C7: 0D63D019 _RET_ GETQY x ================================================================================ Description : XYPOL(x,y) (returns r,t) Lut base $000, 8 Bit bytecode, BC = $38 = BC[7:4] < bbbb : [aiiiiiiii] = $38 (56) LUT $38: $00003bc0 = JMP #polxy : Skip mask = %1110 $E 3C0: FB07D31F polxy RDLONG w,PTRA[-1] 3C4: FD53D3E8 QVECTOR w,x 3C5: FD63D018 GETQX x 3C6: FC67D11F WRLONG x,PTRA[-1] 3C7: 0D63D019 _RET_ GETQY x ================================================================================ Description : constant -1 Lut base $000, 8 Bit bytecode, BC = $39 = BC[7:4] < bbbb : [aiiiiiiii] = $39 (57) LUT $39: $00000309 = JMP #const : Skip mask = %0 $0 309: FC67D161 const WRLONG x,PTRA++ 30A: F603D1F6 MOV x,PA 30B: 0187D03A _RET_ SUB x,#$3a ================================================================================ Description : constant 0 Lut base $000, 8 Bit bytecode, BC = $3a = BC[7:4] < bbbb : [aiiiiiiii] = $3a (58) LUT $3a: $00000309 = JMP #const : Skip mask = %0 $0 309: FC67D161 const WRLONG x,PTRA++ 30A: F603D1F6 MOV x,PA 30B: 0187D03A _RET_ SUB x,#$3a ================================================================================ Description : constant 1 Lut base $000, 8 Bit bytecode, BC = $3b = BC[7:4] < bbbb : [aiiiiiiii] = $3b (59) LUT $3b: $00000309 = JMP #const : Skip mask = %0 $0 309: FC67D161 const WRLONG x,PTRA++ 30A: F603D1F6 MOV x,PA 30B: 0187D03A _RET_ SUB x,#$3a ================================================================================ Description : constant rfbyte Lut base $000, 8 Bit bytecode, BC = $3c = BC[7:4] < bbbb : [aiiiiiiii] = $3c (60) LUT $3c: $00001b09 = JMP #const : Skip mask = %110 $6 309: FC67D161 const WRLONG x,PTRA++ 30C: 0D63D010 _RET_ RFBYTE x ================================================================================ Description : constant rfbyte! Lut base $000, 8 Bit bytecode, BC = $3d = BC[7:4] < bbbb : [aiiiiiiii] = $3d (61) LUT $3d: $000fbb09 = JMP #const : Skip mask = %1111101110 $3EE 309: FC67D161 const WRLONG x,PTRA++ 30D: FD63D010 RFBYTE x 313: 0623D1E8 _RET_ NOT x ================================================================================ Description : constant rfword Lut base $000, 8 Bit bytecode, BC = $3e = BC[7:4] < bbbb : [aiiiiiiii] = $3e (62) LUT $3e: $00007b09 = JMP #const : Skip mask = %11110 $1E 309: FC67D161 const WRLONG x,PTRA++ 30E: 0D63D011 _RET_ RFWORD x ================================================================================ Description : constant rfword! Lut base $000, 8 Bit bytecode, BC = $3f = BC[7:4] < bbbb : [aiiiiiiii] = $3f (63) LUT $3f: $000efb09 = JMP #const : Skip mask = %1110111110 $3BE 309: FC67D161 const WRLONG x,PTRA++ 30F: FD63D011 RFWORD x 313: 0623D1E8 _RET_ NOT x ================================================================================ Description : constant rflong Lut base $000, 8 Bit bytecode, BC = $40 = BC[7:4] < bbbb : [aiiiiiiii] = $40 (64) LUT $40: $0001fb09 = JMP #const : Skip mask = %1111110 $7E 309: FC67D161 const WRLONG x,PTRA++ 310: 0D63D012 _RET_ RFLONG x ================================================================================ Description : constant rfbyte + decod Lut base $000, 8 Bit bytecode, BC = $41 = BC[7:4] < bbbb : [aiiiiiiii] = $41 (65) LUT $41: $0003bb09 = JMP #const : Skip mask = %11101110 $EE 309: FC67D161 const WRLONG x,PTRA++ 30D: FD63D010 RFBYTE x 311: 09C3D1E8 _RET_ DECOD x ================================================================================ Description : constant rfbyte + decod + not Lut base $000, 8 Bit bytecode, BC = $42 = BC[7:4] < bbbb : [aiiiiiiii] = $42 (66) LUT $42: $0007bb09 = JMP #const : Skip mask = %111101110 $1EE 309: FC67D161 const WRLONG x,PTRA++ 30D: FD63D010 RFBYTE x 312: F9C3D1E8 DECOD x 313: 0623D1E8 _RET_ NOT x ================================================================================ Description : constant rfbyte + decod + dec Lut base $000, 8 Bit bytecode, BC = $43 = BC[7:4] < bbbb : [aiiiiiiii] = $43 (67) LUT $43: $0017bb09 = JMP #const : Skip mask = %10111101110 $5EE 309: FC67D161 const WRLONG x,PTRA++ 30D: FD63D010 RFBYTE x 312: F9C3D1E8 DECOD x 314: 0187D001 _RET_ SUB x,#$1 ================================================================================ Description : constant rfbyte + decod + neg Lut base $000, 8 Bit bytecode, BC = $44 = BC[7:4] < bbbb : [aiiiiiiii] = $44 (68) LUT $44: $0037bb09 = JMP #const : Skip mask = %110111101110 $DEE 309: FC67D161 const WRLONG x,PTRA++ 30D: FD63D010 RFBYTE x 312: F9C3D1E8 DECOD x 315: 0663D1E8 _RET_ NEG x ================================================================================ Description : read reg[$1FE] Lut base $000, 8 Bit bytecode, BC = $45 = BC[7:4] < bbbb : [aiiiiiiii] = $45 (69) LUT $45: $0000018f = JMP #pushv : Skip mask = %0 $0 18F: FC67D161 pushv WRLONG x,PTRA++ 190: 0603D1FE _RET_ MOV x,INA ================================================================================ Description : read reg[$1FF] Lut base $000, 8 Bit bytecode, BC = $46 = BC[7:4] < bbbb : [aiiiiiiii] = $46 (70) LUT $46: $0000098f = JMP #pushv : Skip mask = %10 $2 18F: FC67D161 pushv WRLONG x,PTRA++ 191: 0603D1FF _RET_ MOV x,INB ================================================================================ Description : setup reg[$1FA] Lut base $000, 8 Bit bytecode, BC = $47 = BC[7:4] < bbbb : [aiiiiiiii] = $47 (71) LUT $47: $00187316 = JMP #var_reg : Skip mask = %11000011100 $61C 316: F603BBF6 var_reg MOV a,PA 317: F107BBB3 ADD a,#cogc 31B: F603B5CF MOV rd,rd_reg 31C: F603B7D5 MOV wr,wr_reg 31D: F9BBB5DD SETS rd,a 31E: F9B3B7DD SETD wr,a 321: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup reg[$1FB] Lut base $000, 8 Bit bytecode, BC = $48 = BC[7:4] < bbbb : [aiiiiiiii] = $48 (72) LUT $48: $00187316 = JMP #var_reg : Skip mask = %11000011100 $61C 316: F603BBF6 var_reg MOV a,PA 317: F107BBB3 ADD a,#cogc 31B: F603B5CF MOV rd,rd_reg 31C: F603B7D5 MOV wr,wr_reg 31D: F9BBB5DD SETS rd,a 31E: F9B3B7DD SETD wr,a 321: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup reg[$1FC] Lut base $000, 8 Bit bytecode, BC = $49 = BC[7:4] < bbbb : [aiiiiiiii] = $49 (73) LUT $49: $00187316 = JMP #var_reg : Skip mask = %11000011100 $61C 316: F603BBF6 var_reg MOV a,PA 317: F107BBB3 ADD a,#cogc 31B: F603B5CF MOV rd,rd_reg 31C: F603B7D5 MOV wr,wr_reg 31D: F9BBB5DD SETS rd,a 31E: F9B3B7DD SETD wr,a 321: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup reg[$1FD] Lut base $000, 8 Bit bytecode, BC = $4a = BC[7:4] < bbbb : [aiiiiiiii] = $4a (74) LUT $4a: $00187316 = JMP #var_reg : Skip mask = %11000011100 $61C 316: F603BBF6 var_reg MOV a,PA 317: F107BBB3 ADD a,#cogc 31B: F603B5CF MOV rd,rd_reg 31C: F603B7D5 MOV wr,wr_reg 31D: F9BBB5DD SETS rd,a 31E: F9B3B7DD SETD wr,a 321: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup reg[$1FE] Lut base $000, 8 Bit bytecode, BC = $4b = BC[7:4] < bbbb : [aiiiiiiii] = $4b (75) LUT $4b: $00187316 = JMP #var_reg : Skip mask = %11000011100 $61C 316: F603BBF6 var_reg MOV a,PA 317: F107BBB3 ADD a,#cogc 31B: F603B5CF MOV rd,rd_reg 31C: F603B7D5 MOV wr,wr_reg 31D: F9BBB5DD SETS rd,a 31E: F9B3B7DD SETD wr,a 321: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup reg[$1FF] Lut base $000, 8 Bit bytecode, BC = $4c = BC[7:4] < bbbb : [aiiiiiiii] = $4c (76) LUT $4c: $00187316 = JMP #var_reg : Skip mask = %11000011100 $61C 316: F603BBF6 var_reg MOV a,PA 317: F107BBB3 ADD a,#cogc 31B: F603B5CF MOV rd,rd_reg 31C: F603B7D5 MOV wr,wr_reg 31D: F9BBB5DD SETS rd,a 31E: F9B3B7DD SETD wr,a 321: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup reg[rfvars] Lut base $000, 8 Bit bytecode, BC = $4d = BC[7:4] < bbbb : [aiiiiiiii] = $4d (77) LUT $4d: $00061b18 = JMP #var_cog : Skip mask = %110000110 $186 318: FD63BA14 var_cog RFVARS a 31B: F603B5CF MOV rd,rd_reg 31C: F603B7D5 MOV wr,wr_reg 31D: F9BBB5DD SETS rd,a 31E: F9B3B7DD SETD wr,a 321: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup reg[rfvars][pop index] Lut base $000, 8 Bit bytecode, BC = $4e = BC[7:4] < bbbb : [aiiiiiiii] = $4e (78) LUT $4e: $00060318 = JMP #var_cog : Skip mask = %110000000 $180 318: FD63BA14 var_cog RFVARS a 319: FB07CF5F RDLONG y,--PTRA 31A: F103BBE7 ADD a,y 31B: F603B5CF MOV rd,rd_reg 31C: F603B7D5 MOV wr,wr_reg 31D: F9BBB5DD SETS rd,a 31E: F9B3B7DD SETD wr,a 321: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup lut[rfvars] Lut base $000, 8 Bit bytecode, BC = $4f = BC[7:4] < bbbb : [aiiiiiiii] = $4f (79) LUT $4f: $0001fb18 = JMP #var_cog : Skip mask = %1111110 $7E 318: FD63BA14 var_cog RFVARS a 31F: F603B5D0 MOV rd,rd_lut 320: F603B7D6 MOV wr,wr_lut 321: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup lut[rfvars][pop index] Lut base $000, 8 Bit bytecode, BC = $50 = BC[7:4] < bbbb : [aiiiiiiii] = $50 (80) LUT $50: $0001e318 = JMP #var_cog : Skip mask = %1111000 $78 318: FD63BA14 var_cog RFVARS a 319: FB07CF5F RDLONG y,--PTRA 31A: F103BBE7 ADD a,y 31F: F603B5D0 MOV rd,rd_lut 320: F603B7D6 MOV wr,wr_lut 321: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup byte[pbase + rfvar] Lut base $000, 8 Bit bytecode, BC = $51 = BC[7:4] < bbbb : [aiiiiiiii] = $51 (81) LUT $51: $01b7f322 = JMP #var_b : Skip mask = %110110111111100 $6DFC 322: FD63BA13 var_b RFVAR a 323: F103BBE4 ADD a,pbase 32B: F603B5CC MOV rd,rd_byte 32E: F603B7D2 MOV wr,wr_byte 331: 0607B807 _RET_ MOV sz,#$7 ================================================================================ Description : setup byte[vbase + rfvar] Lut base $000, 8 Bit bytecode, BC = $52 = BC[7:4] < bbbb : [aiiiiiiii] = $52 (82) LUT $52: $01b7eb22 = JMP #var_b : Skip mask = %110110111111010 $6DFA 322: FD63BA13 var_b RFVAR a 324: F103BBE5 ADD a,vbase 32B: F603B5CC MOV rd,rd_byte 32E: F603B7D2 MOV wr,wr_byte 331: 0607B807 _RET_ MOV sz,#$7 ================================================================================ Description : setup byte[dbase + rfvar] Lut base $000, 8 Bit bytecode, BC = $53 = BC[7:4] < bbbb : [aiiiiiiii] = $53 (83) LUT $53: $01b7db22 = JMP #var_b : Skip mask = %110110111110110 $6DF6 322: FD63BA13 var_b RFVAR a 325: F103BBE6 ADD a,dbase 32B: F603B5CC MOV rd,rd_byte 32E: F603B7D2 MOV wr,wr_byte 331: 0607B807 _RET_ MOV sz,#$7 ================================================================================ Description : setup byte[pbase + rfvar][pop index] Lut base $000, 8 Bit bytecode, BC = $54 = BC[7:4] < bbbb : [aiiiiiiii] = $54 (84) LUT $54: $01b3b322 = JMP #var_b : Skip mask = %110110011101100 $6CEC 322: FD63BA13 var_b RFVAR a 323: F103BBE4 ADD a,pbase 326: FB07CF5F var_i RDLONG y,--PTRA 32A: F103BBE7 ADD a,y 32B: F603B5CC MOV rd,rd_byte 32E: F603B7D2 MOV wr,wr_byte 331: 0607B807 _RET_ MOV sz,#$7 ================================================================================ Description : setup byte[vbase + rfvar][pop index] Lut base $000, 8 Bit bytecode, BC = $55 = BC[7:4] < bbbb : [aiiiiiiii] = $55 (85) LUT $55: $01b3ab22 = JMP #var_b : Skip mask = %110110011101010 $6CEA 322: FD63BA13 var_b RFVAR a 324: F103BBE5 ADD a,vbase 326: FB07CF5F var_i RDLONG y,--PTRA 32A: F103BBE7 ADD a,y 32B: F603B5CC MOV rd,rd_byte 32E: F603B7D2 MOV wr,wr_byte 331: 0607B807 _RET_ MOV sz,#$7 ================================================================================ Description : setup byte[dbase + rfvar][pop index] Lut base $000, 8 Bit bytecode, BC = $56 = BC[7:4] < bbbb : [aiiiiiiii] = $56 (86) LUT $56: $01b39b22 = JMP #var_b : Skip mask = %110110011100110 $6CE6 322: FD63BA13 var_b RFVAR a 325: F103BBE6 ADD a,dbase 326: FB07CF5F var_i RDLONG y,--PTRA 32A: F103BBE7 ADD a,y 32B: F603B5CC MOV rd,rd_byte 32E: F603B7D2 MOV wr,wr_byte 331: 0607B807 _RET_ MOV sz,#$7 ================================================================================ Description : setup word[pbase + rfvar] Lut base $000, 8 Bit bytecode, BC = $57 = BC[7:4] < bbbb : [aiiiiiiii] = $57 (87) LUT $57: $036ff322 = JMP #var_b : Skip mask = %1101101111111100 $DBFC 322: FD63BA13 var_b RFVAR a 323: F103BBE4 ADD a,pbase 32C: F603B5CD MOV rd,rd_word 32F: F603B7D3 MOV wr,wr_word 332: 0607B80F _RET_ MOV sz,#$f ================================================================================ Description : setup word[vbase + rfvar] Lut base $000, 8 Bit bytecode, BC = $58 = BC[7:4] < bbbb : [aiiiiiiii] = $58 (88) LUT $58: $036feb22 = JMP #var_b : Skip mask = %1101101111111010 $DBFA 322: FD63BA13 var_b RFVAR a 324: F103BBE5 ADD a,vbase 32C: F603B5CD MOV rd,rd_word 32F: F603B7D3 MOV wr,wr_word 332: 0607B80F _RET_ MOV sz,#$f ================================================================================ Description : setup word[dbase + rfvar] Lut base $000, 8 Bit bytecode, BC = $59 = BC[7:4] < bbbb : [aiiiiiiii] = $59 (89) LUT $59: $036fdb22 = JMP #var_b : Skip mask = %1101101111110110 $DBF6 322: FD63BA13 var_b RFVAR a 325: F103BBE6 ADD a,dbase 32C: F603B5CD MOV rd,rd_word 32F: F603B7D3 MOV wr,wr_word 332: 0607B80F _RET_ MOV sz,#$f ================================================================================ Description : setup word[pbase + rfvar][pop index] Lut base $000, 8 Bit bytecode, BC = $5a = BC[7:4] < bbbb : [aiiiiiiii] = $5a (90) LUT $5a: $036b3322 = JMP #var_b : Skip mask = %1101101011001100 $DACC 322: FD63BA13 var_b RFVAR a 323: F103BBE4 ADD a,pbase 326: FB07CF5F var_i RDLONG y,--PTRA 327: F067CE01 SHL y,#$1 32A: F103BBE7 ADD a,y 32C: F603B5CD MOV rd,rd_word 32F: F603B7D3 MOV wr,wr_word 332: 0607B80F _RET_ MOV sz,#$f ================================================================================ Description : setup word[vbase + rfvar][pop index] Lut base $000, 8 Bit bytecode, BC = $5b = BC[7:4] < bbbb : [aiiiiiiii] = $5b (91) LUT $5b: $036b2b22 = JMP #var_b : Skip mask = %1101101011001010 $DACA 322: FD63BA13 var_b RFVAR a 324: F103BBE5 ADD a,vbase 326: FB07CF5F var_i RDLONG y,--PTRA 327: F067CE01 SHL y,#$1 32A: F103BBE7 ADD a,y 32C: F603B5CD MOV rd,rd_word 32F: F603B7D3 MOV wr,wr_word 332: 0607B80F _RET_ MOV sz,#$f ================================================================================ Description : setup word[dbase + rfvar][pop index] Lut base $000, 8 Bit bytecode, BC = $5c = BC[7:4] < bbbb : [aiiiiiiii] = $5c (92) LUT $5c: $036b1b22 = JMP #var_b : Skip mask = %1101101011000110 $DAC6 322: FD63BA13 var_b RFVAR a 325: F103BBE6 ADD a,dbase 326: FB07CF5F var_i RDLONG y,--PTRA 327: F067CE01 SHL y,#$1 32A: F103BBE7 ADD a,y 32C: F603B5CD MOV rd,rd_word 32F: F603B7D3 MOV wr,wr_word 332: 0607B80F _RET_ MOV sz,#$f ================================================================================ Description : setup long[pbase + rfvar] Lut base $000, 8 Bit bytecode, BC = $5d = BC[7:4] < bbbb : [aiiiiiiii] = $5d (93) LUT $5d: $06dff322 = JMP #var_b : Skip mask = %11011011111111100 $1B7FC 322: FD63BA13 var_b RFVAR a 323: F103BBE4 ADD a,pbase 32D: F603B5CE MOV rd,rd_long 330: F603B7D4 MOV wr,wr_long 333: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[vbase + rfvar] Lut base $000, 8 Bit bytecode, BC = $5e = BC[7:4] < bbbb : [aiiiiiiii] = $5e (94) LUT $5e: $06dfeb22 = JMP #var_b : Skip mask = %11011011111111010 $1B7FA 322: FD63BA13 var_b RFVAR a 324: F103BBE5 ADD a,vbase 32D: F603B5CE MOV rd,rd_long 330: F603B7D4 MOV wr,wr_long 333: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase + rfvar] Lut base $000, 8 Bit bytecode, BC = $5f = BC[7:4] < bbbb : [aiiiiiiii] = $5f (95) LUT $5f: $06dfdb22 = JMP #var_b : Skip mask = %11011011111110110 $1B7F6 322: FD63BA13 var_b RFVAR a 325: F103BBE6 ADD a,dbase 32D: F603B5CE MOV rd,rd_long 330: F603B7D4 MOV wr,wr_long 333: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[pbase + rfvar][pop index] Lut base $000, 8 Bit bytecode, BC = $60 = BC[7:4] < bbbb : [aiiiiiiii] = $60 (96) LUT $60: $06dab322 = JMP #var_b : Skip mask = %11011011010101100 $1B6AC 322: FD63BA13 var_b RFVAR a 323: F103BBE4 ADD a,pbase 326: FB07CF5F var_i RDLONG y,--PTRA 328: F067CE02 SHL y,#$2 32A: F103BBE7 ADD a,y 32D: F603B5CE MOV rd,rd_long 330: F603B7D4 MOV wr,wr_long 333: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[vbase + rfvar][pop index] Lut base $000, 8 Bit bytecode, BC = $61 = BC[7:4] < bbbb : [aiiiiiiii] = $61 (97) LUT $61: $06daab22 = JMP #var_b : Skip mask = %11011011010101010 $1B6AA 322: FD63BA13 var_b RFVAR a 324: F103BBE5 ADD a,vbase 326: FB07CF5F var_i RDLONG y,--PTRA 328: F067CE02 SHL y,#$2 32A: F103BBE7 ADD a,y 32D: F603B5CE MOV rd,rd_long 330: F603B7D4 MOV wr,wr_long 333: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase + rfvar][pop index] Lut base $000, 8 Bit bytecode, BC = $62 = BC[7:4] < bbbb : [aiiiiiiii] = $62 (98) LUT $62: $06da9b22 = JMP #var_b : Skip mask = %11011011010100110 $1B6A6 322: FD63BA13 var_b RFVAR a 325: F103BBE6 ADD a,dbase 326: FB07CF5F var_i RDLONG y,--PTRA 328: F067CE02 SHL y,#$2 32A: F103BBE7 ADD a,y 32D: F603B5CE MOV rd,rd_long 330: F603B7D4 MOV wr,wr_long 333: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup byte[pop address] Lut base $000, 8 Bit bytecode, BC = $63 = BC[7:4] < bbbb : [aiiiiiiii] = $63 (99) LUT $63: $00036b29 = JMP #var_a : Skip mask = %11011010 $DA 329: FB07BB5F var_a RDLONG a,--PTRA 32B: F603B5CC MOV rd,rd_byte 32E: F603B7D2 MOV wr,wr_byte 331: 0607B807 _RET_ MOV sz,#$7 ================================================================================ Description : setup word[pop address] Lut base $000, 8 Bit bytecode, BC = $64 = BC[7:4] < bbbb : [aiiiiiiii] = $64 (100) LUT $64: $0006db29 = JMP #var_a : Skip mask = %110110110 $1B6 329: FB07BB5F var_a RDLONG a,--PTRA 32C: F603B5CD MOV rd,rd_word 32F: F603B7D3 MOV wr,wr_word 332: 0607B80F _RET_ MOV sz,#$f ================================================================================ Description : setup long[pop address] Lut base $000, 8 Bit bytecode, BC = $65 = BC[7:4] < bbbb : [aiiiiiiii] = $65 (101) LUT $65: $000dbb29 = JMP #var_a : Skip mask = %1101101110 $36E 329: FB07BB5F var_a RDLONG a,--PTRA 32D: F603B5CE MOV rd,rd_long 330: F603B7D4 MOV wr,wr_long 333: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup byte[pop base][pop index] Lut base $000, 8 Bit bytecode, BC = $66 = BC[7:4] < bbbb : [aiiiiiiii] = $66 (102) LUT $66: $001b1b26 = JMP #var_i : Skip mask = %11011000110 $6C6 326: FB07CF5F var_i RDLONG y,--PTRA 329: FB07BB5F var_a RDLONG a,--PTRA 32A: F103BBE7 ADD a,y 32B: F603B5CC MOV rd,rd_byte 32E: F603B7D2 MOV wr,wr_byte 331: 0607B807 _RET_ MOV sz,#$7 ================================================================================ Description : setup word[pop base][pop index] Lut base $000, 8 Bit bytecode, BC = $67 = BC[7:4] < bbbb : [aiiiiiiii] = $67 (103) LUT $67: $00369326 = JMP #var_i : Skip mask = %110110100100 $DA4 326: FB07CF5F var_i RDLONG y,--PTRA 327: F067CE01 SHL y,#$1 329: FB07BB5F var_a RDLONG a,--PTRA 32A: F103BBE7 ADD a,y 32C: F603B5CD MOV rd,rd_word 32F: F603B7D3 MOV wr,wr_word 332: 0607B80F _RET_ MOV sz,#$f ================================================================================ Description : setup long[pop base][pop index] Lut base $000, 8 Bit bytecode, BC = $68 = BC[7:4] < bbbb : [aiiiiiiii] = $68 (104) LUT $68: $006d8b26 = JMP #var_i : Skip mask = %1101101100010 $1B62 326: FB07CF5F var_i RDLONG y,--PTRA 328: F067CE02 SHL y,#$2 329: FB07BB5F var_a RDLONG a,--PTRA 32A: F103BBE7 ADD a,y 32D: F603B5CE MOV rd,rd_long 330: F603B7D4 MOV wr,wr_long 333: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup multi-bit field, pop bottom and top bits Lut base $000, 8 Bit bytecode, BC = $69 = BC[7:4] < bbbb : [aiiiiiiii] = $69 (105) LUT $69: $0000433e = JMP #bfield : Skip mask = %10000 $10 33E: F603BFE8 bfield MOV fb,x 33F: F747BE04 ZEROX fb,#$4 340: FB07B95F RDLONG sz,--PTRA 341: F747B804 ZEROX sz,#$4 343: FB07D15F RDLONG x,--PTRA 344: F6036DDA MOV rdf,rd 345: F6038DDA MOV wrf_rd,rd 346: F60393DB MOV wrf_wr,wr 347: F603B5D1 MOV rd,rd_field 348: F603B7D7 MOV wr,wr_field 349: F193B9DF SUB sz,fb WC 34A: C103BFDC IF_c ADD fb,sz 34B: C663B9DC IF_c NEG sz 34C: C623C1DC IF_c NOT fr,sz 34D: 0447BE05 _RET_ BITC fb,#$5 ================================================================================ Description : setup single-bit field, pop bit Lut base $000, 8 Bit bytecode, BC = $6a = BC[7:4] < bbbb : [aiiiiiiii] = $6a (106) LUT $6a: $01e0333e = JMP #bfield : Skip mask = %111100000001100 $780C 33E: F603BFE8 bfield MOV fb,x 33F: F747BE04 ZEROX fb,#$4 342: F617B800 MOV sz,#spin2 WC 343: FB07D15F RDLONG x,--PTRA 344: F6036DDA MOV rdf,rd 345: F6038DDA MOV wrf_rd,rd 346: F60393DB MOV wrf_wr,wr 347: F603B5D1 MOV rd,rd_field 348: F603B7D7 MOV wr,wr_field 34D: 0447BE05 _RET_ BITC fb,#$5 ================================================================================ Description : @var (push) Lut base $000, 8 Bit bytecode, BC = $6b = BC[7:4] < bbbb : [aiiiiiiii] = $6b (107) LUT $6b: $0000034e = JMP #var_rd : Skip mask = %0 $0 34E: FC67D161 var_rd WRLONG x,PTRA++ 34F: 0603D1DD _RET_ MOV x,a ================================================================================ Description : var (push) Lut base $000, 8 Bit bytecode, BC = $6c = BC[7:4] < bbbb : [aiiiiiiii] = $6c (108) LUT $6c: $0001cb4e = JMP #var_rd : Skip mask = %1110010 $72 34E: FC67D161 var_rd WRLONG x,PTRA++ 350: F9A7B564 ALTI rd 351: 00000000 NOP 355: 0743D1DC _RET_ ZEROX x,sz ================================================================================ Description : var := exp (isolated) Lut base $000, 8 Bit bytecode, BC = $6d = BC[7:4] < bbbb : [aiiiiiiii] = $6d (109) LUT $6d: $00000352 = JMP #var_wr : Skip mask = %0 $0 352: F9A7B764 var_wr ALTI wr 353: 00000000 NOP 354: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : var := exp (push) Lut base $000, 8 Bit bytecode, BC = $6e = BC[7:4] < bbbb : [aiiiiiiii] = $6e (110) LUT $6e: $00001352 = JMP #var_wr : Skip mask = %100 $4 352: F9A7B764 var_wr ALTI wr 353: 00000000 NOP 355: 0743D1DC _RET_ ZEROX x,sz ================================================================================ Description : ++var, var++ (isolated) Lut base $000, 8 Bit bytecode, BC = $6f = BC[7:4] < bbbb : [aiiiiiiii] = $6f (111) LUT $6f: $003ecb56 = JMP #mod_iso : Skip mask = %111110110010 $FB2 356: F603CFE8 mod_iso MOV y,x 358: F9A7B564 ALTI rd 359: 00000000 NOP 35C: F107D001 ADD x,#$1 362: F9A7B764 ALTI wr 363: 00000000 NOP 364: 0603D1E7 _RET_ MOV x,y ================================================================================ Description : --var, var-- (isolated) Lut base $000, 8 Bit bytecode, BC = $70 = BC[7:4] < bbbb : [aiiiiiiii] = $70 (112) LUT $70: $003dcb56 = JMP #mod_iso : Skip mask = %111101110010 $F72 356: F603CFE8 mod_iso MOV y,x 358: F9A7B564 ALTI rd 359: 00000000 NOP 35D: F187D001 SUB x,#$1 362: F9A7B764 ALTI wr 363: 00000000 NOP 364: 0603D1E7 _RET_ MOV x,y ================================================================================ Description : ++var (push) Lut base $000, 8 Bit bytecode, BC = $71 = BC[7:4] < bbbb : [aiiiiiiii] = $71 (113) LUT $71: $019d6357 = JMP #mod_psh : Skip mask = %110011101011000 $6758 357: FC67D161 mod_psh WRLONG x,PTRA++ 358: F9A7B564 ALTI rd 359: 00000000 NOP 35C: F107D001 ADD x,#$1 35E: F743D1DC ZEROX x,sz 362: F9A7B764 ALTI wr 363: 00000000 NOP 366: FD64002D RET ================================================================================ Description : --var (push) Lut base $000, 8 Bit bytecode, BC = $72 = BC[7:4] < bbbb : [aiiiiiiii] = $72 (114) LUT $72: $019ce357 = JMP #mod_psh : Skip mask = %110011100111000 $6738 357: FC67D161 mod_psh WRLONG x,PTRA++ 358: F9A7B564 ALTI rd 359: 00000000 NOP 35D: F187D001 SUB x,#$1 35E: F743D1DC ZEROX x,sz 362: F9A7B764 ALTI wr 363: 00000000 NOP 366: FD64002D RET ================================================================================ Description : var++ (push) Lut base $000, 8 Bit bytecode, BC = $73 = BC[7:4] < bbbb : [aiiiiiiii] = $73 (115) LUT $73: $009f2357 = JMP #mod_psh : Skip mask = %10011111001000 $27C8 357: FC67D161 mod_psh WRLONG x,PTRA++ 358: F9A7B564 ALTI rd 359: 00000000 NOP 35B: F603C7E8 MOV z,x 35C: F107D001 ADD x,#$1 362: F9A7B764 ALTI wr 363: 00000000 NOP 365: 0603D1E3 _RET_ MOV x,z ================================================================================ Description : var-- (push) Lut base $000, 8 Bit bytecode, BC = $74 = BC[7:4] < bbbb : [aiiiiiiii] = $74 (116) LUT $74: $009ea357 = JMP #mod_psh : Skip mask = %10011110101000 $27A8 357: FC67D161 mod_psh WRLONG x,PTRA++ 358: F9A7B564 ALTI rd 359: 00000000 NOP 35B: F603C7E8 MOV z,x 35D: F187D001 SUB x,#$1 362: F9A7B764 ALTI wr 363: 00000000 NOP 365: 0603D1E3 _RET_ MOV x,z ================================================================================ Description : var!! (isolated) Lut base $000, 8 Bit bytecode, BC = $75 = BC[7:4] < bbbb : [aiiiiiiii] = $75 (117) LUT $75: $0037cb56 = JMP #mod_iso : Skip mask = %110111110010 $DF2 356: F603CFE8 mod_iso MOV y,x 358: F9A7B564 ALTI rd 359: 00000000 NOP 35F: F5C3D1D8 MUXZ x,_ffffffff 362: F9A7B764 ALTI wr 363: 00000000 NOP 364: 0603D1E7 _RET_ MOV x,y ================================================================================ Description : var!! (push) Lut base $000, 8 Bit bytecode, BC = $76 = BC[7:4] < bbbb : [aiiiiiiii] = $76 (118) LUT $76: $009ba357 = JMP #mod_psh : Skip mask = %10011011101000 $26E8 357: FC67D161 mod_psh WRLONG x,PTRA++ 358: F9A7B564 ALTI rd 359: 00000000 NOP 35B: F603C7E8 MOV z,x 35F: F5C3D1D8 MUXZ x,_ffffffff 362: F9A7B764 ALTI wr 363: 00000000 NOP 365: 0603D1E3 _RET_ MOV x,z ================================================================================ Description : var! (isolated) Lut base $000, 8 Bit bytecode, BC = $77 = BC[7:4] < bbbb : [aiiiiiiii] = $77 (119) LUT $77: $002fcb56 = JMP #mod_iso : Skip mask = %101111110010 $BF2 356: F603CFE8 mod_iso MOV y,x 358: F9A7B564 ALTI rd 359: 00000000 NOP 360: F623D1E8 NOT x 362: F9A7B764 ALTI wr 363: 00000000 NOP 364: 0603D1E7 _RET_ MOV x,y ================================================================================ Description : var! (push) Lut base $000, 8 Bit bytecode, BC = $78 = BC[7:4] < bbbb : [aiiiiiiii] = $78 (120) LUT $78: $0097a357 = JMP #mod_psh : Skip mask = %10010111101000 $25E8 357: FC67D161 mod_psh WRLONG x,PTRA++ 358: F9A7B564 ALTI rd 359: 00000000 NOP 35B: F603C7E8 MOV z,x 360: F623D1E8 NOT x 362: F9A7B764 ALTI wr 363: 00000000 NOP 365: 0603D1E3 _RET_ MOV x,z ================================================================================ Description : var\new (swap) Lut base $000, 8 Bit bytecode, BC = $79 = BC[7:4] < bbbb : [aiiiiiiii] = $79 (121) LUT $79: $011f4b56 = JMP #mod_iso : Skip mask = %100011111010010 $47D2 356: F603CFE8 mod_iso MOV y,x 358: F9A7B564 ALTI rd 359: 00000000 NOP 35B: F603C7E8 MOV z,x 361: F603D1E7 MOV x,y 362: F9A7B764 ALTI wr 363: 00000000 NOP 365: 0603D1E3 _RET_ MOV x,z ================================================================================ Description : ??var (isolated) Lut base $000, 8 Bit bytecode, BC = $7a = BC[7:4] < bbbb : [aiiiiiiii] = $7a (122) LUT $7a: $003f0b56 = JMP #mod_iso : Skip mask = %111111000010 $FC2 356: F603CFE8 mod_iso MOV y,x 358: F9A7B564 ALTI rd 359: 00000000 NOP 35A: FD63D068 XORO32 x [OVERRIDE NEXT S] 35B: F603C7E8 MOV z,x 362: F9A7B764 ALTI wr 363: 00000000 NOP 364: 0603D1E7 _RET_ MOV x,y ================================================================================ Description : ??var (push) Lut base $000, 8 Bit bytecode, BC = $7b = BC[7:4] < bbbb : [aiiiiiiii] = $7b (123) LUT $7b: $009f8357 = JMP #mod_psh : Skip mask = %10011111100000 $27E0 357: FC67D161 mod_psh WRLONG x,PTRA++ 358: F9A7B564 ALTI rd 359: 00000000 NOP 35A: FD63D068 XORO32 x [OVERRIDE NEXT S] 35B: F603C7E8 MOV z,x 362: F9A7B764 ALTI wr 363: 00000000 NOP 365: 0603D1E3 _RET_ MOV x,z ================================================================================ Description : exp < exp Lut base $000, 8 Bit bytecode, BC = $7c = BC[7:4] < bbbb : [aiiiiiiii] = $7c (124) LUT $7c: $000073b3 = JMP #op_rel : Skip mask = %11100 $1C 3B3: FB07CF5F op_rel RDLONG y,--PTRA 3B4: F25BCFE8 CMPS y,x WCZ 3B8: 0583D1D8 _RET_ MUXC x,_ffffffff ================================================================================ Description : exp +< exp Lut base $000, 8 Bit bytecode, BC = $7d = BC[7:4] < bbbb : [aiiiiiiii] = $7d (125) LUT $7d: $00005bb3 = JMP #op_rel : Skip mask = %10110 $16 3B3: FB07CF5F op_rel RDLONG y,--PTRA 3B6: F21BCFE8 CMP y,x WCZ 3B8: 0583D1D8 _RET_ MUXC x,_ffffffff ================================================================================ Description : exp <= exp Lut base $000, 8 Bit bytecode, BC = $7e = BC[7:4] < bbbb : [aiiiiiiii] = $7e (126) LUT $7e: $0000ebb3 = JMP #op_rel : Skip mask = %111010 $3A 3B3: FB07CF5F op_rel RDLONG y,--PTRA 3B5: F25BD1E7 CMPS x,y WCZ 3B9: 05A3D1D8 _RET_ MUXNC x,_ffffffff ================================================================================ Description : exp +<= exp Lut base $000, 8 Bit bytecode, BC = $7f = BC[7:4] < bbbb : [aiiiiiiii] = $7f (127) LUT $7f: $0000bbb3 = JMP #op_rel : Skip mask = %101110 $2E 3B3: FB07CF5F op_rel RDLONG y,--PTRA 3B7: F21BD1E7 CMP x,y WCZ 3B9: 05A3D1D8 _RET_ MUXNC x,_ffffffff ================================================================================ Description : exp == exp Lut base $000, 8 Bit bytecode, BC = $80 = BC[7:4] < bbbb : [aiiiiiiii] = $80 (128) LUT $80: $0001f3b3 = JMP #op_rel : Skip mask = %1111100 $7C 3B3: FB07CF5F op_rel RDLONG y,--PTRA 3B4: F25BCFE8 CMPS y,x WCZ 3BA: 05C3D1D8 _RET_ MUXZ x,_ffffffff ================================================================================ Description : exp <> exp Lut base $000, 8 Bit bytecode, BC = $81 = BC[7:4] < bbbb : [aiiiiiiii] = $81 (129) LUT $81: $0003f3b3 = JMP #op_rel : Skip mask = %11111100 $FC 3B3: FB07CF5F op_rel RDLONG y,--PTRA 3B4: F25BCFE8 CMPS y,x WCZ 3BB: 05E3D1D8 _RET_ MUXNZ x,_ffffffff ================================================================================ Description : exp >= exp Lut base $000, 8 Bit bytecode, BC = $82 = BC[7:4] < bbbb : [aiiiiiiii] = $82 (130) LUT $82: $0000f3b3 = JMP #op_rel : Skip mask = %111100 $3C 3B3: FB07CF5F op_rel RDLONG y,--PTRA 3B4: F25BCFE8 CMPS y,x WCZ 3B9: 05A3D1D8 _RET_ MUXNC x,_ffffffff ================================================================================ Description : exp +>= exp Lut base $000, 8 Bit bytecode, BC = $83 = BC[7:4] < bbbb : [aiiiiiiii] = $83 (131) LUT $83: $0000dbb3 = JMP #op_rel : Skip mask = %110110 $36 3B3: FB07CF5F op_rel RDLONG y,--PTRA 3B6: F21BCFE8 CMP y,x WCZ 3B9: 05A3D1D8 _RET_ MUXNC x,_ffffffff ================================================================================ Description : exp > exp Lut base $000, 8 Bit bytecode, BC = $84 = BC[7:4] < bbbb : [aiiiiiiii] = $84 (132) LUT $84: $00006bb3 = JMP #op_rel : Skip mask = %11010 $1A 3B3: FB07CF5F op_rel RDLONG y,--PTRA 3B5: F25BD1E7 CMPS x,y WCZ 3B8: 0583D1D8 _RET_ MUXC x,_ffffffff ================================================================================ Description : exp +> exp Lut base $000, 8 Bit bytecode, BC = $85 = BC[7:4] < bbbb : [aiiiiiiii] = $85 (133) LUT $85: $00003bb3 = JMP #op_rel : Skip mask = %1110 $E 3B3: FB07CF5F op_rel RDLONG y,--PTRA 3B7: F21BD1E7 CMP x,y WCZ 3B8: 0583D1D8 _RET_ MUXC x,_ffffffff ================================================================================ Description : exp <=> exp Lut base $000, 8 Bit bytecode, BC = $86 = BC[7:4] < bbbb : [aiiiiiiii] = $86 (134) LUT $86: $0007f3b3 = JMP #op_rel : Skip mask = %111111100 $1FC 3B3: FB07CF5F op_rel RDLONG y,--PTRA 3B4: F25BCFE8 CMPS y,x WCZ 3BC: F583D1D8 MUXC x,_ffffffff 3BD: 05E7D001 _RET_ MUXNZ x,#$1 ================================================================================ Description : !!exp Lut base $000, 8 Bit bytecode, BC = $87 = BC[7:4] < bbbb : [aiiiiiiii] = $87 (135) LUT $87: $007fbb6a = JMP #op_notb : Skip mask = %1111111101110 $1FEE 36A: F7CBD1E8 op_notb TEST x WZ 36E: F5C3D1D8 MUXZ x,_ffffffff 377: FD64002D RET ================================================================================ Description : !exp Lut base $000, 8 Bit bytecode, BC = $88 = BC[7:4] < bbbb : [aiiiiiiii] = $88 (136) LUT $88: $0003fb6f = JMP #op_not : Skip mask = %11111110 $FE 36F: F623D1E8 op_not NOT x 377: FD64002D RET ================================================================================ Description : -exp Lut base $000, 8 Bit bytecode, BC = $89 = BC[7:4] < bbbb : [aiiiiiiii] = $89 (137) LUT $89: $0001fb70 = JMP #op_neg : Skip mask = %1111110 $7E 370: F663D1E8 op_neg NEG x 377: FD64002D RET ================================================================================ Description : ABS exp Lut base $000, 8 Bit bytecode, BC = $8a = BC[7:4] < bbbb : [aiiiiiiii] = $8a (138) LUT $8a: $0000fb71 = JMP #op_abs : Skip mask = %111110 $3E 371: F643D1E8 op_abs ABS x 377: FD64002D RET ================================================================================ Description : ENCOD exp Lut base $000, 8 Bit bytecode, BC = $8b = BC[7:4] < bbbb : [aiiiiiiii] = $8b (139) LUT $8b: $00007b72 = JMP #op_ncod : Skip mask = %11110 $1E 372: F783D1E8 op_ncod ENCOD x 377: FD64002D RET ================================================================================ Description : DECOD exp Lut base $000, 8 Bit bytecode, BC = $8c = BC[7:4] < bbbb : [aiiiiiiii] = $8c (140) LUT $8c: $00003b73 = JMP #op_dcod : Skip mask = %1110 $E 373: F9C3D1E8 op_dcod DECOD x 377: FD64002D RET ================================================================================ Description : ONES exp Lut base $000, 8 Bit bytecode, BC = $8d = BC[7:4] < bbbb : [aiiiiiiii] = $8d (141) LUT $8d: $00001b74 = JMP #op_ones : Skip mask = %110 $6 374: F7A3D1E8 op_ones ONES x 377: FD64002D RET ================================================================================ Description : SQRT exp Lut base $000, 8 Bit bytecode, BC = $8e = BC[7:4] < bbbb : [aiiiiiiii] = $8e (142) LUT $8e: $002ffb6b = JMP #op_sqrt : Skip mask = %101111111110 $BFE 36B: FD37D000 op_sqrt QSQRT x,#spin2 375: FD63D018 GETQX x 377: FD64002D RET ================================================================================ Description : LOG exp Lut base $000, 8 Bit bytecode, BC = $8f = BC[7:4] < bbbb : [aiiiiiiii] = $8f (143) LUT $8f: $0017fb6c = JMP #op_log : Skip mask = %10111111110 $5FE 36C: FD63D00E op_log QLOG x 375: FD63D018 GETQX x 377: FD64002D RET ================================================================================ Description : EXP exp Lut base $000, 8 Bit bytecode, BC = $90 = BC[7:4] < bbbb : [aiiiiiiii] = $90 (144) LUT $90: $000bfb6d = JMP #op_exp : Skip mask = %1011111110 $2FE 36D: FD63D00F op_exp QEXP x 375: FD63D018 GETQX x 377: FD64002D RET ================================================================================ Description : exp >> exp Lut base $000, 8 Bit bytecode, BC = $91 = BC[7:4] < bbbb : [aiiiiiiii] = $91 (145) LUT $91: $007edb7a = JMP #sha_mod : Skip mask = %1111110110110 $1FB6 37A: F603CFE8 sha_mod MOV y,x 37D: FB07D15F RDLONG x,--PTRA 380: F043D1E7 SHR x,y 387: FD64002D RET ================================================================================ Description : exp << exp Lut base $000, 8 Bit bytecode, BC = $92 = BC[7:4] < bbbb : [aiiiiiiii] = $92 (146) LUT $92: $007f5b7a = JMP #sha_mod : Skip mask = %1111111010110 $1FD6 37A: F603CFE8 sha_mod MOV y,x 37D: FB07D15F RDLONG x,--PTRA 37F: F063D1E7 SHL x,y 387: FD64002D RET ================================================================================ Description : exp SAR exp Lut base $000, 8 Bit bytecode, BC = $93 = BC[7:4] < bbbb : [aiiiiiiii] = $93 (147) LUT $93: $007ddb7a = JMP #sha_mod : Skip mask = %1111101110110 $1F76 37A: F603CFE8 sha_mod MOV y,x 37D: FB07D15F RDLONG x,--PTRA 381: F0C3D1E7 SAR x,y 387: FD64002D RET ================================================================================ Description : exp ROR exp Lut base $000, 8 Bit bytecode, BC = $94 = BC[7:4] < bbbb : [aiiiiiiii] = $94 (148) LUT $94: $007bdb7a = JMP #sha_mod : Skip mask = %1111011110110 $1EF6 37A: F603CFE8 sha_mod MOV y,x 37D: FB07D15F RDLONG x,--PTRA 382: F003D1E7 ROR x,y 387: FD64002D RET ================================================================================ Description : exp ROL exp Lut base $000, 8 Bit bytecode, BC = $95 = BC[7:4] < bbbb : [aiiiiiiii] = $95 (149) LUT $95: $0077db7a = JMP #sha_mod : Skip mask = %1110111110110 $1DF6 37A: F603CFE8 sha_mod MOV y,x 37D: FB07D15F RDLONG x,--PTRA 383: F023D1E7 ROL x,y 387: FD64002D RET ================================================================================ Description : exp REV exp Lut base $000, 8 Bit bytecode, BC = $96 = BC[7:4] < bbbb : [aiiiiiiii] = $96 (150) LUT $96: $003f4b7b = JMP #rev_mod : Skip mask = %111111010010 $FD2 37B: F623CFE8 rev_mod NOT y,x 37D: FB07D15F RDLONG x,--PTRA 37E: FD63D069 REV x 380: F043D1E7 SHR x,y 387: FD64002D RET ================================================================================ Description : exp ZEROX exp Lut base $000, 8 Bit bytecode, BC = $97 = BC[7:4] < bbbb : [aiiiiiiii] = $97 (151) LUT $97: $003f2b7b = JMP #rev_mod : Skip mask = %111111001010 $FCA 37B: F623CFE8 rev_mod NOT y,x 37D: FB07D15F RDLONG x,--PTRA 37F: F063D1E7 SHL x,y 380: F043D1E7 SHR x,y 387: FD64002D RET ================================================================================ Description : exp SIGNX exp Lut base $000, 8 Bit bytecode, BC = $98 = BC[7:4] < bbbb : [aiiiiiiii] = $98 (152) LUT $98: $003eab7b = JMP #rev_mod : Skip mask = %111110101010 $FAA 37B: F623CFE8 rev_mod NOT y,x 37D: FB07D15F RDLONG x,--PTRA 37F: F063D1E7 SHL x,y 381: F0C3D1E7 SAR x,y 387: FD64002D RET ================================================================================ Description : exp + exp Lut base $000, 8 Bit bytecode, BC = $99 = BC[7:4] < bbbb : [aiiiiiiii] = $99 (153) LUT $99: $006fdb7a = JMP #sha_mod : Skip mask = %1101111110110 $1BF6 37A: F603CFE8 sha_mod MOV y,x 37D: FB07D15F RDLONG x,--PTRA 384: F103D1E7 ADD x,y 387: FD64002D RET ================================================================================ Description : exp - exp Lut base $000, 8 Bit bytecode, BC = $9a = BC[7:4] < bbbb : [aiiiiiiii] = $9a (154) LUT $9a: $005fdb7a = JMP #sha_mod : Skip mask = %1011111110110 $17F6 37A: F603CFE8 sha_mod MOV y,x 37D: FB07D15F RDLONG x,--PTRA 385: F183D1E7 SUB x,y 387: FD64002D RET ================================================================================ Description : exp && exp Lut base $000, 8 Bit bytecode, BC = $9b = BC[7:4] < bbbb : [aiiiiiiii] = $9b (155) LUT $9b: $001f138a = JMP #log_mod : Skip mask = %11111000100 $7C4 38A: F60BCFE8 log_mod MOV y,x WZ 38B: F5E3CFD8 MUXNZ y,_ffffffff 38D: FB0FD15F RDLONG x,--PTRA WZ 38E: F5E3D1D8 MUXNZ x,_ffffffff 38F: F503D1E7 AND x,y 395: FD64002D RET ================================================================================ Description : exp ^^ exp Lut base $000, 8 Bit bytecode, BC = $9c = BC[7:4] < bbbb : [aiiiiiiii] = $9c (156) LUT $9c: $001e938a = JMP #log_mod : Skip mask = %11110100100 $7A4 38A: F60BCFE8 log_mod MOV y,x WZ 38B: F5E3CFD8 MUXNZ y,_ffffffff 38D: FB0FD15F RDLONG x,--PTRA WZ 38E: F5E3D1D8 MUXNZ x,_ffffffff 390: F563D1E7 XOR x,y 395: FD64002D RET ================================================================================ Description : exp || exp Lut base $000, 8 Bit bytecode, BC = $9d = BC[7:4] < bbbb : [aiiiiiiii] = $9d (157) LUT $9d: $001d938a = JMP #log_mod : Skip mask = %11101100100 $764 38A: F60BCFE8 log_mod MOV y,x WZ 38B: F5E3CFD8 MUXNZ y,_ffffffff 38D: FB0FD15F RDLONG x,--PTRA WZ 38E: F5E3D1D8 MUXNZ x,_ffffffff 391: F543D1E7 OR x,y 395: FD64002D RET ================================================================================ Description : exp & exp Lut base $000, 8 Bit bytecode, BC = $9e = BC[7:4] < bbbb : [aiiiiiiii] = $9e (158) LUT $9e: $001f5b8a = JMP #log_mod : Skip mask = %11111010110 $7D6 38A: F60BCFE8 log_mod MOV y,x WZ 38D: FB0FD15F RDLONG x,--PTRA WZ 38F: F503D1E7 AND x,y 395: FD64002D RET ================================================================================ Description : exp ^ exp Lut base $000, 8 Bit bytecode, BC = $9f = BC[7:4] < bbbb : [aiiiiiiii] = $9f (159) LUT $9f: $001edb8a = JMP #log_mod : Skip mask = %11110110110 $7B6 38A: F60BCFE8 log_mod MOV y,x WZ 38D: FB0FD15F RDLONG x,--PTRA WZ 390: F563D1E7 XOR x,y 395: FD64002D RET ================================================================================ Description : exp | exp Lut base $000, 8 Bit bytecode, BC = $a0 = BC[7:4] < bbbb : [aiiiiiiii] = $a0 (160) LUT $a0: $001ddb8a = JMP #log_mod : Skip mask = %11101110110 $776 38A: F60BCFE8 log_mod MOV y,x WZ 38D: FB0FD15F RDLONG x,--PTRA WZ 391: F543D1E7 OR x,y 395: FD64002D RET ================================================================================ Description : exp #> exp Lut base $000, 8 Bit bytecode, BC = $a1 = BC[7:4] < bbbb : [aiiiiiiii] = $a1 (161) LUT $a1: $001bdb8a = JMP #log_mod : Skip mask = %11011110110 $6F6 38A: F60BCFE8 log_mod MOV y,x WZ 38D: FB0FD15F RDLONG x,--PTRA WZ 392: F343D1E7 FGES x,y 395: FD64002D RET ================================================================================ Description : exp <# exp Lut base $000, 8 Bit bytecode, BC = $a2 = BC[7:4] < bbbb : [aiiiiiiii] = $a2 (162) LUT $a2: $0017db8a = JMP #log_mod : Skip mask = %10111110110 $5F6 38A: F60BCFE8 log_mod MOV y,x WZ 38D: FB0FD15F RDLONG x,--PTRA WZ 393: F363D1E7 FLES x,y 395: FD64002D RET ================================================================================ Description : exp * exp Lut base $000, 8 Bit bytecode, BC = $a3 = BC[7:4] < bbbb : [aiiiiiiii] = $a3 (163) LUT $a3: $00fb6b99 = JMP #muu_mod : Skip mask = %11111011011010 $3EDA 399: F603CFE8 muu_mod MOV y,x 39B: FB07D15F RDLONG x,--PTRA 39E: FD03D1E7 QMUL x,y 3A1: FD63D018 GETQX x 3A7: FD64002D RET ================================================================================ Description : exp / exp Lut base $000, 8 Bit bytecode, BC = $a4 = BC[7:4] < bbbb : [aiiiiiiii] = $a4 (164) LUT $a4: $01e51b98 = JMP #mul_mod : Skip mask = %111100101000110 $7946 398: F653CFE8 mul_mod ABS y,x WC 39B: FB07D15F RDLONG x,--PTRA 39C: F40FD01F TESTB x,#$1f WZ 39D: F643D1E8 ABS x 39F: FD13D1E7 QDIV x,y 3A1: FD63D018 GETQX x 3A2: 6663D1E8 IF_C_NE_Z NEG x 3A7: FD64002D RET ================================================================================ Description : exp +/ exp Lut base $000, 8 Bit bytecode, BC = $a5 = BC[7:4] < bbbb : [aiiiiiiii] = $a5 (165) LUT $a5: $00faeb99 = JMP #muu_mod : Skip mask = %11111010111010 $3EBA 399: F603CFE8 muu_mod MOV y,x 39B: FB07D15F RDLONG x,--PTRA 39F: FD13D1E7 QDIV x,y 3A1: FD63D018 GETQX x 3A7: FD64002D RET ================================================================================ Description : exp // exp Lut base $000, 8 Bit bytecode, BC = $a6 = BC[7:4] < bbbb : [aiiiiiiii] = $a6 (166) LUT $a6: $019d1b98 = JMP #mul_mod : Skip mask = %110011101000110 $6746 398: F653CFE8 mul_mod ABS y,x WC 39B: FB07D15F RDLONG x,--PTRA 39C: F40FD01F TESTB x,#$1f WZ 39D: F643D1E8 ABS x 39F: FD13D1E7 QDIV x,y 3A3: FD63D019 GETQY x 3A4: A663D1E8 IF_z NEG x 3A7: FD64002D RET ================================================================================ Description : exp +// exp Lut base $000, 8 Bit bytecode, BC = $a7 = BC[7:4] < bbbb : [aiiiiiiii] = $a7 (167) LUT $a7: $00eeeb99 = JMP #muu_mod : Skip mask = %11101110111010 $3BBA 399: F603CFE8 muu_mod MOV y,x 39B: FB07D15F RDLONG x,--PTRA 39F: FD13D1E7 QDIV x,y 3A3: FD63D019 GETQY x 3A7: FD64002D RET ================================================================================ Description : exp SCA exp Lut base $000, 8 Bit bytecode, BC = $a8 = BC[7:4] < bbbb : [aiiiiiiii] = $a8 (168) LUT $a8: $00ef6b99 = JMP #muu_mod : Skip mask = %11101111011010 $3BDA 399: F603CFE8 muu_mod MOV y,x 39B: FB07D15F RDLONG x,--PTRA 39E: FD03D1E7 QMUL x,y 3A3: FD63D019 GETQY x 3A7: FD64002D RET ================================================================================ Description : exp SCAS exp Lut base $000, 8 Bit bytecode, BC = $a9 = BC[7:4] < bbbb : [aiiiiiiii] = $a9 (169) LUT $a9: $015e1b98 = JMP #mul_mod : Skip mask = %101011110000110 $5786 398: F653CFE8 mul_mod ABS y,x WC 39B: FB07D15F RDLONG x,--PTRA 39C: F40FD01F TESTB x,#$1f WZ 39D: F643D1E8 ABS x 39E: FD03D1E7 QMUL x,y 3A3: FD63D019 GETQY x 3A5: FDB00010 CALL #scas'0130 3A7: FD64002D RET ================================================================================ Description : exp FRAC exp Lut base $000, 8 Bit bytecode, BC = $aa = BC[7:4] < bbbb : [aiiiiiiii] = $aa (170) LUT $aa: $00f9eb99 = JMP #muu_mod : Skip mask = %11111001111010 $3E7A 399: F603CFE8 muu_mod MOV y,x 39B: FB07D15F RDLONG x,--PTRA 3A0: FD23D1E7 QFRAC x,y 3A1: FD63D018 GETQX x 3A7: FD64002D RET ================================================================================ Description : !!= var (isolated) Lut base $000, 8 Bit bytecode, BC = $ab = BC[7:4] < bbbb : [aiiiiiiii] = $ab (171) LUT $ab: $01fdcb67 = JMP #una_iso : Skip mask = %111111101110010 $7F72 367: F603CFE8 una_iso MOV y,x 369: F9A7B564 ALTI rd 36A: F7CBD1E8 op_notb TEST x WZ 36E: F5C3D1D8 MUXZ x,_ffffffff 376: F9A7B764 ALTI wr 377: FD64002D RET ================================================================================ Description : != var (isolated) Lut base $000, 8 Bit bytecode, BC = $ac = BC[7:4] < bbbb : [aiiiiiiii] = $ac (172) LUT $ac: $01fbcb67 = JMP #una_iso : Skip mask = %111111011110010 $7EF2 367: F603CFE8 una_iso MOV y,x 369: F9A7B564 ALTI rd 36A: F7CBD1E8 op_notb TEST x WZ 36F: F623D1E8 op_not NOT x 376: F9A7B764 ALTI wr 377: FD64002D RET ================================================================================ Description : -= var (isolated) Lut base $000, 8 Bit bytecode, BC = $ad = BC[7:4] < bbbb : [aiiiiiiii] = $ad (173) LUT $ad: $01f7cb67 = JMP #una_iso : Skip mask = %111110111110010 $7DF2 367: F603CFE8 una_iso MOV y,x 369: F9A7B564 ALTI rd 36A: F7CBD1E8 op_notb TEST x WZ 370: F663D1E8 op_neg NEG x 376: F9A7B764 ALTI wr 377: FD64002D RET ================================================================================ Description : ABS= var (isolated) Lut base $000, 8 Bit bytecode, BC = $ae = BC[7:4] < bbbb : [aiiiiiiii] = $ae (174) LUT $ae: $01efcb67 = JMP #una_iso : Skip mask = %111101111110010 $7BF2 367: F603CFE8 una_iso MOV y,x 369: F9A7B564 ALTI rd 36A: F7CBD1E8 op_notb TEST x WZ 371: F643D1E8 op_abs ABS x 376: F9A7B764 ALTI wr 377: FD64002D RET ================================================================================ Description : ENCOD= var (isolated) Lut base $000, 8 Bit bytecode, BC = $af = BC[7:4] < bbbb : [aiiiiiiii] = $af (175) LUT $af: $01dfcb67 = JMP #una_iso : Skip mask = %111011111110010 $77F2 367: F603CFE8 una_iso MOV y,x 369: F9A7B564 ALTI rd 36A: F7CBD1E8 op_notb TEST x WZ 372: F783D1E8 op_ncod ENCOD x 376: F9A7B764 ALTI wr 377: FD64002D RET ================================================================================ Description : DECOD= var (isolated) Lut base $000, 8 Bit bytecode, BC = $b0 = BC[7:4] < bbbb : [aiiiiiiii] = $b0 (176) LUT $b0: $01bfcb67 = JMP #una_iso : Skip mask = %110111111110010 $6FF2 367: F603CFE8 una_iso MOV y,x 369: F9A7B564 ALTI rd 36A: F7CBD1E8 op_notb TEST x WZ 373: F9C3D1E8 op_dcod DECOD x 376: F9A7B764 ALTI wr 377: FD64002D RET ================================================================================ Description : ONES= var (isolated) Lut base $000, 8 Bit bytecode, BC = $b1 = BC[7:4] < bbbb : [aiiiiiiii] = $b1 (177) LUT $b1: $017fcb67 = JMP #una_iso : Skip mask = %101111111110010 $5FF2 367: F603CFE8 una_iso MOV y,x 369: F9A7B564 ALTI rd 36A: F7CBD1E8 op_notb TEST x WZ 374: F7A3D1E8 op_ones ONES x 376: F9A7B764 ALTI wr 377: FD64002D RET ================================================================================ Description : SQRT= var (isolated) Lut base $000, 8 Bit bytecode, BC = $b2 = BC[7:4] < bbbb : [aiiiiiiii] = $b2 (178) LUT $b2: $00ff8b67 = JMP #una_iso : Skip mask = %11111111100010 $3FE2 367: F603CFE8 una_iso MOV y,x 369: F9A7B564 ALTI rd 36A: F7CBD1E8 op_notb TEST x WZ 36B: FD37D000 op_sqrt QSQRT x,#spin2 375: FD63D018 GETQX x 376: F9A7B764 ALTI wr 377: FD64002D RET ================================================================================ Description : LOG= var (isolated) Lut base $000, 8 Bit bytecode, BC = $b3 = BC[7:4] < bbbb : [aiiiiiiii] = $b3 (179) LUT $b3: $00ff4b67 = JMP #una_iso : Skip mask = %11111111010010 $3FD2 367: F603CFE8 una_iso MOV y,x 369: F9A7B564 ALTI rd 36A: F7CBD1E8 op_notb TEST x WZ 36C: FD63D00E op_log QLOG x 375: FD63D018 GETQX x 376: F9A7B764 ALTI wr 377: FD64002D RET ================================================================================ Description : EXP= var (isolated) Lut base $000, 8 Bit bytecode, BC = $b4 = BC[7:4] < bbbb : [aiiiiiiii] = $b4 (180) LUT $b4: $00fecb67 = JMP #una_iso : Skip mask = %11111110110010 $3FB2 367: F603CFE8 una_iso MOV y,x 369: F9A7B564 ALTI rd 36A: F7CBD1E8 op_notb TEST x WZ 36D: FD63D00F op_exp QEXP x 375: FD63D018 GETQX x 376: F9A7B764 ALTI wr 377: FD64002D RET ================================================================================ Description : var >>= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $b5 = BC[7:4] < bbbb : [aiiiiiiii] = $b5 (181) LUT $b5: $003ecb7a = JMP #sha_mod : Skip mask = %111110110010 $FB2 37A: F603CFE8 sha_mod MOV y,x 37C: F9A7B564 ALTI rd 37D: FB07D15F RDLONG x,--PTRA 380: F043D1E7 SHR x,y 386: F9A7B764 ALTI wr 387: FD64002D RET ================================================================================ Description : var <<= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $b6 = BC[7:4] < bbbb : [aiiiiiiii] = $b6 (182) LUT $b6: $003f4b7a = JMP #sha_mod : Skip mask = %111111010010 $FD2 37A: F603CFE8 sha_mod MOV y,x 37C: F9A7B564 ALTI rd 37D: FB07D15F RDLONG x,--PTRA 37F: F063D1E7 SHL x,y 386: F9A7B764 ALTI wr 387: FD64002D RET ================================================================================ Description : var SAR= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $b7 = BC[7:4] < bbbb : [aiiiiiiii] = $b7 (183) LUT $b7: $003dcb7a = JMP #sha_mod : Skip mask = %111101110010 $F72 37A: F603CFE8 sha_mod MOV y,x 37C: F9A7B564 ALTI rd 37D: FB07D15F RDLONG x,--PTRA 381: F0C3D1E7 SAR x,y 386: F9A7B764 ALTI wr 387: FD64002D RET ================================================================================ Description : var ROR= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $b8 = BC[7:4] < bbbb : [aiiiiiiii] = $b8 (184) LUT $b8: $003bcb7a = JMP #sha_mod : Skip mask = %111011110010 $EF2 37A: F603CFE8 sha_mod MOV y,x 37C: F9A7B564 ALTI rd 37D: FB07D15F RDLONG x,--PTRA 382: F003D1E7 ROR x,y 386: F9A7B764 ALTI wr 387: FD64002D RET ================================================================================ Description : var ROL= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $b9 = BC[7:4] < bbbb : [aiiiiiiii] = $b9 (185) LUT $b9: $0037cb7a = JMP #sha_mod : Skip mask = %110111110010 $DF2 37A: F603CFE8 sha_mod MOV y,x 37C: F9A7B564 ALTI rd 37D: FB07D15F RDLONG x,--PTRA 383: F023D1E7 ROL x,y 386: F9A7B764 ALTI wr 387: FD64002D RET ================================================================================ Description : var REV= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $ba = BC[7:4] < bbbb : [aiiiiiiii] = $ba (186) LUT $ba: $001f437b = JMP #rev_mod : Skip mask = %11111010000 $7D0 37B: F623CFE8 rev_mod NOT y,x 37C: F9A7B564 ALTI rd 37D: FB07D15F RDLONG x,--PTRA 37E: FD63D069 REV x 380: F043D1E7 SHR x,y 386: F9A7B764 ALTI wr 387: FD64002D RET ================================================================================ Description : var ZEROX= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $bb = BC[7:4] < bbbb : [aiiiiiiii] = $bb (187) LUT $bb: $001f237b = JMP #rev_mod : Skip mask = %11111001000 $7C8 37B: F623CFE8 rev_mod NOT y,x 37C: F9A7B564 ALTI rd 37D: FB07D15F RDLONG x,--PTRA 37F: F063D1E7 SHL x,y 380: F043D1E7 SHR x,y 386: F9A7B764 ALTI wr 387: FD64002D RET ================================================================================ Description : var SIGNX= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $bc = BC[7:4] < bbbb : [aiiiiiiii] = $bc (188) LUT $bc: $001ea37b = JMP #rev_mod : Skip mask = %11110101000 $7A8 37B: F623CFE8 rev_mod NOT y,x 37C: F9A7B564 ALTI rd 37D: FB07D15F RDLONG x,--PTRA 37F: F063D1E7 SHL x,y 381: F0C3D1E7 SAR x,y 386: F9A7B764 ALTI wr 387: FD64002D RET ================================================================================ Description : var += exp (isolated) Lut base $000, 8 Bit bytecode, BC = $bd = BC[7:4] < bbbb : [aiiiiiiii] = $bd (189) LUT $bd: $002fcb7a = JMP #sha_mod : Skip mask = %101111110010 $BF2 37A: F603CFE8 sha_mod MOV y,x 37C: F9A7B564 ALTI rd 37D: FB07D15F RDLONG x,--PTRA 384: F103D1E7 ADD x,y 386: F9A7B764 ALTI wr 387: FD64002D RET ================================================================================ Description : var -= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $be = BC[7:4] < bbbb : [aiiiiiiii] = $be (190) LUT $be: $001fcb7a = JMP #sha_mod : Skip mask = %11111110010 $7F2 37A: F603CFE8 sha_mod MOV y,x 37C: F9A7B564 ALTI rd 37D: FB07D15F RDLONG x,--PTRA 385: F183D1E7 SUB x,y 386: F9A7B764 ALTI wr 387: FD64002D RET ================================================================================ Description : var &&= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $bf = BC[7:4] < bbbb : [aiiiiiiii] = $bf (191) LUT $bf: $000f038a = JMP #log_mod : Skip mask = %1111000000 $3C0 38A: F60BCFE8 log_mod MOV y,x WZ 38B: F5E3CFD8 MUXNZ y,_ffffffff 38C: F9A7B564 ALTI rd 38D: FB0FD15F RDLONG x,--PTRA WZ 38E: F5E3D1D8 MUXNZ x,_ffffffff 38F: F503D1E7 AND x,y 394: F9A7B764 ALTI wr 395: FD64002D RET ================================================================================ Description : var ^^= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $c0 = BC[7:4] < bbbb : [aiiiiiiii] = $c0 (192) LUT $c0: $000e838a = JMP #log_mod : Skip mask = %1110100000 $3A0 38A: F60BCFE8 log_mod MOV y,x WZ 38B: F5E3CFD8 MUXNZ y,_ffffffff 38C: F9A7B564 ALTI rd 38D: FB0FD15F RDLONG x,--PTRA WZ 38E: F5E3D1D8 MUXNZ x,_ffffffff 390: F563D1E7 XOR x,y 394: F9A7B764 ALTI wr 395: FD64002D RET ================================================================================ Description : var ||= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $c1 = BC[7:4] < bbbb : [aiiiiiiii] = $c1 (193) LUT $c1: $000d838a = JMP #log_mod : Skip mask = %1101100000 $360 38A: F60BCFE8 log_mod MOV y,x WZ 38B: F5E3CFD8 MUXNZ y,_ffffffff 38C: F9A7B564 ALTI rd 38D: FB0FD15F RDLONG x,--PTRA WZ 38E: F5E3D1D8 MUXNZ x,_ffffffff 391: F543D1E7 OR x,y 394: F9A7B764 ALTI wr 395: FD64002D RET ================================================================================ Description : var &= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $c2 = BC[7:4] < bbbb : [aiiiiiiii] = $c2 (194) LUT $c2: $000f4b8a = JMP #log_mod : Skip mask = %1111010010 $3D2 38A: F60BCFE8 log_mod MOV y,x WZ 38C: F9A7B564 ALTI rd 38D: FB0FD15F RDLONG x,--PTRA WZ 38F: F503D1E7 AND x,y 394: F9A7B764 ALTI wr 395: FD64002D RET ================================================================================ Description : var ^= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $c3 = BC[7:4] < bbbb : [aiiiiiiii] = $c3 (195) LUT $c3: $000ecb8a = JMP #log_mod : Skip mask = %1110110010 $3B2 38A: F60BCFE8 log_mod MOV y,x WZ 38C: F9A7B564 ALTI rd 38D: FB0FD15F RDLONG x,--PTRA WZ 390: F563D1E7 XOR x,y 394: F9A7B764 ALTI wr 395: FD64002D RET ================================================================================ Description : var |= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $c4 = BC[7:4] < bbbb : [aiiiiiiii] = $c4 (196) LUT $c4: $000dcb8a = JMP #log_mod : Skip mask = %1101110010 $372 38A: F60BCFE8 log_mod MOV y,x WZ 38C: F9A7B564 ALTI rd 38D: FB0FD15F RDLONG x,--PTRA WZ 391: F543D1E7 OR x,y 394: F9A7B764 ALTI wr 395: FD64002D RET ================================================================================ Description : var #>= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $c5 = BC[7:4] < bbbb : [aiiiiiiii] = $c5 (197) LUT $c5: $000bcb8a = JMP #log_mod : Skip mask = %1011110010 $2F2 38A: F60BCFE8 log_mod MOV y,x WZ 38C: F9A7B564 ALTI rd 38D: FB0FD15F RDLONG x,--PTRA WZ 392: F343D1E7 FGES x,y 394: F9A7B764 ALTI wr 395: FD64002D RET ================================================================================ Description : var <#= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $c6 = BC[7:4] < bbbb : [aiiiiiiii] = $c6 (198) LUT $c6: $0007cb8a = JMP #log_mod : Skip mask = %111110010 $1F2 38A: F60BCFE8 log_mod MOV y,x WZ 38C: F9A7B564 ALTI rd 38D: FB0FD15F RDLONG x,--PTRA WZ 393: F363D1E7 FLES x,y 394: F9A7B764 ALTI wr 395: FD64002D RET ================================================================================ Description : var *= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $c7 = BC[7:4] < bbbb : [aiiiiiiii] = $c7 (199) LUT $c7: $007b6b99 = JMP #muu_mod : Skip mask = %1111011011010 $1EDA 399: F603CFE8 muu_mod MOV y,x 39B: FB07D15F RDLONG x,--PTRA 39E: FD03D1E7 QMUL x,y 3A1: FD63D018 GETQX x 3A6: F9A7B764 ALTI wr 3A7: FD64002D RET ================================================================================ Description : var /= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $c8 = BC[7:4] < bbbb : [aiiiiiiii] = $c8 (200) LUT $c8: $00e51b98 = JMP #mul_mod : Skip mask = %11100101000110 $3946 398: F653CFE8 mul_mod ABS y,x WC 39B: FB07D15F RDLONG x,--PTRA 39C: F40FD01F TESTB x,#$1f WZ 39D: F643D1E8 ABS x 39F: FD13D1E7 QDIV x,y 3A1: FD63D018 GETQX x 3A2: 6663D1E8 IF_C_NE_Z NEG x 3A6: F9A7B764 ALTI wr 3A7: FD64002D RET ================================================================================ Description : var +/= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $c9 = BC[7:4] < bbbb : [aiiiiiiii] = $c9 (201) LUT $c9: $007aeb99 = JMP #muu_mod : Skip mask = %1111010111010 $1EBA 399: F603CFE8 muu_mod MOV y,x 39B: FB07D15F RDLONG x,--PTRA 39F: FD13D1E7 QDIV x,y 3A1: FD63D018 GETQX x 3A6: F9A7B764 ALTI wr 3A7: FD64002D RET ================================================================================ Description : var //= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $ca = BC[7:4] < bbbb : [aiiiiiiii] = $ca (202) LUT $ca: $009d1b98 = JMP #mul_mod : Skip mask = %10011101000110 $2746 398: F653CFE8 mul_mod ABS y,x WC 39B: FB07D15F RDLONG x,--PTRA 39C: F40FD01F TESTB x,#$1f WZ 39D: F643D1E8 ABS x 39F: FD13D1E7 QDIV x,y 3A3: FD63D019 GETQY x 3A4: A663D1E8 IF_z NEG x 3A6: F9A7B764 ALTI wr 3A7: FD64002D RET ================================================================================ Description : var +//= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $cb = BC[7:4] < bbbb : [aiiiiiiii] = $cb (203) LUT $cb: $006eeb99 = JMP #muu_mod : Skip mask = %1101110111010 $1BBA 399: F603CFE8 muu_mod MOV y,x 39B: FB07D15F RDLONG x,--PTRA 39F: FD13D1E7 QDIV x,y 3A3: FD63D019 GETQY x 3A6: F9A7B764 ALTI wr 3A7: FD64002D RET ================================================================================ Description : var SCA= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $cc = BC[7:4] < bbbb : [aiiiiiiii] = $cc (204) LUT $cc: $006f6b99 = JMP #muu_mod : Skip mask = %1101111011010 $1BDA 399: F603CFE8 muu_mod MOV y,x 39B: FB07D15F RDLONG x,--PTRA 39E: FD03D1E7 QMUL x,y 3A3: FD63D019 GETQY x 3A6: F9A7B764 ALTI wr 3A7: FD64002D RET ================================================================================ Description : var SCAS= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $cd = BC[7:4] < bbbb : [aiiiiiiii] = $cd (205) LUT $cd: $005e1b98 = JMP #mul_mod : Skip mask = %1011110000110 $1786 398: F653CFE8 mul_mod ABS y,x WC 39B: FB07D15F RDLONG x,--PTRA 39C: F40FD01F TESTB x,#$1f WZ 39D: F643D1E8 ABS x 39E: FD03D1E7 QMUL x,y 3A3: FD63D019 GETQY x 3A5: FDB00010 CALL #scas'0130 3A6: F9A7B764 ALTI wr 3A7: FD64002D RET ================================================================================ Description : var FRAC= exp (isolated) Lut base $000, 8 Bit bytecode, BC = $ce = BC[7:4] < bbbb : [aiiiiiiii] = $ce (206) LUT $ce: $0079eb99 = JMP #muu_mod : Skip mask = %1111001111010 $1E7A 399: F603CFE8 muu_mod MOV y,x 39B: FB07D15F RDLONG x,--PTRA 3A0: FD23D1E7 QFRAC x,y 3A1: FD63D018 GETQX x 3A6: F9A7B764 ALTI wr 3A7: FD64002D RET ================================================================================ Description : alternate bytecode Lut base $000, 8 Bit bytecode, BC = $cf = BC[7:4] < bbbb : [aiiiiiiii] = $cf (207) LUT $cf: $000003c8 = JMP #alt_cod : Skip mask = %0 $0 3C8: 0D67AA29 alt_cod _RET_ SETQ2 #$1d5 ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $d0 = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $d1 = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $d2 = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $d3 = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $d4 = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $d5 = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $d6 = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $d7 = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $d8 = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $d9 = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $da = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $db = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $dc = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $dd = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $de = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : read long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $df = BC[7:4] >= bbbb : [abbbbiiii] = $d0 (208) LUT $d0: $00000334 = JMP #var_loc : Skip mask = %0 $0 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 337: FC67D161 WRLONG x,PTRA++ 338: 0B03D1DD _RET_ RDLONG x,a ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $e0 = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $e1 = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $e2 = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $e3 = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $e4 = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $e5 = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $e6 = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $e7 = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $e8 = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $e9 = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $ea = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $eb = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $ec = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $ed = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $ee = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : write long[dbase][0..15] (isolated) Lut base $000, 8 Bit bytecode, BC = $ef = BC[7:4] >= bbbb : [abbbbiiii] = $d1 (209) LUT $d1: $00006334 = JMP #var_loc : Skip mask = %11000 $18 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 339: FC63D1DD WRLONG x,a 33A: 0B07D15F _RET_ RDLONG x,--PTRA ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $f0 = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $f1 = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $f2 = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $f3 = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $f4 = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $f5 = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $f6 = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $f7 = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $f8 = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $f9 = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $fa = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $fb = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $fc = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $fd = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $fe = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f ================================================================================ Description : setup long[dbase][0..15] Lut base $000, 8 Bit bytecode, BC = $ff = BC[7:4] >= bbbb : [abbbbiiii] = $d2 (210) LUT $d2: $0001e334 = JMP #var_loc : Skip mask = %1111000 $78 334: F843BBF6 var_loc GETNIB a,PA,#0 335: F067BA02 SHL a,#$2 336: F103BBE5 ADD a,vbase 33B: F603B5CE MOV rd,rd_long 33C: F603B7D4 MOV wr,wr_long 33D: 0607B81F _RET_ MOV sz,#$1f >logoff