|
[CLEO] Помощь по редактированию скриптов
|
|
| BERG |
Дата: Суббота, 05.09.2015, 21:49 | Сообщение # 586
|
Бывалый
Сообщений: 490
Статус: Offline
|
ВАЖНО: если вы хотите сменить клавишу активации:
Sanny Builder > Правка > Заменить:
Искать: здесь пишем 0AB0: key_pressed 89
Заменить на: здесь пишем 0AB0: key_pressed (любая другая цифра > коды кнопок смотреть в Sanny Builder > Справка > Помощь > Cleo 3 Code Library > Список значений кнопок для 0AB0. СТОЛБЕЦ "Hex" НЕ ТРОГАТЬ).
> Заменить всё > Компилировать.
Продавцом с июля не работаю, ничего не скупаю и не продаю
|
|
|
|
|
| Dimoman |
Дата: Суббота, 05.09.2015, 21:49 | Сообщение # 587
|
Новичок
Сообщений: 5
Статус: Offline
|
Помогите плиз отредактировать скрипт.
Нужно чтобы скрипт включался когда появляется второй игрок - это я сделал. И нужно чтобы скрипт отключался когда второй игрок исчезает. Вот с этим проблема, просто не знаю, что и куда вставить в код. В итоге игра зависает когда второй игрок исчезает,
Я привык людей благодарить за помощь)
Если кто-то хочет помочь - пишите в ЛС, скину скрипт.
|
|
|
|
|
| BERG |
Дата: Суббота, 05.09.2015, 21:49 | Сообщение # 588
|
Бывалый
Сообщений: 490
Статус: Offline
|
Dimoman, предоставь исходник скрипта
Продавцом с июля не работаю, ничего не скупаю и не продаю
|
|
|
|
|
| Dimoman |
Дата: Суббота, 05.09.2015, 21:49 | Сообщение # 589
|
Новичок
Сообщений: 5
Статус: Offline
|
Скрипт загружает иконки оружия когда есть второй игрок:
Для работы этого скрипта нужен скрипт который активирует второго игрока (клавиша F6) и текстуры:
http://speedy.sh/AA3E7/cleo.zip
Сообщение отредактировал Dimoman - Четверг, 03.07.2014, 18:15 |
|
|
|
|
| Denchik |
Дата: Суббота, 05.09.2015, 21:49 | Сообщение # 590
|
Новичок
Сообщений: 26
Статус: Offline
|
Подскажите что подредактировать пожалуйста
Код {$CLEO .cs}
0000:
if not 0@ = SAMP.Base()
then 0a93:
end
repeat
wait 300
until SAMP.Available()
:nach
if
8AAB: not file_exists "CLEO\playlist\[play]list.txt"
004d: jump_if_false @go
message "Файл отсутствует." 0x007bff
//0AAC: $hMP3 = load_mp3 "CLEO\playlist\Dubstep.mp3"
wait 500
:go
cmd "play" @cmd
cmd "playoff" @cmd1
while true
wait 0
if 30@ == 1
then
0A9A: 0@ = openfile "CLEO\playlist\[play]list.txt" mode "rt"
wait 300
repeat
wait 0
0AC8: 1@ = allocate_memory_size 256
0AC8: 4@ = allocate_memory_size 256
0AD7: read_string_from_file 0@ to 1@ size 256
0AD3: string 4@ format "CLEO\playlist\%s" 1@
0AAC: 20@ = load_audiostream 4@ //IF and SET
wait 500
message "%s" -1 4@
0AB9: get_mp3 20@ state_to 7@
message "1: %d" -1 7@
if
not 7@ == 1
then
0AAD: set_mp3 20@ perform_action 1
wait 200
end
repeat
wait 0
0AB9: get_mp3 20@ state_to 7@
message "%d" -1 7@
until 7@ <> 1
0ac9: 1@
0ac9: 4@
until 0AD6: end_of_file 0@ reached
0A9B: closefile 0@
else
0AAD: set_mp3 20@ perform_action 0
end
end
:cmd
30@ = 1
message "Play On" 0x007bff
samp.CmdRet()
:cmd1
30@ = 0
message "Play Off" 0x007bff
samp.CmdRet() |
|
|
|
|
| JokerNix |
Дата: Суббота, 05.09.2015, 21:50 | Сообщение # 591
|
Любитель
Сообщений: 37
Статус: Offline
|
Вопрос: Как создать мини флудер - в чат выдаются сообщения(по команде). Но чтобы он сам останавливался после пройденного круга.(или можно было приостановить и командой продолжить уже начатый процесс)
Пример моего скрипта, он очень недаработан.
Код // This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
//-------------MAIN---------------
03A4: name_thread "nitro"
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
wait 100
end
0B34: samp register_client_command "flooder2" to_label @nitro
while true
wait 0
if and
10@ == 1
0256: player $PLAYER_CHAR defined
then
wait 1000
0AF9: samp say_msg "/sms 21 "Как дела ?"
wait 1000
0AF9: samp say_msg "/sms 22 "Как настроение ?"
wait 1000
0AF9: samp say_msg "/sms 23 "Чд ? ?"
wait 1000
0AF9: samp say_msg "/sms 24 "Дашь бабки ? ?"
wait 1000
end
end
:nitro
0B12: 10@ = 10@ XOR 1
if 10@ == 1
then
0AD1: show_formatted_text_highpriority "~y~Flooder ~p~Activen" time 2000
end
if 10@ == 0
then
0AD1: show_formatted_text_highpriority "~r~Flooder ~l~Ne Aktiven" time 2000
end
0B43: cmd_ret
Он включается на команду, но после пройдённого круга начинает его заново, и останавливается только после повтора команды. Мне же нужны чтобы он просто прошёл круг и остановился(можно чтобы он вообще больше дальше не включался - цикл) или приостанавливать можно было - а потом процесс опять с точки приостановки начать.Помогите пожалуйста!
|
|
|
|
|
| Denchik |
Дата: Суббота, 05.09.2015, 21:50 | Сообщение # 592
|
Новичок
Сообщений: 26
Статус: Offline
|
Код // This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
//-------------MAIN---------------
03A4: name_thread "nitro"
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end
while not SAMP.Available()
wait 100
end
0B34: samp register_client_command "flooder2" to_label @nitro
while true
wait 0
if and
10@ == 1
0256: player $PLAYER_CHAR defined
then
wait 1000
0AF9: samp say_msg "/sms 21 "Как дела ?"
wait 1000
0AF9: samp say_msg "/sms 22 "Как настроение ?"
wait 1000
0AF9: samp say_msg "/sms 23 "Чд ? ?"
wait 1000
0AF9: samp say_msg "/sms 24 "Дашь бабки ? ?"
wait 1000
end
10@ = 0
end
:nitro
0B12: 10@ = 10@ XOR 1
if 10@ == 1
then
0AD1: show_formatted_text_highpriority "~y~Flooder ~p~Activen" time 2000
end
if 10@ == 0
then
0AD1: show_formatted_text_highpriority "~r~Flooder ~l~Ne Aktiven" time 2000
end
0B43: cmd_ret |
|
|
|
|
| Chester_Master |
Дата: Суббота, 05.09.2015, 21:50 | Сообщение # 593
|
Бывалый
Сообщений: 339
Статус: Offline
|
JokerNix, Код {$CLEO .cs}
thread "flooder228"
if
0@ = SAMP.Base()
else_jump @1488
0A93: end_custom_thread
:1488
not SAMP.Available
else_jump @1337
wait 100
goto @1488
:1337
0B34: samp register_client_command "flood" to_label @228
while true
wait 0
end
:donny
wait 0
if
30@ == 1
else_jump @flazy
1@ = 0
:ivankov
if
SAMP.IsPlayerConnected(1@)
else_jump @capon
say "/sms %d %s" 1@ 0@
wait 1100
:capon
1@ += 1
1@ > 1000
else_jump @ivankov
30@ = 0
free 0@
:flazy
goto @donny
:228
wait 0
alloc 0@ 256
SAMP.IsCommandTyped(0@)
30@ = 1
SAMP.CmdRet
Не тестил,да и работать вряд ли будет,исправь ошибки и се.
|
|
|
|
|
| JokerNix |
Дата: Суббота, 05.09.2015, 21:50 | Сообщение # 594
|
Любитель
Сообщений: 37
Статус: Offline
|
Chester_Master,
|
|
|
|
|
| Кoт |
Дата: Суббота, 05.09.2015, 21:50 | Сообщение # 595
|
Сообщений: 1074
Статус: Offline
|
Цитата JokerNix (  ) Chester_Master,
он использует кейворд,вместо опкода.
Замени say на 0af9:
Цитата say "/sms %d %s" 1@ 0@
Цитата 0af9: "/sms %d %s" 1@ 0@
|
|
|
|
|
| [CM]Bomj_Tawer |
Дата: Суббота, 05.09.2015, 21:50 | Сообщение # 596
|
Боец
Сообщений: 160
Статус: Offline
|
del.
Сообщение отредактировал [CM]Bomj_Tawer - Вторник, 08.07.2014, 10:03 |
|
|
|
|
| _Kr1k_ |
Дата: Суббота, 05.09.2015, 21:51 | Сообщение # 597
|
Любитель
Сообщений: 39
Статус: Offline
|
В чем ошибка?
Код {$CLEO}
03A4: name_thread 'timer'
:Activacya_1
if or
0AB0: key_pressed 103
0AB0: key_pressed 105
jf @Activacya_1
jump @Timer_1
:Timer_1
wait 0
$Time = 1000
014E: set_timer_to $Time type 1
jump @Timer_2
:Timer_2
wait 0
if
$Time < 1
jf @Timer_2
00BA: text_styled 'VAL_GOT' 1000 ms 2
jump @Activacya_1
И как сделать, чтобы писало, вместо 00BA: text_styled 'VAL_GOT' 1000 ms 2 , "Время пришло"? 
Сообщение отредактировал _Kr1k_ - Воскресенье, 13.07.2014, 00:07 |
|
|
|
|
| CallBack |
Дата: Суббота, 05.09.2015, 21:51 | Сообщение # 598
|
Любитель
Сообщений: 48
Статус: Offline
|
Цитата [CM]NyanCat_ ( ) Нужно сделать так, что-бы при наводке на игрока и нажатии на клавишу M, ему выдавало оружие(админ команда)
Вот мой скрипт, но что-то тут не так.
Код {$CLEO .cs}
wait 2000
while true
wait 0
if and
0AD2: 1@ = player $PLAYER_CHAR targeted_actor //IF and SET
0AB0: key_pressed 90
then
2@ = SAMP.GetSAMPPlayerIDByActorHandle(1@)
0AF9: samp say_msg "/givegun %d 31 2000" 2@
wait 1000
end
end
Сообщение отредактировал CallBack - Понедельник, 14.07.2014, 07:40 |
|
|
|
|
| [CM]Bomj_Tawer |
Дата: Суббота, 05.09.2015, 21:51 | Сообщение # 599
|
Боец
Сообщений: 160
Статус: Offline
|
Как сделать активацию на 2 конпки (I+K) и деактивацию на них же?
Код // This file was decompiled using sascm.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
thread 'asd'
:asd_1
wait 0
if
0AB0: key_pressed 73
else_jump @asd_1
jump @asd_2
:asd_2
wait 0
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True
Actor.PutAt($PLAYER_ACTOR, -1538.34, -1950.13, -60.03)
jump @asd_3
:asd_3
wait 26000
Actor.PutAt($PLAYER_ACTOR, -2368.60, -1817.96, 21.87)
wait 29000
if
0AB0: key_pressed 75
else_jump @asd_2
Actor.LockInCurrentPosition($PLAYER_ACTOR) = False
jump @asd_1 |
|
|
|
|
| Yura_Nikolaev |
Дата: Суббота, 05.09.2015, 21:51 | Сообщение # 600
|
Боец
Сообщений: 69
Статус: Offline
|
Код {$CLEO}
if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end while not SAMP.Available()
wait 100
end
while true
wait 0
0AB1: call @getChatEntryText 1 id 99 to 1@
if 0C18: 2@ = strstr string1 1@ string2 "Привет"
then
say "Здарова"
wait 1000
end
end
:getChatEntryText
1@ = samp.Base()
1@ += 0x212A24
0A8D: 1@ = read_memory 1@ size 4 virtual_protect 0
1@ += 0x136
0@ *= 252 005A:
1@ += 0@
1@ += 28
0AB2: ret 1 1@
С диалогом такое прокатит?
|
|
|
|
|
