Vendetta HLTV bot V.1.2

[vendetta]

שם הקוד: HLTV bot
יוצר: Vendetta
גירסא: 1.2
תיאור: מאפשר שליטה מלאה על שרת מסוג HLTV בעזרת חיבור לקונסול השרת
הפעלה: קליק ימיני בכל מקום , בלשונית HLTV יש ללחוץ set IP , לכתוב את האיפי פורט של שרת הHLTV ולאחר מיכן ללחוץ על Dialog באותה לשונית, לאחר מיכן יש להכניס את סיסמת האדימין של השרת ולעשות "connect"
תמונה:


קוד:

קוד: בחר הכל

_|      _|  _|_|_|_|_|          |_ | |
_|      _|      _|_| Vendetta |_   | |
_|_|_|_|_| HLTV _|  _|      |_     | |
_|10xTo _| BOT  _|    _|  |_       | |
_|Mircx _|_|_|_|_|      _|         | |
___________________________________| |
_____________________________________|

on *:udpread:challenge.rcon:{
  sockread -f %challenge.rcon
  set %challenge.rcon $gettok(%challenge.rcon,3,32)
}
alias rconcmd {
  sockudp -k rconcmd $gettok(%ip,1,58) $gettok(%ip,2,58) $str($chr(255),4) $+ rcon %challenge.rcon " $+ %Rconpass $+ " $1-
}
alias start {
  sockclose challenge.rcon
  sockudp -k challenge.rcon $gettok(%ip,1,58) $gettok(%ip,2,58) $str($chr(255),4) $+ challenge rcon
  .timer 1 1 rconcmd $1-
}
on *:udpread:rconcmd:{
  sockread &HL
  breplace &HL 0 254
  var %x 1
  while ($gettok($gettok($HLVAR,%x,123456778),1,255)) { did -i hltvd 5 1 $v1 | inc %x | .timereror off }
  did -e hltvd 7 | did -b hltvd 3 |  did -b hltvd 4
}
alias HLVAR { return $bvar(&HL,1,$bvar(&HL,0)).text }
dialog HLTVD {
  title "HltvBot :]  V1.2"
  size -1 -1 156 93
  option dbu
  box "", 1, 2 2 83 35
  edit "<AdminPassword>", 3, 32 10 50 10, center
  text "Password:", 2, 5 11 25 10, center
  button "Connect", 4, 5 22 77 10
  edit "           Console", 5, 89 5 64 72, read autovs autohs vsbar multi hsbar
  edit "<command>", 7, 89 79 64 10, autohs autovs center
  text "The boy by Vendetta V.1.2 ", 6, 2 41 83 8, disable center
  text "To connect HLTV Serv you need to type the AdminPassword into connect Box", 8, 6 49 74 27, center
  button "Send", 9, 11 80 67 9
  box "", 10, 3 35 82 42
}
on *:dialog:hltvd:*:*:{
  if ($devent == init) { did -b hltvd 7 | did -b hltvd 9 | did -b hltvd 4 }
  if ($devent == edit) {
    if ($did == 3) { did -e hltvd 4 }
    if ($did == 7) { did -e hltvd 9 }
  }
  if ($devent == sclick) {
    if ($did == 4) { set %Rconpass $did(3).text | start help | .timereror 1 6 did -i hltvd 5 1 --------!!Erorr!!-------- }
    if ($did == 9) { rconcmd $did(hltvd,7).text }
  }
}
menu * {
  Hltv Bot
  .Dialog:/dialog -mdo HLTVD HLTVD
  .set IP:/set %ip $$?="The ip of the HltveServ:"
}


[uns]

חדש לי הדבר הזה, כנראה שאני יותר מדי לא מעודכן בשנה האחרונה.
כל הכבוד

[Ocean]

קוראים לדיאלוג HLTVD
וכל הפקודות של הדיאלוג הם כלפי הדיאלוג new_table
תקן את זה וגם בלולאה של ה WHILE יש did -i new_table
חוץ מזה מושלם

[vendetta]

Ocean כתב:

קוראים לדיאלוג HLTVD
וכל הפקודות של הדיאלוג הם כלפי הדיאלוג new_table
תקן את זה וגם בלולאה של ה WHILE יש did -i new_table
חוץ מזה מושלם

חחח לא שמתי לב , תודה.
באתחלה בניתי את זה באמת על new_table אבל שרציתי לפרסם פה זה ניראה לי לא מקצועי XD

[KaryoS]

תודה

[Nixxo]

תודה..

[clinixoNN]

תודה איך משתמשים?

[clinixoNN]

האם זה עובד גם בפרוץ?

[Disel]

clinixoNN כתב:

האם זה עובד גם בפרוץ?

נראה לי שכן אם לסרבר יש אפשרות של HLTV אז כן.

[qurexe]

חיפשתי כזה.. תודה אחי

[Doof]

תומר יכלי.

[Pain]

אפה ההורדה?

[Arthas]

זה קוד, לא הורדה.
אתה צריך להעתיק את הקוד, ולהדביק בRemote - Alt + R. ואז הבוט ישר יעבוד אצלך על המירק שלך.