CLEO [Galaxy-rpg] Auto FSD

Статус
В этой теме нельзя размещать новые ответы.

Daim

Новичок
Автор темы
24
2
Описание: Автоматический укол /fsd [id], при приближении к человеку в коряке.
Требования:
SAMPFUNCS & CLEO 4.3+
Активация: 1+2+3 одновременно.
Деактивация: F2.

Автор: Daim and Rasul
 

Вложения

  • FSD.cs
    897 байт · Просмотры: 56

Daim

Новичок
Автор темы
24
2
А, и еще, конфликтует с auto meds если повысить радиус, не пытайтесь.
 

sobaqa

Новичок
59
9
Где стилер? Код открыт.
Носом меня тыкни плз.
Код:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP
wait 10000
chatmsg "----------------------------------------" 82567
chatmsg "Auto FSD by Daim and Rasul" 65280
chatmsg "Activathion for keys 1 + 2 + 3 one time" 65280
chatmsg "Deactivathion for key F2" 65280
chatmsg "----------------------------------------" 82567

:NONAME_226
wait 0
if and
key_down 49
key_down 50
key_down 51
else_jump @NONAME_563
chatmsg "Script ON. Auto FSD by Daim" 65280
wait 500

:NONAME_295
wait 0
if
call @NONAME_577 0 0@ 1@
else_jump @NONAME_495
2@ = SAMP.GetPlayerHealthByActorHandle(1@)
if
0449:   actor $PLAYER_ACTOR in_a_car
else_jump @NONAME_361
wait 0
jump @NONAME_490

:NONAME_361
if
   not 2@ >= 15
else_jump @NONAME_490
say "/fsd %d" 1@
wait 200
chatmsg "Player HP before - %d" 16776960 2@
wait 500
2@ = SAMP.GetPlayerHealthByActorHandle(1@)
chatmsg "Player HP after - %d" 16776960 2@
wait 100
jump @NONAME_495

:NONAME_490
wait 200

:NONAME_495
if
key_down 113
else_jump @NONAME_556
chatmsg "Script OFF. Thnx for using <3" 16711680
jump @NONAME_226

:NONAME_556
jump @NONAME_295

:NONAME_563
jump @NONAME_226
jump @NONAME_226

:NONAME_577
3@ = 2.0
4@ = 16777215
0A8D: 0@ = read_memory 12010640 size 4 virtual_protect 0
0@ += 4
0A8D: 0@ = read_memory 0@ size 4 virtual_protect 0
1@ = 0

:NONAME_637
0A8D: 2@ = read_memory 0@ size 1 virtual_protect 0
0@ += 1
if and
  2@ >= 0
   not 2@ >= 128
else_jump @NONAME_772
005A: 2@ += 1@ // (int)
if or
003C:   $PLAYER_ACTOR == 2@ // (int)
856D:   not actor 2@ defined
else_jump @NONAME_721
jump @NONAME_772

:NONAME_721
call @NONAME_838 1 2@ 5@
if
0025:   3@ > 5@ // (float)
else_jump @NONAME_772
0087: 3@ = 5@ // (float)
0085: 4@ = 2@ // (int)

:NONAME_772
1@ += 256
  1@ > 35584
else_jump @NONAME_637
if
4@ = SAMP.GetSAMPPlayerIDByActorHandle(4@)
else_jump @NONAME_825
return_true
jump @NONAME_827

:NONAME_825
return_false

:NONAME_827
ret 2 3@ 4@

:NONAME_838
Actor.StorePos(0@, 1@, 2@, 3@)
Actor.StorePos($PLAYER_ACTOR, 4@, 5@, 6@)
050A: 7@ = distance_between_XYZ 4@ 5@ 6@ and_XYZ 1@ 2@ 3@
ret 1 7@
 

Breakaway

Просто друг, но не форума
Проверенный
464
213
Один раз не пидорас. Он и сейчас норм
Учитывая то, за что могут дать выговор модеру/лидеру или вообще снять - нет, это далеко не хороший сервер. Слишком много ситуаций, в которых ГА/ГМ разбираться не хотят. Бездельники модераторы, которые не хотят ничего делать. Лишь малая часть которых на одном энтузиазме пытаются сделать сервер лучше.
 
Статус
В этой теме нельзя размещать новые ответы.