ServerType8_2.pm
上传用户:market2
上传日期:2018-11-18
资源大小:18786k
文件大小:1k
源码类别:

外挂编程

开发平台:

Windows_Unix

  1. #########################################################################
  2. #  OpenKore - Packet sending
  3. #  This module contains functions for sending packets to the server.
  4. #
  5. #  This software is open source, licensed under the GNU General Public
  6. #  License, version 2.
  7. #  Basically, this means that you're allowed to modify and distribute
  8. #  this software. However, if you distribute modified versions, you MUST
  9. #  also distribute the source code.
  10. #  See http://www.gnu.org/licenses/gpl.html for the full license.
  11. #
  12. #  $Revision: 5555 $
  13. #  $Id: ServerType8.pm 5555 2007-03-21 16:23:01Z vcl_kore $
  14. #  Modified by skseo, Jan-24-2007, Fixed bugs.
  15. ########################################################################
  16. # Some eAthena servers after Feb 26th 2008
  17. # Servertype overview: http://www.openkore.com/wiki/index.php/ServerType
  18. package Network::Send::ServerType8_2;
  19. use strict;
  20. use Globals qw($accountID $sessionID $sessionID2 $accountSex $char $charID %config %guild @chars $masterServer $syncSync $net);
  21. use Network::Send::ServerType8;
  22. use base qw(Network::Send::ServerType8);
  23. use Log qw(message warning error debug);
  24. use I18N qw(stringToBytes);
  25. use Utils qw(getTickCount getHex getCoordString);
  26. sub new {
  27. my ($class) = @_;
  28. return $class->SUPER::new(@_);
  29. }
  30. 1;