Subversion Repositories pentevo

Rev

Blame | Last modification | View Log | Download | RSS feed | ?url?

  1.                 page    0
  2.  
  3.                 cpu     370c010
  4.  
  5. cat             equ     r16
  6. dog             equ     r011
  7. mouse           equ     p055
  8. rat             equ     p127
  9.  
  10.                 clrc
  11.                 setc
  12.                 dint
  13.                 eint
  14.                 eintl
  15.                 einth
  16.                 idle
  17.                 ldsp
  18.                 stsp
  19.                 nop
  20.                 rti
  21.                 rts
  22.  
  23. Targ:           jmp     Targ
  24.                 jc      Targ
  25.                 jeq     Targ
  26.                 jg      Targ
  27.                 jge     Targ
  28.                 jhs     Targ
  29.                 jl      Targ
  30.                 jle     Targ
  31.                 jlo     Targ
  32.                 jn      Targ
  33.                 jnc     Targ
  34.                 jne     Targ
  35.                 jnv     Targ
  36.                 jnz     Targ
  37.                 jp      Targ
  38.                 jpz     Targ
  39.                 jv      Targ
  40.                 jz      Targ
  41.  
  42.                 adc     b,a
  43.                 add     dog,a
  44.                 dac     cat,b
  45.                 dsb     dog,cat
  46.                 sbb     #55h,a
  47.                 sub     #0aah,b
  48.                 mpy     #' ',dog
  49.  
  50.                 and     a,p050
  51.                 btjo    b,a,Targ
  52.                 btjz    b,p10,Targ
  53.                 or      cat,a
  54.                 xor     dog,b
  55.                 and     r020,r10
  56.                 btjo    #55,a,Targ
  57.                 btjz    #66,b,Targ
  58.                 or      #77,r10
  59.                 xor     #88,rat
  60.  
  61.                 br      Targ
  62.                 br      @dog
  63.                 br      Targ(b)
  64.                 br      10(cat)
  65.                 call    Targ
  66.                 call    @dog
  67.                 call    Targ(b)
  68.                 call    10(cat)
  69.                 callr   Targ
  70.                 callr   @dog
  71.                 callr   Targ(b)
  72.                 callr   10(cat)
  73.                 jmpl    Targ
  74.                 jmpl    @dog
  75.                 jmpl    Targ(b)
  76.                 jmpl    10(cat)
  77.  
  78.                 clr     a
  79.                 compl   b
  80.                 dec     cat
  81.                 inc     a
  82.                 inv     b
  83.                 pop     dog
  84.                 push    a
  85.                 pop     st
  86.                 push    st
  87.                 rl      b
  88.                 rlc     r020
  89.                 rr      a
  90.                 rrc     b
  91.                 swap    dog
  92.                 xchb    a
  93.                 djnz    b,$
  94.  
  95.                 cmp     2000h,a
  96.                 cmp     @dog,a
  97.                 cmp     targ(b),a
  98.                 cmp     10(cat),a
  99.                 cmp     -5(sp),a
  100.                 cmp     b,a
  101.                 cmp     dog,a
  102.                 cmp     cat,b
  103.                 cmp     cat,dog
  104.                 cmp     #55h,a
  105.                 cmp     #66h,b
  106.                 cmp     #77h,r0ff
  107.  
  108. bit1            dbit    1,r12
  109. bit2            dbit    4,p033
  110. bit3            dbit    5,b
  111.  
  112.                 cmpbit  bit1
  113.                 cmpbit  bit2
  114.                 jbit0   bit1,$
  115.                 jbit0   bit2,$
  116.                 jbit1   bit1,$
  117.                 jbit1   bit2,$
  118.                 sbit0   bit1
  119.                 sbit0   bit2
  120.                 sbit1   bit1
  121.                 sbit1   bit2
  122.  
  123.                 div     r45,a
  124.                 incw    #56h,dog
  125.                 ldst    #12
  126.  
  127.                 mov     a,b
  128.                 mov     a,cat
  129.                 mov     a,mouse
  130.                 mov     a,1234h
  131.                 mov     a,@r33
  132.                 mov     a,Targ(b)
  133.                 mov     a,15(r015)
  134.                 mov     a,-2(sp)
  135.                 mov     dog,a
  136.                 mov     cat,b
  137.                 mov     1234h,a
  138.                 mov     @dog,a
  139.                 mov     Targ(b),a
  140.                 mov     -33(cat),a
  141.                 mov     15(sp),a
  142.                 mov     b,a
  143.                 mov     b,dog
  144.                 mov     b,rat
  145.                 mov     cat,dog
  146.                 mov     dog,mouse
  147.                 mov     rat,a
  148.                 mov     p15,b
  149.                 mov     p15,r015
  150.                 mov     #11h,a
  151.                 mov     #-1,b
  152.                 mov     #0110110b,r10
  153.                 mov     #10h,rat
  154.  
  155.                 movw    cat,dog
  156.                 movw    #12345,r010
  157.                 movw    #Targ(b),cat
  158.                 movw    #(cat),cat
  159.  
  160.                 trap    7
  161.  
  162.                 tst     a
  163.                 tst     b
  164.