;Skrypt bY SabiK
;leczenie-butle-bronie
;Wersja 1.4
;Skrypt leczy bandazami oraz po ustawieniu zmiennych mozna ustawic pod bindy zakladanie broni
;oraz picie mixa odswiezenia pod binda lub automatycznie gdy stamina jest mniejsza od 15
;Standartowo bindy ustawione sa nastepujaco:
;F3 - arm pika/hala,  F4 - arm kris i pawez/katana i pawez,  insert - arm widly i pawez/wielki miecz i pawez
;F5 - mix odswiezenia,  F6 - mix odtrutki,  F7 - wybuch z precastem  F8 - wybuch w siebie,  F9 - mix dexa,  F10 - mix str,  F11 - mix trutki,  F12 - mix leczenia
set %bron 0 		;Tu ustaw jakim typem broni walczysz (0 - Brak ubierania broni, 1 - Szpady, 2 - Miecze)
set %odsw 2 		;Tu ustaw czy skrypt ma pic Miksa Odswiezenia gdy ma ponizej 15staminy albo gdy wcisniesz binda (0 - Bez mixa odswiezenia, 1 - Auto, 2 - Bind, 3 - to i to)
set #sysmsgcol 63
event sysmessage Skrypt [leczenie-butle-bronie] odpalony (bY SabiK)
wait 1

start:
wait 1
if H in #charstatus
   goto start
set %bandaze 0
set %licz 0

leczenie:
if %bandaze = 1
   goto butle
if #hits < #maxhits
{
   finditem zlf C
   if #findkind = -1
      goto butle
   if #findkind = 1
   {
      ignoreitem #findid
      goto leczenie
   }
   if #findkind = 0
   {
      set #lobjectid #findid
      event macro 17
      set %licz 0
      czekaj_leczenie:
      set %licz %licz + 1
      if #targcurs = 1
         goto dalej_leczenie
      if %licz > 30
         goto start
      goto czekaj_leczenie
      dalej_leczenie:
      scanjournal 1
      wait 2
      if I_am_frozen in #journal
         goto leczenie
      if #sysmsg = I_am_already_doing_something_else.
         goto start
      set %hp #hits + 3
      event macro 23
      if Who_will_you_use_the_bandages in #sysmsg
         goto dalej_leczenie
      set %bandaze 1
   }
}

butle:
if #targcurs = 1
{
   if #hits < #maxhits
      goto dalej_leczenie
   goto start
}
if #hits < #maxhits
{
   if %bandaze = 0
      goto start
}
if %bron = 0
   goto butle3
if %bron = 2
   goto butle2
onhotkey insert 			;arm widly i pawez
   gosub bron3
goto butle3
butle2:
onhotkey insert 			;arm wielki miecz i pawez
   gosub bron6
butle3:
if %odsw = 0
   goto butle5
if %odsw = 1
   goto butle4
onhotkey f5 			;mix odswiezenia pod F5
   gosub odswiezenia
butle4:
if %odsw = 2
   goto butle5
if #stamina < 5
   gosub odswiezenia 		;auto picie mixa odswiezenia
butle5:
onhotkey f12 ctrl 			;mix odtrutki pod F6
   gosub odtrutka
;onhotkey f7 			;wybuch pod F7
;   gosub wybuch
;onhotkey f8 			;wybuch w siebie pod F8
;   gosub wybuchself
onhotkey f10 			;mix sily pod F9
   gosub sily
onhotkey f10 ctrl 			;mix dexa pod F10
   gosub dexa
onhotkey f11 			;mix trutki pod F11
   gosub trutka
onhotkey f12 			;mix leczenia pod F12
   gosub leczenia

czekaj:
set %licz %licz + 1
if #hits = #maxhits
   goto start
if #hits > %hp
   goto start
if %licz > 65
   goto start
if #charname , :_+ in #sysmsg
   goto start
if #sex = 0
{
   if #sysmsg = You_finish_applying_the_bandages.
      goto start
   if #sysmsg = You_have_been_curesd_of_all_poisons!
      goto start
   if Wyleczyles in #sysmsg
      goto start
   if Przestales in #sysmsg
      goto start
   if Skonczyles in #sysmsg
      goto start
   if Zneutralizowales in #sysmsg
   {
      scanjournal 2
      if #journal = Wyleczyles_pacjenta_calkowicie.
         goto start
      if Wyleczyles in #journal
         goto start
      if Przestales in #journal
         goto start
      if Skonczyles in #journal
         goto start
      if #journal = Nie_udalo_ci_sie_leczenie.
         goto start
      if #journal = Anulowano.
         goto start
      if Your_skill_in_Healing in #journal
         goto start
      if #hits = #maxhits
         goto start
      if #hits > %hp
         goto start
      if %licz > 65
         goto start
      if #charname , :_+ in #sysmsg
         goto start
   }
}
if #sex = 1
{
   if #sysmsg = Wyleczylas_pacjenta_calkowicie.
      goto start
   if Wyleczylas in #sysmsg
      goto start
   if Przestalas in #sysmsg
      goto start
   if Skonczylas in #sysmsg
      goto start
  if Zneutralizowalas in #sysmsg
   {
      scanjournal 2
      if #journal = Wyleczylas_pacjenta_calkowicie.
         goto start
      if Wyleczylas in #journal
         goto start
      if Przestalas in #journal
         goto start
      if Skonczylas in #journal
         goto start
      if #journal = Nie_udalo_ci_sie_leczenie.
         goto start
      if #journal = Anulowano.
         goto start
      if Your_skill_in_Healing in #journal
         goto start
      if #hits = #maxhits
         goto start
      if #hits > %hp
         goto start
      if %licz > 65
         goto start
   }
}
if #sysmsg = Nie_udalo_ci_sie_leczenie.
   goto start
if #sysmsg = Anulowano.
   goto start
if Your_skill_in_Healing in #sysmsg
   goto start
goto leczenie


sub odswiezenia
finditem zuf C
if #findkind = -1
 {
   set #sysmsgcol 1080
   event sysmessage Nie masz miksa odswiezenia
   goto start
 }
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Wypiles miksa odswiezenia
goto start

sub trutka
finditem avf C
if #findkind = -1
 {
   set #sysmsgcol 1080
   event sysmessage Nie masz miksa trutki
   goto start
 }
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Wypiles miksa trutki
goto start

sub sily
finditem xuf C
if #findkind = -1
 {


   set #sysmsgcol 1080

   event sysmessage Nie masz miksa sily
    goto start
 }
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Wypiles miksa sily
goto start

sub dexa
finditem yuf C
if #findkind = -1
 {
   set #sysmsgcol 1080
   event sysmessage Nie masz miksa dexa
   goto start
 }
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Wypiles miksa dexa
goto start

sub leczenia
finditem uuf C
if #findkind = -1
 {
   set #sysmsgcol 1080
   event sysmessage Nie masz miksa leczenia
    goto start
 }
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Uzyles miksa leczenia
goto start

sub odtrutka
finditem nuf C
if #findkind = -1
 {
   set #sysmsgcol 1080
   event sysmessage Nie masz miksa odtrutki
    goto start
 }
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Uzyles miksa odtrutki
goto start

sub wybuch
finditem tuf C
if #findkind = -1
 {
   set #sysmsgcol 1080
   event sysmessage Nie masz miksa wybuchowego
    goto start
 }
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Uzyles miksa wybuchowego
goto start

sub wybuchself
finditem tuf C
if #findkind = -1
 {
   set #sysmsgcol 1080
   event sysmessage Nie masz miksa wybuchowego
   goto start
 }
wyb:
set %licz 0
set #lobjectid #findid
event macro 17
petla:
set %licz %licz + 1
if #targcurs = 1
   goto dalej
if %licz > 35
   goto wyb
goto petla
dalej:
event macro 23
event macro 23
event macro 23
omin:
set #sysmsgcol 88
event sysmessage Rzuciles w siebie miksa wybuchowego
goto start

sub bron1
finditem cuo C
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz piki
    goto start
}
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Zalozyles pike
goto start

sub bron2
finditem vrh C
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz krisa
   goto bron21
}
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Zalozyles krisa
bron21:
wait 20
finditem cik C
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz pawezy
    goto start
}
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Zalozyles pawez
goto start

sub bron3
finditem srh C
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz widel
   goto bron31
}
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Zalozyles widly
bron31:
wait 20
finditem cik C
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz pawezy
    goto start
}
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Zalozyles pawez
goto start

sub bron4
finditem yth C
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz halabardy
    goto start
}
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Zalozyles halabarde
goto start

sub bron5
finditem omh C
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz katany
   goto bron51
}
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Zalozyles katane
bron51:
wait 20
finditem cik C
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz pawezy
   goto start
}
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Zalozyles pawez
goto start

sub bron6
finditem bph C
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie masz wielkiego miecza
   goto bron61
}
set #lobjectid #findid
event macro 17
set #sysmsgcol 88

event sysmessage Zalozyles wielki miecz
bron61:
wait 20
finditem cik C
if #findkind = -1
{

   set #sysmsgcol 1080
   event sysmessage Nie masz pawezy
    goto start
}
set #lobjectid #findid
event macro 17
set #sysmsgcol 88
event sysmessage Zalozyles pawez
goto start