石器时代LA官方

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 657|回复: 0

[Ab Lua] 装备随身修理

[复制链接]

1万

主题

491

回帖

3万

积分

管理员

Rank: 9Rank: 9Rank: 9

积分
35504
石币
24669
发表于 2022-8-31 10:39:52 | 显示全部楼层 |阅读模式
  1. function checkEmptItemNum(charaindex)--检测剩余物品格子
  2.         EmptyItemNum = 0
  3.         for i = 8, 27 do
  4.                 if char.getItemIndex(charaindex, i) == -1 then
  5.                         EmptyItemNum = EmptyItemNum + 1
  6.                 end
  7.         end
  8.         return EmptyItemNum
  9. end
  10. --NPC窗口事件(NPC索引)
  11. function MWTalk ( meindex, talkerindex, seqno, select, data)
  12.         char.TalkToCli(talkerindex, -1, "Seqno:"..seqno.." | select:"..select.." | data:"..data, "红色")
  13.         if select == 2  then
  14.                 char.TalkToCli(talkerindex, -1, "谢谢您使用随身修理", "黄色")
  15.                 npc.DelNpc(npcindex)--删除NPC
  16.                 return
  17.         end
  18.         local field = other.getString(data, " ", 1)
  19.         if  field == "" then
  20.                 char.TalkToCli(talkerindex, -1, "谢谢您使用随身修理", "黄色")
  21.                 npc.DelNpc(npcindex)--删除NPC
  22.                 char.setInt(talkerindex,"寄售时间",0)--当前时间
  23.                 return
  24.         end
  25.         if field == " " then
  26.                 char.TalkToCli(talkerindex, -1, "谢谢您使用随身修理", "黄色")
  27.                 npc.DelNpc(npcindex)--删除NPC
  28.                 char.setInt(talkerindex,"寄售时间",0)--当前时间
  29.                 return
  30.         end

  31.         npc.repairWindowTalked(meindex, talkerindex, seqno, select, data)

  32. end



  33. --NPC对话事件(NPC索引)
  34. function Talked(meindex, talkerindex, szMes, color )
  35.         if char.getChar(meindex, "账号") ~= char.getChar(talkerindex, "账号") then
  36.                 --if npc.isFaceToFace(meindex, talkerindex) == 1 then
  37.                         char.TalkToCli(talkerindex, -1, "我是私有NPC!不对外使用!", "黄色")
  38.                 --end
  39.                 return
  40.         end
  41.         npc.repairTalked(meindex, talkerindex, szMes, color)
  42.         --if npc.isFaceToFace(meindex, talkerindex) == 1 then
  43.         --        ShowHead(meindex, talkerindex)
  44.         --end
  45. end


  46. function mymaincreate(parameter)       

  47.         charaindex = char.getPointtoindex(parameter)--得到宠物结构体指针
  48.         findt = char.GetFrontChar(charaindex,4) --检测对面有没NPC 4   玩家1  怪物2 宠物3
  49.         --print("对面检测NPC")
  50.         --print(findt)
  51.         if findt == 1 then
  52.                 char.TalkToCli(charaindex, -1, "请您换个位置当前位置有NPC存在", "黄色")
  53.                 return
  54.         end
  55.         --print(charaindex)
  56.         --char.TalkToCli(charaindex, -1, "您进入其他脚本调用函数", "黄色")
  57.         --npc已经生成但是没有载入到OBJ 已经存在的列表 怎么查找原因为什么 没有出现
  58.         name = char.getChar(charaindex, "名字")
  59.         img = char.getInt(charaindex, "原图像号")
  60.         map = char.getInt(charaindex, "地图号")
  61.         X = char.getInt(charaindex, "坐标X") + 1
  62.         Y = char.getInt(charaindex, "坐标Y")
  63.         npcindex = npc.CreateNpc(name, img, map, X, Y, 6)
  64.         --设置事件触发(NPC索引,事件,执行函数,执行函数文件路径)
  65.         char.setFunctionPointer(npcindex, "对话事件", "Talked", "data/ablua/commondrepairnpc.lua")--ok
  66.         char.setFunctionPointer(npcindex, "窗口事件", "MWTalk", "data/ablua/commondrepairnpc.lua")--ok  
  67.         local ntime = other.time()
  68.         char.setInt(charaindex,"寄售时间",ntime)--当前时间
  69.         char.setInt(npcindex,"签到时间",char.getFd(charaindex))--NPC里面放置上玩家fd 好通知和查找玩家
  70.         char.setWorkInt(charaindex, "NPC临时1" , char.getindextoPoint(npcindex)) --记录NPC指针地址  下线删除用
  71.         char.setWorkInt(npcindex, "NPC临时1" , char.getindextoPoint(charaindex)) --让npc记录自己主人玩家的指针地址
  72.        
  73.         cdkey = char.getChar(charaindex, "账号")
  74.         char.setChar(npcindex, "账号",cdkey)
  75. end


  76. function data()
  77.         worldpay = 5
  78.         worldfmpay = 10
  79.        
  80. end

  81. function main()
  82.         npcindex = 0
  83.         data()
  84. end
复制代码


回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|石器时代LA官方

GMT+8, 2024-4-29 10:24 , Processed in 0.097313 second(s), 21 queries .

Copyright © 2001-2023, Tencent Cloud.

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