untuk para pengguna openKore 2.0.7.1 SVN,
bagi yg tidak bisa menjalankan Plugin Disconnect.pl, ada sedikit perubahan disitu, karena pada SVN version, homun dan mercenary di detect sebagai slave.
untuk lebih jelasnya silakan timpa file baru ini k file Disconnect.pl anda yg lama.
maap untuk kk ferry uda utak atik pluginnya 
semoga membantu.
bagi yg tidak bisa menjalankan Plugin Disconnect.pl, ada sedikit perubahan disitu, karena pada SVN version, homun dan mercenary di detect sebagai slave.
untuk lebih jelasnya silakan timpa file baru ini k file Disconnect.pl anda yg lama.
Code:
# Openkore Plugins - Disconnect Auto
# Error found @ line 85 "use AI::Homunculus;", no file found.
# replace "use AI::Homunculus" with "use AI::Slave::Homunculus;"
#
#
# Merubah fungsi teleport auto menjadi disconnect auto
# version 2.0
# Dibuat oleh Qpalzm & FerryGukguk
# Special thank's to FerryGukguk atas dukungan dan support
# Special thank's to WarAngel atas tutor yang sangat membantu
#
# Kode yang dipakai untuk config.txt :
#
# disconnectAuto_hp
# Otomatis disconnect pada saat hp memenuhi syarat
#
# disconnectAuto_sp
# Otomatis disconnect pada saat sp memenuhi syarat
#
# disconnectAuto_minAggressives
# Otomatis disconnect pada saat jumlah agresif lebih banyak
#
# disconnectAuto_minAggressivesInLock
# Otomatis disconnect pada saat jumlah agresif lebih banyak (pada lockmap saja)
#
# Description:
# Plugins ini dibuat untuk Server yang tidak menyediakan
# skill "Teleport" (idRO Fun and Chat Server)
# yang digunakan untuk memutuskan hubungan pada saat tertentu
#
# Warning !!
# Pastikan Value dibawah ini dikosongkan (TIDAK BOLEH DIISI)
# teleportAuto_hp
# teleportAuto_spi
# teleportAuto_minAggressives
# teleportAuto_minAggressivesInLock
#
package Disconnect;
use strict;
use Time::HiRes qw(time);
use Carp::Assert;
use IO::Socket;
use Text::ParseWords;
use encoding 'utf8';
use Globals;
use Log qw(message warning error debug);
use Network::Send ();
use Settings;
use AI;
use AI::Slave::Homunculus;
use ChatQueue;
use Utils;
use Misc;
use Commands;
use Network;
use FileParsers;
use Translation;
use Field;
use Task::TalkNPC;
use Utils::Exceptions;
Plugins::register('disconnect', 'automatic disconnecting for certain condition', \&unload_callback);
my $plugin_hook = Plugins::addHook("AI_pre", \&disconnect);
sub disconnect {
my $map_name_lu = $field{name}.'.rsw';
my $safe = 0;
# Check whether it's safe to teleport
if (!$cities_lut{$map_name_lu}) {
$safe = 1;
}
if ($safe && timeOut($timeout{ai_teleport_hp})
&& (
(
($config{disconnectAuto_hp} && percent_hp($char) <= $config{disconnectAuto_hp})
|| ($config{disconnectAuto_sp} && percent_sp($char) <= $config{disconnectAuto_sp})
)
&& scalar(ai_getAggressives())
|| (
$config{disconnectAuto_minAggressives}
&& scalar(ai_getAggressives()) >= $config{disconnectAuto_minAggressives}
&& !($config{disconnectAuto_minAggressivesInLock} && $field{name} eq $config{'lockMap'})
) || (
$config{disconnectAuto_minAggressivesInLock}
&& scalar(ai_getAggressives()) >= $config{disconnectAuto_minAggressivesInLock}
&& $field{name} eq $config{'lockMap'}
)
)
&& !$char->{dead}
) {
message TF("Disconnect for 1800 sec due some condition\n");
relog(1800);
}
}
sub unload_callback {
}
return 1;semoga membantu.
