腳本無法順利讀取

love1225 · 發表於 2014-11-8 07:17:49

本帖最後由 love1225 於 2014-11-9 05:09 PM 編輯

會一直跑出錯誤，不知道該從哪邊修改請各為大大幫忙看一下

[CODE]new_zone01,40,73,4 script 天使泡泡福利 906,{
if(@chcheck==0){set $printa$,"開始泡泡點數累積";}
if(@chcheck==1){set $printa1$,"停止泡泡點數累積";}
mes "[天使泡點]";
mes "妳好阿，我是天使泡點系統的服務員";
mes "您目前有^FF0000"+ppoint+"^000000點";
mes "我可以為你提供有關泡點的服務";
mes "使用此服務等級必須達到^0000FF40^000000級喲";
switch(select($printa$,$printa1$,"服務說明"));
{
case 1:
if(baselevel < 40 ) {mes2 "您等級還未到40等喲"; close;}
set $printa$,"";
set $printa1$,"停止泡泡點數累積";
set @chcheck,1;
addtimer $@podelay,"天使泡泡福利::OnTimeover";
dispbottom "[ 天使泡點系統 ] : 您目前泡點為[ "+ppoint+" ]";
close2;
end;
case 2:
next;
mes "已為您關閉";
mes "您目前有^FF0000"+ppoint+"^000000點";
set @chcheck,0;
set $printa1$,"";
set $printa$,"開始泡泡點數累積";
deltimer "天使泡泡福利::OnTimeover";
close2;
end;
case 3:
next;
mes "^FF0000天使泡泡福利^000000";
mes "系統會根據玩家的在現實間從而累積";
mes "如果玩家開啟聊天室則不會累積喲";
mes "每^0000FF10^000000分鐘可以換取1點泡點";
mes "到達某個積分可以換取夢寐的精品";
mes "同時也鼓勵玩家多點上來坐坐喔~";
close;
}
OnTimeover:
if(@chcheck==0){end;}
if(!checkChatting()&&!checkvending()){
set ppoint,ppoint+1;
if(ppoint%100==0){announce "您的泡泡點數到達"+ppoint+"點",bc_self,0x0fff8c;}
}
addtimer $@podelay,"天使泡泡福利::OnTimeover";
OnInit:
set $@podelay,60000;
end;
}

複製代碼

[/code]

plus724254 · 發表於 2014-11-8 07:21:24

mes2改成mes

love1225 · 發表於 2014-11-8 12:45:11

改過了好像不是那邊的樣子所以我也不知道到底為什麼會錯誤

game1993 · 發表於 2014-11-8 13:06:44

love1225 發表於 2014-11-8 12:45 PM
改過了好像不是那邊的樣子所以我也不知道到底為什麼會錯誤

switch(select($printa$,$printa1$,"服務說明"))";"
{
刪去即可...

love1225 · 發表於 2014-11-8 14:26:22

game1993 發表於 2014-11-8 01:06 PM
switch(select($printa$,$printa1$,"服務說明"))";"
{
刪去即可...

一樣無法正確讀取，還是我語法錯誤了?

goddameit · 發表於 2014-11-8 14:36:31

switch(......)
{
case 0: ....
case 1: ....
case 2: ....
case 3: ....
}

複製代碼

love1225 · 發表於 2014-11-8 14:41:48

goddameit 發表於 2014-11-8 02:36 PM

是這樣改嗎?!

[CODE]new_zone01,40,73,4 script 天使泡泡福利 906,{
if(@chcheck==0){set $printa$,"開始泡泡點數累積";}
if(@chcheck==1){set $printa1$,"停止泡泡點數累積";}
mes "[天使泡點]";
mes "妳好阿，我是天使泡點系統的服務員";
mes "您目前有^FF0000"+ppoint+"^000000點";
mes "我可以為你提供有關泡點的服務";
mes "使用此服務等級必須達到^0000FF40^000000級喲";
switch(select,$printa$,$printa1$,"服務說明");
{
case 0:
if(baselevel < 40 ) {mes "您等級還未到40等喲"; close;}
set $printa$,"";
set $printa1$,"停止泡泡點數累積";
set @chcheck,1;
addtimer $@podelay,"天使泡泡福利::OnTimeover";
dispbottom "[ 天使泡點系統 ] : 您目前泡點為[ "+ppoint+" ]";
close;
end;
case 1:
next;
mes "已為您關閉";
mes "您目前有^FF0000"+ppoint+"^000000點";
set @chcheck,0;
set $printa1$,"";
set $printa$,"開始泡泡點數累積";
deltimer "天使泡泡福利::OnTimeover";
close;
end;
case 2:
next;
mes "^FF0000天使泡泡福利^000000";
mes "系統會根據玩家的在現實間從而累積";
mes "如果玩家開啟聊天室則不會累積喲";
mes "每^0000FF10^000000分鐘可以換取1點泡點";
mes "到達某個積分可以換取夢寐的精品";
mes "同時也鼓勵玩家多點上來坐坐喔~";
close;
}

複製代碼

[/code]

love1225 · 發表於 2014-11-8 14:49:05

改完的結果是這樣，好像是從MES那邊就開始錯誤了我怎麼改都沒辦法正確讀取
該TAB的也都有

-樂- · 發表於 2014-11-8 15:18:43

本帖最後由 -樂- 於 2014-11-8 03:21 PM 編輯

love1225 發表於 2014-11-8 02:49 PM
改完的結果是這樣，好像是從MES那邊就開始錯誤了我怎麼改都沒辦法正確讀取
該TAB的也都有

你如果不會用switch就用menu

love1225 · 發表於 2014-11-8 15:32:28

-樂- 發表於 2014-11-8 03:18 PM
你如果不會用switch就用menu

板大妳說的那個我已經改好了，後面這邊是語法錯誤嗎?

[CODE]mes "[天使泡點]";
mes "妳好阿，我是天使泡點系統的服務員";
mes "您目前有^FF0000"+ppoint+"^000000點";
mes "我可以為你提供有關泡點的服務";
mes "使用此服務等級必須達到^0000FF40^000000級喲";
switch(select("$printa$","$printa1$","服務說明")) {
case 1:
if(baselevel < 40 ) {mes "您等級還未到40等喲"; close;}
set $printa$,"";
set $printa1$,"停止泡泡點數累積";
set @chcheck,1;
addtimer $@podelay,"天使泡泡福利::OnTimeover";
dispbottom "[ 天使泡點系統 ] : 您目前泡點為[ "+ppoint+" ]";
close;
}
case 2:
next;
mes "已為您關閉";
mes "您目前有^FF0000"+ppoint+"^000000點";
set @chcheck,0;
set $printa1$,"";
set $printa$,"開始泡泡點數累積";
deltimer "天使泡泡福利::OnTimeover";
close;
}
case 3:
next;
mes "^FF0000天使泡泡福利^000000";
mes "系統會根據玩家的在現實間從而累積";
mes "如果玩家開啟聊天室則不會累積喲";
mes "每^0000FF10^000000分鐘可以換取1點泡點";
mes "到達某個積分可以換取夢寐的精品";
mes "同時也鼓勵玩家多點上來坐坐喔~";
close;

複製代碼

[/code]

game1993 · 發表於 2014-11-8 15:58:55

love1225 發表於 2014-11-8 03:32 PM
板大妳說的那個我已經改好了，後面這邊是語法錯誤嗎?[/code]

mes "[天使泡點]";
mes "妳好阿，我是天使泡點系統的服務員";
mes "您目前有^FF0000"+ppoint+"^000000點";
mes "我可以為你提供有關泡點的服務";
mes "使用此服務等級必須達到^0000FF40^000000級喲";
switch(select("$printa$","$printa1$","服務說明")) {
case 1:
      if(baselevel < 40 ) {mes "您等級還未到40等喲"; close;}
      set $printa$,"";
      set $printa1$,"停止泡泡點數累積";
      set @chcheck,1;
      addtimer $@podelay,"天使泡泡福利::OnTimeover";
      dispbottom "[ 天使泡點系統 ] : 您目前泡點為[ "+ppoint+" ]";
      close;
            }
case 2:
      next;
      mes "已為您關閉";
      mes "您目前有^FF0000"+ppoint+"^000000點";
      set @chcheck,0;
      set $printa1$,"";
      set $printa$,"開始泡泡點數累積";
      deltimer "天使泡泡福利::OnTimeover";
      close;
            }
case 3:
      next;
      mes "^FF0000天使泡泡福利^000000";
      mes "系統會根據玩家的在現實間從而累積";
      mes "如果玩家開啟聊天室則不會累積喲";
      mes "每^0000FF10^000000分鐘可以換取1點泡點";
      mes "到達某個積分可以換取夢寐的精品";
      mes "同時也鼓勵玩家多點上來坐坐喔~";
      close;

可以請問怎麼多出那一些嗎?

love1225 · 發表於 2014-11-8 20:04:07

game1993 發表於 2014-11-8 03:58 PM
可以請問怎麼多出那一些嗎?

妳是說"}" 這些嗎?

因為我另外一個腳本也是用switch語法所以造著打前面與法過了現在試後面無法跑過

game1993 · 發表於 2014-11-8 20:22:54

love1225 發表於 2014-11-8 08:04 PM
妳是說"}" 這些嗎?

因為我另外一個腳本也是用switch語法所以造著打前面與法過了現在試後面無法跑過 ...

switch(select($printa$,$printa1$,"服務說明")){
case 1:
if(baselevel < 40 ) { mes "您等級還未到40等喲"; close; }
set $printa$,"";
set $printa1$,"停止泡泡點數累積";
set @chcheck,1;
addtimer $@podelay,"天使泡泡福利::OnTimeover";
dispbottom "[ 天使泡點系統 ] : 您目前泡點為[ "+ppoint+" ]";
close2;
end;
case 2:
next;
mes "已為您關閉";
mes "您目前有^FF0000"+ppoint+"^000000點";
set @chcheck,0;
set $printa1$,"";
set $printa$,"開始泡泡點數累積";
deltimer "天使泡泡福利::OnTimeover";
close2;
end;
case 3:
next;
mes "^FF0000天使泡泡福利^000000";
mes "系統會根據玩家的在現實間從而累積";
mes "如果玩家開啟聊天室則不會累積喲";
mes "每^0000FF10^000000分鐘可以換取1點泡點";
mes "到達某個積分可以換取夢寐的精品";
mes "同時也鼓勵玩家多點上來坐坐喔~";
close;
}

複製代碼

月冥 · 發表於 2014-11-8 23:29:26

本帖最後由月冥於 2014-11-8 11:32 PM 編輯

修改腳本把下面的這個前面增加 // 取消這行的執行

//if(baselevel < 40 ) {mes2 "您等級還未到40等喲"; close;}

複製代碼

然後在

if(@chcheck==0){set $printa$,"開始泡泡點數累積";}
if(@chcheck==1){set $printa1$,"停止泡泡點數累積";}

複製代碼

下面新增一個

if(baselevel < 40 ) goto nolv40;

複製代碼

最後新增一個

nolv40:
mes "[天使泡點]";
mes "不好意思，您未滿40等。";
close2;

複製代碼

最後的樣子是這樣

new_zone01,40,73,4 script 天使泡泡福利 906,{
if(@chcheck==0){set $printa$,"開始泡泡點數累積";}
if(@chcheck==1){set $printa1$,"停止泡泡點數累積";}
if(baselevel < 40 ) goto nolv40;
mes "[天使泡點]";
mes "妳好阿，我是天使泡點系統的服務員";
mes "您目前有^FF0000"+ppoint+"^000000點";
mes "我可以為你提供有關泡點的服務";
mes "使用此服務等級必須達到^0000FF40^000000級喲";
switch(select($printa$,$printa1$,"服務說明"));
{
case 1:
//if(baselevel < 40 ) {mes2 "您等級還未到40等喲"; close;}
set $printa$,"";
set $printa1$,"停止泡泡點數累積";
set @chcheck,1;
addtimer $@podelay,"天使泡泡福利::OnTimeover";
dispbottom "[ 天使泡點系統 ] : 您目前泡點為[ "+ppoint+" ]";
close2;
end;
case 2:
next;
mes "已為您關閉";
mes "您目前有^FF0000"+ppoint+"^000000點";
set @chcheck,0;
set $printa1$,"";
set $printa$,"開始泡泡點數累積";
deltimer "天使泡泡福利::OnTimeover";
close2;
end;
case 3:
next;
mes "^FF0000天使泡泡福利^000000";
mes "系統會根據玩家的在現實間從而累積";
mes "如果玩家開啟聊天室則不會累積喲";
mes "每^0000FF10^000000分鐘可以換取1點泡點";
mes "到達某個積分可以換取夢寐的精品";
mes "同時也鼓勵玩家多點上來坐坐喔~";
close;
nolv40:
mes "[天使泡點]";
mes "不好意思，您未滿40等。";
close2;
}
OnTimeover:
if(@chcheck==0){end;}
if(!checkChatting()&&!checkvending()){
set ppoint,ppoint+1;
if(ppoint%100==0){announce "您的泡泡點數到達"+ppoint+"點",bc_self,0x0fff8c;}
}
addtimer $@podelay,"天使泡泡福利::OnTimeover";
OnInit:
set $@podelay,60000;
end;
}

複製代碼

再說一個這邊他是1分鐘喔 10分鐘再多加一個0

set $@podelay,60000;

複製代碼

自己也有用有錯誤所以直接新增 & 修改

love1225 · 發表於 2014-11-9 16:55:11

月冥發表於 2014-11-8 11:29 PM
修改腳本把下面的這個前面增加 // 取消這行的執行然後在下面新增一個最後新增一個最後的樣子是這樣再說 ...

腳本是沒有讀取錯誤了，可是NPC 沒辦法出現

[CODE]new_zone01,40,73,4 script 天使泡泡福利 906,{
if(@chcheck==0){set $printa$,"開始泡泡點數累積";}
if(@chcheck==1){set $printa1$,"停止泡泡點數累積";}
if(baselevel < 40 ) goto nolv40;
mes "[天使泡點]";
mes "妳好阿，我是天使泡點系統的服務員";
mes "您目前有^FF0000"+ppoint+"^000000點";
mes "我可以為你提供有關泡點的服務";
mes "使用此服務等級必須達到^0000FF40^000000級喲";
switch(select("$printa$","$printa1$","服務說明")){
case 1:
//if(baselevel < 40 ) {mes "您等級還未到40等喲"; close;}
set $printa$,"";
set $printa1$,"停止泡泡點數累積";
set @chcheck,1;
addtimer $@podelay,"天使泡泡福利::OnTimeover";
dispbottom "[ 天使泡點系統 ] : 您目前泡點為[ "+ppoint+" ]";
close;
end;
case 2:
next;
mes "已為您關閉";
mes "您目前有^FF0000"+ppoint+"^000000點";
set @chcheck,0;
set $printa1$,"";
set $printa$,"開始泡泡點數累積";
deltimer "天使泡泡福利::OnTimeover";
close;
end;
case 3:
next;
mes "^FF0000天使泡泡福利^000000";
mes "系統會根據玩家的在現實間從而累積";
mes "如果玩家開啟聊天室則不會累積喲";
mes "每^0000FF10^000000分鐘可以換取1點泡點";
mes "到達某個積分可以換取夢寐的精品";
mes "同時也鼓勵玩家多點上來坐坐喔~";
close;
nolv40:
mes "[天使泡點]";
mes "不好意思，您未滿40等。";
close2;
OnTimeover:
if(@chcheck==0){end;}
if(!checkChatting()&&!checkvending()){
set ppoint,ppoint+1;
if(ppoint%100==0){announce "您的泡泡點數到達"+ppoint+"點",bc_self,0x0fff8c;}
}
addtimer $@podelay,"天使泡泡福利::OnTimeover";
OnInit:
set $@podelay,600000;
end;
}
new_zone01,43,73,4 script 泡泡點數兌換 907,{
set .@of$,":";
setarray $@chitemnumber[0],5497,12246,7608,7234;//物品id
setarray $@itemneedp[0],50,5,30,30;//兌換點數
set $cr1$,"^0000ff^888888";
mes " [天使泡點]";
mes "妳好阿，我是天使泡點系統的服務員";
mes "您目前有^FF0000"+ppoint+"^000000點";
mes "我可以為你提供有關泡點兌換的服務";
mes "如果到達某個積分可以換取夢寐的精品";
mes "同時也鼓勵玩家多點上來坐坐喔~";
next;
for( set .@i, 0; .@i <getarraysize($@chitemnumber) ; set .@i, .@i +1 ){
setd $@needpoint+.@i,$@itemneedp[.@i];
set .@chpot,ppoint-getd($@needpoint+.@i);
set $cr$,"[^0000ff"+getd($@needpoint+.@i)+"^888888]";
set $cr2$,"[^FF0000"+.@chpot+"^000000]";
set $cr3$,"-->";
Set .@imenu$,.@imenu$+.@of$+$cr1$+(getitemname($@chitemnumber[.@i])+$cr$+$cr3$+$cr2$);
}
set .@aumzz,prompt("取消:"+.@imenu$+"");
If(.@aumzz<2){GoTo no;
}else{
set .@o,.@aumzz-3;
if(ppoint<getd($@needpoint+.@o)){mes "您的點數不夠喔~，存到再來吧";close;}
if(.@aumzz==255)close;
mes "確定要兌換嗎？";
set @aumzz,prompt("確定:取消");
if(@aumzz==255)close;
if(@aumzz==2) goto no;
set ppoint,ppoint-getd($@needpoint+.@o);
getitem $@chitemnumber[.@aumzz-3],1;
dispbottom "[ 天使泡點系統 ] : 您目前泡點為[ "+ppoint+" ]";
mes "歡迎你再利用喔~";
close;
}
no:
mes "感謝你的使用";
close;
}[/CDOE]

複製代碼

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

腳本無法順利讀取

本帖子中包含更多資源

本帖子中包含更多資源

本帖子中包含更多資源

本帖子中包含更多資源

本帖子中包含更多資源