5 replies to this topic

[N3K]

Скрипт на открытие большого кол-ва пандор )

sub Boxes()

up:

UO.FindType('0x09AA',-1);

   while UO.GetQuantity('finditem')>0

	 UO.DeleteJournal() 

	 while not UO.InJournal("Box unlocked.") and not UO.InJournal("You destroy") and not UO.InJournal("Box destroyed") and not UO.InJournal("It is already unlocked.");

	  UO.DeleteJournal() 

	  uo.waittargetobject('finditem')

	  uo.usetype('0x14FB','0x0424')

	  wait(4000)

	 wend

	 while not UO.InJournal("You have opened Pandora Box.") and not UO.InJournal("You destroy") and not UO.InJournal("Box destroed");

	  uo.useobject('finditem')

	  wait(200)

	 wend

	 goto up

   wend

end sub

[Hakuno]

sub Boxes()
...
...
...
while not UO.InJournal("You have opened Pandora Box.") and not UO.InJournal("You destroy") and not UO.InJournal("Box destroyed")
....

[N3K]

Сори ) у меня с 40 ящиков не одного не сломалось.. так что пришлось писать самому )) Опечатался) Сей час изменю

[Tastingo]

sub Boxes()
...
...
...
while not UO.InJournal("You have opened Pandora Box.") and not UO.InJournal("You destroy") and not UO.InJournal("Box destroyed")
....

+
mnogo ciklov i uslovnih ne est horosho.
nam prepod po c++ ruki bi otorval za tot prog. kod =)

[N3K]

+
mnogo ciklov i uslovnih ne est horosho.
nam prepod po c++ ruki bi otorval za tot prog. kod =)

Значит ваш препод любит разгребать в 2 раза больше кода, чем оно явзяется. обычно условие в си пишется, при большоих условиях, на новых строчках типо
if (x==x &&
y==y &&
...){}

[Puker]

finditem nwh C_ , #BACKPACKID
SET #Lobjectid #FINDID
event macro 17 0
finditem CUD C_ , #BACKPACKID
SET #LTARGETID #FINDID
set #LTargetKind 1
event macro 25 0
event macro 22 0
finditem CUD C_ , #BACKPACKID
SET #Lobjectid #FINDID
event macro 17 0
wait 1s

moj, lenj bilo pisatj , mozno prada sdohnutj ot pandorki