Переключение между 3 оружиями на 1 кнопку

[traviq]

Как сделать?
bow/kryss + shield/sword + shield

[Purgen]

проверками.
Если пусто - одеть лук
Если лук - одеть крис и щит
Если крис - одеть меч.

[traviq]

проверками.
Если пусто - одеть лук
Если лук - одеть крис и щит
Если крис - одеть меч.

Незнаю я этих проверок я ваще нюб Помоги плиз

[lpushech]

вчера написал

Code: Select all

sub Weap3()
uo.findtype("0x13B1", "backpack")
if uo.findcount()>0 then
UO.UseType('0x13B1')
wait(100)
else
UO.Findtype( '0x13B9' ) 
If UO.GetQuantity( 'finditem' ) > 0 Then 
UO.Exec("usetype 0x1B76")
UO.Exec("usetype 0x13B9")
else
UO.Findtype( '0x1400' ) 
If UO.GetQuantity( 'finditem' ) > 0 Then 
UO.Exec("usetype 0x1B76")
UO.Exec("usetype 0x1400")
else
UO.Findtype( '0x13FE' ) 
If UO.GetQuantity( 'finditem' ) > 0 Then 
UO.Exec("usetype 0x1B76")
UO.Exec("usetype 0x13FE")
else 
UO.Findtype( '0x0F5E' ) 
If UO.GetQuantity( 'finditem' ) > 0 Then 
UO.Exec("usetype 0x1B76")
UO.Exec("usetype 0x0F5E")
else 
UO.Findtype( '0x13B5' ) 
If UO.GetQuantity( 'finditem' ) > 0 Then 
UO.Exec("usetype 0x1B76")
UO.Exec("usetype 0x13B5")
else
end if
end if
end if
end if
end if
UO.Attack('laststatus') 
uo.waittargettype('laststatus') 
end sub

тут сворд, крис, лонгсворд, скимитар, катана

[Kynep]

вчера написал
тут сворд, крис, лонгсворд, скимитар, катана

Молодец ЫЫЫЫ

[Scripts Writer]

вчера написал
тут сворд, крис, лонгсворд, скимитар, катана

Молодец ЫЫЫЫ

+1

[Destruction]

Code: Select all

sub Weap3()
	uo.findtype("0x13B1", "backpack")
	if uo.findcount()>0 then
		UO.UseType('0x13B1')
		wait(100)
	else
		UO.Findtype( '0x13B9' )
		If UO.GetQuantity( 'finditem' ) > 0 Then
			UO.Exec("usetype 0x1B76")
			UO.Exec("usetype 0x13B9")
		else
			UO.Findtype( '0x1400' )
			If UO.GetQuantity( 'finditem' ) > 0 Then
				UO.Exec("usetype 0x1B76")
				UO.Exec("usetype 0x1400")
			else
				UO.Findtype( '0x13FE' )
				If UO.GetQuantity( 'finditem' ) > 0 Then
					UO.Exec("usetype 0x1B76")
					UO.Exec("usetype 0x13FE")
				else
					UO.Findtype( '0x0F5E' )
					If UO.GetQuantity( 'finditem' ) > 0 Then
						UO.Exec("usetype 0x1B76")
						UO.Exec("usetype 0x0F5E")
					else
						UO.Findtype( '0x13B5' )
						If UO.GetQuantity( 'finditem' ) > 0 Then
							UO.Exec("usetype 0x1B76")
							UO.Exec("usetype 0x13B5")
						else
						end if
					end if
				end if
			end if
		end if
		UO.Attack('laststatus')
		uo.waittargettype('laststatus')
	end sub

А вы говорите молодец... Чего только вторая строка стоит -)

[Kynep]

Но работает же.