[ EA 12466 ][ 賭博轉職 ][ 徵 求 更 輕 巧 的 寫 法 ]

goddameit

腳 本 連 結
http://okayro.com/thread-68779-1-3.html

因 為 我 寫 完 後 發 現 好 像 太 囉 唆 了

希 望 有 高 人 提 供 可 以 縮 寫 的 地 方

lddr99

if (Zeny<.@tzeny){mes "你沒有^000088"+.@tzeny+"^000000"; close;}
else {set zeny,zeny-.@tzeny;}
if( .@ckq == 1 && superki == .@usetime){mes "使用達到上限"; close; }
if( .@ckg == 2 ){ set .@rah,10000; }
set .@til,.@til+1;
set .@ok2,1+.@ckw3;

mes "總題數 ^000088"+.@til+" ^000000題";
mes "過關題數 ^000088"+.@ok+" ^000000題";
mes "每題都會有 ^0000887^000000 個空白選項";
next;
mes "當你按下第一個選擇時,考試就開始";
mes "你也可以按'關閉'離開";

for(set .@tel,0; .@tel < .@til ;set .@tel,.@tel+1){
set .@ral,rand(6);
select("  ","  ","  ","  ","  ","  ","  ");
if (@menu == .@ral ) { set .@cok,.@cok+.@ok2; }
else if( .@ckw == 1 ){ set .@cok,.@cok-.@not; }
}

mes "您得了^FF0000 "+.@cok+"^000000 分";
    if( .@cok >= .@ok ){
            if( rand(1,10000) <= .@rah){
            mes "^000088成功升級^000000";
            set StatusPoint,StatusPoint+.@StaP;
            set SkillPoint,SkillPoint+.@SkiP;
            if( .@ckCASH  == 1 ){set #CASHPOINT,#CASHPOINT+.@ckCASH2;}
            if( .@ckq == 1 ){set superki,superki+1; }
            if( .@ckit == 1 ){ set .@ckit0,1; goto ckit; } close; }
            else{mes "^000088機率性升級失敗^000000";
            close;}}
mes "^000088升級失敗^000000";
close;
}

中間看起來最好下手

上面的變數沒有setarray命令來整合，應該是要方便新手看?

[ 本帖最後由 lddr99 於 2008-10-1 06:34 AM 編輯 ]

goddameit

#1
是 喔 = =" 我 不 知 道

goddameit

#3
還 是 懸 賞 啦 . . . 有 心 的 人 看 看 吧

魂哥

話說這個挺複雜的=.=

goddameit

#5
不 會 吧 = =?

goddameit

#7
新 手 使 用 者 , 我 都 打 散 讓 他 們 好 用

lddr99

這樣還是太肥嗎

goddameit

#9
如 果 都 沒 其 他

那 就 是 你 獲 選 啦