开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 游戏 > 外挂编程 > 查看源码
Globals.pm
资源名称：openkore-2.0.7.zip　[点击查看]
上传用户：market2
上传日期：2018-11-18
资源大小：18786k
文件大小：13k
源码类别：

外挂编程

开发平台：

Windows_Unix

Globals.pm：源码内容
  1. #########################################################################
  2. #  OpenKore - Global variables
  3. #
  4. #  This software is open source, licensed under the GNU General Public
  5. #  License, version 2.
  6. #  Basically, this means that you're allowed to modify and distribute
  7. #  this software. However, if you distribute modified versions, you MUST
  8. #  also distribute the source code.
  9. #  See http://www.gnu.org/licenses/gpl.html for the full license.
  10. #
  11. #  $Revision: 6794 $
  12. #  $Id: Globals.pm 6794 2009-07-28 09:24:01Z Technologyguild $
  13. #
  14. #########################################################################
  15. ##
  16. # MODULE DESCRIPTION: Global variables
  17. #
  18. # This module defines all kinds of global variables.
  20. package Globals;
  22. use strict;
  23. use Exporter;
  24. use base qw(Exporter);
  25. use Modules 'register';
  26. # Do not use any other Kore modules here. It will create circular dependancies.
  28. our %EXPORT_TAGS = (
  29. config  => [qw(%arrowcraft_items %avoid @chatResponses %cities_lut %config %consoleColors %directions_lut %equipTypes_lut %equipSlot_rlut %equipSlot_lut %haircolors @headgears_lut %items_control %items_lut %itemSlotCount_lut %itemsDesc_lut %itemTypes_lut %jobs_lut %maps_lut %masterServers %monsters_lut %npcs_lut %packetDescriptions %portals_lut %responses %sex_lut %shop %skillsDesc_lut %skillsLooks %skillsArea %skillsEncore %skillsSP_lut %spells_lut %emotions_lut %timeout $char %mon_control %priority %routeWeights %pickupitems %rpackets %itemSlots_lut %skillsStatus %portals_los %skillsState %skillsAilments %elements_lut)],
  30. ai      => [qw(@ai_seq @ai_seq_args %ai_v $AI $AI_forcedOff %targetTimeout)],
  31. state   => [qw($accountID $cardMergeIndex @cardMergeItemsID $charID @chars @chars_old %cart @friendsID %friends %incomingFriend %field $field %homunculus $itemsList @itemsID %items $monstersList @monstersID %monsters @npcsID %npcs $npcsList @playersID %players @portalsID @portalsID_old %portals %portals_old $portalsList @storeList $currentChatRoom @currentChatRoomUsers @chatRoomsID %createdChatRoom %chatRooms @skillsID %storage @storageID @arrowCraftID %guild %incomingGuild @spellsID %spells @unknownPlayers @unknownNPCs $statChanged $skillChanged $useArrowCraft %currentDeal %incomingDeal %outgoingDeal @identifyID @partyUsersID %incomingParty @petsID %pets @venderItemList $venderID @venderListsID @articles $articles %venderLists %monsters_old @monstersID_old %npcs_old %items_old %players_old @playersID_old @servers $sessionID $sessionID2 $accountSex $accountSex2 $map_ip $map_port $KoreStartTime $secureLoginKey $initSync $lastConfChangeTime $petsList $playersList $portalsList @playerNameCacheIDs %playerNameCache %pet $pvp @cashList %repairList $slavesList @slavesID %slaves)],
  32. network => [qw($remote_socket $net $messageSender $charServer $conState $conState_tries $encryptVal $ipc $bus $lastPacketTime $masterServer $lastswitch $packetParser $bytesSent $bytesReceived $incomingMessages $outgoingClientMessages $enc_val1 $enc_val2)],
  33. interface => [qw($interface)],
  34. misc    => [qw($quit $reconnectCount @lastpm %lastpm @privMsgUsers %timeout_ex $shopstarted $dmgpsec $totalelasped $elasped $totaldmg %overallAuth %responseVars %talk $startTime_EXP $startingZenny @monsters_Killed $bExpSwitch $jExpSwitch $totalBaseExp $totalJobExp $shopEarned %itemChange $XKore_dontRedirect $monkilltime $monstarttime $startedattack $firstLoginMap $sentWelcomeMessage $versionSearch $monsterBaseExp $monsterJobExp %descriptions %flags %damageTaken $logAppend @sellList $userSeed $taskManager $mailList $auctionList $hotkeyList)],
  35. syncs => [qw($syncSync $syncMapSync)],
  36. cmdqueue => [qw($cmdQueue @cmdQueueList $cmdQueueStartTime $cmdQueueTime @cmdQueuePriority)],
  37. );
  39. our @EXPORT = (
  40. @{$EXPORT_TAGS{config}},
  41. @{$EXPORT_TAGS{ai}},
  42. @{$EXPORT_TAGS{state}},
  43. @{$EXPORT_TAGS{network}},
  44. @{$EXPORT_TAGS{interface}},
  45. @{$EXPORT_TAGS{misc}},
  46. @{$EXPORT_TAGS{syncs}},
  47. @{$EXPORT_TAGS{cmdqueue}},
  48. );
  51. # Configuration variables
  52. our %arrowcraft_items;
  53. our %avoid;
  54. our @chatResponses;
  55. our $char;
  56. our %cities_lut;
  57. our %config;
  58. our %consoleColors;
  59. our %equipTypes_lut;
  60. our %equipSlot_lut = (
  61. '0'    => 'Item',
  62. '1'    => 'lowHead',
  63. '2'    => 'rightHand',
  64. '4'    => 'robe',
  65. '8'    => 'rightAccessory',
  66. '16'   => 'armor',
  67. '32'   => 'leftHand',
  68. '64'   => 'shoes',
  69. '128'  => 'leftAccessory',
  70. '256'  => 'topHead',
  71. '512'  => 'midHead',
  72. '1024' => 'carry', #used in messyKore don't know if it actually exists
  73. '32768'   => 'arrow' #just use an made up ID since arrow doesn't have any
  74. );
  75. our %equipSlot_rlut = (
  76. 'Item'           => 0,
  77. 'lowHead'        => 1,
  78. 'rightHand'      => 2,
  79. 'robe'           => 4,
  80. 'rightAccessory' => 8,
  81. 'armor'          => 16,
  82. 'leftHand'       => 32,
  83. 'shoes'          => 64,
  84. 'leftAccessory'  => 128,
  85. 'topHead'        => 256,
  86. 'midHead'        => 512,
  87. 'carry'   => 1024,
  88. 'arrow'          => '' #arrow seems not to have any ID
  89. );
  90. our %elements_lut;
  91. our %directions_lut;
  92. our %haircolors;
  93. our @headgears_lut;
  94. our %items_control;
  95. our %items_lut;
  96. our %itemSlotCount_lut;
  97. our %itemsDesc_lut;
  98. our %itemTypes_lut;
  99. our %itemSlots_lut;
  100. our %maps_lut;
  101. our %masterServers;
  102. our %mon_control;
  103. our %monsters_lut;
  104. our %npcs_lut;
  105. our %packetDescriptions;
  106. our %portals_los;
  107. our %portals_lut;
  108. our %priority;
  109. our %responses;
  110. our %routeWeights;
  111. our %rpackets;
  112. our %sex_lut;
  113. our %shop;
  114. our %skillsDesc_lut;
  115. our %skillsSP_lut;
  116. our %skillsLooks;
  117. our %skillsAilments;
  118. our %skillsArea;
  119. our %skillsEncore;
  120. our %skillsState;
  121. our %skillsStatus;
  122. our %spells_lut;
  123. our %timeout;
  124. our %jobs_lut = (
  125. 0 => 'Novice',
  126. 1 => 'Swordsman',
  127. 2 => 'Mage',
  128. 3 => 'Archer',
  129. 4 => 'Acolyte',
  130. 5 => 'Merchant',
  131. 6 => 'Thief',
  132. 7 => 'Knight',
  133. 8 => 'Priest',
  134. 9 => 'Wizard',
  135. 10 => 'Blacksmith',
  136. 11 => 'Hunter',
  137. 12 => 'Assassin',
  138. 13 => 'Peco Knight',
  139. 14 => 'Crusader',
  140. 15 => 'Monk',
  141. 16 => 'Sage',
  142. 17 => 'Rogue',
  143. 18 => 'Alchemist',
  144. 19 => 'Bard',
  145. 20 => 'Dancer',
  146. 21 => 'Peco Crusader',
  147. 22 => 'Wedding Suit',
  148. 23 => 'Super Novice',
  149. 24 => 'Gunslinger',
  150. 25 => 'Ninja',
  152. 161 => 'High Novice',
  153. 162 => 'High Swordsman',
  154. 163 => 'High Magician',
  155. 164 => 'High Archer',
  156. 165 => 'High Acolyte',
  157. 166 => 'High Merchant',
  158. 167 => 'High Thief',
  159. 168 => 'Lord Knight',
  160. 169 => 'High Priest',
  161. 170 => 'High Wizard',
  162. 171 => 'Whitesmith',
  163. 172 => 'Sniper',
  164. 173 => 'Assassin Cross',
  165. 174 => 'Peco Lord Knight',
  166. 175 => 'Paladin',
  167. 176 => 'Champion',
  168. 177 => 'Professor',
  169. 178 => 'Stalker',
  170. 179 => 'Creator',
  171. 180 => 'Clown',
  172. 181 => 'Gypsy',
  174. 4001 => 'High Novice',
  175. 4002 => 'High Swordsman',
  176. 4003 => 'High Magician',
  177. 4004 => 'High Archer',
  178. 4005 => 'High Acolyte',
  179. 4006 => 'High Merchant',
  180. 4007 => 'High Thief',
  181. 4008 => 'Lord Knight',
  182. 4009 => 'High Priest',
  183. 4010 => 'High Wizard',
  184. 4011 => 'Whitesmith',
  185. 4012 => 'Sniper',
  186. 4013 => 'Assassin Cross',
  187. 4014 => 'Peco Lord Knight',
  188. 4015 => 'Paladin',
  189. 4016 => 'Champion',
  190. 4017 => 'Professor',
  191. 4018 => 'Stalker',
  192. 4019 => 'Creator',
  193. 4020 => 'Clown',
  194. 4021 => 'Gypsy',
  195. 4022 => 'Peco Paladin',
  196. 4023 => 'Baby Novice',
  197. 4024 => 'Baby Swordsman',
  198. 4025 => 'Baby Magician',
  199. 4026 => 'Baby Archer',
  200. 4027 => 'Baby Acolyte',
  201. 4028 => 'Baby Merchant',
  202. 4029 => 'Baby Thief',
  203. 4030 => 'Baby Knight',
  204. 4031 => 'Baby Priest',
  205. 4032 => 'Baby Wizard',
  206. 4033 => 'Baby Blacksmith',
  207. 4034 => 'Baby Hunter',
  208. 4035 => 'Baby Assassin',
  209. 4036 => 'Baby Peco Knight',
  210. 4037 => 'Baby Crusader',
  211. 4038 => 'Baby Monk',
  212. 4039 => 'Baby Sage',
  213. 4040 => 'Baby Rogue',
  214. 4041 => 'Baby Alchemist',
  215. 4042 => 'Baby Bard',
  216. 4043 => 'Baby Dancer',
  217. 4044 => 'Baby Peco Crusader',
  218. 4045 => 'Super Baby', # or Baby Super Novice, I like the way eAthena calls it though
  219. 4046 => 'Taekwon',
  220. 4047 => 'Star Gladiator',
  221. 4048 => 'Flying Star Gladiator',
  222. 4049 => 'Soul Linker',
  223. 4050 => 'Munak',
  224. 4051 => 'Death Knight',
  225. 4052 => 'Dark Collector',
  226. 4054 => 'Rune Knight',
  227. 4055 => 'Warlock',
  228. 4056 => 'Ranger',
  229. 4057 => 'Arch Bishop',
  230. 4058 => 'Mechanic',
  231. 4059 => 'Glt. Cross',
  232. 4060 => 'Rune Knight',
  233. 4061 => 'Warlock',
  234. 4062 => 'Ranger',
  235. 4063 => 'Arch Bishop',
  236. 4064 => 'Mechanic',
  237. 4065 => 'Glt. Cross',
  238. 4066 => 'Royal Guard',
  239. 4067 => 'Sorcerer',
  240. 4068 => 'Minstrel',
  241. 4069 => 'Wanderer',
  242. 4070 => 'Sura',
  243. 4071 => 'Genetic',
  244. 4072 => 'Shadow Chaser',
  245. 4073 => 'Royal Guard',
  246. 4074 => 'Sorcerer',
  247. 4075 => 'Minstrel',
  248. 4076 => 'Wanderer',
  249. 4077 => 'Sura',
  250. 4078 => 'Genetic',
  251. 4079 => 'Shadow Chaser',
  252. 4080 => 'Rune Knight',
  253. 4081 => 'Rune Knight',
  254. 4082 => 'Royal Guard',
  255. 4083 => 'Royal Guard',
  257. # Homunculus
  258. 6001 => 'Lif',
  259. 6002 => 'Amistr',
  260. 6003 => 'Filir',
  261. 6004 => 'Vanilmirth',
  262. 6005 => 'Lif 2',
  263. 6006 => 'Amistr 2',
  264. 6007 => 'Filir 2',
  265. 6008 => 'Vanilmirth 2',
  266. 6009 => 'High Lif',
  267. 6010 => 'High Amistr',
  268. 6011 => 'High Filir',
  269. 6012 => 'High Vanilmirth',
  270. 6013 => 'High Lif 2',
  271. 6014 => 'High Amistr 2',
  272. 6015 => 'High Filir 2',
  273. 6016 => 'High Vanilmirth 2',
  275. # Mercenary
  276. 6017 => 'Mercenary Archer 1',
  277. 6018 => 'Mercenary Archer 2',
  278. 6019 => 'Mercenary Archer 3',
  279. 6020 => 'Mercenary Archer 4',
  280. 6021 => 'Mercenary Archer 5',
  281. 6022 => 'Mercenary Archer 6',
  282. 6023 => 'Mercenary Archer 7',
  283. 6024 => 'Mercenary Archer 8',
  284. 6025 => 'Mercenary Archer 9',
  285. 6026 => 'Mercenary Archer 10',
  286. 6027 => 'Mercenary Lancer 1',
  287. 6028 => 'Mercenary Lancer 2',
  288. 6029 => 'Mercenary Lancer 3',
  289. 6030 => 'Mercenary Lancer 4',
  290. 6031 => 'Mercenary Lancer 5',
  291. 6032 => 'Mercenary Lancer 6',
  292. 6033 => 'Mercenary Lancer 7',
  293. 6034 => 'Mercenary Lancer 8',
  294. 6035 => 'Mercenary Lancer 9',
  295. 6036 => 'Mercenary Lancer 10',
  296. 6037 => 'Mercenary Swordman 1',
  297. 6038 => 'Mercenary Swordman 2',
  298. 6039 => 'Mercenary Swordman 3',
  299. 6040 => 'Mercenary Swordman 4',
  300. 6041 => 'Mercenary Swordman 5',
  301. 6042 => 'Mercenary Swordman 6',
  302. 6043 => 'Mercenary Swordman 7',
  303. 6044 => 'Mercenary Swordman 8',
  304. 6045 => 'Mercenary Swordman 9',
  305. 6046 => 'Mercenary Swordman 10'
  306. );
  308. # AI
  309. our @ai_seq;
  310. our @ai_seq_args;
  311. our %ai_v;
  312. our %targetTimeout;
  313. our $AI = 2;
  314. our $AI_forcedOff;
  316. # Game state
  317. our $accountID;
  318. our $cardMergeIndex;
  319. our @cardMergeItemsID;
  320. our @chars;
  321. our @chars_old;
  322. our %cart;
  323. our %field;
  324. our $field;
  325. our @friendsID;
  326. our %friends;
  327. our %homunculus;
  328. our %incomingFriend;
  329. our $itemsList;
  330. our @itemsID;
  331. our %items;
  332. our $monstersList;
  333. our @monstersID;
  334. our %monsters;
  335. our @npcsID;
  336. our %npcs;
  337. our @playersID;
  338. our %players;
  339. our @portalsID;
  340. our @portalsID_old;
  341. our %portals;
  342. our %portals_old;
  343. our @storeList;
  344. our $currentChatRoom;
  345. our @currentChatRoomUsers;
  346. our @chatRoomsID;
  347. our %createdChatRoom;
  348. our %chatRooms;
  349. our @skillsID;
  350. our %storage;
  351. our @storageID;
  352. our @arrowCraftID;
  353. our %guild;
  354. our %incomingGuild;
  355. our @spellsID;
  356. our %spells;
  357. our @unknownPlayers;
  358. our @unknownNPCs;
  359. our $statChanged;
  360. our $skillChanged;
  361. our $useArrowCraft;
  362. our %currentDeal;
  363. our %incomingDeal;
  364. our %outgoingDeal;
  365. our @identifyID;
  366. our $playersList;
  367. our $npcsList;
  368. our $petsList;
  369. our $portalsList;
  370. our $slavesList;
  371. our @slavesID;
  372. our %slaves;
  373. our @petsID;
  374. our %pets;
  375. our $pvp;
  376. our @venderItemList;
  377. our $venderID;
  378. our @venderListsID;
  379. our @articles;
  380. our $articles;
  381. our %monsters_old;
  382. our @monstersID_old;
  383. our %npcs_old;
  384. our %items_old;
  385. our %players_old;
  386. our @playersID_old;
  387. our @servers;
  388. our $sessionID;
  389. our $sessionID2;
  390. our $accountSex;
  391. our $accountSex2;
  392. our $map_ip;
  393. our $map_port;
  394. our $KoreStartTime;
  395. our $secureLoginKey;
  396. our $initSync;
  397. our $lastConfChangeTime;
  398. our @playerNameCacheIDs;
  399. our %playerNameCache;
  400. our %pet;
  401. our @cashList;
  402. our %repairList;
  404. # Network
  405. our $remote_socket; # Unused, but required for outdated plugins
  406. our $net;
  407. our $messageSender;
  408. our $charServer;
  409. our $conState;
  410. our $conState_tries;
  411. our $encryptVal;
  412. our $ipc;
  413. our $bus;
  414. our $lastPacketTime;
  415. our $masterServer;
  416. our $incomingMessages;
  417. our $outgoingClientMessages;
  418. our $lastswitch;
  419. our $enc_val1;
  420. our $enc_val2;
  423. # Interface
  424. our $interface;
  426. # Misc
  427. our $quit;
  428. our $reconnectCount;
  429. our @lastpm;
  430. our %lastpm;
  431. our @privMsgUsers;
  432. our %timeout_ex;
  433. our %overallAuth;
  434. our $shopstarted;
  435. our $dmgpsec;
  436. our $totalelasped;
  437. our $elasped;
  438. our $totaldmg;
  439. our %responseVars;
  440. our %talk;
  441. our $startTime_EXP;
  442. our $startingZenny;
  443. our @monsters_Killed;
  444. our $bExpSwitch;
  445. our $jExpSwitch;
  446. our $totalBaseExp;
  447. our $totalJobExp;
  448. our $shopEarned;
  449. our %itemChange;
  450. our %damageTaken;
  451. our $XKore_dontRedirect;
  452. our $monkilltime;
  453. our $monstarttime;
  454. our $startedattack;
  455. our $firstLoginMap;
  456. our $sentWelcomeMessage;
  457. our $versionSearch;
  458. our $monsterBaseExp;
  459. our $monsterJobExp;
  460. our %descriptions;
  461. our %flags;
  462. our $logAppend;
  463. our @sellList;
  464. our $userSeed;
  465. our $taskManager;
  467. our $bytesSent = 0;
  468. our $bytesReceived = 0;
  470. our $syncSync;
  471. our $syncMapSync;
  473. our $cmdQueue = 0;
  474. our $cmdQueueStartTime;
  475. our $cmdQueueTime = 0;
  476. our @cmdQueueList;
  477. our @cmdQueuePriority = ('ai','aiv','al','debug','chist','dl','exp','friend','g','guild','help','i',
  478. 'ihist','il','ml','nl','p','party','petl','pl','plugin','relog','pml','portals','quit','rc',
  479. 'reload','s','skills','spells','st','stat_add','store','vl','weight');
  481. our $mailList;
  482. our $auctionList;
  483. our $hotkeyList;
  485. END {
  486. undef $interface if defined $interface;
  487. }
  489. return 1;