kak rabotaet etot skript?

Anything and all.

Moderators: Murderator+, Murderator

Post Reply
Bangbuss
Posts: 228
Joined: 2005-07-06 18:17:24

kak rabotaet etot skript?

Post by Bangbuss »

skript dolzhen vikidavat' nenuzhnuju rudu. Toka u menja vapros kak on otlechaet katoraja ruda nenuzhna, esli tip vseh rud odin i totzhe. Ponemaju po cvetu mozhno opredeljit nenuzhnuju rudu, nu tut ukazan toka tip.

Code: Select all

sub main()
VAR n
Dim Drop[10]
Drop[1] = '0x0909'
Drop[2] = '0x03E3'
Drop[3] = '0x0026'
Drop[4] = '0x06D6'
Drop[5] = '0x0000'
Drop[6] = '0x0601'
Drop[7] = '0x052D'
Drop[8] = '0x0488'
Drop[9] = '0x084D'
Drop[10] = '0x060C'

while true
For n = 1 To 10
UO.FindType('0x19B9', Drop[n] ,'backpack')
If UO.FindCount() then
UO.MoveItem('finditem', -1 ,'ground')
wait(1000)
Endif
Next
wait(1000)
wend
end sub
omi4
Posts: 457
Joined: 2005-07-10 21:53:05

Post by omi4 »

здесь как раз цвет, а не тип
Nmy
Expert!
Posts: 2152
Joined: 2005-09-14 15:31:58
Location: Latvia

Post by Nmy »

мой код :roll: непомню для каго писал... скрипт на олдп сбрасывает ненужную руду когда копаем- запускаем
Bangbuss
Posts: 228
Joined: 2005-07-06 18:17:24

Post by Bangbuss »

dlja Fakegod :wink:
Post Reply