2950 DEF PROCaregph1
2960 tareg%=areg% AND 3
2970 ENDPROC
2980
2990
DEF PROCaregph2
3000 oareg%=tareg%
3010 achkx%=FALSE
3020 IF aregs%=0 areg%=aregn%*4
3030 IF aregs%=1 areg%=alu% AND &3FFFFFF:achkx%=alu% AND &FC000000
3040 IF aregs%=2 areg%=inc% OR areg% AND 3
3050 IF aregs%=3 areg%=reg%(15)
3060 ENDPROC