sm

切换到宽版 登录 立即注册

服务器租用 996 无法下载点击此处反馈
/
九五至尊GM论坛,传奇一条龙,传奇版本库,GM基地»GM论坛 › 资源中心 › 游戏脚本 › Zircon传奇3引擎Python超级传送脚本
查看: 918|回复: 1

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

[复制链接]
夜游神 实名认证 信用认证

826

主题

37

回帖

23万

积分

霸王教主

积分
237267
发表于 2023-12-8 02:56:41 | 显示全部楼层 |阅读模式
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={}

  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

  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       

  281. NpcEvent.add_listener(211,"OnClick",OnClick)       
  282. #NpcEvent.add_listener(264,"OnClick",OnClick)
  283. #NpcEvent.add_listener(140,"OnClick",OnClick)
复制代码




引擎, python, 超级, 传送, 脚本




上一篇：火龙面巾装备合成锻造脚本gom脚本gee引擎脚本
下一篇：传奇3BOSS查询Python脚本zircon引擎

相关帖子
回复

使用道具 举报

Chinese.Doll

1

主题

253

回帖

1073

积分

旋风流星刀

积分
1073
QQ
发表于 2023-12-29 22:08:41 | 显示全部楼层
积分任务
回复

使用道具 举报

返回列表 发新帖

© 2001-2024 Discuz! Team. Powered by Discuz! X3.5

GMT+8, 2025-1-18 13:20 , Processed in 0.283067 second(s), 52 queries 手机版|美林GM论坛 ( 蜀ICP备2020030293号-2 )|网站地图

禁止发布任何违反国家法律、法规的言论与图片等内容;本站内容均来自个人观点与网络等信息,非本站认同之观点.如遇版权问题,请及时QQ联系

快速回复 返回顶部 返回列表