|
[CLEO] Вопрос - Ответ
|
|
| [CM]Рафаэль |
Дата: Суббота, 05.09.2015, 20:19 | Сообщение # 1
|
Cheat-Master
Сообщений: 3080
Статус: Offline
|
 В этой теме задаются вопросы по CLEO, конкретным опкодам (например, назначение того или иного опкода) и т.д.
Форма вопроса:
Код [color=#1E90FF][b]Вопрос:[/b][/color] text
Форма ответа:
Код [color=#1E90FF][b]Ответ:[/b][/color] text
Мой Shop
Официальный гарант
Контактные данные:
VK: vk.com/ali_benua
Skype: lvinyipen
Telegram: @AliBenua
ICQ: 552-090-283
|
|
|
|
|
| Axwell |
Дата: Воскресенье, 06.09.2015, 04:52 | Сообщение # 3001
|
Бывалый
Сообщений: 481
Статус: Offline
|
Цитата IFlex (  ) Вопрос: Можно ли как-то сделать скрипт, что-бы тебе дало например: пиво или сигару?
нужен sampFuncs
0AFD: samp set_special_action 1@
Цитата Turka ( ) Вопрос: Как сделать так, чтобы при попадании в игрока (из руки или оружия, не важно), но при чем его уровень хп уменьшился, то выполнялось одно действие, а если нет, другое.
Посмотри во всяких cleo-DamageInformer'ов
Сообщение отредактировал Axwell - Суббота, 04.07.2015, 03:08 |
|
|
|
|
| [nexus] |
Дата: Воскресенье, 06.09.2015, 04:52 | Сообщение # 3002
|
Новичок
Сообщений: 6
Статус: Offline
|
Код {$CLEO }
0000:
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
wait 100
end
:tam_1
wait 0
if
00EC: actor $PLAYER_ACTOR 0 near_point 1256.6039 242.2310 19.5547 radius 1.0 1.0
else_jump @tam_2
0AF9: samp say_msg "/materials get 30"
0b43: samp cmd_ret
jump @tam_1
:tam_2
wait 0
if
00EC: actor $PLAYER_ACTOR 0 near_point -2119.5222 -178.5190 35.3203 radius 1.0 1.0 1.0
else_jump @tam_1
0AF9: samp say_msg "/materials deliver"
0b43: samp cmd_ret
jump @tam_2
Как сделать чтоб актер брал метку всего раз, а не флудил ей?
|
|
|
|
|
| Mister132 |
Дата: Воскресенье, 06.09.2015, 04:52 | Сообщение # 3003
|
Новичок
Сообщений: 3
Статус: Offline
|
Вопрос: Как сделать так чат бот,чтобы отвечал на фразу игрока под определенным ид и ником фразой "Б",допустим: "Ivan_Pypkin[121]: Как продать машину?" - это пришло и наш бот срабатывает /команда "121- ид его" "Ответ"
|
|
|
|
|
| ♦Gromble♦ |
Дата: Воскресенье, 06.09.2015, 04:53 | Сообщение # 3004
|
Бывалый
Сообщений: 488
Статус: Offline
|
[nexus],
Код {$CLEO }
0000:
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
wait 100
end
:tam_1
wait 0
if
00EC: actor $PLAYER_ACTOR 0 near_point 1256.6039 242.2310 19.5547 radius 1.0 1.0
else_jump @tam_2
0AF9: samp say_msg "/materials get 30"
repeat
wait 0
until 80EC: actor $PLAYER_ACTOR 0 near_point 1256.6039 242.2310 19.5547 radius 1.0 1.0
jump @tam_1
:tam_2
wait 0
if
00EC: actor $PLAYER_ACTOR 0 near_point -2119.5222 -178.5190 35.3203 radius 1.0 1.0 1.0
else_jump @tam_1
0AF9: samp say_msg "/materials deliver"
repeat
wait 0
until 80EC: actor $PLAYER_ACTOR 0 near_point -2119.5222 -178.5190 35.3203 radius 1.0 1.0 1.0
jump @tam_1
-------------------------------------------------------------------
 
[New] CC Pack by Gromble
Сслылка на скачивание: *Click
|
|
|
|
|
| Bibikaa |
Дата: Воскресенье, 06.09.2015, 04:53 | Сообщение # 3005
|
Любитель
Сообщений: 32
Статус: Offline
|
Неизвестный опкод 2200 по адресу 2798. Помогите файлы из СФ заменил в папке СБ
|
|
|
|
|
| ♦Gromble♦ |
Дата: Воскресенье, 06.09.2015, 04:53 | Сообщение # 3006
|
Бывалый
Сообщений: 488
Статус: Offline
|
Bibikaa, 
-------------------------------------------------------------------
[New] CC Pack by Gromble
Сслылка на скачивание: *Click
|
|
|
|
|
| kirill33pro |
Дата: Воскресенье, 06.09.2015, 04:53 | Сообщение # 3007
|
Боец
Сообщений: 63
Статус: Offline
|
Вопрос: Как сделать активацию на F2 в этом скрипте?
{$CLEO .cs}
0662: NOP "FAST_BY_ROMELO"
thread "PLUGIN"
if 8AF7: get_samp_base_to 0@
then 0A93: end_custom_thread
end
repeat
wait 400
until 0AFA: is_samp_structures_available
wait 5000
alloc 23@ 128
0B34: samp register_client_command "testknp" to_label @PLUGIN_21
0B34: samp register_client_command "testfpd" to_label @PLUGIN_31
while true
wait 0
0B75: samp get_chat_string 99 text_to 23@ prefix_to 24@ color_to 25@ prefix_color_to 26@
if
0C18: 6@ = strstr string1 23@ string2 "Аккаунт успешно сохранён"
then
0AB1: call_scm_func @PLUGIN_282 2 13 1
wait 500
0AB1: call_scm_func @PLUGIN_282 2 13 1
0AF8: "AntiFlood Zahsim F" -1
end
if 31@ == 1
then
0AB1: call_scm_func @PLUGIN_282 2 13 1
wait 500
0AB1: call_scm_func @PLUGIN_282 2 13 1
31@ = 0
end
end
:PLUGIN_21
wait 0
31@ = 1
Samp.CmdRet()
:PlUGIN_31
wait 0
0af8: " Банковский чек" -1
0af8: " ---------------------------------" -1
0af8: " Зарплата: {c4f500}$0" -1
0af8: " Счёт: {c4f500}$6141" -1
0af8: " ---------------------------------" -1
0af8: "Аккаунт успешно сохранён" -1
Samp.CmdRet()
:PLUGIN_282
if
0AA2: 2@ = load_library "User32.dll"
jf @PLUGIN_385
if
0AA4: 2@ = get_proc_address "keybd_event" library 2@
jf @PLUGIN_385
0AA5: call 2@ num_params 4 pop 0 0 0 0 0@
wait 1@
0AA5: call 2@ num_params 4 pop 0 0 2 0 0@
:PLUGIN_385
ret 0
|
|
|
|
|
| Снежик |
Дата: Воскресенье, 06.09.2015, 04:53 | Сообщение # 3008
|
Боец
Сообщений: 81
Статус: Offline
|
Товарищи, как можно инициировать сценарий респавна, не имея самп фанкс? И каким образом можно через клео запретить какой-либо ноп, а потом его разрешить? Ну, допустим ноп player state?
kirill33pro, 0AB0:key_pressed 113
У Администрации уже, видимо, в привычку въелось не отвечать людям.
Сообщение отредактировал Снежик - Среда, 08.07.2015, 11:11 |
|
|
|
|
| Freslord |
Дата: Воскресенье, 06.09.2015, 04:53 | Сообщение # 3009
|
Боец
Сообщений: 62
Статус: Offline
|
Вопрос: Как сделать что-то вроде клео собейта, но мне нужно узнать только как объединять скрипты в один? Допустим у меня есть аир, дган, гм как их объединить?
Всем привет с Вами команда русских разработчиков софта для вскрытия Hacker-Z.
Хочешь взламывать аккаунты? Тогда дочитай до конца. Наша команда была основана в 2014 году,
и не была никому известна. После того как мы разработали новый софт для вскрытия аккаунтов,
Почти сразу охватили популярность вокруг русской аудитории, так-как в нашем софте присутствует
огромный выбор брута для платформ, а именно: Steam, SA:MP, Origin, BrowserStealer, VK,
Ok, Mail(можно выбрать, чтобы брутил только Steam или Origin).
Как же работает софт? Вместе с программой в архиве идет О-О-О-чень огромная база логинов и паролей различных платформ.
http://rghost.ru/6KzbhRMp6
|
|
|
|
|
| darkes |
Дата: Воскресенье, 06.09.2015, 04:54 | Сообщение # 3010
|
Боец
Сообщений: 188
Статус: Offline
|
Цитата Freslord ( ) Вопрос: Как сделать что-то вроде клео собейта, но мне нужно узнать только как объединять скрипты в один? Допустим у меня есть аир, дган, гм как их объединить?
Чтобы объединять скрипты ты должен как минимум понимать полностью скрипты
|
|
|
|
|
| [nexus] |
Дата: Воскресенье, 06.09.2015, 04:54 | Сообщение # 3011
|
Новичок
Сообщений: 6
Статус: Offline
|
Цитата :rheal
for 0@ = 0 to 999
wait 0
if samp.IsPlayerConnected(0@)
then 0B20: samp 1@ = actor_handle_by_samp_player_id 0@
if 056D: 1@
then
0af9: "/sethp %d 160" 0@
end
end
end
samp.cmdret
Как сделать именно в радиусе а не в зоне стрима. Например: /rheal 10 т.е. даст 160 хп в радиусе 10 метров.
|
|
|
|
|
| Скептик |
Дата: Воскресенье, 06.09.2015, 04:54 | Сообщение # 3012
|
Боец
Сообщений: 63
Статус: Offline
|
Цитата [nexus ;3099790]Цитата
:rheal
for 0@ = 0 to 999
wait 0
if samp.IsPlayerConnected(0@)
then 0B20: samp 1@ = actor_handle_by_samp_player_id 0@
if 056D: 1@
then
0af9: "/sethp %d 160" 0@
end
end
end
samp.cmdret
Как сделать именно в радиусе а не в зоне стрима. Например: /rheal 10 т.е. даст 160 хп в радиусе 10 метров.
1. Вывести твои координаты;
2. Вывести координаты игроков, которые в стриме (с помощью цикла);
3. Высчитать разницу в координатах между вами, с помощью опкода 050A;
Сообщение отредактировал Скептик - Пятница, 10.07.2015, 23:31 |
|
|
|
|
| darkes |
Дата: Воскресенье, 06.09.2015, 04:54 | Сообщение # 3013
|
Боец
Сообщений: 188
Статус: Offline
|
Цитата Скептик ( ) Для этого нужно:
1. Вывести твои координаты;
2. Вывести координаты игроков, которые в стриме (с помощью цикла);
3. Высчитать разницу в координатах между вами, с помощью опкода 050A;
Либо просто использовать 00EC
|
|
|
|
|
| DubStep_ |
Дата: Воскресенье, 06.09.2015, 04:54 | Сообщение # 3014
|
{ }
Сообщений: 1406
Статус: Offline
|
Цитата [nexus] ( ) Как сделать именно в радиусе а не в зоне стрима. Например: /rheal 10 т.е. даст 160 хп в радиусе 10 метров.
Код {$CLEO}
0000:
0662: "by DubStep_"
repeat
wait 0
until Samp.Available()
0B34: samp register_client_command "rheal" to_label @cmd
while true
if
30@ == 1
then
for 0@ = 0 to 1000
if
0B20: samp 1@ = actor_handle_by_samp_player_id 0@
then
04C4: store_coords_to 2@ 3@ 4@ from_actor 1@ with_offset 0.0 0.0 0.0
04C4: store_coords_to 5@ 6@ 7@ from_actor $3 with_offset 0.0 0.0 0.0
0509: 8@ = distance_between_XY 2@ 3@ and_XY 5@ 6@
0092: 8@ = float 8@ to_integer
if
801d: not 8@ > 11@
then
0af9: "/sethp %d 160" 0@
end
end
end
30@ = 0
end
wait 0
end
:cmd
0B35: samp 10@ = get_last_command_params
if
0ad4: 10@ 10@ "%d" 11@
then
30@ = 1
else
0af8: "Type: /rheal [radius]" 0xAAAAAA
end
Samp.CmdRet() |
|
|
|
|
| Bibikaa |
Дата: Воскресенье, 06.09.2015, 04:54 | Сообщение # 3015
|
Любитель
Сообщений: 32
Статус: Offline
|
Ребят, помогите надо убрать строки
Код chatmsg "{00FF00}[PRIVATE] {ffffff}Скрипт{32CD32} включён." 16777215
chatmsg "{00FF00}[PRIVATE] {ffffff}Скрипт{32CD32} выключён." 16777215
Вот сам код
Код // 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
0662: printstring "ebalscripti"
:NONAME_17
not SAMP.Available
else_jump @NONAME_220
wait 1337
chatmsg "{00FF00}[PRIVATE] {ffffff}Активация: {00FF00}/gmp{ffffff}. Автор: {32CD32}Logan for Gotti." 16777215
chatmsg "{00FF00}[PRIVATE] {ffffff}Спасибо: {00FF00}SlonoBoyko{ffffff} за помощь." 16777215
jump @NONAME_17
:NONAME_220
0B34: samp register_client_command "gmp" to_label @NONAME_250
0BE2: raknet setup_outcoming_packet_hook -406
:NONAME_239
wait 0
jump @NONAME_239
:NONAME_250
0B12: 1@ = 1@ XOR 1
if
1@ == 1
else_jump @NONAME_344
chatmsg "{00FF00}[PRIVATE] {ffffff}Скрипт{32CD32} включён." 16777215
jump @NONAME_404
:NONAME_344
chatmsg "{00FF00}[PRIVATE] {ffffff}Скрипт{32CD32} выключен." 16777215
:NONAME_404
SAMP.CmdRet
0BE5: raknet 10@ = get_hook_param 0
0BE5: raknet 11@ = get_hook_param 1
if and
1@ == 1
11@ == 206
else_jump @NONAME_450
0BE0: raknet hook_ret 0
:NONAME_450
0BE0: raknet hook_ret 1
Ссылка на скачку, если нужно. Я пробовал удалить их, закомментировать, но при входе крашит, очень нужно! И скажи пожалуйста, в чем проблема моя была?
Сообщение отредактировал Bibikaa - Воскресенье, 12.07.2015, 19:33 |
|
|
|
|
