|
[CLEO] Помощь по редактированию скриптов
|
|
| MindFreak |
Дата: Суббота, 05.09.2015, 20:33 | Сообщение # 151
|
Боец
Сообщений: 117
Статус: Offline
|
Код 0249: release_model #MINIGUN
Попробуй убрать.
|
|
|
|
|
| Cocuco4ka |
Дата: Суббота, 05.09.2015, 20:33 | Сообщение # 152
|
Новичок
Сообщений: 27
Статус: Offline
|
MindFreak, убрал, но ничего не изменилось. Так же при прицеливании игрок не двигается.
Может быть есть другой вариант?
|
|
|
|
|
| Mark_58623911 |
Дата: Суббота, 05.09.2015, 20:34 | Сообщение # 153
|
Новичок
Сообщений: 17
Статус: Offline
|
Помогите пожалуйста, не могу разобраться с одним, вообщем мне нужно, как мне соеденить так,чтобы при нажатии на ctrl+0 был первый текст,и чтобы еще при активации на ctrl+1 был второй текст,вообщем не могу соеденить эти две функци,работает только 1 текст
{$CLEO}
thread "1"
0662: NOP "test"
:RP_RP
wait 0
if and
0AB0: key_pressed 17
0AB0: key_pressed 48
jf @RP_RP
while true
wait 0
if or
8AB0: key_pressed 17
8AB0: key_pressed 48
then break
end
end
0AF8: samp add_message_to_chat "Первый текст на ctrl+0" color 0xFFFF00
jump @RP_RP
:MG_MG
wait 0
if and
0AB0: key_pressed 17
0AB0: key_pressed 49
jf @MG_MG
while true
wait 0
if or
8AB0: key_pressed 17
8AB0: key_pressed 49
then break
end
end
0AF8: samp add_message_to_chat "Второй текст на ctrl+1" color 0xFFFF00
jump @MG_MG
Сообщение отредактировал Mark_58623911 - Воскресенье, 27.01.2013, 23:24 |
|
|
|
|
| Cocuco4ka |
Дата: Суббота, 05.09.2015, 20:34 | Сообщение # 154
|
Новичок
Сообщений: 27
Статус: Offline
|
Код // This file was decompiled using SASCM.INI published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
{$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
03A4: name_thread "PLAYERWH"
0000: NOP
00D6: if
8AF7: not get_samp_base_to 29@
004D: jump_if_false @PLAYERWH_32
0A93: end_custom_thread
:PLAYERWH_32
0001: wait 400 ms
0AFA: is_samp_structures_available
004D: jump_if_false @PLAYERWH_32
0B34: samp 0@ = register_client_command "m"
:PLAYERWH_64
0001: wait 0 ms
00D6: if and
0256: player $PLAYER_CHAR defined
80DF: not actor $PLAYER_ACTOR driving
004D: jump_if_false @PLAYERWH_86
:PLAYERWH_86
0001: wait 0
00D6: if and
0B35: samp is_command_typed 0@ params 1@
03EE: player $PLAYER_CHAR controllable
004D: jump_if_false @PLAYERWH_86
0AF8: samp add_message_to_chat "Миниган получен." 12256260 5@
00D6: if
0247: load_model #MINIGUN
00D6: if
0248: model #MINIGUN available
01B2: give_actor $PLAYER_ACTOR weapon 38 ammo 1000 // Load the weapon model before using this
0001: wait 100 ms
0249: release_model #MINIGUN
0002: jump @PLAYERWH_64
Нужна помощь. Вот написал скрипт на дачу минигана игроку, у которого активация через чат.
Долго думал, рассуждал как да что. Сначала не существовало команды, потом исправил, но оружия всё равно не давало. И всё таки я дошёл до ума и оружие даётся через команду в чате, но один нюанс: когда даю вот таким образом себе оружие, с него невозможно вести стрельбу, то есть при прицеливании игрок просто напросто стоит на месте и не может пошевелится.
И так же интересует, как можно сделать, чтобы при получении оружия в чате писало не Caps?
Вообщем жду поддержки.
Апну. P.s по совету убирал 0249: release_model #MINIGUN - не помогло.
Сообщение отредактировал Cocuco4ka - Понедельник, 28.01.2013, 11:55 |
|
|
|
|
| Espira |
Дата: Суббота, 05.09.2015, 20:34 | Сообщение # 155
|
Любитель
Сообщений: 39
Статус: Offline
|
Код говно.
Код {$CLEO .cs} // устанавливаем формат скрипта
0000: // чтобы не было перехода на нулевой оффсет
repeat
wait 300 // ждать 300 мс, пока не выполнится условие ниже
until 0AFA: is_samp_structures_available // если структура сампа найдена, идти дальше
0B34: samp 0@ = register_client_command "m" // регистрация команды
while true // "пока"
wait 0
if Actor.Defined($PLAYER_ACTOR) // актер существует
then // тогда
if SAMP.IsCommandTyped(0@, 1@) // если введена команда
then // тогда
Model.Load(#MINIGUN) // загрузка модельки
01B2: give_actor $PLAYER_ACTOR weapon 38 ammo 9999 // выдать миниган
0af8: "Миниган получен" 0xFFFFFF // сообщение в чат
Model.Destroy(#MINIGUN) // дестрой модельки
end // конец проверки
end // конец проверки
end
Цитата (Cocuco4ka) И так же интересует, как можно сделать, чтобы при получении оружия в чате писало не Caps?
Настройки ... форматирование ... "Как есть"
|
|
|
|
|
| Cocuco4ka |
Дата: Суббота, 05.09.2015, 20:34 | Сообщение # 156
|
Новичок
Сообщений: 27
Статус: Offline
|
Espira, Спасиб, долго мучался, но ты спас меня. Лови плюсак  Добавлено (05.02.2013, 23:04)
---------------------------------------------
Вот не могу сделать клавишу деактивации.
При включении оно работает, а вот выключить не получается.
Вот собственно код:
Код {$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
03A4: name_thread "CLEO"
0662: NOP "AUTHOR: "
0662: NOP "Tralala"
0000: NOP
0006: 1@ = -1
:CLEO_41
0001: wait 0 ms
0226: 0@ = actor $PLAYER_ACTOR health
03E4: enable_text_draw_align_right 1
033F: set_text_draw_letter_size 0.5 0.8
0340: set_text_draw_RGBA 180 25 29 255
081C: draw_text_outline 1 RGBA 0 0 0 55
045A: draw_text_1number 559.0 98.0 GXT 'NUMBER' number 0@ // ~1~
04DD: 1@ = actor $PLAYER_ACTOR armour
00D6: if
0029: 1@ >= 2
0002: jump @CLEO_209
0002: jump @CLEO_296
03E4: enable_text_draw_align_right 1
033F: set_text_draw_letter_size 0.5 0.8
081C: draw_text_outline 1 RGBA 0 0 0 55
045A: draw_text_1number 609.0 98.0 GXT 'NUMBER' number 1@ // ~1~
0002: jump @CLEO_41
:CLEO_209
0001: wait 0 ms
0256: player $PLAYER_CHAR defined
00D6: if
0AB0: key_pressed 5
004D: jump_if_false @CLEO_327
0050: gosub @CLEO_552
0012: 1@ *= -1
00D6: if
0039: 1@ == 1
004D: jump_if_false @CLEO_296
018C: play_sound 1050 at 0.0 0.0 0.0
0001: wait 0 ms
0002: jump @CLEO_320
:CLEO_296
018C: play_sound 1058 at 0.0 0.0 0.0
0001: wait 0 ms
:CLEO_320
0050: gosub @CLEO_334
:CLEO_327
0002: jump @CLEO_41
:CLEO_334
0006: 10@ = 0
0006: 0@ = 24
:CLEO_348
00D6: if or
0039: 0@ == 24
0039: 0@ == 25
0039: 0@ == 27
0039: 0@ == 28
0039: 0@ == 29
0039: 0@ == 30
0039: 0@ == 31
0039: 0@ == 32
004D: jump_if_false @CLEO_529
0085: 29@ = 0@ // (int)
000A: 29@ += 36
0012: 29@ *= 112
000A: 29@ += 13150904
000A: 29@ += 34
00D6: if
0039: 1@ == 1
004D: jump_if_false @CLEO_506
0A8D: 15@(10@,6i) = read_memory 29@ size 2 virtual_protect 0
0A8C: write_memory 29@ size 2 value 0 virtual_protect 0
0002: jump @CLEO_522
:CLEO_506
0A8C: write_memory 29@ size 2 value 15@(10@,6i) virtual_protect 0
:CLEO_522
000A: 10@ += 1
:CLEO_529
000A: 0@ += 1
0019: 0@ > 32
004D: jump_if_false @CLEO_348
0051: return
:CLEO_552
0001: wait 0 ms
8AB0: not key_pressed 5
004D: jump_if_false @CLEO_552
0051: return |
|
|
|
|
| feizer |
Дата: Суббота, 05.09.2015, 20:34 | Сообщение # 157
|
Бывалый
Сообщений: 380
Статус: Offline
|
Как сделать, чтобы активация и деактивация были на одну кнопку? Если просто кнопку деактивации поменять на активационную, то скрипт будет плохо работать, Будет баг со включением/выключением.
Вот клео: http://rghost.ru/43536689 Сделайте, чтобы норм активация на 1 и ту же кнопку арботала
|
|
|
|
|
| Cocuco4ka |
Дата: Суббота, 05.09.2015, 20:34 | Сообщение # 158
|
Новичок
Сообщений: 27
Статус: Offline
|
Напишу ещё раз, возможно не было увидено.
Вот не могу сделать клавишу деактивации.
При включении оно работает, а вот выключить не получается.
Вот собственно код:
Код {$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
03A4: name_thread "CLEO"
0662: NOP "AUTHOR: "
0662: NOP "Tralala"
0000: NOP
0006: 1@ = -1
:CLEO_41
0001: wait 0 ms
0226: 0@ = actor $PLAYER_ACTOR health
03E4: enable_text_draw_align_right 1
033F: set_text_draw_letter_size 0.5 0.8
0340: set_text_draw_RGBA 180 25 29 255
081C: draw_text_outline 1 RGBA 0 0 0 55
045A: draw_text_1number 559.0 98.0 GXT 'NUMBER' number 0@ // ~1~
04DD: 1@ = actor $PLAYER_ACTOR armour
00D6: if
0029: 1@ >= 2
0002: jump @CLEO_209
0002: jump @CLEO_296
03E4: enable_text_draw_align_right 1
033F: set_text_draw_letter_size 0.5 0.8
081C: draw_text_outline 1 RGBA 0 0 0 55
045A: draw_text_1number 609.0 98.0 GXT 'NUMBER' number 1@ // ~1~
0002: jump @CLEO_41
:CLEO_209
0001: wait 0 ms
0256: player $PLAYER_CHAR defined
00D6: if
0AB0: key_pressed 5
004D: jump_if_false @CLEO_327
0050: gosub @CLEO_552
0012: 1@ *= -1
00D6: if
0039: 1@ == 1
004D: jump_if_false @CLEO_296
018C: play_sound 1050 at 0.0 0.0 0.0
0001: wait 0 ms
0002: jump @CLEO_320
:CLEO_296
018C: play_sound 1058 at 0.0 0.0 0.0
0001: wait 0 ms
:CLEO_320
0050: gosub @CLEO_334
:CLEO_327
0002: jump @CLEO_41
:CLEO_334
0006: 10@ = 0
0006: 0@ = 24
:CLEO_348
00D6: if or
0039: 0@ == 24
0039: 0@ == 25
0039: 0@ == 27
0039: 0@ == 28
0039: 0@ == 29
0039: 0@ == 30
0039: 0@ == 31
0039: 0@ == 32
004D: jump_if_false @CLEO_529
0085: 29@ = 0@ // (int)
000A: 29@ += 36
0012: 29@ *= 112
000A: 29@ += 13150904
000A: 29@ += 34
00D6: if
0039: 1@ == 1
004D: jump_if_false @CLEO_506
0A8D: 15@(10@,6i) = read_memory 29@ size 2 virtual_protect 0
0A8C: write_memory 29@ size 2 value 0 virtual_protect 0
0002: jump @CLEO_522
:CLEO_506
0A8C: write_memory 29@ size 2 value 15@(10@,6i) virtual_protect 0
:CLEO_522
000A: 10@ += 1
:CLEO_529
000A: 0@ += 1
0019: 0@ > 32
004D: jump_if_false @CLEO_348
0051: return
:CLEO_552
0001: wait 0 ms
8AB0: not key_pressed 5
004D: jump_if_false @CLEO_552
0051: return |
|
|
|
|
| MindFreak |
Дата: Суббота, 05.09.2015, 20:35 | Сообщение # 159
|
Боец
Сообщений: 117
Статус: Offline
|
Нашел интересный скрипт для сингла и решил его сделать под самп. Все почти получилось, но работает не правильно.
Вот видео как работает на оригинале.
http://www.youtube.com/watch?feature=player_embedded&v=W4RfZermYAw
Вот как у меня.
http://www.youtube.com/watch?v=8A-zBi5wHkA&feature=youtu.be
Вот сам код(Декомпилированный.)
Код // This file was decompiled using sascm.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
{$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
thread "CAMERA"
0000: NOP
:CAMERA_12
32@ = 0
:CAMERA_19
wait 0
if
86B9: not cutscene_data_loaded
jf @CAMERA_19
if
80E1: not player 0 pressed_key 17
jf @CAMERA_19
if
80E1: not player 0 pressed_key 6
jf @CAMERA_19
if and
Actor.Stopped($PLAYER_ACTOR)
not Actor.Driving($PLAYER_ACTOR)
09E7: player $PLAYER_CHAR not_frozen
8818: not actor $PLAYER_ACTOR in_air
8A0C: not player $PLAYER_CHAR on_jetpack
jf @CAMERA_19
if or
key_down 80
key_down 79
jf @CAMERA_12
if
200 > 32@
jf @CAMERA_151
goto @CAMERA_19
:CAMERA_151
wait 0
if
not key_down 80
jf @CAMERA_2909
6@ = 0
7@ = 70.0
8@ = 0.0
16@ = 0
17@ = 70
18@ = 0
20@ = 1
21@ = 100
22@ = 1
23@ = 0
24@ = 0
:CAMERA_253
wait 0
0922: set_camera_zoom_in_factor 7@ out_factor 70.0 timelimit 5000 mode 2
02A3: enable_widescreen 24@
00BE: text_clear_all
03E6: remove_text_box
03F0: enable_text_draw 1
08DA: remove_panel 16@
08DA: remove_panel 26@
if
not key_down 82
jf @CAMERA_5089
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED500' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Slot:" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED501' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Transverse:" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED502' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "ZoomIn:" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED503' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Shake:" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED504' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Time:" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED505' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "On Player:" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED506' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "WideScreen:" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED507' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Camera" // Set gxt text
08D4: 16@ = create_panel_with_title 'CRED507' position 15.0 30.0 width 25.0 columns 6 interactive 0 background 1 alignment 1
09DB: set_panel 16@ column 0 width 120
08DB: set_panel 16@ column 0 header 'DUMMY' data 'CRED500' 'CRED501' 'CRED502' 'CRED503' 'CRED504' 'CRED505' 'CRED506' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY'
08DB: set_panel 16@ column 1 header 'DUMMY' data 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY'
08EE: set_panel 16@ column 1 row 1 text_1number GXT 'NUMBER' number 6@ // ~1~
08EE: set_panel 16@ column 1 row 2 text_1number GXT 'NUMBER' number 17@ // ~1~
08EE: set_panel 16@ column 1 row 3 text_1number GXT 'NUMBER' number 18@ // ~1~
08EE: set_panel 16@ column 1 row 0 text_1number GXT 'NUMBER' number 22@ // ~1~
08EE: set_panel 16@ column 1 row 4 text_1number GXT 'NUMBER' number 21@ // ~1~
08EE: set_panel 16@ column 1 row 5 text_1number GXT 'NUMBER' number 23@ // ~1~
08EE: set_panel 16@ column 1 row 6 text_1number GXT 'NUMBER' number 24@ // ~1~
if
00E1: player 0 pressed_key 4
jf @CAMERA_938
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED508' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Info" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED509' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "X save camera" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED510' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "P start play" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED511' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "R out" // Set gxt text
08D4: 26@ = create_panel_with_title 'CRED508' position 15.0 210.0 width 25.0 columns 6 interactive 0 background 1 alignment 1
09DB: set_panel 26@ column 0 width 120
08DB: set_panel 26@ column 0 header 'DUMMY' data 'CRED509' 'CRED510' 'CRED511' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY'
:CAMERA_938
if
20@ == 1
jf @CAMERA_1196
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED512' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Y~~1~" // Set gxt text
08EE: set_panel 16@ column 1 row 0 text_1number GXT 'CRED512' number 22@
if
key_down 187
jf @CAMERA_1083
22@ += 1
32@ = 0
:CAMERA_1007
0922: set_camera_zoom_in_factor 7@ out_factor 60.0 timelimit 5000 mode 2
if
not 32@ > 100
jf @CAMERA_1051
wait 0
goto @CAMERA_1007
:CAMERA_1051
32@ = 0
if
22@ > 10
jf @CAMERA_1083
22@ = 10
:CAMERA_1083
if
key_down 189
jf @CAMERA_1189
22@ += -1
32@ = 0
:CAMERA_1113
0922: set_camera_zoom_in_factor 7@ out_factor 60.0 timelimit 5000 mode 2
if
not 32@ > 100
jf @CAMERA_1157
wait 0
goto @CAMERA_1113
:CAMERA_1157
32@ = 0
if
1 > 22@
jf @CAMERA_1189
22@ = 1
:CAMERA_1189
goto @CAMERA_2110
:CAMERA_1196
if
20@ == 3
jf @CAMERA_1364
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED512' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Y~~1~" // Set gxt text
08EE: set_panel 16@ column 1 row 2 text_1number GXT 'CRED512' number 17@
if
key_down 187
jf @CAMERA_1292
7@ += 0.675
if
7@ > 140.0
jf @CAMERA_1292
7@ = 140.0
:CAMERA_1292
if
key_down 189
jf @CAMERA_1349
7@ += -0.675
if
10.0 > 7@
jf @CAMERA_1349
7@ = 10.0
:CAMERA_1349
0092: 17@ = float 7@ to_integer
goto @CAMERA_2110
:CAMERA_1364
if
20@ == 4
jf @CAMERA_1532
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED512' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Y~~1~" // Set gxt text
08EE: set_panel 16@ column 1 row 3 text_1number GXT 'CRED512' number 18@
if
key_down 187
jf @CAMERA_1460
8@ += 0.675
if
8@ > 400.0
jf @CAMERA_1460
8@ = 400.0
:CAMERA_1460
if
key_down 189
jf @CAMERA_1517
8@ += -0.675
if
10.0 > 8@
jf @CAMERA_1517
8@ = 10.0
:CAMERA_1517
0092: 18@ = float 8@ to_integer
goto @CAMERA_2110
:CAMERA_1532
if
20@ == 2
jf @CAMERA_1782
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED512' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Y~~1~" // Set gxt text
08EE: set_panel 16@ column 1 row 1 text_1number GXT 'CRED512' number 6@
if
key_down 187
jf @CAMERA_1676
6@ += 5
if
6@ > 100
jf @CAMERA_1619
6@ += 20
:CAMERA_1619
if
6@ > 1000
jf @CAMERA_1645
6@ += 100
:CAMERA_1645
if
6@ > 50000
jf @CAMERA_1676
6@ = 50000
:CAMERA_1676
if
key_down 189
jf @CAMERA_1775
6@ += -5
if
6@ > 100
jf @CAMERA_1724
6@ += -20
:CAMERA_1724
if
6@ > 1000
jf @CAMERA_1750
6@ += -100
:CAMERA_1750
if
0 > 6@
jf @CAMERA_1775
6@ = 0
:CAMERA_1775
goto @CAMERA_2110
:CAMERA_1782
if
20@ == 5
jf @CAMERA_1926
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED512' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Y~~1~" // Set gxt text
08EE: set_panel 16@ column 1 row 4 text_1number GXT 'CRED512' number 21@
if
key_down 187
jf @CAMERA_1871
21@ += 1
if
21@ > 500
jf @CAMERA_1871
21@ = 500
:CAMERA_1871
if
key_down 189
jf @CAMERA_1919
21@ += -1
if
20 > 21@
jf @CAMERA_1919
21@ = 20
:CAMERA_1919
goto @CAMERA_2110
:CAMERA_1926
if
20@ == 6
jf @CAMERA_2018
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED512' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Y~~1~" // Set gxt text
08EE: set_panel 16@ column 1 row 5 text_1number GXT 'CRED512' number 23@
if
key_down 187
jf @CAMERA_1988
23@ = 1
:CAMERA_1988
if
key_down 189
jf @CAMERA_1919
23@ = 0
goto @CAMERA_2110
:CAMERA_2018
if
20@ == 7
jf @CAMERA_2110
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED512' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Y~~1~" // Set gxt text
08EE: set_panel 16@ column 1 row 6 text_1number GXT 'CRED512' number 24@
if
key_down 187
jf @CAMERA_2080
24@ = 1
:CAMERA_2080
if
key_down 189
jf @CAMERA_1919
24@ = 0
goto @CAMERA_2110
:CAMERA_2110
if
not key_down 80
jf @CAMERA_2909
if
not key_down 88
jf @CAMERA_2162
if
not key_down 46
jf @CAMERA_2176
goto @CAMERA_2748
:CAMERA_2162
25@ = 1
goto @CAMERA_2190
:CAMERA_2176
25@ = 0
goto @CAMERA_2190
:CAMERA_2190
if
22@ == 1
jf @CAMERA_2228
06D2: 9@v = "CAMES1" // @v = string
goto @CAMERA_2571
:CAMERA_2228
if
22@ == 2
jf @CAMERA_2266
06D2: 9@v = "CAMES2" // @v = string
goto @CAMERA_2571
:CAMERA_2266
if
22@ == 3
jf @CAMERA_2304
06D2: 9@v = "CAMES3" // @v = string
goto @CAMERA_2571
:CAMERA_2304
if
22@ == 4
jf @CAMERA_2342
06D2: 9@v = "CAMES4" // @v = string
goto @CAMERA_2571
:CAMERA_2342
if
22@ == 5
jf @CAMERA_2380
06D2: 9@v = "CAMES5" // @v = string
goto @CAMERA_2571
:CAMERA_2380
if
22@ == 6
jf @CAMERA_2418
06D2: 9@v = "CAMES6" // @v = string
goto @CAMERA_2571
:CAMERA_2418
if
22@ == 7
jf @CAMERA_2456
06D2: 9@v = "CAMES7" // @v = string
goto @CAMERA_2571
:CAMERA_2456
if
22@ == 8
jf @CAMERA_2494
06D2: 9@v = "CAMES8" // @v = string
goto @CAMERA_2571
:CAMERA_2494
if
22@ == 9
jf @CAMERA_2532
06D2: 9@v = "CAMES9" // @v = string
goto @CAMERA_2571
:CAMERA_2532
if
22@ == 10
jf @CAMERA_2571
06D2: 9@v = "CAMES10" // @v = string
goto @CAMERA_2571
:CAMERA_2571
if
25@ == 1
jf @CAMERA_2634
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED513' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Camera saved" // Set gxt text
00BC: show_text_highpriority GXT 'CRED513' time 500 flag 1
068D: get_camera_position_to 0@ 1@ 2@
068E: get_camera_target_point_to 3@ 4@ 5@
goto @CAMERA_4471
:CAMERA_2634
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED514' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Camera clear" // Set gxt text
00BC: show_text_highpriority GXT 'CRED514' time 500 flag 1
0AF1: write_int 25@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "USESLOT" //IF and SET
32@ = 0
:CAMERA_2697
wait 0
0922: set_camera_zoom_in_factor 7@ out_factor 60.0 timelimit 5 mode 2
if
32@ > 300
jf @CAMERA_2697
32@ = 0
goto @CAMERA_253
:CAMERA_2748
if
key_down 221
jf @CAMERA_2825
20@ += 1
32@ = 0
:CAMERA_2778
wait 0
if
32@ > 100
jf @CAMERA_2778
if
20@ > 7
jf @CAMERA_2825
20@ = 7
:CAMERA_2825
if
key_down 219
jf @CAMERA_253
20@ += -1
32@ = 0
:CAMERA_2855
wait 0
if
32@ > 100
jf @CAMERA_2855
if
1 > 20@
jf @CAMERA_253
20@ = 1
goto @CAMERA_253
:CAMERA_2909
22@ = 1
08DA: remove_panel 16@
:CAMERA_2921
if
22@ == 1
jf @CAMERA_2959
06D2: 9@v = "CAMES1" // @v = string
goto @CAMERA_3302
:CAMERA_2959
if
22@ == 2
jf @CAMERA_2997
06D2: 9@v = "CAMES2" // @v = string
goto @CAMERA_3302
:CAMERA_2997
if
22@ == 3
jf @CAMERA_3035
06D2: 9@v = "CAMES3" // @v = string
goto @CAMERA_3302
:CAMERA_3035
if
22@ == 4
jf @CAMERA_3073
06D2: 9@v = "CAMES4" // @v = string
goto @CAMERA_3302
:CAMERA_3073
if
22@ == 5
jf @CAMERA_3111
06D2: 9@v = "CAMES5" // @v = string
goto @CAMERA_3302
:CAMERA_3111
if
22@ == 6
jf @CAMERA_3149
06D2: 9@v = "CAMES6" // @v = string
goto @CAMERA_3302
:CAMERA_3149
if
22@ == 7
jf @CAMERA_3187
06D2: 9@v = "CAMES7" // @v = string
goto @CAMERA_3302
:CAMERA_3187
if
22@ == 8
jf @CAMERA_3225
06D2: 9@v = "CAMES8" // @v = string
goto @CAMERA_3302
:CAMERA_3225
if
22@ == 9
jf @CAMERA_3263
06D2: 9@v = "CAMES9" // @v = string
goto @CAMERA_3302
:CAMERA_3263
if
22@ == 10
jf @CAMERA_3302
06D2: 9@v = "CAMES10" // @v = string
goto @CAMERA_3302
:CAMERA_3302
32@ = 0
0AF0: 25@ = get_int_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "USESLOT" //IF and SET
if
25@ == 1
jf @CAMERA_4435
0AF2: 0@ = get_float_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "XPOINT" //IF and SET
0AF2: 1@ = get_float_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "YPOINT" //IF and SET
0AF2: 2@ = get_float_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "ZPOINT" //IF and SET
0AF2: 3@ = get_float_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "XWORLD" //IF and SET
0AF2: 4@ = get_float_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "YWORLD" //IF and SET
0AF2: 5@ = get_float_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "ZWORLD" //IF and SET
0AF0: 6@ = get_int_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "TIMEPL" //IF and SET
0AF0: 21@ = get_int_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "GAMESPEED" //IF and SET
0AF0: 23@ = get_int_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "ONPLAYER" //IF and SET
0AF0: 24@ = get_int_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "WIDESCREEN" //IF and SET
02A3: enable_widescreen 24@
008F: 21@ = integer 21@ to_float
21@ /= 100.0
015D: set_gamespeed 21@
if
6@ == 0
jf @CAMERA_3858
Camera.SetPosition(0@, 1@, 2@, 0.0, 0.0, 0.0)
Camera.PointAt(3@, 4@, 5@, 2)
goto @CAMERA_3914
:CAMERA_3858
0460: set_camera_transverse_delay 0.0 time 6@
Camera.SetPosition(0@, 1@, 2@, 0.0, 0.0, 0.0)
Camera.PointAt(3@, 4@, 5@, 1)
goto @CAMERA_3914
:CAMERA_3914
if
23@ == 1
jf @CAMERA_3967
Camera.SetPosition(0@, 1@, 2@, 0.0, 0.0, 0.0)
Camera.OnPed($PLAYER_ACTOR, 15, 2)
:CAMERA_3967
0AF0: 7@ = get_int_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "ZOOMIN" //IF and SET
0AF0: 8@ = get_int_from_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "SHAKE" //IF and SET
008F: 7@ = integer 7@ to_float
:CAMERA_4052
wait 0
08DA: remove_panel 26@
if
00E1: player 0 pressed_key 4
jf @CAMERA_4269
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED508' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "Info" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED509' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "X save camera" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED510' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "P start play" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED511' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "R out" // Set gxt text
0AA8: call_function_method 0x6A0050 0xC1B340 num_params 1 pop 0 'CRED512' 2@ // Get gxt text address by gxt name
0AA5: call 0x718600 2 pop 2 2@ "O out" // Set gxt text
08D4: 26@ = create_panel_with_title 'CRED508' position 15.0 60.0 width 25.0 columns 6 interactive 0 background 1 alignment 1
09DB: set_panel 26@ column 0 width 120
08DB: set_panel 26@ column 0 header 'DUMMY' data 'CRED509' 'CRED510' 'CRED511' 'CRED12' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY' 'DUMMY'
08EE: set_panel 26@ column 1 row 0 text_1number GXT 'NUMBER' number 22@ // ~1~
:CAMERA_4269
Camera.Shake(8@)
0922: set_camera_zoom_in_factor 7@ out_factor 70.0 timelimit 1 mode 2
if
not key_down 79
jf @CAMERA_5056
if
not 22@ == 11
jf @CAMERA_5056
if
not key_down 82
jf @CAMERA_4421
if
key_down 88
jf @CAMERA_4052
22@ += 1
32@ = 0
:CAMERA_4365
wait 0
Camera.Shake(8@)
0922: set_camera_zoom_in_factor 7@ out_factor 60.0 timelimit 5 mode 2
if
32@ > 300
jf @CAMERA_4365
32@ = 0
goto @CAMERA_2921
:CAMERA_4421
22@ = 1
goto @CAMERA_2921
:CAMERA_4435
if
not 22@ == 11
jf @CAMERA_5056
22@ += 1
wait 0
goto @CAMERA_2921
:CAMERA_4471
wait 0
0AF3: write_float 0@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "XPOINT" //IF and SET
0AF3: write_float 1@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "YPOINT" //IF and SET
0AF3: write_float 2@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "ZPOINT" //IF and SET
0AF3: write_float 3@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "XWORLD" //IF and SET
0AF3: write_float 4@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "YWORLD" //IF and SET
0AF3: write_float 5@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "ZWORLD" //IF and SET
0AF1: write_int 6@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "TIMEPL" //IF and SET
0AF3: write_float 7@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "ZOOMIN" //IF and SET
0AF3: write_float 8@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "SHAKE" //IF and SET
0AF1: write_int 21@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "GAMESPEED" //IF and SET
0AF1: write_int 23@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "ONPLAYER" //IF and SET
0AF1: write_int 24@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "WIDESCREEN" //IF and SET
0AF1: write_int 25@ to_ini_file "CLEO\SKRIPT47_CAM.INI" section 9@v key "USESLOT" //IF and SET
22@ += 1
32@ = 0
:CAMERA_5005
wait 0
0922: set_camera_zoom_in_factor 7@ out_factor 60.0 timelimit 5 mode 2
if
32@ > 300
jf @CAMERA_5005
32@ = 0
goto @CAMERA_253
:CAMERA_5056
02A3: enable_widescreen 0
08FD: enable_heat_visuals 0
015D: set_gamespeed 1.0
Player.SetDrunkVisuals($PLAYER_CHAR, 0)
Camera.SetBehindPlayer
Camera.Restore_WithJumpCut
goto @CAMERA_12
:CAMERA_5089
02A3: enable_widescreen 0
08FD: enable_heat_visuals 0
015D: set_gamespeed 1.0
Player.SetDrunkVisuals($PLAYER_CHAR, 0)
Camera.SetBehindPlayer
Camera.Restore_WithJumpCut
goto @CAMERA_12
|
|
|
|
|
| san199x |
Дата: Суббота, 05.09.2015, 20:35 | Сообщение # 160
|
Новичок
Сообщений: 5
Статус: Offline
|
Вопрос: Как сделать чтоб сидя в автомобиле ехал по координатам используя дороги ?
|
|
|
|
|
| HaсkeR |
Дата: Суббота, 05.09.2015, 20:35 | Сообщение # 161
|
Бывалый
Сообщений: 349
Статус: Offline
|
Сделайте тут пожалуйста, чтоб перед тп в машину начинала проигрыватся анимка посадки(как от нажатия enter)
Код // This file was decompiled using sascm.ini published by Seemann (http://sannybuilder.com/files/SASCM.rar) on 13.10.2007
{$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
0662: NOP "SYSTEMAIN.3DN.RU"
thread "$TARAN"
:$TARAN_30
wait 0
if
Player.Defined($PLAYER_CHAR)
else_jump @$TARAN_30
if and
0AB0: key_pressed 88
0AB0: key_pressed 87
not Actor.Driving($PLAYER_ACTOR)
else_jump @$TARAN_30
04C4: store_coords_to 12@ 13@ 14@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 0.0
14@ -= 1.0
04C4: store_coords_to 16@ 17@ 18@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 0.0
18@ -= 1.0
04C4: store_coords_to 19@ 24@ 21@ from_actor $PLAYER_ACTOR with_offset 0.0 0.0 0.0
21@ -= 1.0
15@ = Actor.Angle($PLAYER_ACTOR)
:$TARAN_199
wait 0
if and
0AB0: key_pressed 87
0AB0: key_pressed 88
else_jump @$TARAN_424
04C4: store_coords_to 4@ 5@ 6@ from_actor $PLAYER_ACTOR with_offset 0.0 9.0 -1.0
Actor.PutAt($PLAYER_ACTOR, 4@, 5@, 6@)
0AB5: store_actor $PLAYER_ACTOR closest_vehicle_to 20@ closest_ped_to 1@
if
Actor.Defined(1@)
else_jump @$TARAN_199
if
Car.Defined(20@)
else_jump @$TARAN_199
if
Actor.InCar(1@, 20@)
else_jump @$TARAN_199
036A: put_actor $PLAYER_ACTOR in_car 20@
Camera.SetBehindPlayer
Car.Health(20@) = 0
Camera.SetBehindPlayer
wait 0
Car.Health(20@) = 0
Camera.SetBehindPlayer
wait 0
Car.Health(20@) = 0
Camera.SetBehindPlayer
Car.SetSpeedInstantly(20@, 999.0)
0362: remove_actor $PLAYER_ACTOR from_car_and_place_at 4@ 5@ 6@
Camera.SetBehindPlayer
if and
8AB0: not key_pressed 87
8AB0: not key_pressed 88
else_jump @$TARAN_199
jump @$TARAN_424
:$TARAN_424
wait 0
Actor.PutAt($PLAYER_ACTOR, 16@, 17@, 18@)
Actor.Angle($PLAYER_ACTOR) = 15@
Actor.PutAt($PLAYER_ACTOR, 19@, 24@, 21@)
Car.RemoveReferences(20@)
Camera.SetBehindPlayer
jump @$TARAN_30
Помогаю новичкам и не только - писать в skype
|
|
|
|
|
| Markelos |
Дата: Суббота, 05.09.2015, 20:35 | Сообщение # 162
|
Любитель
Сообщений: 36
Статус: Offline
|
Помогите сделать скрипт чтобы работал в SA:MP , там нужно просто. сел в тачку Гидравлику поставил на кнопку Insert. Вот я попробовал и игра крашила...
Код {$VERSION 3.1.0027}
{$CLEO .cs}
0000: NOP
:1
0ab0: 45
jf @1
car.ToggleHydraulics(0@) = true
wait 0
jump @1
Сообщение отредактировал Markelos - Воскресенье, 17.02.2013, 02:56 |
|
|
|
|
| Даниил |
Дата: Суббота, 05.09.2015, 20:35 | Сообщение # 163
|
Любитель
Сообщений: 38
Статус: Offline
|
Markelos, ты устанавливаешь гидравлику на несуществующую машину. Используй этот опкод, чтоб узнать хендл тачки, в которой сидит персонаж $player_actor
Код 03C0: 0@ = actor $player_actor car |
|
|
|
|
| Markelos |
Дата: Суббота, 05.09.2015, 20:36 | Сообщение # 164
|
Любитель
Сообщений: 36
Статус: Offline
|
Даниил,
правильно?
Код {$VERSION 3.1.0027}
{$CLEO .cs}
//-------------MAIN---------------
0000: NOP
:1
0ab0: 45
jf @1
03C0: 0@ = actor $player_actor car
car.ToggleHydraulics(0@) = true
wait 0
jump @1 |
|
|
|
|
| Ko4eGar |
Дата: Суббота, 05.09.2015, 20:36 | Сообщение # 165
|
Боец
Сообщений: 105
Статус: Offline
|
Markelos, wait нужно ставить перед условием
Код {$VERSION 3.1.0027} {$CLEO .cs} //-------------MAIN--------------- 0000: NOP :1 wait 0 <<<<<<<<<<<<<<<<<<<< Сюда глянь <img src="http://s24.ucoz.net/sm/2/biggrin.gif" border="0" align="absmiddle" alt="biggrin" /> 0ab0: 45 jf @1 03C0: 0@ = actor $player_actor car car.ToggleHydraulics(0@) = true jump @1 |
|
|
|
|
