有關於JA任務骰子腳本問題(解決)

picturesque · 發表於 2009-2-8 19:42:09

1. 我寫了一個任務腳本
找NPC接任務後登出
那任務就要重新接
有沒有辦法讓登出後再登入還有任務
該如何寫?

2骰子

prontera.gat,157,114,4 script 骰子樂 111,{
mes "[骰子樂]";
mes "心情悶嗎！？來玩骰子消遣一下吧^^";
next;
mes "首先，我們有兩種玩法";
mes "第一種：孤注一擲";
mes "第二種：猜大小";
mes "你要直接開始還是聽取說明？";
next;
menu "直接開始",a1,"遊戲說明",a2,"離開",a3;
a1:
mes "[骰子樂]";
mes "很好，有氣魄！";
mes "你要選擇哪種玩法呢？";
next;
menu "孤注一擲",b1,"猜大小",b2;
b1:
mes "[孤注一擲]";
mes " ＿＿＿＿＿＿ ";
mes " �　　　　　�｜";
mes " �� ｜";
mes "｜｜｜請下注";
mes "｜｜｜３０萬∼１００萬";
mes "｜ ★ ｜｜";
mes "｜｜ � ";
mes "｜ ∣� ";
mes " �� ";
next;
input @zx;
if (@zx < 300000) goto c1;
if (@zx > 1000000) goto c2;
if (@zx > zeny) goto c3;
set zeny,zeny-@zx;
next;
mes "你下注的金額是"+@zx+"";
mes "中的話可以獲得"+@zx*6+"";
mes "你要選擇的號碼是？";
next;
menu "１",d1,"２",d2,"３",d3,"４",d4,"５",d5,"６",d6;
d1:
set @B,1;
goto e1;
d2:
set @B,2;
goto e1;
d3:
set @B,3;
goto e1;
d4:
set @B,4;
goto e1;
d5:
set @B,5;
goto e1;
d6:
set @B,6;
goto e1;
e1:
set @A,rand(1,6);
mes "[孤注一擲]";
mes "你所選擇的是"+@B+"";
mes " ＿＿＿＿＿＿ ";
mes " �　　　　　�｜";
mes " �� ｜";
mes " ｜｜｜";
mes " ｜出現號碼是｜｜";
mes " ｜｜｜";
mes " ｜ "+@A+" ｜ � ";
mes " ｜｜� ";
mes " �� ";
next;
if (@A == @B) goto e2;
if (@A != @B) goto e3;
e2:
set @zxy,@zx*6;
mes "[孤注一擲]";
mes "恭喜你！中了";
mes "可以獲得 "+@zxy+"";
next;
set zeny,zeny+@zxy;
mes "錢給你囉，別再跟我要囉！";
next;
menu "再來一次",b1,"離開",a3;
e3:
mes "[孤注一擲]";
mes "真是不好意思，沒中喔";
mes "再接再厲吧！";
next;
mexu "再拼一次",b1,"寒心了，離開",a3;
a3:
mes "[骰子樂]";
mes "你要走了喔";
mes "掰掰∼歡迎再來！";
close;
c1:
mes "金額太小囉";
mes "有錢再來吧^^";
close;
c2:
mes "金額太大囉";
mes "別賺那麼兇咩！";
close;
c3:
mes "妳身上真的有那麼多錢嗎？";
mes "看清楚再來吧^^";
close;
b2:
mes "[猜大小]";
mes "－－－－－－－－－－請下注";
mes "｜ ★ ｜ ★ ｜ ★ ｜金額３０萬∼３００萬";
mes "－－－－－－－－－－";
next;
input @zy;
if (@zy < 300000) goto c1;
if (@zy > 3000000) goto c2;
if (@zy > zeny) goto c3;
set zeny,zeny-@zy;
next;
mes "[猜大小]";
mes "－－－－－－－－－－";
mes "｜ ★ ｜ ★ ｜ ★ ｜";
mes "－－－－－－－－－－";
mes "猜大還猜小？";
next;
menu "大",g1,"小",g2;
g1:
mes "[猜大小]";
mes "你選的是大";
mes "－－－－－－－－－－";
mes "｜ ★ ｜ ★ ｜ ★ ｜";
mes "－－－－－－－－－－";
next;
set @D,rand(1,6);
set @E,rand(1,6);
set @F,rand(1,6);
next;
mes "－－－－－－－－－－";
mes "｜ "+@D+" ｜ "+@E+" ｜ "+@F+" ｜";
mes "－－－－－－－－－－";
mes "出現點數為上";
set @DEF,@D+@E+@F;
mes "總和為"+@DEF+"";
if (@DEF >= 10) goto h1;
if (@DEF <= 9) goto h2;
h1:
mes "[猜大小]";
mes "出現點數總和為"+@DEF+"";
mes "為大，你猜的是大";
mes "恭喜你可以獲得"+@zy*3+"";
nest;
set zeny,zeny+@zy*3;
mes "錢妳拿到了吧^^";
next;
menu "再玩一次",b2,"賺飽飽閃人囉",a3;
h2:
mes "[猜大小]";
mes "出現點數總和為"+@DEF+";
mes "為小，你猜的是大";
mes "很抱歉，沒猜中唷";
next;
menu "再拼了啦！",b2,"被騙錢了=ˇ=",a3;
g2:
mes "[猜大小]";
mes "你選的是小";
mes "－－－－－－－－－－";
mes "｜ ★ ｜ ★ ｜ ★ ｜";
mes "－－－－－－－－－－";
next;
set @D,rand(1,6);
set @E,rand(1,6);
set @F,rand(1,6);
next;
mes "－－－－－－－－－－";
mes "｜ "+@D+" ｜ "+@E+" ｜ "+@F+" ｜";
mes "－－－－－－－－－－";
mes "出現點數為上";
set @DEF,@D+@E+@F;
mes "總和為"+@DEF+"";
if (@DEF >= 10) goto i2;
if (@DEF <= 9) goto i1;
i1:
mes "[猜大小]";
set @DEF,@D+@E+@F;
mes "出現點數總和為"+@DEF+"";
mes "為小，你猜的是小";
set @zyx,@zy*3;
mes "恭喜你可以獲得"+@zyx+"";
nest;
set zeny,zeny+@zyx;
mes "錢妳拿到了吧^^";
next;
menu "再玩一次",b2,"賺飽飽閃人囉",a3;
i2:
mes "[猜大小]";
set @DEF,@D+@E+@F;
mes "出現點數總和為"+@DEF+";
mes "為大，你猜的是小";
mes "很抱歉，沒猜中唷";
next;
menu "再拼了啦！",b2,"被騙錢了=ˇ=",a3;
a2:
mes "[骰子樂]";
mes "你要聽取哪種遊戲的說明？";
next;
menu "孤注一擲",f1,"猜大小",f2,"離開",a3;
f1:
mes "[孤注一擲說明]";
mes "下注金額３０萬∼５００萬";
mes "由１∼６選擇１個號碼";
mes "再由骰子擲出１個號碼";
mes "若是號碼相同";
mes "即可獲得下注金額的６倍";
mes "你心動了嗎！？";
mes "祝你玩得愉快";
close;
f2:
mes "[猜大小說明]";
mes "下注金額３０萬∼３００萬";
mes "由三顆骰子擲出點數總和為根據";
mes "總合≧１０為大";
mes "總和≦９　為小";
mes "猜中的話";
mes "可獲得下注獎金的３倍";
mes "祝你玩得愉快";
close;
}

複製代碼

地圖檔沒辦法跑好是有寫錯嗎?

[ 本帖最後由 picturesque 於 2009-2-9 01:42 PM 編輯 ]

pan00017 · 發表於 2009-2-8 19:47:39

1.IF & SET

2.給MAP錯誤圖

picturesque · 發表於 2009-2-8 19:53:06

MAP=ˇ= 錯誤變空白

pan00017 · 發表於 2009-2-8 20:06:08

h1:
mes "[猜大小]";
mes "出現點數總和為"+@DEF+"";
mes "為大，你猜的是大";
mes "恭喜你可以獲得"+@zy*3+"";
next;
set zeny,zeny+@zy*3;
mes "錢妳拿到了吧^^";
next;
menu "再玩一次",b2,"賺飽飽閃人囉",a3;

複製代碼

i1:
mes "[猜大小]";
set @DEF,@D+@E+@F;
mes "出現點數總和為"+@DEF+"";
mes "為小，你猜的是小";
set @zyx,@zy*3;
mes "恭喜你可以獲得"+@zyx+"";
next;
set zeny,zeny+@zyx;
mes "錢妳拿到了吧^^";
next;
menu "再玩一次",b2,"賺飽飽閃人囉",a3;

複製代碼

是next

不是nest

picturesque · 發表於 2009-2-8 20:19:10

抱歉已經更改為next
但還是map錯誤為空白
還是語法錯誤?

pan00017 · 發表於 2009-2-8 20:29:48

你的空白指的是?

貼圖看看吧

picturesque · 發表於 2009-2-8 20:33:09

就是map檔跑一跑就整個變成一開始還沒啟動的時候的樣子

pan00017 · 發表於 2009-2-8 20:43:55

去用NET框架開吧

這樣就不會空白

CLAMP1028 · 發表於 2009-2-8 21:04:09

有5個地方有錯誤

以幫你修正了~~~

以下是修正過的腳本

prontera.gat,157,114,4 script 骰子樂 111,{
mes "[骰子樂]";
mes "心情悶嗎！？來玩骰子消遣一下吧^^";
next;
mes "首先，我們有兩種玩法";
mes "第一種：孤注一擲";
mes "第二種：猜大小";
mes "你要直接開始還是聽取說明？";
next;
menu "直接開始",a1,"遊戲說明",a2,"離開",a3;
a1:
mes "[骰子樂]";
mes "很好，有氣魄！";
mes "你要選擇哪種玩法呢？";
next;
menu "孤注一擲",b1,"猜大小",b2;
b1:
mes "[孤注一擲]";
mes " ＿＿＿＿＿＿ ";
mes " �　　　　　�｜";
mes " �� ｜";
mes "｜｜｜請下注";
mes "｜｜｜３０萬∼１００萬";
mes "｜ ★ ｜｜";
mes "｜｜ � ";
mes "｜ ∣� ";
mes " �� ";
next;
input @zx;
if (@zx < 300000) goto c1;
if (@zx > 1000000) goto c2;
if (@zx > zeny) goto c3;
set zeny,zeny-@zx;
next;
mes "你下注的金額是"+@zx+"";
mes "中的話可以獲得"+@zx*6+"";
mes "你要選擇的號碼是？";
next;
menu "１",d1,"２",d2,"３",d3,"４",d4,"５",d5,"６",d6;
d1:
set @B,1;
goto e1;
d2:
set @B,2;
goto e1;
d3:
set @B,3;
goto e1;
d4:
set @B,4;
goto e1;
d5:
set @B,5;
goto e1;
d6:
set @B,6;
goto e1;
e1:
set @A,rand(1,6);
mes "[孤注一擲]";
mes "你所選擇的是"+@B+"";
mes " ＿＿＿＿＿＿ ";
mes " �　　　　　�｜";
mes " �� ｜";
mes " ｜｜｜";
mes " ｜出現號碼是｜｜";
mes " ｜｜｜";
mes " ｜ "+@A+" ｜ � ";
mes " ｜｜� ";
mes " �� ";
next;
if (@A == @B) goto e2;
if (@A != @B) goto e3;
e2:
set @zxy,@zx*6;
mes "[孤注一擲]";
mes "恭喜你！中了";
mes "可以獲得 "+@zxy+"";
next;
set zeny,zeny+@zxy;
mes "錢給你囉，別再跟我要囉！";
next;
menu "再來一次",b1,"離開",a3;
e3:
mes "[孤注一擲]";
mes "真是不好意思，沒中喔";
mes "再接再厲吧！";
next;
menu "再拼一次",b1,"寒心了，離開",a3;
a3:
mes "[骰子樂]";
mes "你要走了喔";
mes "掰掰∼歡迎再來！";
close;
c1:
mes "金額太小囉";
mes "有錢再來吧^^";
close;
c2:
mes "金額太大囉";
mes "別賺那麼兇咩！";
close;
c3:
mes "妳身上真的有那麼多錢嗎？";
mes "看清楚再來吧^^";
close;
b2:
mes "[猜大小]";
mes "－－－－－－－－－－請下注";
mes "｜ ★ ｜ ★ ｜ ★ ｜金額３０萬∼３００萬";
mes "－－－－－－－－－－";
next;
input @zy;
if (@zy < 300000) goto c1;
if (@zy > 3000000) goto c2;
if (@zy > zeny) goto c3;
set zeny,zeny-@zy;
next;
mes "[猜大小]";
mes "－－－－－－－－－－";
mes "｜ ★ ｜ ★ ｜ ★ ｜";
mes "－－－－－－－－－－";
mes "猜大還猜小？";
next;
menu "大",g1,"小",g2;
g1:
mes "[猜大小]";
mes "你選的是大";
mes "－－－－－－－－－－";
mes "｜ ★ ｜ ★ ｜ ★ ｜";
mes "－－－－－－－－－－";
next;
set @D,rand(1,6);
set @E,rand(1,6);
set @F,rand(1,6);
next;
mes "－－－－－－－－－－";
mes "｜ "+@D+" ｜ "+@E+" ｜ "+@F+" ｜";
mes "－－－－－－－－－－";
mes "出現點數為上";
set @DEF,@D+@E+@F;
mes "總和為"+@DEF+"";
if (@DEF >= 10) goto h1;
if (@DEF <= 9) goto h2;
h1:
mes "[猜大小]";
mes "出現點數總和為"+@DEF+"";
mes "為大，你猜的是大";
mes "恭喜你可以獲得"+@zy*3+"";
next;
set zeny,zeny+@zy*3;
mes "錢妳拿到了吧^^";
next;
menu "再玩一次",b2,"賺飽飽閃人囉",a3;
h2:
mes "[猜大小]";
mes "出現點數總和為"+@DEF+"";
mes "為小，你猜的是大";
mes "很抱歉，沒猜中唷";
next;
menu "再拼了啦！",b2,"被騙錢了=ˇ=",a3;
g2:
mes "[猜大小]";
mes "你選的是小";
mes "－－－－－－－－－－";
mes "｜ ★ ｜ ★ ｜ ★ ｜";
mes "－－－－－－－－－－";
next;
set @D,rand(1,6);
set @E,rand(1,6);
set @F,rand(1,6);
next;
mes "－－－－－－－－－－";
mes "｜ "+@D+" ｜ "+@E+" ｜ "+@F+" ｜";
mes "－－－－－－－－－－";
mes "出現點數為上";
set @DEF,@D+@E+@F;
mes "總和為"+@DEF+"";
if (@DEF >= 10) goto i2;
if (@DEF <= 9) goto i1;
i1:
mes "[猜大小]";
set @DEF,@D+@E+@F;
mes "出現點數總和為"+@DEF+"";
mes "為小，你猜的是小";
set @zyx,@zy*3;
mes "恭喜你可以獲得"+@zyx+"";
next;
set zeny,zeny+@zyx;
mes "錢妳拿到了吧^^";
next;
menu "再玩一次",b2,"賺飽飽閃人囉",a3;
i2:
mes "[猜大小]";
set @DEF,@D+@E+@F;
mes "出現點數總和為"+@DEF+"";
mes "為大，你猜的是小";
mes "很抱歉，沒猜中唷";
next;
menu "再拼了啦！",b2,"被騙錢了=ˇ=",a3;
a2:
mes "[骰子樂]";
mes "你要聽取哪種遊戲的說明？";
next;
menu "孤注一擲",f1,"猜大小",f2,"離開",a3;
f1:
mes "[孤注一擲說明]";
mes "下注金額３０萬∼５００萬";
mes "由１∼６選擇１個號碼";
mes "再由骰子擲出１個號碼";
mes "若是號碼相同";
mes "即可獲得下注金額的６倍";
mes "你心動了嗎！？";
mes "祝你玩得愉快";
close;
f2:
mes "[猜大小說明]";
mes "下注金額３０萬∼３００萬";
mes "由三顆骰子擲出點數總和為根據";
mes "總合≧１０為大";
mes "總和≦９　為小";
mes "猜中的話";
mes "可獲得下注獎金的３倍";
mes "祝你玩得愉快";
close;
}

複製代碼

[ 本帖最後由 pan00017 於 2009-2-9 02:49 AM 編輯 ]

picturesque · 發表於 2009-2-9 02:31:14

有關任務的腳本我是這樣寫登出任務還是要重新講話
不能直接跳到b2
還是說要多寫甚麼?
想再多寫後面的任務
但不知該如何接續下去

prontera.gat,155,114,4 script 老者 121,{
if (@A == 1) goto b3;
mes "[老者]";
mes "年輕人,有事嗎？";
mes "唉.....";
next;
menu"你怎麼了嗎？",b1;
b1:
mes "[老者]";
mes "唉....好久沒有享用美味晚餐了";
mes "那鮮美的魚,新鮮的牛奶,焗烤.....";
mes "對了,年輕人,你可以幫我實現嗎？";
next;
menu "當然願意",a1,"默默的離開",a3;
a1:
mes "[老者]";
mes "真是太謝謝你了";
mes "我對於你真的太感謝妳了";
next;
mes "[老者]";
mes "那妳去幫我收集";
mes "牛奶５０瓶,美味的魚１００條,老舊湯匙３０支,包子５０個";
mes "最後還要起士５０個";
mes "我一定會好好報答你的";
mes "去吧！孩子,我等你再次到來";
next;
mes "任務：最後的晚餐";
mes "任務類型：道具收集";
set @A,1;
close;
b2:
mes "[老者]";
mes "喔,妳都收集好了阿,我檢查看看";
if (countitem(519) < 50) goto c1;
if (countitem(579) < 100) goto c1;
if (countitem(548) < 50) goto c1;
if (countitem(553) < 50) goto c1;
if (countitem(7016) < 30) goto c1;
mes "都有了耶,這是當初要給你的獎品,收下吧！";
delitem 519,50;
delitem 579,100;
delitem 548,50;
delitem 553,50;
delitem 7016,30;
set @gi,rand(0,4);
if (@gi == 0)getitem 616,5;
if (@gi == 1)getitem 617,10;
if (@gi == 2)getitem 969,20;
if (@gi == 3)getitem 607,30;
if (@gi == 4)getitem 608,30;
a3:
mes "[老者]";
mes ".....";
close;
c1:
mes "[老者]";
mes "笑話！你當我不會數學？";
mes "老子我國小數學都第一名耶！";
mes "快去收集吧=)";
close;
b3:
mes "[老者]";
mes "都收集好了嗎？";
next;
menu "都收集好了",b2,"再查看需要物品",b4;
b4:
mes "[老者]";
mes "牛奶５０瓶,美味的魚１００條,老舊湯匙３０支,包子５０個,起士５０個";
mes "最後還要天使波利卡片１張.....";
next;
mes "嚇到了吼";
mes "天使波利卡片不用啦,記性要好一點啦！(氣";
mes "總之,快去收集吧^^";
close;
}

複製代碼

picturesque · 發表於 2009-2-9 02:34:30

不好意思關於骰子的腳本
我不知道你幫忙修改的地方
可以幫忙標示一下嗎
我想知道錯誤在哪邊
謝謝

pan00017 · 發表於 2009-2-9 02:56:52

要用腳色記錄變數

lendlice0001 · 發表於 2009-2-9 03:06:23

用『永久變數』，就是不帶前綴符號的變數，或者帶有#的變數

例如：
set permanent,1; //紅色部分就是『人物型永久變數』
set #aidvar,1; //藍色部分帶有『#』的變數即為『帳戶型永久變數』

picturesque · 發表於 2009-2-9 03:11:36

摁
帳戶的話一個帳號解玩一次就不行解囉?

[ 本帖最後由 picturesque 於 2009-2-9 03:13 AM 編輯 ]

lendlice0001 · 發表於 2009-2-9 03:14:19

mexu "再拼一次",b1,"寒心了，離開",a3;

nest;

mes "出現點數總和為"+@DEF+";
//正確應該為：mes "出現點數總和為"+@DEF+"";

nest;

mes "出現點數總和為"+@DEF+";
//正確應該為：mes "出現點數總和為"+@DEF+"";

		自動登錄	找回密碼
密碼			註冊

有關於JA任務骰子腳本問題(解決)

評分

回覆 9樓的 CLAMP1028 的帖子

回覆 12樓的 pan00017 的帖子

瀏覽過的版塊

有關於JA任務 骰子腳本問題(解決)

評分

回覆 9樓的 CLAMP1028 的帖子

回覆 12樓的 pan00017 的帖子

瀏覽過的版塊

有關於JA任務骰子腳本問題(解決)