Danizho
2010-06-08 14:15:01
[PHP]
procedure FindTheNPC;
var
NPC: TNPC;
begin
if(FindNPC('Zombie', NPC))then // the monster
WriteLn('Found the NPC!'); // i can see "Found the NPC!" =)
R_ChooseOption('Attack'); //I wanna attack the monster, my wrong part
end;
[/PHP]
how can i attack the monster with
reflection? =) …
then…
[PHP]
procedure FindTheNPC;
var
NPCC: TNPC;
OurPoint: TPoint;
begin
If(FindNPC('Zombie',NPCC))then
begin
writeln('Found the Zombie!);
OurPoint := TileToMS(NPCC.Tile, Random(5));
writeln('Attackin…!');
mouse(OurPoint.x,OurPoint.y,2,2,true);
Wait(RandomRange(1000, 5000));
Antiban; //
end;
end;
[/PHP]
procedure FindTheNPC;
var
NPC: TNPC;
begin
if(FindNPC('Zombie', NPC))then // the monster
WriteLn('Found the NPC!'); // i can see "Found the NPC!" =)
R_ChooseOption('Attack'); //I wanna attack the monster, my wrong part
end;
[/PHP]
how can i attack the monster with
reflection? =) …
then…
[PHP]
procedure FindTheNPC;
var
NPCC: TNPC;
OurPoint: TPoint;
begin
If(FindNPC('Zombie',NPCC))then
begin
writeln('Found the Zombie!);
OurPoint := TileToMS(NPCC.Tile, Random(5));
writeln('Attackin…!');
mouse(OurPoint.x,OurPoint.y,2,2,true);
Wait(RandomRange(1000, 5000));
Antiban; //
end;
end;
[/PHP]