;Skrypt na mount, drzwi

InitEvents
set #sysmsgcol 1283
event sysmessage Skrypt [Mount Drzwi] odpalony
keyloop:

onhotkey a alt   ;klawisz na otwieranie drzwi
  gosub drzwi
onHotKey s alt  ;<-- TU DOJEB DOGODNY DLA SIEBIE KLAWISZ
  gosub wsiadanie
goto keyloop

sub wsiadanie
event macro 1 0 Za Mna!
event macro 1 0 Podejdzcie!
finditem ZEPPVC ;<--TU WPIERDOL id ZWIERZAKA (albo wypierdalaj do laxow)
set #lobjectid #findid
event macro 17 0 ;last object
return

sub drzwi
finditem hpc_fpc_rtu_xtu_buu_luu_tjc_wcd_qcd_xoc_xmc_hnc_cfd_efd_ffd_ted_bcp_dcp_jqc_rjc_hqc_rqc_bqc_zpc_voc_dnc_nqc_rmc_tmc_ycd_xnc_vnc_zoc_pnc_nnc_zmc_xmc_fnc_jam_ham_boc_znc_vfd_xfd_hjc_hmc_jmc_kbd_fbd_cbd_vqc_tqc_fjc_kcd_ucd_njc_pjc_tpc_rpc_zzl_bam_lam_ued_wed_dfd_ifd_raq_paq_joc_hoc G_2
if #findkind = -1
{
   set #sysmsgcol 1080
   event sysmessage Nie znaleziono drzwi!
   return
}
set #lobjectid #findid
event exmsg #lobjectid 3 149 * , Otworzono*
event macro 17 0
return