|
|
2012/9/2(Sun) 21:49:50|NO.49038
以下のスクリプトの逆ができますか?つまり、赤を左から、右にだすことです。
buffer 1,180,180:color 255,,:boxf
buffer 2,180,180:color ,,255:boxf
screen 0,240,360
a=30:b=300:c=180:d=0:e=70:f=159
pos a-cnt,e+cnt/1:gzoom c-cnt*2,c-cnt*2,1,0,0,180,180,1
color 255,255,255:line 120,0,120,480:line 0,160,640,160
wait 50
repeat 180/2+1
redraw 0
color 255,255,255:boxf
pos a-cnt,e+cnt/1:gzoom c-cnt*2,c-cnt*2,1,0,0,180,180,1
pos b-cnt*3,f+cnt:gzoom d+cnt*2,d-cnt*2,2,0,0,180,180,1
color 255,255,255:line 120,0,120,480:line 0,160,640,160
redraw 1
await 1
loop
|
|
2012/9/2(Sun) 21:57:58|NO.49042
手抜きです。
というか逆が出来ないってこれ自分で書いた訳じゃないんですかね?
ColorMode = 1 // 赤:0 青:1
buffer 1,180,180:color 255,,:boxf
buffer 2,180,180:color ,,255:boxf
screen 0,240,360
a=30:b=300:c=180:d=0:e=70:f=159
pos a-cnt,e+cnt/1:gzoom c-cnt*2,c-cnt*2,1+ColorMode,0,0,180,180,1
color 255,255,255:line 120,0,120,480:line 0,160,640,160
wait 50
repeat 180/2+1
if ColorMode == 0 : cn = cnt
if ColorMode == 1 : cn = 180/2-cnt
redraw 0
color 255,255,255:boxf
pos a-cn,e+cn/1:gzoom c-cn*2,c-cn*2,1,0,0,180,180,1
pos b-cn*3,f+cn:gzoom d+cn*2,d-cn*2,2,0,0,180,180,1
color 255,255,255:line 120,0,120,480:line 0,160,640,160
redraw 1
await 1
loop
|
|
2012/9/2(Sun) 21:59:40|NO.49044
>てれてれさん
ありがとうございます。
上は自分で書きました。
逆をやろうとすると、真ん中の方に消えていっちゃて、、、
|
|
2012/11/21(Wed) 19:15:19|NO.50787
解決するの忘れてました;;
|
|