OpenCores
URL https://opencores.org/ocsvn/eco32/eco32/trunk

Subversion Repositories eco32

[/] [eco32/] [tags/] [eco32-0.22/] [fp/] [implementation/] [mmix/] [alpha.mms] - Diff between revs 15 and 21

Only display areas with differences | Details | Blame | View Log

Rev 15 Rev 21
* The "alpha channel" exercise in section 7.1.3
* The "alpha channel" exercise in section 7.1.3
x     GREG
x     GREG
y     GREG
y     GREG
z     GREG
z     GREG
m     GREG
m     GREG
alpha GREG
alpha GREG
t     IS  $255
t     IS  $255
l     GREG #0101010101010101
l     GREG #0101010101010101
h     GREG #8080808080808080
h     GREG #8080808080808080
mone  GREG -1
mone  GREG -1
rodd  GREG #4020100804020101
rodd  GREG #4020100804020101
lsh   GREG #0080402010080402
lsh   GREG #0080402010080402
      LOC  #100
      LOC  #100
Main  XOR  t,x,y
Main  XOR  t,x,y
      MOR  z,rodd,t
      MOR  z,rodd,t
      AND  t,x,y
      AND  t,x,y
      ADDU z,z,t
      ADDU z,z,t
      AND  t,alpha,h
      AND  t,alpha,h
      MOR  m,mone,t
      MOR  m,mone,t
      PUT  rM,m
      PUT  rM,m
      MUX  x,z,x
      MUX  x,z,x
      MUX  y,y,z
      MUX  y,y,z
      MOR  alpha,lsh,alpha
      MOR  alpha,lsh,alpha
      XOR  t,x,y
      XOR  t,x,y
      MOR  z,t,rodd
      MOR  z,t,rodd
      AND  t,x,y
      AND  t,x,y
      ADDU z,z,t
      ADDU z,z,t
      AND  t,alpha,h
      AND  t,alpha,h
      MOR  m,t,mone
      MOR  m,t,mone
      PUT  rM,m
      PUT  rM,m
      MUX  x,z,x
      MUX  x,z,x
      MUX  y,y,z
      MUX  y,y,z
      MOR  alpha,alpha,lsh
      MOR  alpha,alpha,lsh
      XOR  t,x,y
      XOR  t,x,y
      MOR  z,t,rodd
      MOR  z,t,rodd
      AND  t,x,y
      AND  t,x,y
      ADDU z,z,t
      ADDU z,z,t
      AND  t,alpha,h
      AND  t,alpha,h
      MOR  m,t,mone
      MOR  m,t,mone
      PUT  rM,m
      PUT  rM,m
      MUX  x,z,x
      MUX  x,z,x
      MUX  y,y,z
      MUX  y,y,z
      MOR  alpha,alpha,lsh
      MOR  alpha,alpha,lsh
      XOR  t,x,y
      XOR  t,x,y
      MOR  z,t,rodd
      MOR  z,t,rodd
      AND  t,x,y
      AND  t,x,y
      ADDU z,z,t
      ADDU z,z,t
      AND  t,alpha,h
      AND  t,alpha,h
      MOR  m,t,mone
      MOR  m,t,mone
      PUT  rM,m
      PUT  rM,m
      MUX  x,z,x
      MUX  x,z,x
      MUX  y,y,z
      MUX  y,y,z
      MOR  alpha,alpha,lsh
      MOR  alpha,alpha,lsh
      XOR  t,x,y
      XOR  t,x,y
      MOR  z,t,rodd
      MOR  z,t,rodd
      AND  t,x,y
      AND  t,x,y
      ADDU z,z,t
      ADDU z,z,t
      AND  t,alpha,h
      AND  t,alpha,h
      MOR  m,t,mone
      MOR  m,t,mone
      PUT  rM,m
      PUT  rM,m
      MUX  x,z,x
      MUX  x,z,x
      MUX  y,y,z
      MUX  y,y,z
      MOR  alpha,alpha,lsh
      MOR  alpha,alpha,lsh
      XOR  t,x,y
      XOR  t,x,y
      MOR  z,t,rodd
      MOR  z,t,rodd
      AND  t,x,y
      AND  t,x,y
      ADDU z,z,t
      ADDU z,z,t
      AND  t,alpha,h
      AND  t,alpha,h
      MOR  m,t,mone
      MOR  m,t,mone
      PUT  rM,m
      PUT  rM,m
      MUX  x,z,x
      MUX  x,z,x
      MUX  y,y,z
      MUX  y,y,z
      MOR  alpha,alpha,lsh
      MOR  alpha,alpha,lsh
      XOR  t,x,y
      XOR  t,x,y
      MOR  z,t,rodd
      MOR  z,t,rodd
      AND  t,x,y
      AND  t,x,y
      ADDU z,z,t
      ADDU z,z,t
      AND  t,alpha,h
      AND  t,alpha,h
      MOR  m,t,mone
      MOR  m,t,mone
      PUT  rM,m
      PUT  rM,m
      MUX  x,z,x
      MUX  x,z,x
      MUX  y,y,z
      MUX  y,y,z
      MOR  alpha,alpha,lsh
      MOR  alpha,alpha,lsh
      XOR  t,x,y
      XOR  t,x,y
      MOR  z,t,rodd
      MOR  z,t,rodd
      AND  t,x,y
      AND  t,x,y
      ADDU z,z,t
      ADDU z,z,t
      TRAP 0,Halt,0
      TRAP 0,Halt,0
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.