quinta-feira, 31 de julho de 2008

Logout your char and login the hunted char when the hunter log off

Const
HunterName = 'Hunters Namer Here' // when this one logout from vip you logout and enter your char
AccountNumber = 1234567 // enter here the account number of the rune maker
Password = 'Your Password' //enter here the password
Character = 'Your Hunted Char' // enter here the name of the hunted who should login
World = 'Your World Name Here' //enter here the world...

procedure Event_VIPLogOff(ID :integer);
begin
UpdateWorld;
For i:= 0 to VipList.Count -1 do
begin
if (VipList.Vip[i].ID = ID) and (VipList.Vip[i].Name = HunterName) then
begin
Self.Logout(false);
Sleep(5000);
Self.Login(AccountNumber,Password,Character,World);
end;
Sleep(100);
end;
end;

while not terminated do
begin
UpdateWorld;
ProcessEvents;
Sleep(1000);
end;

0 Comments: