FOR Y=120 TO 240 FOR X=0 TO 400 RGBREAD GSPOIT(X,240-Y) OUT R,G,B GPSET X,Y,RGB(R,G,B) NEXT NEXT で簡易的なものは作れます。