Вопросы по CLEO-скриптингу

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,696
1,469
Код:
0B35: samp 0@ = get_last_command_params
if
0AD4: 33@ string 0@ format "%s" 1@
then
    if
    0C14: strcmp string1 'sf' string2 1@
    then
        0AF8: samp add_message_to_chat "+" color 0xff00ff
    else
        0AF8: samp add_message_to_chat "-" color 0xff00ff
    end
Возвращает false и варнинг в чат, видимо этим опкодом нельзя или я что-то забыл?
Зачем?
Код:
0B35: samp 0@ = get_last_command_params
И так возвращает строку, зачем её форматировать?
 

Thomas_Johnson

Известный
Проверенный
183
21
Зачем?
Код:
0B35: samp 0@ = get_last_command_params
И так возвращает строку, зачем её форматировать?

Спасибо, просто с цифр у меня выводилось что-то непонятное и нужно было форматировать, чтобы избежать этого
 

SeJIya

Новичок
45
2
Ребята, как реализовать такое:
При нажатии на кнопку начинается выполнятся бесконечный повтор чего - либо, а после второго нажатия на эту же кнопку, повотор дейсвтия останавливался.
 

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,696
1,469
Ребята, как реализовать такое:
При нажатии на кнопку начинается выполнятся бесконечный повтор чего - либо, а после второго нажатия на эту же кнопку, повотор дейсвтия останавливался.

Код:
{$CLEO}
 
0000:
 
while true
    wait 0
    if
        0AB0: 113 // F2, активация.
    then
        repeat
            wait 0
            // Цикл
        until 8AB0: 113 // F2, деактивация.
        wait 200
    end
end
 
  • Нравится
Реакции: artF, SeJIya и VorTexX

VorTexX

Новичок
10
0
Помогите..
Нужно чтобы вот это работало в машине. А получается что выкидывает на долю секунды и обратно. Надо что-то подправить чтобы этого не происходило..
Код:
:AA_323
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 109
0AC8: 4@ = allocate_memory_size 68
0AB1: call_scm_func @AA_491 3 4@ 3@ 68
0085: 5@ = 4@ // (int)
5@ += 6
0A8C: write_memory 5@ size 4 value 0@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 1@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 2@ virtual_protect 0
5@ = RakNet.NewBitStream()
RakNet.Write(5@, 212, BS_TYPE_BYTE, 1)
RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.Send(5@, 1, 1, 0)
RakNet.DeleteBitStream(5@)
0AC9: free_allocated_memory 4@
0AB2: ret 0
 
:AA_491
2@ -= 1
3@ = 0
 
:AA_505
0A8D: 4@ = read_memory 1@ size 1 virtual_protect 0
0A8C: write_memory 0@ size 1 value 4@ virtual_protect 0
1@ += 1
0@ += 1
3@ += 1
001D:  3@ > 2@ // (int)
jf @AA_505
0AB2: ret 0
p.s. код взят из "Шахта Advance by mgmoldova"
 

Thomas_Johnson

Известный
Проверенный
183
21
Помогите..
Нужно чтобы вот это работало в машине. А получается что выкидывает на долю секунды и обратно. Надо что-то подправить чтобы этого не происходило..
Код:
:AA_323
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 109
0AC8: 4@ = allocate_memory_size 68
0AB1: call_scm_func @AA_491 3 4@ 3@ 68
0085: 5@ = 4@ // (int)
5@ += 6
0A8C: write_memory 5@ size 4 value 0@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 1@ virtual_protect 0
5@ += 4
0A8C: write_memory 5@ size 4 value 2@ virtual_protect 0
5@ = RakNet.NewBitStream()
RakNet.Write(5@, 212, BS_TYPE_BYTE, 1)
RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.Send(5@, 1, 1, 0)
RakNet.DeleteBitStream(5@)
0AC9: free_allocated_memory 4@
0AB2: ret 0
 
:AA_491
2@ -= 1
3@ = 0
 
:AA_505
0A8D: 4@ = read_memory 1@ size 1 virtual_protect 0
0A8C: write_memory 0@ size 1 value 4@ virtual_protect 0
1@ += 1
0@ += 1
3@ += 1
001D:  3@ > 2@ // (int)
jf @AA_505
0AB2: ret 0
p.s. код взят из "Шахта Advance by mgmoldova"

Код:
:Incar
// Example: 0AB1: call @Incar 3 xyz 10@ 11@ 12@
5@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
5@ = SAMP.GetPlayerStruct(5@)
5@ += 177 // local inCarData
0AC8: 4@ = allocate_memory_size 63
0ab1: call @memcpy 3 destination 4@ source 5@ size 63  // copy original incar data to my incar data buffer
0085: 5@ = 4@ // (int)
//0A8C: write_memory 5@ size 2 value 3@ virtual_protect 0 // sVehicleID
5@ += 24 // fMoveSpeed[0] ( X )
0A8C: write_memory 5@ size 4 value 0@ virtual_protect 0
5@ += 4 // fMoveSpeed[1] ( Y )
0A8C: write_memory 5@ size 4 value 1@ virtual_protect 0
5@ += 4 // fMoveSpeed[2] ( Z )
0A8C: write_memory 5@ size 4 value 2@ virtual_protect 0
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write PACKET_VEHICLE_SYNC type BS_TYPE_BYTE size 1
0B40: raknet bit_stream 5@ write 4@ type BS_TYPE_ARRAY size 63
0B42: raknet send bit_stream 5@ priority PRIORITY_HIGH reliability UNRELIABLE_SEQUENCED ordering_channel 0
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
0AB2: ret 0
Фейк координаты для машины
 

VorTexX

Новичок
10
0
Код:
0B40: raknet bit_stream 5@ write PACKET_VEHICLE_SYNC type BS_TYPE_BYTE size 1

Недостаточно параметров. ожидалось 4.
 

Thomas_Johnson

Известный
Проверенный
183
21
Вставь вот отсюда значения:
Код:
// BitStream Types
const 
BS_TYPE_BYTE = 0
BS_TYPE_BOOL = 1
BS_TYPE_SHORT = 2
BS_TYPE_INT = 3
BS_TYPE_FLOAT = 4
BS_TYPE_STRING = 5
BS_TYPE_ARRAY = 5
BS_TYPE_BITSTREAM = 6
end
 
// Packet Priorities
const
PRIORITY_SYSTEM = 0
PRIORITY_HIGH = 1
PRIORITY_MEDIUM = 2
PRIORITY_LOW = 3
end
 
// Reliabilities
const
UNRELIABLE = 0
UNRELIABLE_SEQUENCED = 1
RELIABLE = 2
RELIABLE_ORDERED = 3
RELIABLE_SEQUENCED = 4
end
 
// RPC's
const
RPC_SERVERJOIN = 152
RPC_SERVERQUIT = 153
RPC_INITGAME = 154
RPC_CLIENTJOIN = 0x18
RPC_NPCJOIN = 155
RPC_DEATH = 0x0C
RPC_REQUESTCLASS = 0x8A
RPC_REQUESTSPAWN = 0x8B
RPC_SETINTERIORID = 0x75
RPC_SPAWN = 0x0B
RPC_CHAT = 0x66
RPC_ENTERVEHICLE = 0x19
RPC_EXITVEHICLE = 0x1A
RPC_DAMAGEVEHICLE = 0x27
RPC_MENUSELECT = 0x19
RPC_MENUQUIT = 0x9B
RPC_SCMEVENT = 0x90
RPC_WORLDPLAYERADD = 92
RPC_WORLDPLAYERDEATH = 38
RPC_WORLDPLAYERREMOVE = 35
RPC_WORLDVEHICLEADD = 36
RPC_WORLDVEHICLEREMOVE = 37
RPC_UPDATESCORESPINGSIPS = 0x1B
RPC_GAMEMODERESTART = 100
RPC_CONNECTIONREJECTED = 13
RPC_CLIENTMESSAGE = 141
RPC_WORLDTIME = 106
RPC_WEATHER = 19
RPC_SERVERCOMMAND = 0x74
RPC_PICKEDUPPICKUP = 0x92
RPC_VEHICLEDESTROYED = 0x97
RPC_DIALOGRESPONSE = 21
RPC_PLAYAUDIOSTREAM = 45
RPC_CLICKPLAYER = 0x16
RPC_CLICKTEXTDRAW = 0x52
RPC_MAPMARKER = 0x76
RPC_PLAYERGIVETAKEDAMAGE = 0x54
RPC_ENTEREDITOBJECT = 0x57
RPC_EDITOBJECT = 0x56
end
 
// Packets
const
PACKET_SET_RANDOM_NUMBER_SEED = 0
PACKET_SECURED_CONNECTION_RESPONSE = 1
PACKET_SECURED_CONNECTION_CONFIRMATION = 2
PACKET_CONNECTION_REQUEST = 6
PACKET_AUTH_KEY = 7
PACKET_CONNECTED_PONG = 9
PACKET_INTERNAL_PING = 10
PACKET_PING = 11
PACKET_PING_OPEN_CONNECTIONS = 12
PACKET_REQUEST_STATIC_DATA = 13
PACKET_RPC = 16
PACKET_RPC_REPLY = 17
PACKET_RPC_MAPPING = 18
PACKET_BROADCAST_PINGS = 19
PACKET_DETECT_LOST_CONNECTIONS = 20
PACKET_OPEN_CONNECTION_REQUEST = 21
PACKET_OPEN_CONNECTION_REPLY = 22
PACKET_CONNECTION_REQUEST_ACCEPTED = 24
PACKET_CONNECTION_ATTEMPT_FAILED = 25
PACKET_NEW_INCOMING_CONNECTION = 26
PACKET_NO_FREE_INCOMING_CONNECTIONS = 27
PACKET_DISCONNECTION_NOTIFICATION = 28 
PACKET_CONNECTION_LOST = 29
PACKET_RSA_PUBLIC_KEY_MISMATCH = 30
PACKET_CONNECTION_BANNED = 31
PACKET_INVALID_PASSWORD = 32
PACKET_MODIFIED_PACKET = 33
PACKET_TIMESTAMP = 34
PACKET_PONG = 35
PACKET_RECEIVED_STATIC_DATA = 36
PACKET_REMOTE_DISCONNECTION_NOTIFICATION = 37
PACKET_REMOTE_CONNECTION_LOST = 38
PACKET_REMOTE_NEW_INCOMING_CONNECTION = 39
PACKET_REMOTE_EXISTING_CONNECTION = 40
PACKET_REMOTE_STATIC_DATA = 41
 
PACKET_UNOCCUPIED_SYNC = 209
PACKET_TRAILER_SYNC = 210
PACKET_PASSENGER_SYNC = 211
PACKET_PLAYER_SYNC = 212
PACKET_MARKERS_SYNC = 213
PACKET_WEAPONS_UPDATE = 214
PACKET_SPECTATOR_SYNC = 215
PACKET_AIM_SYNC = 216
PACKET_VEHICLE_SYNC = 217
PACKET_RCON_COMMAND = 218
PACKET_RCON_RESPONCE = 219
PACKET_STATS_UPDATE = 220
end
 

gcode

нестандартное звание звание звание звание звани...
Друг
789
357
Как вывести мышку на экран без вывода диалога и открытия чата?
 

yanderu2

Новичок
37
2
Бля ну можно замутить такую фигру
Смотри Можно дать твин гам контракт и когда набирают 999 мешков, они тп к прорабу стоить 5 секунд думаю, за эти 5 секунд пробар дать зп успеют дам прораб зп​