Jump to content

Добро пожаловать на форум проекта RP GameWorld!

Recommended Posts

Posted
8/13/2020 в 3:44 AM, Kangaroo сказал:

Ребят, давайте срач не в этой теме делать, я на нее подписан до сих пор, чтобы отвечать на вопросы ?

ты кто по жизни? ответь на вопрос 👊

  • 2 months later...
Posted

Сегодня закончился мой путь на "gw". Проходил в пользователях 14,5 лет. Оставляю напоследок 2 ахк скрипта.

Авто-рыбалка
 

F10:: Reload
F9:: Pause

Numpad9::
While true
{
  SendMessage, 0x50,, 0x4190419,, A
  Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  {
    If A_LoopReadLine
      MyLastString := A_LoopReadLine
  }
  StringTrimLeft, MyLastString, MyLastString, 13
  List := ["Вы устали ловить рыбу, Вам надо отдохнуть.", "Нет места для рыбы, избавьтесь от неё (выбросите или продайте).", "У Вас нет червей, купите их в магазине снастей для рыбалки.", "У Вас сломалась удочка, купите новую в магазине снастей для рыбалки.", "У Вас порвалась леска, купите новую в магазине снастей для рыбалки.","У Вас сломалась катушка, купите новую в магазине снастей для рыбалки."]
  for i, element in list
  {
    If (MyLastString == element)
    {
      SendInput, {F6}/b{enter}
      Sleep, 1150
      SoundPlay, C:\Users\Alex\Music\komarovo.mp3, wait
      break
    }
  }
  RegExMatch(MyLastString, "(.*)\.(.*)\.", MyTreasure)
  If (MyTreasure1 == "Вы поймали на крючок сундук и нашли клад")
  {
      SendInput, {F6}/gr %MyLastString%{enter}
      Sleep, 1150
      SoundPlay, C:\Users\Alex\Music\ltw.mp3, wait
      break
  }
  If (MyLastString == "Сорвалась...")
  {
    SendInput, {F6}/b{enter}
    Sleep, 1150
    SendInput, {F6}/fish{enter}
    Sleep, 1150
    continue
  }
  List := ["Вы поймали: Куртка (1 кг).", "Вы поймали: Туфли (1 кг).", "Вы поймали: Мусор (2 кг).", "Вы поймали: Брюки (1 кг)."]
  for i, element in list
  {
    If (MyLastString == element)
    {
      SendInput, {F6}/releasefish{enter}
      Sleep, 1150
      SendInput, {F6}/fish{enter}
      Sleep, 1150
      continue 2
    }
  }
  RegExMatch(MyLastString, "(.*):", MyFish)
  If (MyFish == "Вы поймали:")
  {
    SendInput, {F6}/b{enter}
    Sleep, 1150
    SendInput, {F6}/fish{enter}
    Sleep, 1150
    continue
  }
  RegExMatch(MyLastString, "(.*)\.(.*)\.", MoneyBag)
  If (MoneyBag1 == "Вы поймали сумку с деньгами")
  {
    SendInput, {F6}/b{enter}
    Sleep, 1150
    SendInput, {F6}/fish{enter}
    Sleep, 1150
    continue
  }
}


АФК фарм кейсов на ярмарке (отслеживание онлайна через сайт)
 

F9:: ExitApp

Numpad1::
Loop
{
nick1 = Wayne_Static
nick2 = Ksenia_Sobchak
nick3 = Sovetskiy_Souz
nick4 = Shaman_King
nick5 = Vladimir_Lenin
Send, {F5}
Sleep, 10000
Send, ^a
Send, ^c
Click
IfInString, Clipboard, %nick1%
{
	Sleep, 12000
}
else
{
	SoundPlay, C:\Users\Alex\Music\ltw.mp3, wait
	break
}
IfInString, Clipboard, %nick2%
{
	Sleep, 12000
}
else
{
	SoundPlay, C:\Users\Alex\Music\ltw.mp3, wait
	break
}
IfInString, Clipboard, %nick3%
{
	Sleep, 12000
}
else
{
	SoundPlay, C:\Users\Alex\Music\ltw.mp3, wait
	break
}
IfInString, Clipboard, %nick4%
{
	Sleep, 12000
}
else
{
	SoundPlay, C:\Users\Alex\Music\ltw.mp3, wait
	break
}
IfInString, Clipboard, %nick5%
{
	Sleep, 12000
}
else
{
	SoundPlay, C:\Users\Alex\Music\ltw.mp3, wait
	break
}
clipboard = ;
}


Желаю удачи в ваших приключениях на "gw"
Всем пока!

GmlB6SF.png

  • I like it (+1) 1
Posted
5/22/2024 в 8:45 PM, Sex Pistols сказал:

Сегодня закончился мой путь на "gw". Проходил в пользователях 14,5 лет. Оставляю напоследок 2 ахк скрипта.

Авто-рыбалка
 

F10:: Reload
F9:: Pause

Numpad9::
While true
{
  SendMessage, 0x50,, 0x4190419,, A
  Loop, read, %A_MyDocuments%\GTA San Andreas User Files\SAMP\chatlog.txt
  {
    If A_LoopReadLine
      MyLastString := A_LoopReadLine
  }
  StringTrimLeft, MyLastString, MyLastString, 13
  List := ["Вы устали ловить рыбу, Вам надо отдохнуть.", "Нет места для рыбы, избавьтесь от неё (выбросите или продайте).", "У Вас нет червей, купите их в магазине снастей для рыбалки.", "У Вас сломалась удочка, купите новую в магазине снастей для рыбалки.", "У Вас порвалась леска, купите новую в магазине снастей для рыбалки.","У Вас сломалась катушка, купите новую в магазине снастей для рыбалки."]
  for i, element in list
  {
    If (MyLastString == element)
    {
      SendInput, {F6}/b{enter}
      Sleep, 1150
      SoundPlay, C:\Users\Alex\Music\komarovo.mp3, wait
      break
    }
  }
  RegExMatch(MyLastString, "(.*)\.(.*)\.", MyTreasure)
  If (MyTreasure1 == "Вы поймали на крючок сундук и нашли клад")
  {
      SendInput, {F6}/gr %MyLastString%{enter}
      Sleep, 1150
      SoundPlay, C:\Users\Alex\Music\ltw.mp3, wait
      break
  }
  If (MyLastString == "Сорвалась...")
  {
    SendInput, {F6}/b{enter}
    Sleep, 1150
    SendInput, {F6}/fish{enter}
    Sleep, 1150
    continue
  }
  List := ["Вы поймали: Куртка (1 кг).", "Вы поймали: Туфли (1 кг).", "Вы поймали: Мусор (2 кг).", "Вы поймали: Брюки (1 кг)."]
  for i, element in list
  {
    If (MyLastString == element)
    {
      SendInput, {F6}/releasefish{enter}
      Sleep, 1150
      SendInput, {F6}/fish{enter}
      Sleep, 1150
      continue 2
    }
  }
  RegExMatch(MyLastString, "(.*):", MyFish)
  If (MyFish == "Вы поймали:")
  {
    SendInput, {F6}/b{enter}
    Sleep, 1150
    SendInput, {F6}/fish{enter}
    Sleep, 1150
    continue
  }
  RegExMatch(MyLastString, "(.*)\.(.*)\.", MoneyBag)
  If (MoneyBag1 == "Вы поймали сумку с деньгами")
  {
    SendInput, {F6}/b{enter}
    Sleep, 1150
    SendInput, {F6}/fish{enter}
    Sleep, 1150
    continue
  }
}


АФК фарм кейсов на ярмарке (отслеживание онлайна через сайт)
 

F9:: ExitApp

Numpad1::
Loop
{
nick1 = Wayne_Static
nick2 = Ksenia_Sobchak
nick3 = Sovetskiy_Souz
nick4 = Shaman_King
nick5 = Vladimir_Lenin
Send, {F5}
Sleep, 10000
Send, ^a
Send, ^c
Click
IfInString, Clipboard, %nick1%
{
	Sleep, 12000
}
else
{
	SoundPlay, C:\Users\Alex\Music\ltw.mp3, wait
	break
}
IfInString, Clipboard, %nick2%
{
	Sleep, 12000
}
else
{
	SoundPlay, C:\Users\Alex\Music\ltw.mp3, wait
	break
}
IfInString, Clipboard, %nick3%
{
	Sleep, 12000
}
else
{
	SoundPlay, C:\Users\Alex\Music\ltw.mp3, wait
	break
}
IfInString, Clipboard, %nick4%
{
	Sleep, 12000
}
else
{
	SoundPlay, C:\Users\Alex\Music\ltw.mp3, wait
	break
}
IfInString, Clipboard, %nick5%
{
	Sleep, 12000
}
else
{
	SoundPlay, C:\Users\Alex\Music\ltw.mp3, wait
	break
}
clipboard = ;
}


Желаю удачи в ваших приключениях на "gw"
Всем пока!

GmlB6SF.png

А онлайн что бы пользоваться ими, я буду поднимать?

  • GW UP! 1
  • 4 months later...
Posted
5/22/2024 в 8:45 PM, Sex Pistols сказал:

МНОГАБУКАВ

если что я передумал уходить, т.к. открыл для себя мир читов на гв. з.ы. для рыбалки там надо сначала ввести в чат /fish и строчки где проигрывается музыка заменить на свои пути, это оповещалка при сундуках и когда рыбалка закончена. Вообще скрипт фигня, но зато есть все строки для событий кто захочет сам себе быстро допилит по уму

  • 2 months later...
  • 4 weeks later...
Posted
12/24/2024 в 8:57 PM, Morf_Fable сказал:

Кен Гуру куда пропал

Да тут вроде ничего не происходит уже давно, поэтому редко захожу)

Posted
1 час назад, Kangaroo сказал:

Да тут вроде ничего не происходит уже давно, поэтому редко захожу)

 

Помоги с биндом  пожалуйста. Нужен автоматический закуп 98х3 в притоне и автоматическая выгрузка 98х3 на склад. То что в теме нашел, неактуально всё

  • 3 weeks later...
Posted
1/19/2025 в 10:50 PM, ☆ Lionchik ☆ сказал:

 

Помоги с биндом  пожалуйста. Нужен автоматический закуп 98х3 в притоне и автоматическая выгрузка 98х3 на склад. То что в теме нашел, неактуально всё

 

сам уже сделал

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...