Toggle shoutbox Chat
|
Pvm (easyuo)
#61
Posted 11 December 2008 - 22:24
Ar cieņu,
Hercog
Darbs dara darītāju !
#62
Posted 11 December 2008 - 22:45
;______________________________________________ ; __________rabo4ii peremenie__________________ ; %zona4ara - mesto naxozdenie chara ; %zonamoba - mesto naxozdenie moba ; %celX - kogo iskatj moba/4ara (izna4alna 4ara) sub mob4ek if #findx > 5287 && #findx < 5304 && #findy < 1330 move 5298 1357 if #findx > 5327 && #findx < 5336 && #findy > 1375 2 move 5333 1364 move 5346 1364 if #findy < 1320 ignoreitem #findid return sub moveto set %celX #CHARPOSX set %celY #CHARPOSy GOSUB gde if %zona = 13 move 5314 1365 10s if %zona = 12 move 5316 1352 10s if %zona = 22 move 5296 1358 10s if %zona = 21 move 5299 1340 10s if %zona = 31 move 5299 1340 10s if %zona = 41 move 5315 1339 10s if %zona = 42 move 5332 1328 10s if %zona = 43 2 move 5332 1345 10s move 5346 1331 10s if %zona = 33 move 5346 1331 10s if %zona = 44 move 5360 1330 10s if %zona = 45 2 move 5347 1336 10s move 5350 1349 10s if %zona = 34 move 5365 1346 10s if %zona = 35 move 5364 1367 10s if %zona = 25 move 5364 1367 10s if %zona = 15 3 move 5364 1345 10s move 5346 1346 10s move 5349 1367 10s if %zona = 24 move 5349 1367 10s if %zona = 14 move 5331 1365 10s set %zona x return sub zonamoba ;ANALIZZZ NAXOZDENIJA MOBA I 4ARA!!!!!!! set %celX #FINDX set %celY #FINDy GOSUB gde ; de MOB set %zonamoba %zona set %celX #CHARPOSX set %celY #CHARPOSy GOSUB gde ; De 4AR set %zona4ara %zona if %zonamoba > 49 2 set %zmob 1 goto vixodPMOB vixodPMOB: return sub gde if %celY < 1376 && %celY > 1359 set %y 1 if %celY < 1360 && %celY > 1351 set %y 2 if %celY < 1352 && %celY > 1343 set %y 3 if %celY < 1344 && %celY > 1321 set %y 4 if %celY < 1319; opasnaja zona!!!!! set %y 5 if %celX > 5287 && %celX < 5304 set %x 1 if %celX > 5303 && %celX < 5320 set %x 2 if %celX > 5319 && %celX < 5336 set %x 3 if %celX > 5335 && %celX < 5352 set %x 4 if %celX > 5352 && %celX < 5368 set %x 5 set %zona %y , %x return
Это для меня тёмный лес воще и я даже непонемаю как что изза чего пашет
#63
Posted 11 December 2008 - 23:33
Ar cieņu,
Hercog
Darbs dara darītāju !
#64
Posted 11 December 2008 - 23:55
#65
Posted 12 December 2008 - 07:45
2.2. Если вы находитесь не за компьютером запрещено использовать макрос программы для автоматического убийстве монстров. Если в течении 30 секунд вы не ответили на вопрос работника стаффа, то вас сажают. Это правило касается только проф. данжена и ньюби данжена.
#66
Posted 12 December 2008 - 07:52
#67
Posted 13 December 2008 - 20:51
все по 400 часов схватить хотят?
2.2. Если вы находитесь не за компьютером запрещено использовать макрос программы для автоматического убийстве монстров. Если в течении 30 секунд вы не ответили на вопрос работника стаффа, то вас сажают. Это правило касается только проф. данжена и ньюби данжена.
Не работает это правило... В ньюби данже на 2м лвл постоянно 2-3 человека на макросе, практически круглосуточно... Там вообще ловить нефиг...
#68
Posted 15 December 2008 - 07:41
#69
Posted 15 December 2008 - 08:46
ну рано или позно они попадутся)Не работает это правило... В ньюби данже на 2м лвл постоянно 2-3 человека на макросе, практически круглосуточно... Там вообще ловить нефиг...
#70
Posted 30 December 2008 - 15:56
koro4e tut takaja wtuka
eto neobezateljnaja 4astj skripta. tut prosto proveraetsa gde naxoditsa mob. esli on naxoditsa v nezelateljnom meste naprimer esli v meste gde siljnie mobi kotorie mogut polozitj. on uxodit ot tuda
sub mob4ek
if #findx > 5287 && #findx < 5304 && #findy < 1330
move 5298 1357
if #findx > 5327 && #findx < 5336 && #findy > 1375 2
move 5333 1364
move 5346 1364
if #findy < 1320
ignoreitem #findid
return
///////////////////////////////////////////////////////////////////////////////////////////////////
sub zonamoba ;ANALIZZZ NAXOZDENIJA MOBA I 4ARA!!!!!!!
set %celX #FINDX
set %celY #FINDy
GOSUB gde ; de MOB
set %zonamoba %zona
set %celX #CHARPOSX
set %celY #CHARPOSy
GOSUB gde ; De 4AR
set %zona4ara %zona
if %zonamoba > 49 2
set %zmob 1
goto vixodPMOB
vixodPMOB:
return
eto vaew tut nenuzno =))) mozno udalitj ja xotel tam kakojto zamut sdelatj no zabil =))
/////////////////////////////////////////////////////////////////////////////////////////////////////
sub gde
if %celY < 1376 && %celY > 1359
set %y 1
if %celY < 1360 && %celY > 1351
set %y 2
if %celY < 1352 && %celY > 1343
set %y 3
if %celY < 1344 && %celY > 1321
set %y 4
if %celY < 1319; opasnaja zona!!!!!
set %y 5
if %celX > 5287 && %celX < 5304
set %x 1
if %celX > 5303 && %celX < 5320
set %x 2
if %celX > 5319 && %celX < 5336
set %x 3
if %celX > 5335 && %celX < 5352
set %x 4
if %celX > 5352 && %celX < 5368
set %x 5
set %zona %y , %x
return
Tut deletsa dungeon na zoni. eto nado 4tobi uznatj v kakom imeno meste naxoditsa mob ili 4ar.
pered tem kak idti na sub gde nada ukazatj 4emu budut ravni peremenie %celX i %celY esli oni butut ravni koordinatam 4ara
set %celX #CHARPOSX
set %celY #CHARPOSy
GOSUB gde
to v SUB GDE opredilitsa mesto naxozdenie 4ara.
esli nada najti mesto naxozdenija moba to nada finditem mob i ukazatj
set %celX #FINDX
set %celY #FINDy
GOSUB gde
set %zona %y , %x tut sobstveno ukazivaetsa zona de naxoditsa mob ili 4ar i isxodja iz etogo
kada vokrug net mobov skript opredelaet de 4ar i idet v sleduwuju blizajwuju k nemu zonu v SUB moveto
sub moveto
set %celX #CHARPOSX
set %celY #CHARPOSy
GOSUB gde
if %zona = 13
move 5314 1365 10s
if %zona = 12
move 5316 1352 10s
if %zona = 22
move 5296 1358 10s
if %zona = 21
move 5299 1340 10s
if %zona = 31
move 5299 1340 10s
if %zona = 41
move 5315 1339 10s
if %zona = 42
move 5332 1328 10s
if %zona = 43 2
move 5332 1345 10s
move 5346 1331 10s
if %zona = 33
move 5346 1331 10s
if %zona = 44
move 5360 1330 10s
if %zona = 45 2
move 5347 1336 10s
move 5350 1349 10s
if %zona = 34
move 5365 1346 10s
if %zona = 35
move 5364 1367 10s
if %zona = 25
move 5364 1367 10s
if %zona = 15 3
move 5364 1345 10s
move 5346 1346 10s
move 5349 1367 10s
if %zona = 24
move 5349 1367 10s
if %zona = 14
move 5331 1365 10s
set %zona x
return
ja prikrepil risunok. (predvariteljnuju sxemu kotoruju ja nakidal pered napisaniem skripta) 4tobi bilbi nagljadnij primer
!!!!!!!!!!!!!!!!!!!! VNIMANIE !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
JA PRO...TERJAL SXEMU DLJA ETOGO SKRIPTA =(( NA ETOM RISUNKE DRUGOJ DUNGEON , NO SMISL TOTZE
#71
Posted 30 December 2008 - 16:04
Все работает , я на 200 схватил , неудачно за компом рубанулся
Dlja manjakov kotorie virubajutsa pered manitorom estj ewo odin genialjnij skript =)))))))
dlja UOPILOTA =)))
esli 4ar stoit dolgoe vremja na meste vklju4aetsa budiljnik =)))))
set $1 error
set #4ek 0
:re
if hits < 20
alarm
end_if
if ( CharPosX = #x and CharPosY = #y ) or ($1 = CharPosX )
goto 4ek
end_if
wait 500
set #x CharPosX
set #y CharPosY
goto re
:4ek
if (#4x = #x and #4y = #y)
set #4ek #4ek + 1
wait 500
if #4ek > 55
alarm
goto re
end_if
goto re
end_if
set #4ek 0
set #4x #x
set #4y #y
goto re
vremja 4erez kotoroe vklju4aetsa budiljnik reguliruetsa tut:
if #4ek > 55
a esli serjezno to ja ego obi4no vklju4aju vmeste s skriptom dlja PvM. Pomogaet kada zavisaet klient
#72
Posted 30 December 2008 - 16:28
#73
Posted 30 December 2008 - 16:51
#74
Posted 30 December 2008 - 17:13
#75
Posted 30 December 2008 - 17:37
честно говоря, мне не нравится твой стиль, как ты пишешь скрипты, но там один плюс , без твоей помощи долго надо смотреть и изучать скрипт, и ты можешь зарабатывать деньги на это
=))))))
nu kak umeju piwu =)
#76
Posted 09 June 2009 - 02:13
Люди говорят я нормальный....
Но зная себя...
Я разочаровываюсь в том что я задрот !!!
#77
Posted 09 June 2009 - 02:16
0 user(s) are reading this topic
0 members, 0 guests, 0 anonymous users