5 | | for #y -6 6 1 |
6 | | for #x -6 6 1 |
7 | | :fishing |
8 | | set lastobjectid 1099918735//айди вашей удочки |
9 | | set lastobjecttype 3519 //тип вашей удочки |
10 | | set lasttargetx charposx + #x |
11 | | set lasttargety charposy + #y |
12 | | set lasttargetkind 2 |
13 | | send F6 1000 // ЛастОбжект-ВаитФорТаргет-ЛастТаргет |
14 | | set timer 0 |
15 | | while (lastmsg would you like) and (timer < 10000) |
16 | | wait 10 |
17 | | end_while |
18 | | if_not (lastmsg are no fish) or (lastmsg fishing in) |
19 | | goto fishing |
20 | | end_if |
21 | | end_for |
22 | | end_for |
| 5 | for #y -6 6 1 for #x -6 6 1 |
| 6 | |
| 7 | :fishing |
| 8 | |
| 9 | set lastobjectid 1099918735//айди вашей удочки |
| 10 | |
| 11 | set lastobjecttype 3519 //тип вашей удочки |
| 12 | |
| 13 | set lasttargetx charposx + #x |
| 14 | |
| 15 | set lasttargety charposy + #y |
| 16 | |
| 17 | set lasttargetkind 2 send F6 1000 // ЛастОбжект-ВаитФорТаргет-ЛастТаргет |
| 18 | |
| 19 | set timer 0 while (lastmsg would you like) and (timer < 10000) wait 10 |
| 20 | |
| 21 | end_while |
| 22 | |
| 23 | if_not (lastmsg are no fish) or (lastmsg fishing in) goto fishing |
| 24 | |
| 25 | end_if |
| 26 | |
| 27 | end_for |
| 28 | |
| 29 | end_for |
| 30 | |