For example:
Code: Select all
screen = get_screen()
SCRX = get_xsize(screen)
XSIZE = 256
YSIZE = XSIZE
TSIZE = XSIZE
OFFSET = (SCRX-XSIZE)/2
x = 0
y = 0
t = 0
while( 1 ) {
while( x<XSIZE ) {
while( y<YSIZE ) {
if(x^y)==t {
screen[ y+(x*SCRX)+OFFSET ] = WHITE
}
else {
screen[ y+(x*SCRX)+OFFSET ] = get_blend(screen[ y+(x*SCRX)+OFFSET ], BLACK, (-y))
}
y = y + 1
}
y = 0
x = x + 1
}
x = 0
t = (t + 1) & (TSIZE-1)
frame()
}