Âåðíóòüñÿ   Forgotten World Ultima Online Forums > Îáùèå ôîðóìû/Common forums > Íüþáè Òàóí
Íüþáè Òàóí Âîïðîñû è ïîìîùü íîâûì èãðîêàì Øàðäà Forgotten World. Çàïðåùåí Ìàò è Îñêoðáëåíèÿ èãðîêîâ, îáñóæäåíèå äåéñòâèé Ñòàôôà, ôëóä. Íàêàçàíèå -ÁÀÍ

 
 
Îïöèè òåìû Îïöèè ïðîñìîòðà
Prev Ïðåäûäóùåå ñîîáùåíèå   Ñëåäóþùåå ñîîáùåíèå Next
Re: ÌÀÊÐÎÑÛ
Ñòàðûé 28.10.2011, 13:34   #11
nkn
Newbie
 
Ðåãèñòðàöèÿ: 16.10.2011
Âîçðàñò: 37
Ñîîáùåíèé: 11
Ðåïóòàöèÿ: 1 [+/-]
èìååò íóëåâóþ ðåïóòàöèþ
nkn èìååò íóëåâóþ ðåïóòàöèþ
×àð: Scaremounger
Ïî óìîë÷àíèþ Re: ÌÀÊÐÎÑÛ

Ìèíèíã, ëàìáåð, òàìèíã íà ðó÷íîé äîáû÷å
Îòñþäà âèäíî êàê óñëîâèå íà îáêîïêó âîêðóã ñäåëàòü ñî ñòàòîé (åñëè òðåáóåòñÿ
Êîä:
set $s1 wood.
set $s2 skill in
set $s3 str
set $s4 dex
set $s5 int
set $s6 pack
set $s7 destroer!
set $s8 You have no line of sight
set $s9 Try mining in rock
set $s10 useable ore.
set $s11 fail to tame

set $s12 chop.
set $s13 away
set $s14 mine
set $s15 location
set $s16 can't
set $s17 master.
set $s18 skill to tame


set $sw world save
:1
if (lastmsg $s1) or (lastmsg $s2) or (lastmsg $s3) or (lastmsg $s4) or  (lastmsg $s5) or (lastmsg $s6) or (lastmsg $s7) or (lastmsg $s8) or  (lastmsg $s9) or (lastmsg $s10) or (lastmsg $s11)
send z  //ËÎáäæåêò->ÂÒàðãåò->ËÒàðãåò
wait 1000
goto 1
end_if

if (lastmsg $s12) or (lastmsg $s13) or (lastmsg $s14) or (lastmsg $s15) or (lastmsg $s16) or (lastmsg $s17) or (lastmsg $s18)
send x  //ËÎáäæåêò
wait 1000
end_if

if (lastmsg $sw) 
wait 10000
end_if
Ôèøèíã ñ ìîñòà ïî ðóíêàì
Êîä:
set $s1 there are no fish here
set $s2 have no line
set $s3 try fishing
set $s4 that is too far away
set $s5 has changed
set $s6 you fish a while, but fail to catch anything
set $s7 has increased
set $s8 you pull out
set $s9 slaider: you are too quick
set $s10 your fishing pole may have been destroer!
set #a 0

:start
for #x -6 6 1
for #y -6 6 1
set lasttargetx charposx +#x
set lasttargety charposy +#y
set lasttargetkind 2
:repeat
send f2  //ËÎáäæåêò->ÂÒàðãåò->ËÒàðãåò
WAIT 800
if (lastmsg = $s10)
send y  //ÞçÒàéï íà óäêó (ñ îòìåíîé òàðãåòà)
wait 250
double_left 870, 139  //2Êëèê íà óäêó â ðóêå ïåðñîíàäà
end_if
set timer 
while_not (lastmsg = $s1) or (lastmsg = $s2) or (lastmsg = $s3) or (lastmsg = $s4) or (timer > 800) 
wait 570
while_not (lastmsg = $s5) or (lastmsg = $s6) or (lastmsg = $s7) or (lastmsg = $s8) or (lastmsg = $s9) or (timer > 3500) 
end_while
if hits < str
goto recall
end_if
drag 395, 298 398, 260 all  //Ïûëåñîñèì ðûáó ñ ïîëà
wait 200
if wght >= 600  //Ìàêñèìàëüíûé âåñ ïåðñîíàæà
alarm  //Ãàâêíóòü Ïèëîòîì
goto dom
pause_script
goto recall
end_if
goto repeat
end_while
end_for
end_for
if #a = 1
set #a #a + 1
goto metka1
end_if
set #a #a + 1
if #a >= 2
goto dom
end_if
:metka
send 1  //Ðóíêà íà ïðè÷àë ¹1
if lastmsg you lack
:mana1
if mana < 20
send f7  //Ìåäèòèðóåì
wait 2s
goto mana1
end_if
goto metka
end_if
wait 4s
if lastmsg the spell fizzles
goto metka
end_if
goto start
:metka1
send 2  //Ðóíêà íà ïðè÷àë ¹2
if lastmsg you lack
:mana2
if mana < 20
send f7  //Ìåäèòèðóåì
wait 2s
goto mana2
end_if
goto metka1
end_if
wait 4s
if lastmsg the spell fizzles
goto metka1
end_if
goto start

:dom
send f5  //Ðåêîë äîìîé èëè êóäà âû ïðèâûêëè...
if lastmsg you lack
:mana0
if mana < 20
send f7  //Ìåäèòèðóåì
wait 2s
goto mana0
end_if
goto dom
end_if
wait 4s
if lastmsg the spell fizzles
goto dom
end_if
pause_script 

:recall
repeat 3
alarm  //Ãàâêàåò ïèëîò
say guards   //Çîâ¸ì äÿäþ íà ïîìîùü õ3
wait 1000
end_repeat
goto dom
goto start
Äîáàâëåíî ÷åðåç 10 ìèíóò
Ìàãåðè íà ÿäå ñ ïîäêîðìêîé
Êîä:
set $sw save
:1
if mana > 20
send p  //ÞÑïåëë->Âòàðãåò->LTarget (ïåðåä çàïóñêîì ïðèöåëîì îáîçíà÷àåì êóäà áóäåì êàñòîâàòü ÿä)
set timer 
wait 2450
send f1  //Ïîêóøàòü
wait 50
goto 1
end_if
:2
if mana < int
send f7  //ÞÑêèëë->Ìåäèòåöèÿ
wait 2450
send f1  //ËÎáäæåêò íà ìÿñî
wait 50
goto 2
end_if
if (lastmsg $sw)
wait 17000
end_if
goto 1
Äîáàâëåíî ÷åðåç 24 ìèíóòû
Ïðè ïðîêà÷êå áîåâûõ (êàê àòàêóþùèé) îðóæèå áûñòðî ëîìàåòñÿ. Âáèâàåì â àññèñò ÞçÈòåìÒàéï (ñêàæåì íà Ô2), êèäàåì ëàñò òàðãåò íà æåðòâó èçáèåíèÿ, â îïöèÿõ èãðû ñòàâèì ÀòòàêËàñò íà òóæå òðåêëÿòóþ Ô2->Ëóóïèì íà wait 1000\ wait 1s.
Òàêæå åñëè ó êóêëû ìàëî ÕÏ/Õèëèíãà èëè îíî âîîáùå âàòíîå-ìîæíî ïîäñòðàõîâàòüñÿ:
Îòêðûâàåì íîâóþ âêëàäêó ïèëîòà, ïèøåì ìàêð (ó íàäïèñè Òî÷êà Ctrl+A äîëæíà ñòîÿòü ãàëêà äëÿ ïîëó÷åíèÿ êîîðäèíàò íà êóðñèâ â èëîòå)
Êîä:
:1
If 478, 448 14658  //âûòàñêèâàåì ÕÏ áàð êóêëû, íàâîäèì ñêàæåì íà ñåðåäèíó ïîëîñêè è æàìêàåì Ctrl+A (çàäàëè êîîðäèíàòû), ïîòîì æì¸ì íà ïîëó÷åíèå öâåòà òî÷êè (öûåò: (íàì òàìàøíÿÿ êíîïêà ñ öìôîðêàìè íóæíà))
send f2  //óñëîâèëèñü, ÷òî òóò ó íàñ ìàêð íà îäåâàíèå îðóæèÿ ïî òèïó è àòòàê ëàñò ïî ëàñò òàðãåòó
wait 1500
goto 1
end_if
:2
send tab
wait 1500
goto 1
end_if
ïîèäåå, à òî÷íåå íà 99% ïîâûñèòüñÿ âûæèâàåìîñòü êóêëû.

Ïîñëåäíèé ðàç ðåäàêòèðîâàëîñü nkn; 28.10.2011 â 14:00.. Ïðè÷èíà: Äîáàâëåíî ñîîáùåíèå
nkn âíå ôîðóìà   Îòâåòèòü ñ öèòèðîâàíèåì
 



Âàøè ïðàâà â ðàçäåëå
Âû íå ìîæåòå ñîçäàâàòü íîâûå òåìû
Âû íå ìîæåòå îòâå÷àòü â òåìàõ
Âû íå ìîæåòå ïðèêðåïëÿòü âëîæåíèÿ
Âû íå ìîæåòå ðåäàêòèðîâàòü ñâîè ñîîáùåíèÿ

BB êîäû Âêë.
Ñìàéëû Âêë.
[IMG] êîä Âûêë.
HTML êîä Âûêë.

Áûñòðûé ïåðåõîä

Ïîõîæèå òåìû
Òåìà Àâòîð Ðàçäåë Îòâåòîâ Ïîñëåäíåå ñîîáùåíèå
ÏÂÏ ìàêðîñû MDEA Íüþáè Òàóí 35 08.07.2007 17:23
Ïðî ìàêðîñû! Dvalin Íüþáè Òàóí 3 21.02.2007 20:51





Powered by: vBulletin® Version 3.8.7
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
© 2004-2024 Forgotten World