Jump to content


Toggle shoutbox Chat Open the Shoutbox in a popup

@  opas : (17 August 2025 - 21:52) Сервер ещё ддосят?
@  Costesti : (05 August 2025 - 20:36) Акк Kosmo тебе делать больше нету Бомжара ходить по шахтам убивать минера ?
@  Artemy Shan : (04 July 2025 - 03:34) Перезапуск проекта: https://forum.oldp.n...howtopic=106329
@  Costesti : (10 June 2025 - 22:26) Артём закрой сервер толку от него ноль так как лаги бешеные ничего не сделать
@  Costesti : (10 June 2025 - 21:03) бля это у меня сервер только логает или у всех?
@  papasha : (10 June 2025 - 15:13) @Costesti da kanesna vvodit, uze dohuja obnov vishlo za 7 let poslednix!!
@  Costesti : (09 June 2025 - 18:34) Артём ты там нововведения водишь?
@  Costesti : (09 June 2025 - 18:31) Сервер работает?
@  Costesti : (31 May 2025 - 23:46) Шан комп меняй уже игру не тянет
@  Costesti : (31 May 2025 - 20:02) мда никому не нужен этот сервер
@  fr33 : (29 May 2025 - 14:07) shenahnan gnom
@  fr33 : (29 May 2025 - 14:07) gm zb!!!1 lagi ept
@  Costesti : (28 May 2025 - 22:43) и это опять и за сейвы
@  Costesti : (28 May 2025 - 22:43) Народ да у кого там номер Шана пускай чинит сервер
@  Costesti : (27 May 2025 - 21:38) Вопрос Крафтить молоко можно?
@  fr33 : (26 May 2025 - 17:33) gm blad chini lag
@  Costesti : (23 May 2025 - 22:37) Бешеные лаги
@  Costesti : (17 May 2025 - 22:54) Опять лаги на Сервере
@  fr33 : (12 May 2025 - 15:21) ble daite mne gm i zdelaju pvp vam
@  Mokasin : (12 May 2025 - 09:04) Puišiem nav garlaicīgi xDDD

greenfox

Member Since 10 Nov 2008
Offline Last Active Sep 28 2009 15:03
-----

Posts I've Made

In Topic: óñòàíîâêà êëèåíòà íà ôëåøêó

28 September 2009 - 10:04

èø¸ âîïðîñ, âîò ÿ èçìåíèë Èêîíêó êëèåíòà, êàê èçìåíèòü íàçâàíèå êëèåíòà òàê ÷òîáû áûëî íåïàë¸íî?

Attached File  untitled.bmp   95.76KB   207 downloads

In Topic: Ideal Mining

15 November 2008 - 04:51

a vot mojete mne s etim pomoci?

vot ea ego vrode vsio perenastroil.. zame4iatelino rabotaet.. toliko vot on v etih mestah kuda idiot.. kopaet toko pered soboi 1 ras.. i perehodit k vtoroi.. kak zdelati 4toby on na kajdoi iz etih 50 tocikah kopal vokrut sebea toisti 4tobi poli4ilosi na 50 a skoka tam vokrug nego 50*7=350 vo)) kak eto zdelati?

initevents
set %ljtool HZSSLMD ; Pickakse ID
start:
GOSUB LJING 1808 1029 0
GOSUB LJING 1808 1047 0
GOSUB LJING 1806 1047 0
GOSUB LJING 1804 1047 0
GOSUB LJING 1802 1047 0
GOSUB LJING 1800 1047 0
GOSUB LJING 1799 1048 0
GOSUB LJING 1798 1049 0
GOSUB LJING 1797 1050 0
GOSUB LJING 1797 1052 0
GOSUB LJING 1799 1050 0
GOSUB LJING 1799 1051 0
GOSUB LJING 1800 1049 0
GOSUB LJING 1801 1049 0
GOSUB LJING 1801 1048 0
GOSUB LJING 1802 1048 0
GOSUB LJING 1802 1048 0
GOSUB LJING 1804 1049 0
GOSUB LJING 1806 1051 0
GOSUB LJING 1808 1053 0
GOSUB LJING 1809 1052 0
GOSUB LJING 1810 1052 0
GOSUB LJING 1811 1054 0
GOSUB LJING 1810 1056 0
GOSUB LJING 1808 1056 0
GOSUB LJING 1807 1056 0
GOSUB LJING 1808 1054 0
GOSUB LJING 1804 1058 0
GOSUB LJING 1802 1058 0
GOSUB LJING 1801 1059 0
GOSUB LJING 1799 1061 0
GOSUB LJING 1797 1062 0
GOSUB LJING 1799 1058 0
GOSUB LJING 1800 1056 0
GOSUB LJING 1798 1053 0
GOSUB LJING 1798 1051 0
GOSUB LJING 1799 1050 0
GOSUB LJING 1800 1049 0
GOSUB LJING 1801 1048 0
GOSUB LJING 1801 1047 0
GOSUB LJING 1803 1047 0
GOSUB LJING 1805 1047 0
GOSUB LJING 1803 1049 0
GOSUB LJING 1802 1050 0
GOSUB LJING 1800 1052 0
GOSUB LJING 1800 1052 0
GOSUB LJING 1800 1058 0
GOSUB LJING 1800 1059 0
GOSUB LJING 1800 1063 0
GOSUB LJING 1898 1062 0
GOSUB LJING 1899 1063 0

goto start

sub ljing
move %1 %2 1
finditem %ljtool
set #lobjectid #findid
event macro 17 0
5?
target 10s
set #ltargetx %1
set #ltargety %2
set #ltargetkind 3
set #ltargettile %3
event macro 22 0
wait 7
set %overtime #scnt + 25
gosub ves
return

gosub ves
sub ves
if #weight > 500 ;Ves kotorova mozna derzat vas personaz
gosub home

sub scan
scan:
scanjournal %cnt
if #hits < #maxhits
msg .arm $
if #hits < #maxhits
gosub follow&kill
if THERE_IS_NOTHING_HERE_TO_MINE_FOR in #sysmsg
return
if It_appears_immune_to_your_blow in #sysmsg
return
if YOu_can't_reach_this in #sysmsg
return
if #scnt >= %overtime
return
goto scan

sub home
move 1854 1029 0 ;koordinat do sunduka
gosub moveItems
sub moveItems
{
set !dragTimeout 4;1/10 s
set !dragTimer #scnt2
set !items DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF
if %0 < 2
set !items DWJ_TVj_GWJ_EWJ_ZLK_POF_RZF_SJG_CUD_IJG_HSF
set !from #backpackid
set !to NEEALMD ;Id jasika gde budit kidat rudu
finditem !items C_ , !from
for #findindex 1 #findcnt
{
if #findkind = 0
{
set !amt 1
if #findstack > 1
set !amt #findstack
while #scnt2 < !dragTimer
wait 0
exevent drag #findid !amt
exevent dropc !to
set !dragTimer #scnt2 + !dragTimeout
}
}
namespace clear

}


sub follow&kill
repeat
finditem #enemyid
event pathfind #FINDX #FINDY #FINDZ 1 3s
wait 1s
}
until #findcnt = 0
wait 2
msg .camp Heal $
return


In Topic: Parni Pomogite

15 November 2008 - 00:18

spasibo :roll:

In Topic: Ideal Mining

14 November 2008 - 21:56

parni u menea vot problemi

1. po doroge ot sunduka do shahty 3 izgiba.. ne magu dobaviti .. pishu move.. pishy gosub mining.. necego ne pomogaet.. bes paneatie kak eto delaetza.. pripeshy kod plz...
2. kak uznati ID sunduka?

karo4e ia uznal kak dobaviti koordinati.. teperi on mne prosto tupo begaet po etim tocikam ne kopaet no govorit 4to rudi net.. esli sam najmu kopniot i bejit dalishe po etim tocikam :D no ne kopaet.. no se4eas vojnee ID :)

vrode poka4ito toko 2 problemi :)

In Topic: Pomogite Pojalusta

12 November 2008 - 06:31

a mojno postaviti 4tob on v bank kidal a nev sunduk?