Subversion Repositories pentevo

Rev

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

  1.         cpu     80296
  2.  
  3. ax      equ     40
  4. al      equ     ax
  5. ah      equ     al+1
  6. bx      equ     42
  7. cx      equ     44
  8. dx      equ     46
  9.  
  10.         reti
  11.  
  12.         eld     ax,[bx]
  13.         eld     ax,0[bx]
  14.         eld     ax,100[bx]      ; nur 24-Bit-Displacement
  15.         eld     ax,1000[bx]
  16.         eld     ax,100000[bx]
  17.         eld     ax,-100[bx]
  18.         eld     ax,-1000[bx]
  19.         eld     ax,-100000[bx]
  20.         eld     ax,123456h
  21.  
  22.         eldb    al,[bx]
  23.         eldb    al,0[bx]
  24.         eldb    al,100[bx]      ; nur 24-Bit-Displacement
  25.         eldb    al,1000[bx]
  26.         eldb    al,100000[bx]
  27.         eldb    al,-100[bx]
  28.         eldb    al,-1000[bx]
  29.         eldb    al,-100000[bx]
  30.         eldb    al,123456h
  31.  
  32.         est     ax,[bx]
  33.         est     ax,0[bx]
  34.         est     ax,100[bx]      ; nur 24-Bit-Displacement
  35.         est     ax,1000[bx]
  36.         est     ax,100000[bx]
  37.         est     ax,-100[bx]
  38.         est     ax,-1000[bx]
  39.         est     ax,-100000[bx]
  40.         est     ax,123456h
  41.  
  42.         estb    al,[bx]
  43.         estb    al,0[bx]
  44.         estb    al,100[bx]      ; nur 24-Bit-Displacement
  45.         estb    al,1000[bx]
  46.         estb    al,100000[bx]
  47.         estb    al,-100[bx]
  48.         estb    al,-1000[bx]
  49.         estb    al,-100000[bx]
  50.         estb    al,123456h
  51.  
  52.         ecall   $+123456h
  53.         ejmp    $-10h
  54.         ebr     [bx]
  55.  
  56.         ebmovi  cx,ax
  57.  
  58.         mac     #12h
  59.         mac     ax,#12h
  60.  
  61.         macr    bx
  62.         macr    ax,bx
  63.  
  64.         macrz   10[bx]
  65.         macrz   ax,10[bx]
  66.  
  67.         macz    -1000[bx]
  68.         macz    ax,-1000[bx]
  69.  
  70.         smac    [cx]
  71.         smac    ax,[cx]
  72.  
  73.         smacr   [cx]+
  74.         smacr   ax,[cx]+
  75.  
  76.         smacrz  1000h
  77.         smacrz  ax,1000h
  78.  
  79.         smacz   0ffc0h
  80.         smacz   ax,0ffc0h
  81.  
  82.         msac    ax,#20
  83.  
  84.         mvac    cx,al
  85.  
  86.         rpt     ax
  87.         rptnst  #10
  88.         rptnh   [cx]
  89.         rptgt   [cx]+
  90.         rptnc   ax
  91.         rptnvt  #10
  92.         rptnv   [cx]
  93.         rptge   [cx]+
  94.         rptne   ax
  95.         rptst   #10
  96.         rpth    [cx]
  97.         rptle   [cx]+
  98.         rptc    ax
  99.         rptvt   #10
  100.         rptv    [cx]
  101.         rptlt   [cx]+
  102.         rpte    ax
  103.         rpti    #10
  104.         rptinst [cx]
  105.         rptinh  [cx]+
  106.         rptigt  ax
  107.         rptinc  #10
  108.         rptinvt [cx]
  109.         rptinv  [cx]+
  110.         rptige  ax
  111.         rptine  #10
  112.         rptist  [cx]
  113.         rptih   [cx]+
  114.         rptile  ax
  115.         rptic   #10
  116.         rptivt  [cx]
  117.         rptiv   [cx]+
  118.         rptilt  ax
  119.         rptie   #10
  120.  
  121.         assume  wsr:3eh         ; 1f80h...1fbfh --> 0c0h...0ffh
  122.         assume  wsr1:9eh        ; 0f780h...0f7bfh --> 40h..7fh
  123.  
  124.         ld      ax,3eh          ; normal
  125.         ld      ax,44h          ; mu▀ absolut werden
  126.         ld      ax,92h          ; wieder normal
  127.         ld      ax,0d0h         ; mu▀ wieder absolut werden
  128.         ld      ax,1000h        ; mu▀ absolut bleiben
  129.         ld      ax,1f90h        ; mit WSR
  130.         ld      ax,2000h        ; mu▀ wieder absolut bleiben
  131.         ld      ax,0f7a0h       ; mit WSR1
  132.         ld      ax,0fffeh       ; mu▀ wieder absolut bleiben
  133.