INCLUDE ZSYS DEFINE SPRITE 5 DEFINE SPRITE_IMAGE 520 DEFINE BIN 2 DEFINE NUM_BIN 10 DEFINE SCROLLTIME 5 DEFINE WAIT_TIME 2 DEFINE CIRCLE 1 DEFINE SQUARE 2 SETLIGHT(LIGHT1,SPRITE,372,500,465) SETLIGHT(LIGHT2,SPRITE,1228,500,465) SETLIGHT(LIGHT3,SPRITE,800,233,465) LOAD(SPRITE_IMAGE,"1:circle_ss") LOAD(SPRITE_IMAGE,"2:square_ss") LOAD(SPRITE_IMAGE,"3:circle_ss") ACTION MAIN INVOKE(SCREEN,NUM_BIN) COMPLETE ACTION SCREEN LIGHTS(LIGHT1,WHITE) LIGHTS(LIGHT2,WHITE) LIGHTS(LIGHT3,WHITE) WAIT(WAIT_TIME) LIGHTS(LIGHT1,RED) LIGHTS(LIGHT2,WHITE) LIGHTS(LIGHT3,WHITE) WAIT(WAIT_TIME) LIGHTS(LIGHT1,RED) LIGHTS(LIGHT2,BLUE) LIGHTS(LIGHT3,MAGENTA) WAIT(WAIT_TIME) LIGHTS(LIGHT1,GREEN) LIGHTS(LIGHT2,GREEN) LIGHTS(LIGHT3,YELLOW) WAIT(WAIT_TIME) LIGHTS(ALL,OFF) WAIT(WAIT_TIME) COMPLETE