Changes between Version 2 and Version 3 of UoPilot/makr/Fishing
- Timestamp:
- 10/15/13 19:38:52 (11 years ago)
Legend:
- Unmodified
- Added
- Removed
- Modified
-
UoPilot/makr/Fishing
v2 v3 1 1 Фишинг с пристани 2 2 3 Fishing: 3 for #y -6 6 1 4 4 5 for # y -6 6 1 for #x -6 6 15 for #x -6 6 1 6 6 7 :fishing 7 :fishing 8 8 9 set lastobjectid 1099918735//айди вашей удочки 9 set lastobjectid 1099918735//айди вашей удочки 10 10 11 set lastobjecttype 3519 //тип вашей удочки 11 set lastobjecttype 3519 //тип вашей удочки 12 12 13 set lasttargetx charposx + #x 13 set lasttargetx charposx + #x 14 14 15 set lasttargety charposy + #y 15 set lasttargety charposy + #y 16 16 17 set lasttargetkind 2 send F6 1000 // ЛастОбжект-ВаитФорТаргет-ЛастТаргет 17 set lasttargetkind 2 send F6 1000 // ЛастОбжект-ВаитФорТаргет-ЛастТаргет 18 18 19 set timer 0 while (lastmsg would you like) and (timer < 10000) wait 10 19 set timer 0 while (lastmsg would you like) and (timer < 10000) wait 10 20 20 21 end_while 21 end_while 22 22 23 if_not (lastmsg are no fish) or (lastmsg fishing in) goto fishing 23 if_not (lastmsg are no fish) or (lastmsg fishing in) goto fishing 24 24 25 end_if 25 end_if 26 26 27 end_for 27 end_for 28 28 29 end_for 29 end_for 30 30 31 31 alarm