home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
AmigActive 6
/
AACD06.ISO
/
AACD
/
Graphics
/
VideoEasel
/
CAMRexx
/
TM-Gas.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1995-03-30
|
289b
|
16 lines
/* TM-Gas by an idea of Toffoli, in CAMRexx by THOR */
MakeAlgorithm:
PLANEALGORITHM margolus hvphases
return
MakePlane:
if center=opp & cw=ccw & center~=cw then
SETPLANE center
else; do
if phase then SETPLANE cw
else SETPLANE ccw
end
return