PDA

Просмотр полной версии : скрипт на чара,вновь о бесмертие)


rolioo
01.12.2011, 12:42
ктот выкладывал скрипт , дающий чару бесмертие,но вскоре снёс тему.
держите) шоп его привести в действие прост поставте галку,справа от названия скрипта.

var
TargetID:integer;
StartSkill:word;

procedure DoTheSkill(SkillID:word; Level:byte);
begin
buf := HStr('CF 57 6C D2 04 01 00 00 00 00 00 00 00 F9 2E 00 00');
WriteH(SkillID, 4);
WriteC(Level, 6);

SendToServer;
end;

begin

begin

DoTheSkill(1332, 3);

end;
end.

А вот ещё скриптик на атаку для чара,сопственно активируется также

var
TargetID:integer;
StartSkill:word;

procedure DoTheSkill(SkillID:word; Level:byte);
begin
buf := HStr('CF 57 6C D2 04 01 00 00 00 00 00 00 00 F9 2E 00 00');
WriteH(SkillID, 4);
WriteC(Level, 6);

SendToServer;
end;

begin

begin

DoTheSkill(1259, 4);

end;
end.


Ну и скилпак на чара. активируется вроде бы болевым захватом,ну тот скил что активируется кода цель валяется


var
TargetID:integer;
StartSkill:word;

procedure DoTheSkill(SkillID:word; Level:byte);
begin
buf := HStr('CF 57 6C CC CC DD 00 FF FF FF FF 00 00 00 00 00 00');
WriteH(SkillID, 4);
WriteC(Level, 6);
WriteD(TargetID, 8);
SendToServer;
end;

begin
StartSkill := 1268;
if (FromClient) and (ReadC(1) = $CF) and (ReadH(4) = StartSkill) then
begin
TargetID := ReadD(8);

DoTheSkill(1237, 2);
DoTheSkill(1232, 2);

end;
end.

rolioo
01.12.2011, 14:34
на маём серве робит,а именно это aion pwp wars , там вапще много что робит)

Indeos918
14.12.2011, 17:14
на фри кик с игры, при любых обстоятельствах

dumchik
14.12.2011, 17:28
на фри как работало так и будет работать, и на 2.7 мне кажеться тоже будет работать