SONY ELET SYSTEMS SINUS FX AREXX TUTORIAL BY KING MASHIACH

ZOOMOUTTOFULLSCREEN[SPEED=HIGHEST;FULLSCREENBGCOLOR=#FULL0;FULLSCREENCOLORRES=#FFFFFF;SCREENRES=720*200;SCREENRESBLOCKBARSCOLOR=#333333;SCREENORIGIN=LEFTCENTER]
PLAYAUDIOFILE(MYAUDIOFILE.IFF)
DEFEQ{y=amp*SINDEG(angle)}->$equation1
$equation1.PARAMS(amp=100;angle.MIN=0;angle.MAX=720)
$equation1.SOLVETORASTERMEM[RESULTHEXARANGE[FROM=#000000;TO=#FFFFFF];MAPPARAMTOHEXA[PARAM=angle;HEXARANGE=[FROM=0;TO=256]]]->$rasterizedequation1
NEW OBJ OVERSCANTOPBLOCKBARTITLE->$overstr
$overstr.COLOR=#FULL1
NEW OBJ GRAPHICSTRING->$hexadata
$hexadata.COLOR=AUTORAINBOWROLL
$hexadata.SCREENLAYER=2
offset=0
FOR a=1 TO 3600 DO
FOR hexarangeangle=0 TO 256 DO
$hexadata.REMOVEFROMSCREENIFANY
$rasterizedequation1.DRAWTOSCREENBYSTEP[TYPE=RAINBOWTRON;STEPFROMLOOP=hexarangeangle;MAPSTEPTOEQUATIONPARAM=angle;MAPDRAWAMPLITUDETOEQUATIONPARAM=y;SCREENLAYER=1;PARAMTOXOFFSET=angle;XOFFSET=offset]
$hexadata.X=hexarangeangle*720/256
IF $rasterizedequation1.Y>0 THEN
$hexadata.Y=$rasterizedequation1.y+10
ELSE
$hexadata.Y=$rasterizedequation1.y-10
END
$hexadata.STR=$rasterizedequation1.RAWDATA[READPARAM=y;FORMAT=SHARPEDHEXA]
$hexadata.WRITETOSCREEN
$overstr.STR=hexarangeangle
$overstr.WRITETOSCREEN
END
offset++
SYNCTOSCREENANDAUDIOTHISLOOP[TYPE=44RANDOM;FX=RANDOM]
END

#THIS 29 LINES RAINBOW SINUS DEMO EFFECT SYNCED TO A AUDIO FILE IS TRUELY KILLER!

THE ELET SYSTEMS COMPUTERS THAT OUR ITEP QUANTIC FACTORIES WILL SOON START PRODUCING FOR THE SONY BRAND USES THE AREXX LANGUAGE WITH THE AREXX TO CORE RUNTIME TECHNOLOGY. AREXX IS ULTRA HIGHLY RICH LANGUAGE WITH MANY ALIASES AND DEFAULT VALUES.

THIS DEMO DRAWS A RAINBOW EFFECT SINUS ON 256 STEPS, OFFSET++ THE SINUS EVERY 256 STEPS LOOP BREAK, DISPLAYS A HEXADECIMAL RASTERIZED SINUS EQUATION RESULT BELOW OR ABOVE THE RAINBOW SINUS HEXADECIMAL VALUE, AND A 256 STEPS COUNTER ON TOP OF IT OVER THE TOP GREY BLOCK BAR. ALL SYNCED WITH CRAZY RANDOMIZED EFFECTS ON 4/4 MUSIC BEAT RATIO, BPM SYNCED OFF COURSE.

READ THE PREVIOUS ARTICLES ABOUT THE UPCOMING SONY ELET SYSTEMS COMPUTERS.

CEDRIC