initevents 
randomize
Display alert Wskaz Pierwszego zwierzak, musi byc najmocniejszy.  Masz 2 sekundy.
set #targcurs 1 
wait 2s 
set %lore #ltargetid 

Display alert Wskaz drugiego zwierzak.  Masz 2 sekundy.
set #targcurs 1 
wait 2s 
set %lore2 #ltargetid 

Display alert Wskaz trzeciego zwierzak.  Masz 2 sekundy.
set #targcurs 1 
wait 2s 
set %lore3 #ltargetid 

Display alert Wskaz czwartego zwierzak.  Masz 2 sekundy.
set #targcurs 1 
wait 2s 
set %lore4 #ltargetid 

Gosub tameloop:

sub tameloop:
set #ltargetid %lore2
event macro 13 16
target 
event macro 22 0 
wait 10s 1s

set #ltargetid %lore
event macro 13 16
target 
event macro 22 0 
wait 10s 1s

set #ltargetid %lore3
event macro 13 16
target 
event macro 22 0 
wait 10s 1s

set #ltargetid %lore
event macro 13 16
target 
event macro 22 0 
wait 10s 1s

set #ltargetid %lore4
event macro 13 16
target 
event macro 22 0 
wait 10s 1s

set #ltargetid %lore
event macro 13 16
target 
event macro 22 0 
wait 10s 1s
gosub tameloop: