Фишинг с пристани for #y -6 6 1 for #x -6 6 1 :fishing set lastobjectid 1099918735 // айди вашей удочки set lastobjecttype 3519 // тип вашей удочки set lasttargetx charposx + #x set lasttargety charposy + #y set lasttargetkind 2 send F6 1000 // ЛастОбжект-ВаитФорТаргет-ЛастТаргет set timer 0 while (lastmsg would you like) and (timer < 10000) wait 10 end_while if_not (lastmsg are no fish) or (lastmsg fishing in) goto fishing end_if end_for end_for alarm