Subversion Repositories eco32

000000000000: second test program, start in 8000000000000000
 e107d10034000007  00000: SETMH $7,#d100; NEG $0,$7 % also PTE for page 0!
 f6120000fb000007  00008: PUT rV,$0; UNSAVE $7 % PTE for page 1; s=47, b1=15
 e30200a0f60c0002  00010: SETL $2,160; PUT rI,$2 % can vary the delay
 f60d000025000018  00018: PUT rT,$0; SUB $0,$0,#18 % can change to #20
 f60e0000f60f0001  00020: PUT rTT,$0; PUT rK,$1
 9e00ff01f9000000  00028: GO $0,$255,$1; RESUME % all interrupts now enabled
 faff0000fb0000ff  00030: SAVE $255,0; UNSAVE $255 % optional extra torture
 feff0010f7100000  00038: GET $255,rQ; PUT rQ,0 % dynamic interrupt handler
 feff001c3fffff37  00040: GET $255,rWW; SRU $255,$255,55
 25ffff01f9000001  00048: SUB $255,$255,1; RESUME 1 % rK=-1[rWW>=0]+255[rWW<0]
 feff001e3dffff2f  00050: GET $255,rYY; SR $255,$255,47 % static int handler
 3bffff2fe5ff8000  00058: SLU $255,$255,47; INCMH $255,#8000
 ecffffffebff0007  00060: ANDNH $255,#ffff; ORL $255,7
 f61f00fff1fffff5  00068: PUT rZZ,$255; JMP @-44
 f500fff8f60d0000  00070: GETA $0,@-32; PUT rT,$0 % special starting point
 25000018f60e0000  00078: SUB $0,$0,#18; PUT rTT,$0 % can change to #20
 f70c0064f1ffffdf  00080: PUT rI,100; JMP @-4*33 % can vary this delay too
50ffffffff78: bottom of the UNSAVE
 8000000000000050  50f...f78: $0 (will be put into rT)
 ffffffffffffffff  50f...f80: $1 (-1)
 0000000000000002  50f...f88: rL
 cccccccccccccccc  50f...f90: g254
 0000800000000030  50f...f98: g255, one more than target of the GO
 0000000000000000  50f...fa0: g0=rB
 1111111111111111  50f...fa8: g1=rD
 2222222222222222  50f...fb0: g2=rE
 3333333333333333  50f...fb8: g3=rH
 4444444444444444  50f...fc0: g4=rJ
 5555555555555555  50f...fc8: g5=rM
 6666666666666666  50f...fd0: g6=rR
 7777777777777777  50f...fd8: g23=rP
 0000000000000035  50f...fe0: g24=rW, where we continue after first RESUME
 0100ca0017010203  50f...fe8: g25=rX, is RESUMEd to do FINT r1,rY,rZ 
 cccccccccccccccc  50f...ff0: g26=rY
 8888888888888888  50f...ff8: g27=rZ
 fe00000000034000  510...000: rG and rA; rounding down, V enabled
800000000020: stuff on page 0
 feff00193bffff29  80...020: GET $255,rX; SLU $255,$255,41 % Vtrip handler
 f61900fffeff0000  80...028: PUT rX,$255; GET $255,rB
 f9000000fafe0000  80...030: RESUME; SAVE $254,0
 5b00ff0017010203  80...038: PBNZ $0,@-4*256; FINT $1,$2,$3 % emulated
 a80100feff112233  80...040: STT $1,$0,$254; TRIP #11,#22,#33