ea 12466...殺人.被殺無法計算 能給我新的嗎?

zxcbcvasd

prontera.gat,148,204,4 script 死亡遊戲紀錄員 950,5,5,{
callfunc "starkillgame";
}
function script starkillgame {
mes "請仔細閱讀完畢!!";
mes "若沒顯示名稱,則該組資料無紀錄";
mes "請優先使用無紀錄資料";
mes "若是所有資料皆有紀錄";
mes "請選擇使用已刪除人物的組別來紀錄";
next;
mes "第^3355FF1^000000角色:^ff9999" + #killmanname_1$ + "^000000的遊戲資料";
mes "第^3355FF2^000000角色:^ff9999" + #killmanname_2$ + "^000000的遊戲資料";
mes "第^3355FF3^000000角色:^ff9999" + #killmanname_3$ + "^000000的遊戲資料";
mes "第^3355FF4^000000角色:^ff9999" + #killmanname_4$ + "^000000的遊戲資料";
mes "第^3355FF5^000000角色:^ff9999" + #killmanname_5$ + "^000000的遊戲資料";
mes "第^3355FF6^000000角色:^ff9999" + #killmanname_6$ + "^000000的遊戲資料";
mes "第^3355FF7^000000角色:^ff9999" + #killmanname_7$ + "^000000的遊戲資料";
mes "第^3355FF8^000000角色:^ff9999" + #killmanname_8$ + "^000000的遊戲資料";
mes "第^3355FF9^000000角色:^ff9999" + #killmanname_9$ + "^000000的遊戲資料";
next;
mes "請輸入要使用的組別編號(藍色數字)";
input @num;
next;
if (@num>0 && @num<10 ) {
mes "確定選擇第"+ @num + "組洗白!?";
menu "不要這組",no,"確定這組",-;
next;
switch(@num){
case 1:
set #killmanname_1$,strcharinfo(0);
set #killpoint_1,0;
set #diepoint_1,0;
break;
case 2:
set #killmanname_2$,strcharinfo(0);
set #killpoint_2,0;
set #diepoint_2,0;
break;
case 3:
set #killmanname_3$,strcharinfo(0);
set #killpoint_3,0;
set #diepoint_3,0;
break;
case 4:
set #killmanname_4$,strcharinfo(0);
set #killpoint_4,0;
set #diepoint_4,0;
break;
case 5:
set #killmanname_5$,strcharinfo(0);
set #killpoint_5,0;
set #diepoint_5,0;
break;
case 6:
set #killmanname_6$,strcharinfo(0);
set #killpoint_6,0;
set #diepoint_6,0;
break;
case 7:
set #killmanname_7$,strcharinfo(0);
set #killpoint_7,0;
set #diepoint_7,0;
break;
case 8:
set #killmanname_8$,strcharinfo(0);
set #killpoint_8,0;
set #diepoint_8,0;
break;
case 9:
set #killmanname_9$,strcharinfo(0);
set #killpoint_9,0;
set #diepoint_9,0;
break;
}
mes "洗白成功,您可以開始遊戲!!";
set #okla,1;
close;
end;
}
mes "輸入錯誤訊息!!";
close;
no:
close;
}
//--------------------------------//
//----------點數排行---------//
//--------------------------------//
prontera.gat,151,181,4 script PVP排行榜 1698,{
set #killmanname_0$,strcharinfo(0);
if (#killmanname_0$==#killmanname_1$) {
set #killpoint_0,#killpoint_1;
set #diepoint_0,#diepoint_1;
goto whodata;
}
if (#killmanname_0$==#killmanname_2$) {
set #killpoint_0,#killpoint_2;
set #diepoint_0,#diepoint_2;
goto whodata;
}
if (#killmanname_0$==#killmanname_3$) {
set #killpoint_0,#killpoint_3;
set #diepoint_0,#diepoint_3;
goto whodata;
}
if (#killmanname_0$==#killmanname_4$) {
set #killpoint_0,#killpoint_4;
set #diepoint_0,#diepoint_4;
goto whodata;
}
if (#killmanname_0$==#killmanname_5$) {
set #killpoint_0,#killpoint_5;
set #diepoint_0,#diepoint_5;
goto whodata;
}
if (#killmanname_0$==#killmanname_6$) {
set #killpoint_0,#killpoint_6;
set #diepoint_0,#diepoint_6;
goto whodata;
}
if (#killmanname_0$==#killmanname_7$) {
set #killpoint_0,#killpoint_7;
set #diepoint_0,#diepoint_7;
goto whodata;
}
if (#killmanname_0$==#killmanname_8$) {
set #killpoint_0,#killpoint_8;
set #diepoint_0,#diepoint_8;
goto whodata;
}
if (#killmanname_0$==#killmanname_9$) {
set #killpoint_0,#killpoint_9;
set #diepoint_0,#diepoint_9;
goto whodata;
}
callfunc "starkillgame";
whodata:
mes "你, " + #killmanname_0$ + " 親手解決了 " + #killpoint_0 + " 人,死亡次數 : " + #diepoint_0;
next;
menu "觀看排行",seeplace_all,"更新排行",newplacings_all;
seeplace_all:
callfunc "seeplace";
end;
newplacings_all:
callfunc "newplacings";
end;
}
//--------------------------------//
//----------排行榜單---------//
//--------------------------------//
function script seeplace {
for(set @num,1;@num<16;set @num,@num+1){
mes "第" + @num + "名: ^ff0000" + $place_name$[(@num)] + "^000000,殺敵: ^0088FF" + $place_kill_point[(@num)] + "^000000,死亡數: ^0000FF" + $place_die_point[@num] + "^000000 . ";
mes "//-------------------------------//";
}
close;
end;
}
//--------------------------------//
//----------編排公式---------//
//--------------------------------//
function script newplacings {
mes "按下一頁,進行編排";
next;
//步驟1.確認點數是否足夠擠進排行,確認是否足夠更動名次,從最後一名開始比對至第一名
set @num,16;
check_place:
set @num,@num-1;
if (#killmanname_0$==$place_name$[(@num)]) {
if (#killpoint_0>=$place_kill_point[(@num)]) {
//原第一名,更新後還是第一名
if (@num==1) {
if (#diepoint_0<=$place_die_point[(@num)]) {
set @ber,20;
}
set $place_name$[1],#killmanname_0$;
set $place_kill_point[1],#killpoint_0;
set $place_die_point[1],#diepoint_0;
goto again_place;
}
set @ber,@num-1;
if (#killpoint_0<$place_kill_point[(@ber)]) {
set $place_kill_point[(@ber+1)],#killpoint_0;
set $place_die_point[(@ber+1)],#diepoint_0;
}
if (#killpoint_0==$place_kill_point[(@ber)] && #diepoint_0>=$place_die_point[(@ber)]) {
set $place_kill_point[(@ber+1)],#killpoint_0;
set $place_die_point[(@ber+1)],#diepoint_0;
}
goto gogigai;
gogigai:
if (@ber==0) {
set @num,1;
goto again_place;
end;
}
if (#killpoint_0==$place_kill_point[(@ber)] && #diepoint_0<$place_die_point[(@ber)]) {
set $place_name$[(@ber+1)],$place_name$[(@ber)];
set $place_kill_point[(@ber+1)],$place_kill_point[(@ber)];
set $place_die_point[(@ber+1)],$place_die_point[(@ber)];
set $place_name$[(@ber)],#killmanname_0$;
set $place_kill_point[(@ber)],#killpoint_0;
set $place_die_point[(@ber)],#diepoint_0;
set @ber,@ber-1;
}
//本身超越自己,並且超越前一名
if (#killpoint_0>$place_kill_point[(@ber)]) {
set $place_name$[(@ber+1)],$place_name$[(@ber)];
set $place_kill_point[(@ber+1)],$place_kill_point[(@ber)];
set $place_die_point[(@ber+1)],$place_die_point[(@ber)];
set $place_name$[(@ber)],#killmanname_0$;
set $place_kill_point[(@ber)],#killpoint_0;
set $place_die_point[(@ber)],#diepoint_0;
set @ber,@ber-1;
}
goto gogigai;
end;
}
else {
set @ber,20;//在排行榜上,尚未超越自己
}
}
if (@num==1) {
goto run_place;
}
goto check_place;
run_place:
if (@ber==20) {
mes "尚未有更動排行的數值";
close;
end;
}
set @num,16;
goto again_place;
again_place:
set @num,@num-1;
if (@num==0) {
set @ber,0;
for(set @number,1;@number<16;set @number,@number+1) {
if (#killmanname_0$==$place_name$[(@number)]) {
if (@ber==0) {
announce $place_name$[(@number)] + "晉升為,第" + @number + "名 ,殺敵: " + $place_kill_point[(@number)] + ",死亡數: " + $place_die_point[(@number)] + " . ",15,0x000000;
set @ber,@number;
}
}
}
mes "編排完畢!!您可以看一下新的殺人排名";
close;
end;
}
if (#killpoint_0==$place_kill_point[(@num)] && #diepoint_0<$place_die_point[(@num)]) {
goto all_place;
}
if (#killpoint_0>$place_kill_point[(@num)]) {
goto all_place;
}
goto again_place;
all_place:
//開始編排名次,以向上淘汰制
set $place_name$[(@num+1)],$place_name$[(@num)];
set $place_name$[(@num)],#killmanname_0$;
//開始編排新名次之資料,殺人數
set $place_kill_point[(@num+1)],$place_kill_point[(@num)];
set $place_kill_point[(@num)],#killpoint_0;
//開始編排新名次之資料,死亡數
set $place_die_point[(@num+1)],$place_die_point[(@num)];
set $place_die_point[(@num)],#diepoint_0;
goto again_place;
}
//-------------------------------//
//------被殺點增加---------//
//-------------------------------//
prontera.gat,0,0,0 script OnPCDieEvent -1,{
callfunc "adddiepointsystem";
}
function script adddiepointsystem {
set #killmanname_0$,strcharinfo(0);
if (#killmanname_0$==#killmanname_1$) {
set #diepoint_0,#diepoint_1+1;
set #diepoint_1,#diepoint_0;
goto public_die;
}
if (#killmanname_0$==#killmanname_2$) {
set #diepoint_0,#diepoint_2+1;
set #diepoint_2,#diepoint_0;
goto public_die;
}
if (#killmanname_0$==#killmanname_3$) {
set #diepoint_0,#diepoint_3+1;
set #diepoint_3,#diepoint_0;
goto public_die;
}
if (#killmanname_0$==#killmanname_4$) {
set #diepoint_0,#diepoint_4+1;
set #diepoint_4,#diepoint_0;
goto public_die;
}
if (#killmanname_0$==#killmanname_5$) {
set #diepoint_0,#diepoint_5+1;
set #diepoint_5,#diepoint_0;
goto public_die;
}
if (#killmanname_0$==#killmanname_6$) {
set #diepoint_0,#diepoint_6+1;
set #diepoint_6,#diepoint_0;
goto public_die;
}
if (#killmanname_0$==#killmanname_7$) {
set #diepoint_0,#diepoint_7+1;
set #diepoint_7,#diepoint_0;
goto public_die;
}
if (#killmanname_0$==#killmanname_8$) {
set #diepoint_0,#diepoint_8+1;
set #diepoint_8,#diepoint_0;
goto public_die;
}
if (#killmanname_0$==#killmanname_9$) {
set #diepoint_0,#diepoint_9+1;
set #diepoint_9,#diepoint_0;
goto public_die;
}
mes "請您先登記資料!!";
next;
callfunc "starkillgame";
end;
public_die:
dispbottom "【系統】死亡次數 : " + #diepoint_0;
set #diepoint_0,0;
set #killmanname_0$,0;
end;
}
//-------------------------------//
//------殺人點增加---------//
//-------------------------------//
prontera.gat,0,0,0 script OnPCKillEvent -1,{
callfunc "addkillpointsystem";
}
function script addkillpointsystem {
set #killmanname_0$,strcharinfo(0);
if (#killmanname_0$==#killmanname_1$) {
set #killpoint_0,#killpoint_1+1;
set #killpoint_1,#killpoint_0;
goto public_kill;
}
if (#killmanname_0$==#killmanname_2$) {
set #killpoint_0,#killpoint_2+1;
set #killpoint_2,#killpoint_0;
goto public_kill;
}
if (#killmanname_0$==#killmanname_3$) {
set #killpoint_0,#killpoint_3+1;
set #killpoint_3,#killpoint_0;
goto public_kill;
}
if (#killmanname_0$==#killmanname_4$) {
set #killpoint_0,#killpoint_4+1;
set #killpoint_4,#killpoint_0;
goto public_kill;
}
if (#killmanname_0$==#killmanname_5$) {
set #killpoint_0,#killpoint_5+1;
set #killpoint_5,#killpoint_0;
goto public_kill;
}
if (#killmanname_0$==#killmanname_6$) {
set #killpoint_0,#killpoint_6+1;
set #killpoint_6,#killpoint_0;
goto public_kill;
}
if (#killmanname_0$==#killmanname_7$) {
set #killpoint_0,#killpoint_7+1;
set #killpoint_7,#killpoint_0;
goto public_kill;
}
if (#killmanname_0$==#killmanname_8$) {
set #killpoint_0,#killpoint_8+1;
set #killpoint_8,#killpoint_0;
goto public_kill;
}
if (#killmanname_0$==#killmanname_9$) {
set #killpoint_0,#killpoint_9+1;
set #killpoint_9,#killpoint_0;
goto public_kill;
}
mes "請您先登記資料!!";
next;
callfunc "starkillgame";
end;
public_kill:
if (#killpoint_0==50) announce ""+ #killmanname_0$ +" ,已經殺了50個人了",15;
dispbottom "【系統】殺敵次數 : " + #killpoint_0;
set #killpoint_0,0;
set #killmanname_0$,0;
end;
}


請各位大大幫幫忙了><