ACLS FOR X=0 TO 400 GCLS GLINE 0,120,X,120 VSYNC NEXT これでだんだん線が引かれていきます GCLS GLINE～ この2行は、GPSET X,120 と、置き換えても大丈夫です