PVP 顯示不出來 有自行爬文改過 但是 改到後來NPC就消失

zxc79212

1. payon.gat,159,234,4        script        殺敵數排行榜        470,{
   
2. mes "你現在 " + killmanname$ + " 親手解決了 " + killpoint + " 人,死亡次數 : "+diepoint+";
   
3. next;
   
4. menu "觀看排行",seeplace_all,"更新排行",newplacings_all;
   
5. seeplace_all:
   
6. callfunc "seeplace";
   
7. end;
   
8. newplacings_all:
   
9. callfunc "newplacings";
   
10. end;
    
11. }
    
12. //--------------------------------//
    
13. //----------排行榜單---------//
    
14. //--------------------------------//
    
15. function        script        seeplace        {
    
16. for(set @num,1;@num<16;set @num,@num+1){
    
17. mes "第" + @num + "名: ^ff0000" + $place_name$[(@num)] + "^000000,殺敵: ^0088FF" + $place_kill_point[(@num)] + "^000000,死亡數: ^0000FF" + $place_die_point[@num] + "^000000 . ";
    
18. mes "//-------------------------------//";
    
19. }
    
20. close;
    
21. end;
    
22. }
    
23. //--------------------------------//
    
24. //----------編排公式---------//
    
25. //--------------------------------//
    
26. function        script        newplacings        {
    
27. mes "按下一頁,進行編排";
    
28. next;
    
29. set @num,16;
    
30. check_place:
    
31. set @num,@num-1;
    
32. if (killmanname$==$place_name$[(@num)]) {
    
33. if (killpoint>=$place_kill_point[(@num)]) {
    
34. if (@num==1) {
    
35. if (killpoint>$place_kill_point[1]) {
    
36. set $place_name$[1],killmanname$;
    
37. set $place_kill_point[1],killpoint;
    
38. set $place_die_point[1],diepoint;
    
39. set @new,1;
    
40. goto over_place;
    
41. }
    
42. if (diepoint<=$place_die_point[(@num)]) {
    
43. mes "第一名先生/小姐 您好,您尚未超越自己喔";
    
44. close;
    
45. end;
    
46. }
    
47. }
    
48. set @ber,@num-1;
    
49. if (killpoint<$place_kill_point[(@ber)] && killpoint>$place_kill_point[(@ber+1)]) {
    
50. set $place_kill_point[(@ber+1)],killpoint;
    
51. set $place_die_point[(@ber+1)],diepoint;
    
52. set @new,1;
    
53. }
    
54. if (killpoint==$place_kill_point[(@ber)] && diepoint>=$place_die_point[(@ber)]) {
    
55. set $place_kill_point[(@ber+1)],killpoint;
    
56. set $place_die_point[(@ber+1)],diepoint;
    
57. set @new,1;
    
58. }
    
59. for(set @ber,@num-1;@ber>0;set @ber,@ber-1) {
    
60. if (killpoint==$place_kill_point[(@ber)] && diepoint<$place_die_point[(@ber)]) {
    
61. set $place_name$[(@ber+1)],$place_name$[(@ber)];
    
62. set $place_kill_point[(@ber+1)],$place_kill_point[(@ber)];
    
63. set $place_die_point[(@ber+1)],$place_die_point[(@ber)];
    
64. set $place_name$[(@ber)],killmanname$;
    
65. set $place_kill_point[(@ber)],killpoint;
    
66. set $place_die_point[(@ber)],diepoint;
    
67. set @new,1;
    
68. }
    
69. if (killpoint>$place_kill_point[(@ber)]) {
    
70. set $place_name$[(@ber+1)],$place_name$[(@ber)];
    
71. set $place_kill_point[(@ber+1)],$place_kill_point[(@ber)];
    
72. set $place_die_point[(@ber+1)],$place_die_point[(@ber)];
    
73. set $place_name$[(@ber)],killmanname$;
    
74. set $place_kill_point[(@ber)],killpoint;
    
75. set $place_die_point[(@ber)],diepoint;
    
76. set @new,1;
    
77. }
    
78. }
    
79. goto over_place;
    
80. }
    
81. }
    
82. if (@num==1) {
    
83. set @num,16;
    
84. goto run_place;
    
85. }
    
86. goto check_place;
    
87. run_place:
    
88. if (@num<=0) {
    
89. goto over_place;
    
90. }
    
91. set @num,@num-1;
    
92. if (killpoint==$place_kill_point[(@num)] && diepoint<$place_die_point[(@num)]) {
    
93. set $place_name$[(@num+1)],$place_name$[(@num)];
    
94. set $place_name$[(@num)],killmanname$;
    
95. set $place_kill_point[(@num+1)],$place_kill_point[(@num)];
    
96. set $place_kill_point[(@num)],killpoint;
    
97. set $place_die_point[(@num+1)],$place_die_point[(@num)];
    
98. set $place_die_point[(@num)],diepoint;
    
99. set @new,1;
    
100. }
     
101. if (killpoint>$place_kill_point[(@num)]) {
     
102. set $place_name$[(@num+1)],$place_name$[(@num)];
     
103. set $place_name$[(@num)],killmanname$;
     
104. set $place_kill_point[(@num+1)],$place_kill_point[(@num)];
     
105. set $place_kill_point[(@num)],killpoint;
     
106. set $place_die_point[(@num+1)],$place_die_point[(@num)];
     
107. set $place_die_point[(@num)],diepoint;
     
108. set @new,1;
     
109. }
     
110. goto run_place;
     
111. over_place:
     
112. for(set @number,1;@number<16;set @number,@number+1) {
     
113. if (killmanname$==$place_name$[(@number)] && @new==1) {
     
114. announce $place_name$[(@number)] + "晉升為,第" + @number + "名 ,殺敵: " + $place_kill_point[(@number)] + ",死亡數: " + $place_die_point[(@number)] + " . ",15,0x000000;
     
115. }
     
116. }
     
117. mes "編排完畢!!您可以看一下新的殺人排名";
     
118. close;
     
119. end;
     
120. }
     
121. //-------------------------------//
     
122. //------被殺點增加---------//
     
123. //-------------------------------//
     
124. -        script        OnPCDieEvent        -1,{
     
125. callfunc "adddiepointsystem";
     
126. }
     
127. function        script        adddiepointsystem        {
     
128. set killmanname$,strcharinfo(0);
     
129. set diepoint,diepoint+1;
     
130. dispbottom "【系統】死亡次數 : " + diepoint;
     
131. end;
     
132. }
     
133. //-------------------------------//
     
134. //------殺人點增加---------//
     
135. //-------------------------------//
     
136. -        script        OnPCKillEvent        -1,{
     
137. callfunc "addkillpointsystem";
     
138. }
     
139. function        script        addkillpointsystem        {
     
140. set killmanname$,strcharinfo(0);
     
141. set killpoint,killpoint+1;
     
142. dispbottom "【系統】殺敵次數 : " + killpoint;
     
143. end;
     
144. }
     

複製代碼

有點亂....
改到後來 我連  script        OnPCKillEvent        -1,{ 這些 指令前面都有地圖  都改成-   

andyzxzx123

昨天寄給妳的最新版就已經有
連自身的殺人和死亡都清除
死亡排行板我測試可以清除，你自己多開測試就知道了
你有去收信嗎
其實只要去信箱看一下就好，不用一直問

zxc79212

andyzxzx123 發表於 2013-9-4 09:49 PM
昨天寄給妳的最新版就已經有
連自身的殺人和死亡都清除
死亡排行板我測試可以清除，你自己多開測試就知道 ...

你的我可以用哦   很感謝哦
我有短訊給你  一些問題  你有看了嗎 ...
你的死亡那個排行  是分開的  
我想要把死亡合併顯是在同一個

1. 查看排行表

複製代碼

這個裡面

而清除  也是用

1. 清除排行表

複製代碼

而不是 再用另一個  清除死亡排行這樣  

抱歉 ....  你能在給一下給我嗎