Subversion Repositories pentevo

Rev

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

  1.                 cpu     sx20
  2.                 page    0
  3.                 include "regsx20.inc"
  4.  
  5.                 and     $08,w
  6.                 and     w,$09
  7.                 and     w,#$ff
  8.  
  9.                 not     $0d
  10.  
  11.                 or      $08,w
  12.                 or      w,$09
  13.                 or      w,#$ff
  14.  
  15.                 xor     $08,w
  16.                 xor     w,$09
  17.                 xor     w,#$ff
  18.  
  19.                 add     $08,w
  20.                 add     w,$09
  21.  
  22.                 clr     w
  23.                 clr     !wdt
  24.                 clr     $0e
  25.  
  26.                 dec     $0a
  27.                 decsz   $0b
  28.  
  29.                 inc     $0c
  30.                 incsz   $0d
  31.  
  32.                 rl      $04
  33.  
  34.                 rr      $05
  35.  
  36.                 sub     $0a,w
  37.  
  38.                 swap    $06
  39.  
  40.                 clrb    $0f.4
  41.                 sb      $0e.5
  42.                 setb    $0d.6
  43.                 snb     $0c.7
  44.  
  45.                 mov     $0e,w
  46.                 mov     w,$09
  47.                 mov     w,$0d-w
  48.                 mov     w,#$aa
  49.                 mov     w,/$0a
  50.                 mov     w,--$0b
  51.                 mov     w,++$0e
  52.                 mov     w,<<$0c
  53.                 mov     w,>>$0d
  54.                 mov     w,<>$08
  55.                 mov     w,m
  56.                 movsz   w,--$0b
  57.                 movsz   w,++$0e
  58.                 mov     m,w
  59.                 mov     m,#$a
  60.                 mov     !$06,w
  61.                 mov     !option,w
  62.  
  63.                 test    $07
  64.  
  65.                 call    $034
  66.                 jmp     $145
  67.  
  68.                 nop
  69.  
  70.                 ret
  71.                 retp
  72.                 reti
  73.                 retiw
  74.                 retw    $bb
  75.  
  76.                 iread
  77.  
  78.                 sleep
  79.  
  80.                 page    $600
  81.  
  82.                 bank    $90
  83.  
  84.                 assume  fsr:$10
  85.                 mov     w,$13
  86.                 expect  110
  87.                  mov     w,$33
  88.                 endexpect
  89.  
  90.                 assume  fsr:$30
  91.                 expect  110
  92.                  mov     w,$13
  93.                 endexpect
  94.                 mov     w,$33
  95.  
  96.                 assume  status:$00
  97.                 jmp     $056
  98.                 expect  110
  99.                  jmp     $256
  100.                 endexpect
  101.                 expect  110
  102.                  jmp     $456
  103.                 endexpect
  104.                 expect  110
  105.                  jmp     $656
  106.                 endexpect
  107.  
  108.                 assume  status:$40
  109.                 expect  110
  110.                  jmp     $056
  111.                 endexpect
  112.                 expect  110
  113.                  jmp     $256
  114.                 endexpect
  115.                 jmp     $456
  116.                 expect  110
  117.                  jmp     $656
  118.                 endexpect
  119.  
  120. mybit           bit     $12.3
  121. mybit1          bit     $32.3
  122.                 assume  fsr:$10
  123.                 setb    mybit
  124.                 expect  110
  125.                  setb    mybit1
  126.                 endexpect
  127.                 assume  fsr:$30
  128.                 expect  110
  129.                  setb    mybit
  130.                 endexpect
  131.                 setb    mybit1
  132.  
  133.                 ; emulated instructions
  134.  
  135.                 clrb    C
  136.                 clc
  137.                 clrb    Z
  138.                 clz
  139.                 setb    C
  140.                 sec
  141.                 setb    Z
  142.                 sez
  143.                 mov     PC,w
  144.                 jmp     w
  145.                 add     PC,w
  146.                 jmp     pc+w
  147.                 mov     m,#14
  148.                 mode    14
  149.                 xor     w,#$ff
  150.                 not     w
  151.                 sb      c
  152.                 sc
  153.                 sb      z
  154.                 sz
  155.                 align   2
  156.                 snb     PC.0
  157.                 sb      PC.0
  158.                 skip
  159.                 skip