Zircon传奇3引擎Python超级传送脚本

夜游神

Zircon传奇3引擎Python超级传送脚本

1. # -*- coding: utf-8 -*-
   
2. #载入模块SYS
   
3. import sys
   
4. #引用模块的地址
   
5. from Globals import *
   
6. import collections
   
7. import clr
   
8. clr.AddReference("Library")
   
9. clr.AddReference('System')
   
10. from Library import *
    
11. import NpcEvent
    
12. ######################################################
    
13. #本函数为程序调用的固定格式 函数名和参数数量不要修改
    
14. #OnClick(Self, Sender, Menu)
    
15. ##参数 Self：NPC的类
    
16. ##   Sender：玩家的类
    
17. ##     Menu：菜单的类
    
18. #####################################################
    
19. def OnClick(args):
    
20.         Self = args[0]
    
21.         Sender = args[1]
    
22.         Menu = args[2]
    
23.         Dict={}
    
24. 
    
25. #城镇传送
    
26.         if(Menu == 1):
    
27.                 if (Sender.Gold < 1000):
    
28.                         say = """你没有足够的金币，无法传送。
    
29.                                
    
30.                                 [关闭:0]"""       
    
31.                 else:
    
32.                         SubGold(Sender,1000)
    
33.                         Sender.TeleportByMapIndex(7,408,120)
    
34.                         return
    
35.         elif(Menu == 2):
    
36.                 if (Sender.Gold < 1000):
    
37.                         say = """你没有足够的金币，无法传送。
    
38.                                
    
39.                                 [关闭:0]"""       
    
40.                 else:
    
41.                         SubGold(Sender,1000)
    
42.                         Sender.TeleportByMapIndex(6,249,198)
    
43.                         return
    
44.         elif(Menu == 3):
    
45.                 if (Sender.Gold < 1000):
    
46.                         say = """你没有足够的金币，无法传送。
    
47.                                
    
48.                                 [关闭:0]"""       
    
49.                 else:
    
50.                         SubGold(Sender,1000)
    
51.                         Sender.TeleportByMapIndex(5,436,270)
    
52.                         return
    
53.         elif(Menu == 4):
    
54.                 if (Sender.Gold < 1000):
    
55.                         say = """你没有足够的金币，无法传送。
    
56.                                
    
57.                                 [关闭:0]"""       
    
58.                 else:
    
59.                         SubGold(Sender,1000)
    
60.                         Sender.TeleportByMapIndex(1,449,391)
    
61.                         return
    
62.         elif(Menu == 5):
    
63.                 if (Sender.Gold < 1000):
    
64.                         say = """你没有足够的金币，无法传送。
    
65.                                
    
66.                                 [关闭:0]"""       
    
67.                 else:
    
68.                         SubGold(Sender,1000)
    
69.                         Sender.TeleportByMapIndex(24,338,226)
    
70.                         return
    
71.         elif(Menu == 6):
    
72.                 if (Sender.Gold < 1000):
    
73.                         say = """你没有足够的金币，无法传送。
    
74.                                
    
75.                                 [关闭:0]"""       
    
76.                 else:
    
77.                         SubGold(Sender,1000)
    
78.                         Sender.TeleportByMapIndex(25,218,157)
    
79.                         return
    
80.         elif(Menu == 7):
    
81.                 if (Sender.Gold < 1000):
    
82.                         say = """你没有足够的金币，无法传送。
    
83.                                
    
84.                                 [关闭:0]"""       
    
85.                 else:
    
86.                         SubGold(Sender,1000)
    
87.                         Sender.TeleportByMapIndex(57,192,577)
    
88.                         return
    
89.         elif(Menu == 8):
    
90.                 if (Sender.Gold < 1000):
    
91.                         say = """你没有足够的金币，无法传送。
    
92.                                
    
93.                                 [关闭:0]"""       
    
94.                 else:
    
95.                         SubGold(Sender,1000)
    
96.                         Sender.TeleportByMapIndex(55,288,238)
    
97.                         return
    
98.         elif(Menu == 9):
    
99.                 if (Sender.Gold < 1000):
    
100.                         say = """你没有足够的金币，无法传送。
     
101.                                
     
102.                                 [关闭:0]"""       
     
103.                 else:
     
104.                         SubGold(Sender,1000)
     
105.                         Sender.TeleportByMapIndex(33,181,135)
     
106.                         return
     
107.         elif(Menu == 10):
     
108.                 if (Sender.Gold < 1000):
     
109.                         say = """你没有足够的金币，无法传送。
     
110.                                
     
111.                                 [关闭:0]"""       
     
112.                 else:
     
113.                         SubGold(Sender,1000)
     
114.                         Sender.TeleportByMapIndex(27,433,81)
     
115.                         return
     
116.         elif(Menu == 11):
     
117.                 if (Sender.Gold < 1000):
     
118.                         say = """你没有足够的金币，无法传送。
     
119.                                
     
120.                                 [关闭:0]"""       
     
121.                 else:
     
122.                         SubGold(Sender,1000)
     
123.                         Sender.TeleportByMapIndex(37,200,288)
     
124.                         return
     
125.         elif(Menu == 12):
     
126.                 if (Sender.Gold < 1000):
     
127.                         say = """你没有足够的金币，无法传送。
     
128.                                
     
129.                                 [关闭:0]"""       
     
130.                 else:
     
131.                         SubGold(Sender,1000)
     
132.                         Sender.TeleportByMapIndex(1,394,295)
     
133.                         return
     
134.         elif(Menu == 13):
     
135.                 if (Sender.Gold < 1000):
     
136.                         say = """你没有足够的金币，无法传送。
     
137.                                
     
138.                                 [关闭:0]"""       
     
139.                 else:
     
140.                         SubGold(Sender,1000)
     
141.                         Sender.TeleportByMapIndex(6,248,239)
     
142.                         return
     
143.         elif(Menu == 14):
     
144.                 if (Sender.Gold < 1000):
     
145.                         say = """你没有足够的金币，无法传送。
     
146.                                
     
147.                                 [关闭:0]"""       
     
148.                 else:
     
149.                         SubGold(Sender,1000)
     
150.                         Sender.TeleportByMapIndex(5,423,264)
     
151.                         return
     
152. #危险地图传送
     
153.         elif(Menu == 15):
     
154.                 if (Sender.Gold < 10000):
     
155.                         say = """你没有足够的金币，无法传送。
     
156.                                
     
157.                                 [关闭:0]"""       
     
158.                 else:
     
159.                         SubGold(Sender,10000)
     
160.                         Sender.TeleportByMapIndex(77,74,72)
     
161.                         return
     
162.         elif(Menu == 16):
     
163.                 if (Sender.Gold < 10000):
     
164.                         say = """你没有足够的金币，无法传送。
     
165.                                
     
166.                                 [关闭:0]"""       
     
167.                 else:
     
168.                         SubGold(Sender,10000)
     
169.                         Sender.TeleportByMapIndex(170,203,201)
     
170.                         return
     
171.         elif(Menu == 17):
     
172.                 if (Sender.Gold < 10000):
     
173.                         say = """你没有足够的金币，无法传送。
     
174.                                
     
175.                                 [关闭:0]"""       
     
176.                 else:
     
177.                         SubGold(Sender,10000)
     
178.                         Sender.TeleportByMapIndex(149,159,167)
     
179.                         return
     
180.         elif(Menu == 18):
     
181.                 if (Sender.Gold < 10000):
     
182.                         say = """你没有足够的金币，无法传送。
     
183.                                
     
184.                                 [关闭:0]"""       
     
185.                 else:
     
186.                         SubGold(Sender,10000)
     
187.                         Sender.TeleportByMapIndex(270,51,283)
     
188.                         return
     
189.         elif(Menu == 19):
     
190.                 if (Sender.Gold < 10000):
     
191.                         say = """你没有足够的金币，无法传送。
     
192.                                
     
193.                                 [关闭:0]"""       
     
194.                 else:
     
195.                         SubGold(Sender,10000)
     
196.                         Sender.TeleportByMapIndex(299,127,172)
     
197.                         return
     
198.         elif(Menu == 20):
     
199.                 if (Sender.Gold < 10000):
     
200.                         say = """你没有足够的金币，无法传送。
     
201.                                
     
202.                                 [关闭:0]"""       
     
203.                 else:
     
204.                         SubGold(Sender,10000)
     
205.                         Sender.TeleportByMapIndex(285,135,180)
     
206.                         return
     
207.         elif(Menu == 21):
     
208.                 if (Sender.Gold < 10000):
     
209.                         say = """你没有足够的金币，无法传送。
     
210.                                
     
211.                                 [关闭:0]"""       
     
212.                 else:
     
213.                         SubGold(Sender,10000)
     
214.                         Sender.TeleportByMapIndex(340,173,223)
     
215.                         return
     
216.         elif(Menu == 22):
     
217.                 if (Sender.Gold < 10000):
     
218.                         say = """你没有足够的金币，无法传送。
     
219.                                
     
220.                                 [关闭:0]"""       
     
221.                 else:
     
222.                         SubGold(Sender,10000)
     
223.                         Sender.TeleportByMapIndex(356,119,109)
     
224.                         return
     
225.         elif(Menu == 23):
     
226.                 if (Sender.Gold < 10000):
     
227.                         say = """你没有足够的金币，无法传送。
     
228.                                
     
229.                                 [关闭:0]"""       
     
230.                 else:
     
231.                         SubGold(Sender,10000)
     
232.                         Sender.TeleportByMapIndex(362,38,147)
     
233.                         return
     
234.         elif(Menu == 24):
     
235.                 if (Sender.Gold < 10000):
     
236.                         say = """你没有足够的金币，无法传送。
     
237.                                
     
238.                                 [关闭:0]"""       
     
239.                 else:
     
240.                         SubGold(Sender,10000)
     
241.                         Sender.TeleportByMapIndex(375,283,278)
     
242.                         return
     
243.         elif(Menu == 25):
     
244.                 if (Sender.Gold < 10000):
     
245.                         say = """你没有足够的金币，无法传送。
     
246.                                
     
247.                                 [关闭:0]"""       
     
248.                 else:
     
249.                         SubGold(Sender,10000)
     
250.                         Sender.TeleportByMapIndex(26,170,135)
     
251.                         return
     
252. 
     
253. #主菜单
     
254.         else:
     
255.                 say = """欢迎来到  <font color="0xff00ff00">传奇3</font>  玛法大陆
     
256.                
     
257.                 <font color="0xff00ccff">城镇传送：费用1000金币</font>
     
258.                 [道馆:1]  [银杏:2]  [边境:3]  [比奇:4]  [毒蛇:5]
     
259.                 [失乐园:7]  [潘夜岛:8]  [诺玛:9]  [绿洲:10]  [沙漠土城:11]
     
260.                 [比奇结婚:12]  [银杏加点:13]  [边境洗刀:14]
     
261.                
     
262.                 <font color="0xff00ccff">危险地图传送：费用10000金币</font>
     
263.                 [移动至沃玛神殿:15]
     
264.                 [移动至石阁寺庙:16]
     
265.                 [移动至万年峡谷:17]
     
266.                 [移动至赤月峡谷:18]
     
267.                 [移动至祖玛神殿:25]
     
268.                 [移动至潘夜石窟:19]
     
269.                 [移动至潘夜神殿:20]
     
270.                 [移动至真天宫:21]
     
271.                 [移动至黑度宫:22]
     
272.                 [移动至诺玛遗址:23]
     
273.                 [移动至西沙漠:24]
     
274.                
     
275.                 [不传送:0]
     
276.                
     
277.                 """       
     
278.         Dict['Say']=say                         #定义聊天框对话内容
     
279.         return Dict       
     
280. 
     
281. NpcEvent.add_listener(211,"OnClick",OnClick)       
     
282. #NpcEvent.add_listener(264,"OnClick",OnClick)
     
283. #NpcEvent.add_listener(140,"OnClick",OnClick)
     

复制代码

Chinese.Doll

积分任务