где смайлик, который бьёт по лбу? окей, я помогу, хоть не понял что имеешь в виду и о чём говоришь
режим ванги включён
[spoiler]
$hwnd = HGET(60,95)
hset($hwnd, 1)
print($hwnd)
$o1 = 0
$o11 = 0
while(($o1 < 1) & ($o11 < 3))
WAIT(rnd(1,2))
GETSCREEN
WAITMS(rnd(50,60))
COLORMODE(6)
WAITMS(rnd(50,60))
IF_PICTURE_IN(53,27, 66,41, "sl.bmp",-1,10)
$xzan = $_return1+rnd(1,18)
$yzan = $_return2+rnd(1,4)
print("\x-"$xzan, "\y-"$yzan, " zan6++")
postmessage($hwnd, 0x0201, 0x0001, $xzan + ($yzan*65536))
WAITMS(rnd(1000,2000))
postmessage($hwnd, 0x0202, 0x0000, $xzan + ($yzan*65536))
WAITMS(rnd(800,1200))
WAIT(rnd(0,1))
print("o1+", $o1)
$o2 = 0
$o1 = 1
$poisk = 0
ELSE
$o1 = 1
$o2 = 1
$o3 = 1
$poisk = 1
print("o1-")
END_IF
while($o2 < 1)
WAIT(rnd(1,2))
GETSCREEN
WAITMS(rnd(50,60))
COLORMODE(6)
WAITMS(rnd(50,60))
IF_PICTURE_IN(53,39, 66,54, "sl.bmp",-1,25)
$xrss = rnd(127,167)
$yrss = rnd(45,53)
print("\x-"$xrss, "\y-"$yrss, " rss++")
postmessage($hwnd, 0x0201, 0x0001, $xrss + ($yrss*65536))
WAITMS(rnd(1000,2000))
postmessage($hwnd, 0x0202, 0x0000, $xrss + ($yrss*65536))
WAITMS(rnd(800,1200))
print("o2+", $o2)
WAIT(rnd(2,3))
$o3 = 0
$o2 = 1
$poisk = 0
ELSE
print("o2-")
$o1 = 1
$o3 = 1
$o2 = 1
$poisk = 1
END_IF
while($o3 < 1)
WAIT(rnd(1,2))
GETSCREEN
WAITMS(rnd(50,60))
COLORMODE(6)
WAITMS(rnd(50,60))
IF_PICTURE_IN(56,49, 72,58, "o36+.bmp",-1,40)
$xrss2 = rnd(94,155)
$yrss2 = rnd(64,70)
print("\x-"$xrss2, "\y-"$yrss2, " rss2++")
postmessage($hwnd, 0x0201, 0x0001, $xrss2 + ($yrss2*65536))
WAITMS(rnd(1000,2000))
postmessage($hwnd, 0x0202, 0x0000, $xrss2 + ($yrss2*65536))
WAITMS(rnd(900,1200))
WAIT(rnd(2,3))
print("o3+", $o3)
$o1 = 0
$o3 = 1
$poisk = 0
inc($o11,1)
print("inc($o11,1)"$o11)
ELSE
print("o3-")
$o1 = 1
$o2 = 1
$o3 = 1
$poisk = 1
END_IF
END_CYC
END_CYC
END_CYC
[/spoiler]
ну,заготовка у тебя есть, даже на 3 бота
помог в слепую, масивы, иф и while правь под себя