HSPポータル
サイトマップ お問い合わせ


HSPTV!掲示板


未解決 解決 停止 削除要請

2012
0902
大富豪A逆ができない3解決


大富豪A

リンク

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



大富豪A

リンク

2012/9/2(Sun) 21:59:40|NO.49044

>てれてれさん
ありがとうございます。
上は自分で書きました。
逆をやろうとすると、真ん中の方に消えていっちゃて、、、



大富豪A

リンク

2012/11/21(Wed) 19:15:19|NO.50787

解決するの忘れてました;;



ONION software Copyright 1997-2023(c) All rights reserved.