healing dvou( a vic)

[Leman]

pls mate nejaky script v kterym zadam dva(nebo vic) lidi ktere chcu healit bandama a by to healilo toho co ma nejmin hp

[Patejl]

Kód: Vybrat vše

sub healx()
var HP,MHP,DMG,MIN,OBJ,TIME

var n=2 ; napiste cislo kolik lidi chcete lecit
for var X=1 to n
    UO.AddObject("OBJ"+str(X))
    While UO.Targeting()
        Wait(300)
    Wend
next

Repeat
    DMG=0
    for X=1 to n
        If UO.GetDistance("OBJ"+str(X))<=6 Then
            MHP=UO.GetMaxHP("OBJ"+str(X))
            HP=UO.GetHP("OBJ"+str(X))
            If HP<MHP and (HP<MIN>UO.Count("0x0e21") or (UO.Timer()-Time)>40
        If (UO.Timer()-Time) < 5 Then
            UO.WarMode(0)
            Wait(500)
            UO.WarMode(1)
            Wait(500)
        Endif        
    Endif
    Wait(500)
Until UO.Dead() or UO.Count("0x0e21")<2

If NOT UO.Dead() THEN
    for X=1 to 3
        UO.Msg("Od sebe, dosly bandy!!")
        Wait(3250)
    next
Endif

end sub

nedelal sem to ja, ale je docela funkcni, jestli je v necem spatnej, tak se predem omlouvam

[Leman]

nwm proc ale nejede mi

[Patejl]

jakou mas verzi yoka?

edit:
v zalozce "Main" uplne vlevo dole

[Leman]

heh to nwm, jak to zjistim ?

[Patejl]

v zalozce "Main" uplne vlevo dole

[Leman]

YokoInjection 505.18 VeNdOr

[Wilson]

YokoInjection 505.18 VeNdOr

hmm tak to je divny, to by ti melo fungovat ... neudelal si pri kopirovani nejakou chybu? treba nezkopiroval o pismenko vic ci tak neco? Skus si to este prekontrolovat, jestli tam nemas nakej preklep ...

[Raegann]

nwm proc ale nejede mi

Specifikuj "nejede mi". Pri spusteni to vubec nic neudela nebo to projede napr. cyklus jen jednou nebo ti to hlasi nejakou chybu?

[Prafotr Morava]

pokud nevíš ani kde zjistíš verzi bylo by pro tebe lepší pokusit se o jinej program

[Wilson]

pokud nevíš ani kde zjistíš verzi bylo by pro tebe lepší pokusit se o jinej program

ja to taky kdyz sem zacinal s yokem nevedel

[Seluwe Lathaniel]

ja taky ;p . nejlepsi bylo jak sem byl u kamose a lootoval prachy s klavesou f11 , ja to doma skousel a porad to nic nedelalo (samozrejme ze som nemel ty hotkeys) tak sem hral cistyho clienta

[Leman]

chyba - line849 parse error

a tuto chbu mi delaji celkem hodne scriptu kdyz je zkopiruju z nejake stranky

[Castian]

v riadku 849 mas chybu v scripte:p

[Leman]

no ale pokud neni ten script chybny tak to dobre je

a kdyz tam dam jen ten script tak to pise chybu v 18. radku

[Castian]

no keby si radsej napisal ten priblizny riadok +- tri predchadzajuce a nasledujuce riadky toho scriptu asi by sme boli mudrejsi.

-------------------------------------

Mozes este skusit to, ze si das tento script samostatne do jedneho subora (napr. healing.sc) a skusis ho spustit tak. Mozno sa ti biju nejake scripty medzi sebou.

[Leman]

[quote="Patejl"]

Kód: Vybrat vše

sub healx()
var HP,MHP,DMG,MIN,OBJ,TIME



Repeat
    DMG=0
    for X=1 to n
        If UO.GetDistance("OBJ"+str(X))<=6 Then
            MHP=UO.GetMaxHP("OBJ"+str(X))
            HP=UO.GetHP("OBJ"+str(X))
            If HP<MHP and (HP<MIN>UO.Count("0x0e21") or (UO.Timer()-Time)>40
        If (UO.Timer()-Time) < 5 Then
            UO.WarMode(0)
            Wait(500)
         

end sub

ten If HP<MHP by měl být chybný

[Dexxter]

podmienka "if" sa viaze na "then" , ktore ti tam chyba

[Leman]

takze jak to ma byt

[Samial]

já nevim, proč musíte publikovat skript kerej za minutu desetkrát přepne war a já teda vůbec nevim proč.. lagy, lagy, hou, hou...