> NullKbd/src 0.12 " Null keyboard support module E Demonstrate building relocation table from two images in memory (: 2#assem(0)::assem(2):sm_table BVS OldKeyJmp:BCS OldKeyJmp:LDA #0:RTS:.OldKeyJmp:EQUB &4C : ]:RelocTable=P% : : ݤsm_pass(pass%) pass%=0:M%=0 pass%=1:M%=O%-mcode% P%=&8100-128*(pass%2) O%=mcode%+M%*(pass%2)2 /pass%=1: O%+M%*2.125>L%:"Code overrun": ="4647",pass%+1,1) : sm_table &>base80%=mcode%+M%:base81%=mcode%:byte%=0:count%=0:off%=0: 0Pbyte80%=base80%?off%:byte81%=base81%?off%: off%>=M%:byte80%=&80:byte81%=&80 :[ ((byte81%-byte80%) &FE)<>0: "ERROR: Offset by more than one page at &";~&8000+off% DM (byte80% &C0)=&80:byte%=byte%2+128*(byte81%-byte80%):count%=count%+1 N1 count%=8:?O%=byte%:O%=O%+1:byte%=0:count%=0 X$off%=off%+1:off%>=M% count%=0 b