Forum in READ ONLY mode! All questions and discussions on Discord official server, invite link: https://discord.gg/VxsGzJ7
Search found 61 matches
- 28.11.2008 3:01
- Forum: Scripts
- Topic: Досвидание (прощальное фиесто)
- Replies: 30
- Views: 40094
И еще немножко Mining cave program Mining_cave; // Мининг в пещере // (c) v26RuS (Galiano{ASTARTA} DRW) v1.3 // Tested by RaTaMaHaTTa on DRW {$Include 'all.inc'} const M_nothing1 = 'There is no ore here to mine'; M_nothing2 = 'That is too far'; M_nothing3 = 'Try mining in rock'; M_nothing4 = 'You ca...
- 28.11.2008 2:53
- Forum: Scripts
- Topic: Досвидание (прощальное фиесто)
- Replies: 30
- Views: 40094
Досвидание (прощальное фиесто)
Так как я уже почти перестал играть захожу так поздороваться да пообщаться выкладываю все свои скриптики.... Все скрипты тестировались на сервере ДРВ и играл я там-же)) на момент моей игры все скрипты работали. Alchemy Program AlchemyDRW; // (c) v26RuS (Galiano{ASTARTA} DRW) v1.1 {$Include 'all.inc'...
- 25.08.2008 22:09
- Forum: Помощь по скриптам
- Topic: Обьеты
- Replies: 3
- Views: 5017
- 14.08.2008 12:54
- Forum: Scripts
- Topic: Тинкер (бутылки)
- Replies: 8
- Views: 15278
- 14.08.2008 12:51
- Forum: Помощь по скриптам
- Topic: Очень бы хотелось скупку регов.
- Replies: 22
- Views: 29684
- 14.08.2008 12:46
- Forum: Scripts
- Topic: Alchemy for DRW
- Replies: 14
- Views: 23996
- 14.08.2008 12:40
- Forum: Scripts
- Topic: Alchemy for DRW
- Replies: 14
- Views: 23996
- 11.08.2008 8:08
- Forum: Scripts
- Topic: Mining DRW
- Replies: 70
- Views: 110432
Немного изминил функция убийства но тестировать шас негде выкладываю для общего теста. procedure kill_elemental; var ctime : TDateTime; castvx, castva : Boolean; c,Vrx,Vry : Integer; label vortex; begin castvx:=false; castva:=false; // Search and use Invisible potion FindTypeEx($0F0E,incol,backpack,...
- 11.08.2008 7:54
- Forum: Помощь по скриптам
- Topic: Очень бы хотелось скупку регов.
- Replies: 22
- Views: 29684
- 01.08.2008 15:13
- Forum: Scripts
- Topic: Mining DRW
- Replies: 70
- Views: 110432
Новая версия скрипта для копки в вип шахте на ДРВ. Большое спасибо RaTaMaHaTTa за новые идеи в скрипте и найденные ошибки, а так-же за тестирование скрипта. Новое: - исправлены ошибки - изменена функция выгрузки догрузки - изменена функция поиска элементаля он теперь их ищет в радиусе 10 тайлов - ис...
- 01.08.2008 12:00
- Forum: Помощь по скриптам
- Topic: Атака монстра)
- Replies: 21
- Views: 23923
Извеняюсь недоглядел Program killer; var monster : Cardinal; const Monstr = $0000; // Тип монстра Begin repeat begin FindType(Monstr,ground); If FindCount > 0 then begin monster := FindItem; AddToSystemJournal('-= Монстр найден, атакую =-'); Attack(monster); wait(5000); end Else begin AddToSystemJou...
- 01.08.2008 11:07
- Forum: Scripts
- Topic: Mining DRW
- Replies: 70
- Views: 110432
В данном скрипте он реагирует только на своего эля и то когда выкопал тогда нужно заменить проверку на выкопку эля на другую примерно такую Замени вот это: if InJournalBetweenTimes('heavy', ctime, Now) <> -1 then begin Result := 6 exit; end; на это: check_el и добавь 1 процедуру procedure check_el; ...
- 01.08.2008 11:02
- Forum: Помощь по скриптам
- Topic: Атака монстра)
- Replies: 21
- Views: 23923
Program killer; const Monstr = $0000; // Тип монстра Begin repeat begin FindType(Monstr,ground); If FindCount > 0 then begin monster := FindItem; AddToSystemJournal('-= Монстр найден, атакую =-'); Attack(monster); wait(5000); end Else begin AddToSystemJournal('-= Монстр не найден =-'); wait(5000); ...
- 26.07.2008 15:59
- Forum: Основной раздел
- Topic: Посоветуйте шард
- Replies: 11
- Views: 14319
- 26.07.2008 13:22
- Forum: Основной раздел
- Topic: Посоветуйте шард
- Replies: 11
- Views: 14319