почините скрипт дам бабок

fargfdgd

fargfdgd

Потрачен
Автор темы
4
2
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Версия SA-MP
  1. 0.3.7 (R1)
{$CLEO .cs}

const
PIZDA_DELAY = 15 // ms
end


if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end

while not SAMP.Available()
wait 100
end


0AF2: 7@ = get_float_from_ini_file "CLEO\pizda.ini" section "pizda" key "Radius"
if
0029: 7@ >= 0.0
then
else
0AF3: write_float 60.0 to_ini_file "CLEO\pizda.ini" section "pizda" key "Radius"
end


0B34: samp register_client_command "pz" to_label @cmd
0B34: samp register_client_command "pz_radius" to_label @Radius
15@ = 0


while true
wait 0
if 15@ == 1
jf continue
for 0@ = 0 to 999
0B20: samp 4@ = actor_handle_by_samp_player_id 0@
if and
056D: actor 4@ defined
8118: not actor 4@ dead
then
00A0: store_actor $PLAYER_ACTOR position_to 16@ 17@ 18@
00A0: store_actor 4@ position_to 6@ 7@ 8@
050A: 20@ = distance_between_XYZ 6@ 7@ 8@ and_XYZ 16@ 17@ 18@
0AF2: 21@ = get_float_from_ini_file "CLEO\pizda.ini" section "pizda" key "Radius"
if
8031: not 20@ >= 21@
then
if
actor.Driving($PLAYER_ACTOR)
then // мы в каре - валим всех без разбора :))
wait 0
04C4: store_coords_to 10@ 11@ 12@ from_actor 4@ with_offset 0.0 0.0 -0.7
0098: 13@ = random_float_in_ranges_0.5_to_1.0
0098: 14@ = random_float_in_ranges_0.5_to_1.0
call @incar 6 10@ 11@ 12@ 13@ 14@ 1.0
wait PIZDA_DELAY
if
actor.Driving(4@)
then
03C0: 6@ = actor 4@ car
0B2C: samp 18@ = get_vehicle_id_by_car_handle 6@
0B2B: samp 3@ = get_player_id_by_actor_handle 4@
0B36: samp 3@ = get_player_nickname 3@
0227: 17@ = car 6@ health
0AD1: show_formatted_text_highpriority "Player[%s] Car[%d] Health[%d]" time 150 3@ 18@ 17@
else
0B2B: samp 3@ = get_player_id_by_actor_handle 4@
0B36: samp 5@ = get_player_nickname 3@
0B25: samp 2@ = get_player_health 3@
0AD1: show_formatted_text_highpriority "Player[%s] Health[%d]" time 150 5@ 2@
end
end
if and
wait 0
not actor.Driving($PLAYER_ACTOR)
actor.Driving(4@)
then // мы на ногах, поэтому стукаем только кары ;((
wait 0
03C0: 5@ = actor 4@ car
0407: store_coords_to 10@ 11@ 12@ from_car 5@ with_offset -0.137 0.0 -0.657
0098: 13@ = random_float_in_ranges_0.3_to_10.0
0098: 14@ = random_float_in_ranges_-10.0_to_-0.3
call @onFoot 7 4 10@ 11@ 12@ 13@ 14@ -1.0 // mouse1 + fake onfoot
wait PIZDA_DELAY
call @onFoot 7 144 10@ 11@ 12@ 13@ 14@ -1.0 // mouse1 + f + fake onfoot
0B2B: samp 3@ = get_player_id_by_actor_handle 4@
0B36: samp 3@ = get_player_nickname 3@
0B2C: samp 18@ = get_vehicle_id_by_car_handle 5@
0227: 17@ = car 5@ health
0AD1: show_formatted_text_highpriority "Player[%s] Car[%d] Health[%d]" time 150 3@ 18@ 17@
end


end
end
end
end



:cmd
0B12: 15@ = 15@ XOR 1
if
15@ == 1
then
0ACD: show_text_highpriority "rvanka ON" time 1337
else
0ACD: show_text_highpriority "rvanka OFF" time 1337
end
0B43: samp cmd_ret


:radius
0B35: samp 0@ = get_last_command_params
if and
0AD4: 0@ = scan_string 0@ format "%f" 1@
0029: 0@ >= 0.0
then
0AF3: write_float 1@ to_ini_file "CLEO\pizda.ini" section "pizda" key "Radius"
0AD1: show_formatted_text_highpriority "[pz]: radius changed to %f" time 3333 1@
else
0AD1: show_formatted_text_highpriority "[pz]: an incorrect radius" time 3333
end
0B43: samp cmd_ret


:incar
0B2B: samp 13@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0AC8: 14@ = allocate_memory_size 63
0BBB: samp store_player 13@ incar_data 14@
0C0D: struct 14@ offset 24 size 4 = 0@
0C0D: struct 14@ offset 28 size 4 = 1@
0C0D: struct 14@ offset 32 size 4 = 2@
0C0D: struct 14@ offset 36 size 4 = 3@
0C0D: struct 14@ offset 40 size 4 = 4@
0C0D: struct 14@ offset 44 size 4 = 5@
0BC1: samp send_incar_data 14@
0AC9: free_allocated_memory 14@
0AB2: ret 0


:onfoot
0B2B: samp 9@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0AC8: 10@ = allocate_memory_size 68
0BBA: samp store_player 9@ onfoot_data 10@
0C0D: struct 10@ offset 4 size 2 = 0@
0C0D: struct 10@ offset 6 size 4 = 1@
0C0D: struct 10@ offset 10 size 4 = 2@
0C0D: struct 10@ offset 14 size 4 = 3@
0C0D: struct 10@ offset 38 size 4 = 4@
0C0D: struct 10@ offset 42 size 4 = 5@
0C0D: struct 10@ offset 46 size 4 = 6@
0BC0: samp send_onfoot_data 10@
0AC9: free_allocated_memory 10@
0AB2: ret 0




вот код
ошибка
Неверное выражение 0@ = SAMP.Base().
Одна из переменных имеет неизвестный тип, либо их типы несовместимы.



если почините могу дать 30 рубликов говорите карту киви там яндекс хз че крч похуй жду помощи
 
Сортировка по дате Сортировка по голосам
fargfdgd

fargfdgd

Потрачен
Автор темы
4
2
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Позитивный голос 0 Негативный голос
ARMOR

ARMOR

kjor32 is legend
Модератор
4,852
6,083
Исправил. Так же прикрепил ниже скомпилированый скрипт.
CLEO: 
{$CLEO .cs}
{$USE CLEO+}
{$USE ini}
{$USE bitwise}
const
PIZDA_DELAY = 15 // ms
end


if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end

while not SAMP.Available()
wait 100
end


0AF2: 7@ = get_float_from_ini_file "CLEO\pizda.ini" section "pizda" key "Radius"
if
0029: 7@ >= 0.0
then
else
0AF3: write_float 60.0 to_ini_file "CLEO\pizda.ini" section "pizda" key "Radius"
end


0B34: samp register_client_command "pz" to_label @cmd
0B34: samp register_client_command "pz_radius" to_label @Radius
15@ = 0


while true
wait 0
if 15@ == 1
jf continue
for 0@ = 0 to 999
0B20: samp 4@ = actor_handle_by_samp_player_id 0@
if and
056D: actor 4@ defined
8118: not actor 4@ dead
then
00A0: store_actor $PLAYER_ACTOR position_to 16@ 17@ 18@
00A0: store_actor 4@ position_to 6@ 7@ 8@
050A: 20@ = distance_between_XYZ 6@ 7@ 8@ and_XYZ 16@ 17@ 18@
0AF2: 21@ = get_float_from_ini_file "CLEO\pizda.ini" section "pizda" key "Radius"
if
8031: not 20@ >= 21@
then
if
actor.Driving($PLAYER_ACTOR)
then // ìû â êàðå - âàëèì âñåõ áåç ðàçáîðà :))
wait 0
04C4: store_coords_to 10@ 11@ 12@ from_actor 4@ with_offset 0.0 0.0 -0.7
0098: 13@ = random_float_in_ranges_0.5_to_1.0
0098: 14@ = random_float_in_ranges_0.5_to_1.0
call @incar 6 10@ 11@ 12@ 13@ 14@ 1.0
wait PIZDA_DELAY
if
actor.Driving(4@)
then
03C0: 6@ = actor 4@ car
0B2C: samp 18@ = get_vehicle_id_by_car_handle 6@
0B2B: samp 3@ = get_player_id_by_actor_handle 4@
0B36: samp 3@ = get_player_nickname 3@
0227: 17@ = car 6@ health
0AD1: show_formatted_text_highpriority "Player[%s] Car[%d] Health[%d]" time 150 3@ 18@ 17@
else
0B2B: samp 3@ = get_player_id_by_actor_handle 4@
0B36: samp 5@ = get_player_nickname 3@
0B25: samp 2@ = get_player_health 3@
0AD1: show_formatted_text_highpriority "Player[%s] Health[%d]" time 150 5@ 2@
end
end
if and
wait 0
not actor.Driving($PLAYER_ACTOR)
actor.Driving(4@)
then // ìû íà íîãàõ, ïîýòîìó ñòóêàåì òîëüêî êàðû ;((
wait 0
03C0: 5@ = actor 4@ car
0407: store_coords_to 10@ 11@ 12@ from_car 5@ with_offset -0.137 0.0 -0.657
0098: 13@ = random_float_in_ranges_0.3_to_10.0
0098: 14@ = random_float_in_ranges_-10.0_to_-0.3
call @onFoot 7 4 10@ 11@ 12@ 13@ 14@ -1.0 // mouse1 + fake onfoot
wait PIZDA_DELAY
call @onFoot 7 144 10@ 11@ 12@ 13@ 14@ -1.0 // mouse1 + f + fake onfoot
0B2B: samp 3@ = get_player_id_by_actor_handle 4@
0B36: samp 3@ = get_player_nickname 3@
0B2C: samp 18@ = get_vehicle_id_by_car_handle 5@
0227: 17@ = car 5@ health
0AD1: show_formatted_text_highpriority "Player[%s] Car[%d] Health[%d]" time 150 3@ 18@ 17@
end


end
end
end
end



:cmd
0B12: 15@ = 15@ XOR 1
if
15@ == 1
then
0ACD: show_text_highpriority "rvanka ON" time 1337
else
0ACD: show_text_highpriority "rvanka OFF" time 1337
end
0B43: samp cmd_ret


:radius
0B35: samp 0@ = get_last_command_params
if and
0AD4: 0@ = scan_string 0@ format "%f" 1@
0029: 0@ >= 0.0
then
0AF3: write_float 1@ to_ini_file "CLEO\pizda.ini" section "pizda" key "Radius"
0AD1: show_formatted_text_highpriority "[pz]: radius changed to %f" time 3333 1@
else
0AD1: show_formatted_text_highpriority "[pz]: an incorrect radius" time 3333
end
0B43: samp cmd_ret


:incar
0B2B: samp 13@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0AC8: 14@ = allocate_memory_size 63
0BBB: samp store_player 13@ incar_data 14@
0C0D: struct 14@ offset 24 size 4 = 0@
0C0D: struct 14@ offset 28 size 4 = 1@
0C0D: struct 14@ offset 32 size 4 = 2@
0C0D: struct 14@ offset 36 size 4 = 3@
0C0D: struct 14@ offset 40 size 4 = 4@
0C0D: struct 14@ offset 44 size 4 = 5@
0BC1: samp send_incar_data 14@
0AC9: free_allocated_memory 14@
0AB2: ret 0


:onfoot
0B2B: samp 9@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0AC8: 10@ = allocate_memory_size 68
0BBA: samp store_player 9@ onfoot_data 10@
0C0D: struct 10@ offset 4 size 2 = 0@
0C0D: struct 10@ offset 6 size 4 = 1@
0C0D: struct 10@ offset 10 size 4 = 2@
0C0D: struct 10@ offset 14 size 4 = 3@
0C0D: struct 10@ offset 38 size 4 = 4@
0C0D: struct 10@ offset 42 size 4 = 5@
0C0D: struct 10@ offset 46 size 4 = 6@
0BC0: samp send_onfoot_data 10@
0AC9: free_allocated_memory 10@
0AB2: ret 0
И установи SAMPFUNCS в SannyBuilder
 

Вложения

  • test.cs
    22.5 KB · Просмотры: 5
  • Нравится
Реакции: Vespan и mnl
Позитивный голос 0 Негативный голос
fargfdgd

fargfdgd

Потрачен
Автор темы
4
2
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
ARMOR написал(а):
Исправил. Так же прикрепил ниже скомпилированый скрипт.
CLEO: 
{$CLEO .cs}
{$USE CLEO+}
{$USE ini}
{$USE bitwise}
const
PIZDA_DELAY = 15 // ms
end


if not 0@ = SAMP.Base()
then 0A93: end_custom_thread
end

while not SAMP.Available()
wait 100
end


0AF2: 7@ = get_float_from_ini_file "CLEO\pizda.ini" section "pizda" key "Radius"
if
0029: 7@ >= 0.0
then
else
0AF3: write_float 60.0 to_ini_file "CLEO\pizda.ini" section "pizda" key "Radius"
end


0B34: samp register_client_command "pz" to_label @cmd
0B34: samp register_client_command "pz_radius" to_label @Radius
15@ = 0


while true
wait 0
if 15@ == 1
jf continue
for 0@ = 0 to 999
0B20: samp 4@ = actor_handle_by_samp_player_id 0@
if and
056D: actor 4@ defined
8118: not actor 4@ dead
then
00A0: store_actor $PLAYER_ACTOR position_to 16@ 17@ 18@
00A0: store_actor 4@ position_to 6@ 7@ 8@
050A: 20@ = distance_between_XYZ 6@ 7@ 8@ and_XYZ 16@ 17@ 18@
0AF2: 21@ = get_float_from_ini_file "CLEO\pizda.ini" section "pizda" key "Radius"
if
8031: not 20@ >= 21@
then
if
actor.Driving($PLAYER_ACTOR)
then // ìû â êàðå - âàëèì âñåõ áåç ðàçáîðà :))
wait 0
04C4: store_coords_to 10@ 11@ 12@ from_actor 4@ with_offset 0.0 0.0 -0.7
0098: 13@ = random_float_in_ranges_0.5_to_1.0
0098: 14@ = random_float_in_ranges_0.5_to_1.0
call @incar 6 10@ 11@ 12@ 13@ 14@ 1.0
wait PIZDA_DELAY
if
actor.Driving(4@)
then
03C0: 6@ = actor 4@ car
0B2C: samp 18@ = get_vehicle_id_by_car_handle 6@
0B2B: samp 3@ = get_player_id_by_actor_handle 4@
0B36: samp 3@ = get_player_nickname 3@
0227: 17@ = car 6@ health
0AD1: show_formatted_text_highpriority "Player[%s] Car[%d] Health[%d]" time 150 3@ 18@ 17@
else
0B2B: samp 3@ = get_player_id_by_actor_handle 4@
0B36: samp 5@ = get_player_nickname 3@
0B25: samp 2@ = get_player_health 3@
0AD1: show_formatted_text_highpriority "Player[%s] Health[%d]" time 150 5@ 2@
end
end
if and
wait 0
not actor.Driving($PLAYER_ACTOR)
actor.Driving(4@)
then // ìû íà íîãàõ, ïîýòîìó ñòóêàåì òîëüêî êàðû ;((
wait 0
03C0: 5@ = actor 4@ car
0407: store_coords_to 10@ 11@ 12@ from_car 5@ with_offset -0.137 0.0 -0.657
0098: 13@ = random_float_in_ranges_0.3_to_10.0
0098: 14@ = random_float_in_ranges_-10.0_to_-0.3
call @onFoot 7 4 10@ 11@ 12@ 13@ 14@ -1.0 // mouse1 + fake onfoot
wait PIZDA_DELAY
call @onFoot 7 144 10@ 11@ 12@ 13@ 14@ -1.0 // mouse1 + f + fake onfoot
0B2B: samp 3@ = get_player_id_by_actor_handle 4@
0B36: samp 3@ = get_player_nickname 3@
0B2C: samp 18@ = get_vehicle_id_by_car_handle 5@
0227: 17@ = car 5@ health
0AD1: show_formatted_text_highpriority "Player[%s] Car[%d] Health[%d]" time 150 3@ 18@ 17@
end


end
end
end
end



:cmd
0B12: 15@ = 15@ XOR 1
if
15@ == 1
then
0ACD: show_text_highpriority "rvanka ON" time 1337
else
0ACD: show_text_highpriority "rvanka OFF" time 1337
end
0B43: samp cmd_ret


:radius
0B35: samp 0@ = get_last_command_params
if and
0AD4: 0@ = scan_string 0@ format "%f" 1@
0029: 0@ >= 0.0
then
0AF3: write_float 1@ to_ini_file "CLEO\pizda.ini" section "pizda" key "Radius"
0AD1: show_formatted_text_highpriority "[pz]: radius changed to %f" time 3333 1@
else
0AD1: show_formatted_text_highpriority "[pz]: an incorrect radius" time 3333
end
0B43: samp cmd_ret


:incar
0B2B: samp 13@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0AC8: 14@ = allocate_memory_size 63
0BBB: samp store_player 13@ incar_data 14@
0C0D: struct 14@ offset 24 size 4 = 0@
0C0D: struct 14@ offset 28 size 4 = 1@
0C0D: struct 14@ offset 32 size 4 = 2@
0C0D: struct 14@ offset 36 size 4 = 3@
0C0D: struct 14@ offset 40 size 4 = 4@
0C0D: struct 14@ offset 44 size 4 = 5@
0BC1: samp send_incar_data 14@
0AC9: free_allocated_memory 14@
0AB2: ret 0


:onfoot
0B2B: samp 9@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0AC8: 10@ = allocate_memory_size 68
0BBA: samp store_player 9@ onfoot_data 10@
0C0D: struct 10@ offset 4 size 2 = 0@
0C0D: struct 10@ offset 6 size 4 = 1@
0C0D: struct 10@ offset 10 size 4 = 2@
0C0D: struct 10@ offset 14 size 4 = 3@
0C0D: struct 10@ offset 38 size 4 = 4@
0C0D: struct 10@ offset 42 size 4 = 5@
0C0D: struct 10@ offset 46 size 4 = 6@
0BC0: samp send_onfoot_data 10@
0AC9: free_allocated_memory 10@
0AB2: ret 0
И установи SAMPFUNCS в SannyBuilder
Нажмите для раскрытия...
спасибо большое
 
  • Нравится
Реакции: ARMOR
Позитивный голос 0 Негативный голос
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. qrlk
    Исходник project edith
      • Нравится
    Ответы
    6
    Просмотры
    7K
    Lua
    BALIGINS
    BALIGINS
  2. БеzликиЙ
    SC22 Lua Прочее RPSpeedo
      • Нравится
      • Эм
      • Грустно
    Ответы
    9
    Просмотры
    3K
    Модификации
    БеzликиЙ
    БеzликиЙ
  3. ReleaseN
    • Вопрос
    Ищу утилиту или скрипт для поиска названия текстур
      • Нравится
    Ответы
    7
    Просмотры
    2K
    Помощь
    aaa111bbb
    aaa111bbb
  4. Bananious
    • Закрыта
    Помогите дописать скрипт
    Ответы
    8
    Просмотры
    2K
    Другое
    mac
    mac
  5. БеzликиЙ
    Lua [Доработано] VK Notifications 1.2.3 Unofficial [Open Source]
      • Нравится
      • Влюблен
    Ответы
    50
    Просмотры
    12K
    Читы
    Diego_Smitt
    Diego_Smitt
Сверху Снизу