求解傳送腳本 怎加入類似這存地圖記錄這段

3125

1. //------------ 快速傳送 ------------//
   
2. note:
   
3.         if( World_note_first == 0)
   
4.         {
   
5.                 next;
   
6.                 mes "【^33CC33MVP傳送人員^000000】";
   
7.                 mes "尚未有傳送紀錄";
   
8.                 close;
   
9.         }
   
10.         else
    
11.         {
    
12.                 next;
    
13.                 mes "【^33CC33MVP傳送人員^000000】";
    
14.                 mes "您是否要傳送到";
    
15.                 mes World_note_map$+" ?";
    
16.                 menu
    
17.                 "是",World_yes,
    
18.                 "否",Bye;
    
19.         close;
    
20.         }
    
21. World_yes:
    
22.         warp World_note_map_set$,World_note_map_X,World_note_map_Y;        close;
    
23. 
    
24. 
    
25. //------------ 選擇加入我的最愛或是傳送 ------------//
    
26. AddorWarp:
    
27.         menu
    
28.                 "^FF0000傳送" + .@tempMFMap$ + " ^000000",Warptomap,
    
29.                 "^FF0000加入我的最愛^000000",AddFavorite,
    
30.                 "^FF0000清除我的最愛^000000",MyFavoritesClear_World;
    
31. //------------------------傳送----------------------//
    
32. Warptomap:
    
33.         set        World_note_map_set$,.@WarpMap$;
    
34.         set        World_note_map$,.@tempMFMap$;
    
35.         set        World_note_first,1;
    
36.         set        World_note_map_X,.@WarpMapX;
    
37.         set        World_note_map_Y,.@WarpMapY;
    
38.         warp .@WarpMap$,.@WarpMapX,.@WarpMapY;
    
39.         close;
    
40. //-------------------加入我的最愛-------------------//
    
41. AddFavorite:
    
42.         Favorites_note(  .@WarpMap$  ,  .@tempMFMap$  ,        .@WarpMapX        ,        .@WarpMapY)  ;
    
43.         goto Start;
    
44.         close;
    
45. 
    
46. MyFavorites:
    
47.                 next;
    
48.                 mes "【^33CC33MVP傳送人員^000000】";
    
49.                 mes "請問您要傳送到哪裡呢?";
    
50.                 select(Favorites_1$,Favorites_2$,Favorites_3$,"回最上層");
    
51.                 switch(@menu)
    
52.                 {
    
53.                         case 1:
    
54.                                 goto WarpFavorites1;
    
55.                         case 2:
    
56.                                 goto WarpFavorites2;
    
57.                         case 3:
    
58.                                 goto WarpFavorites3;
    
59.                         case 4:
    
60.                                 close2;
    
61.                                 goto Start;
    
62.                 }
    
63. 
    
64. WarpFavorites1:
    
65.         if( Favorites_1$ == "尚未新增" )
    
66.                 goto ErrorChoose;
    
67.         warp Favorites_set_1$,Favorites_X_1,Favorites_Y_1;
    
68.         close;
    
69. WarpFavorites2:        
    
70.         if( Favorites_2$ == "尚未新增" )        
    
71.                 goto ErrorChoose;
    
72.         warp Favorites_set_2$,Favorites_X_2,Favorites_Y_2;
    
73.         close;        
    
74. WarpFavorites3:               
    
75.         if( Favorites_3$ == "尚未新增" )
    
76.                 goto ErrorChoose;
    
77.         warp Favorites_set_3$,Favorites_X_3,Favorites_Y_3;
    
78.         close;        
    
79.         
    
80. ErrorChoose:
    
81.         mes "【^33CC33MVP傳送人員^000000】";
    
82.         mes "尚未新增地圖";
    
83.         next;
    
84.         goto Start;
    
85.         
    
86.         
    
87.         
    
88.         
    
89. //------------ 刪除我的最愛 ------------//
    
90. MyFavoritesClear_World:
    
91.         next;
    
92.         mes "【^33CC33MVP傳送人員^000000】";
    
93.         mes "您是否要將我的最愛列表重置刪除?";
    
94.         select(Favorites_1$,Favorites_2$,Favorites_3$,"全部刪除","回最上層");
    
95.         switch(@menu)
    
96.         {
    
97.                 case 1:
    
98.                         mes "【^33CC33MVP傳送人員^000000】";
    
99.                         mes "已刪除"+Favorites_1$;
    
100.                         set Favorites_set_1$,"尚未新增";
     
101.                         set Favorites_1$,"尚未新增";
     
102.                         next;
     
103.                         goto AddorWarp;
     
104.                 case 2:
     
105.                         mes "【^33CC33MVP傳送人員^000000】";
     
106.                         mes "已刪除"+Favorites_1$;
     
107.                         set Favorites_set_2$,"尚未新增";
     
108.                         set Favorites_2$,"尚未新增";
     
109.                         next;
     
110.                         goto AddorWarp;
     
111.                 case 3:
     
112.                         mes "【^33CC33MVP傳送人員^000000】";
     
113.                         mes "已刪除"+Favorites_1$;
     
114.                         set Favorites_set_3$,"尚未新增";
     
115.                         set Favorites_3$,"尚未新增";
     
116.                         next;
     
117.                         goto AddorWarp;
     
118.                 case 4:
     
119.                         set Favorites_set_1$,"尚未新增";
     
120.                         set Favorites_1$,"尚未新增";               
     
121.                         set Favorites_set_2$,"尚未新增";
     
122.                         set Favorites_2$,"尚未新增";
     
123.                         set Favorites_set_3$,"尚未新增";
     
124.                         set Favorites_3$,"尚未新增";
     
125.                         goto Start;
     
126.                 case 5:
     
127.                         close2;
     
128.                         goto Start;
     
129.                         
     
130.                 }
     
131. 
     
132. OnInit:
     
133.         waitingroom "世界傳送服務員v3.0",0;
     
134. end;
     
135. 
     
136. 
     
137. 
     
138. function        Favorites_note        {        
     
139. 
     
140.         if(Favorites_set_1$ != getarg(0) && Favorites_set_2$ != getarg(0) )
     
141.         {
     
142.                 if( Favorites_1$ == "尚未新增" )
     
143.                 {
     
144.                         set Favorites_set_1$,getarg(0);
     
145.                         set Favorites_1$,getarg(1);
     
146.                         set Favorites_X_1,getarg(2);
     
147.                         set Favorites_Y_1,getarg(3);
     
148.                 }
     
149.                 else if( Favorites_2$ == "尚未新增")
     
150.                 {
     
151.                         set Favorites_set_2$,getarg(0);
     
152.                         set Favorites_2$,getarg(1);
     
153.                         set Favorites_X_2,getarg(2);
     
154.                         set Favorites_Y_2,getarg(3);
     
155.                 }
     
156.                 else if( Favorites_3$ == "尚未新增" )
     
157.                 {        
     
158.                         set Favorites_set_3$,getarg(0);
     
159.                         set Favorites_3$,getarg(1);
     
160.                         set Favorites_X_3,getarg(2);
     
161.                         set Favorites_Y_3,getarg(3);
     
162.                 }
     
163.                 else
     
164.                 {
     
165.                         next;
     
166.                         mes "【^33CC33MVP傳送人員^000000】";
     
167.                         mes "我的最愛已滿，請移除後在重新新增。";
     
168.                         next;
     
169.                         return 0;
     
170.                 }
     
171.                 mes "【^33CC33MVP傳送人員^000000】";
     
172.                 mes "已經儲存完成";
     
173.                 next;
     
174.                 return 0;
     
175.         }
     
176.         else
     
177.         {
     
178.                 next;
     
179.                 mes "【^33CC33MVP傳送人員^000000】";
     
180.                 mes "重複登錄我的最愛，已存在列表中";
     
181.                 next;
     
182.                 return 0;
     
183.         }
     
184. }
     
185. 
     
186. 
     
187. }

複製代碼

dreamsambit@gma

你說的是指哪段?
最愛地圖那段嗎?

3125

dreamsambit@gma 發表於 2015-9-13 09:43 PM
你說的是指哪段?
最愛地圖那段嗎?

對 我要加入 這段 在我附件的新增文件記事本 請問要怎加入

Residue

3125 發表於 2015-9-13 10:00 PM
對 我要加入 這段 在我附件的新增文件記事本 請問要怎加入

你是要加入這個 "我的最愛記憶傳送點的功能" 到你自己寫的腳本裡面嗎?

那你為何不直接用這個腳本就好?

你的腳本長什麼樣子  功能是做什麼的都不知道  要怎麼幫你加進去?

而且要加進去不就只是複製貼上而已嗎?

dreamsambit@gma

3125 發表於 2015-9-13 10:00 PM
對 我要加入 這段 在我附件的新增文件記事本 請問要怎加入

要實現那種功能很簡單啊
找三個變數存數據就行了@@