MAXS   START             ;¡ãMAXS.CAS¡ä
       LAD   GR1,0       ; 0¢ªGR1
S1     LAD   GR2,1,GR1   ; GR1+1¢ªGR2
       LD    GR3,GR1     ; GR1¢ªGR3
       LD    GR4,TBL,GR1 ; TBL(GR1)¢ªGR4
S2     CPA   GR4,TBL,GR2 ; GRTBL(GR2)
       JPL   S3
       LD    GR4,TBL,GR2 ; TBL(GR2)¢ªGR4
       LD    GR3,GR2     ; GR2¢ªGR3
S3     LAD   GR2,1,GR2   ; GR2+1¢ªGR2
       CPA   GR2,N       ; GRN
       JMI   S2
       LD    GR0,TBL,GR1 ; TBL(GR1)¢ªGR0
       ST    GR0,TBL,GR3 ; GR0¢ªTBL(GR3)
       ST    GR4,TBL,GR1 ; GR4¢ªTBL(GR1)
       LAD   GR1,1,GR1   ; GR1+1¢ªGR1
       CPA   GR1,NM1     ; GRNM1
       JMI   S1
       RET
N      DC    10
NM1    DC    9
TBL    DC    2,7,4,6,9
       DC    12,0,1,15,5
       END