Битва за свободный автобус? Теперь вы явно выйдете из неё победителем.
Скрипт позволяет почти моментально занять автобус после его появления.
Активация: стойте на респе автобусов и введите /mybus [номер маршрута] [цена]
[hide=50]
[/hide]
Скрипт позволяет почти моментально занять автобус после его появления.
Активация: стойте на респе автобусов и введите /mybus [номер маршрута] [цена]
[hide=50]
PHP:
{$CLEO .cs}
0662: NOP "======= .:. ============= .:. ======"
0662: NOP "= gcode .:. ARP Bus Theft .:. 2013 ="
0662: NOP "======= .:. ============= .:. ======"
thread "arpbustheft"
if
8AF7: get_samp_base_to 33@
then
0A93: end_custom_thread
end
repeat
wait 400
until 0AFA: is_samp_structures_available
0B34: samp register_client_command "mybus" to_label @mybus
0AF8: samp add_message_to_chat "[MyBus]: {EAEAEA}Правильный ввод - {c3d73e}/mybus [маршрут] [цена]{EAEAEA}." 0xc3d73e
0AF8: samp add_message_to_chat "[MyBus]: {EAEAEA}Специально для: {c3d73e}acheats.ru {EAEAEA}и {c3d73e}blasthack.net" 0xc3d73e
while true
wait 0
while 30@ == 1
wait 0
Actor.StorePos($PLAYER_ACTOR,28@,27@,26@)
if
0AE2: 29@ = random_vehicle_near_point 28@ 27@ 26@ in_radius 50.0 find_next 0 pass_wrecked 0
then
if or
0137: car 29@ model == 431
0137: car 29@ model == 437
then
046C: 25@ = car 29@ driver
if
856D: not actor 25@ defined
then
25@ = Samp.GetSAMPVehicleIDByCarHandle(29@)
0B30: samp send_enter_vehicle 25@ as_passenger false
wait 200
072A: task_warp_char_into_car_as_driver $PLAYER_ACTOR car 29@
repeat
wait 0
0B4E: samp 25@ = get_current_dialog_id
until 25@ == 29
0B47: samp close_current_dialog_with_button 1
gosub @sendkeytwo
repeat
wait 0
0B4E: samp 25@ = get_current_dialog_id
until 25@ == 21
0AC8: 13@ = allocate_memory_size 8
0AD3: 13@ = format "%d" 12@
0B4B: samp set_current_dialog_editbox_text 13@
0AC9: free_allocated_memory 13@
0B47: samp close_current_dialog_with_button 1
repeat
wait 0
0B4E: samp 25@ = get_current_dialog_id
until 25@ == 22
0B49: samp set_current_dialog_list_item 11@
0B47: samp close_current_dialog_with_button 1
30@ = 0
0ACD: show_text_highpriority "~W~MyBus ~R~OFF" time 1500
Break
end
end
while 0AE2: 29@ = random_vehicle_near_point 28@ 27@ 26@ in_radius 50.0 find_next 1 pass_wrecked 0
wait 0
if or
0137: car 29@ model == 431
0137: car 29@ model == 437
then
046C: 25@ = car 29@ driver
if
856D: not actor 25@ defined
then
25@ = Samp.GetSAMPVehicleIDByCarHandle(29@)
0B30: samp send_enter_vehicle 25@ as_passenger false
wait 200
072A: task_warp_char_into_car_as_driver $PLAYER_ACTOR car 29@
repeat
wait 0
0B4E: samp 25@ = get_current_dialog_id
until 25@ == 29
0B47: samp close_current_dialog_with_button 1
gosub @sendkeytwo
repeat
wait 0
0B4E: samp 25@ = get_current_dialog_id
until 25@ == 21
0AC8: 13@ = allocate_memory_size 8
0AD3: 13@ = format "%d" 12@
0B4B: samp set_current_dialog_editbox_text 13@
0AC9: free_allocated_memory 13@
0B47: samp close_current_dialog_with_button 1
repeat
wait 0
0B4E: samp 25@ = get_current_dialog_id
until 25@ == 22
0B49: samp set_current_dialog_list_item 11@
0B47: samp close_current_dialog_with_button 1
30@ = 0
0ACD: show_text_highpriority "~W~MyBus ~R~OFF" time 1500
Break
end
end
end
end
end
end
:mybus
if
30@ == 0
then
0B35: samp 11@ = get_last_command_params
if
0AD4: 10@ = scan_string 11@ format "%d %d" 11@ 12@
then
if
12@ < 101
then
11@ -= 1
30@ = 1
0ACD: show_text_highpriority "~W~MyBus ~G~ON" time 1500
else
0AF8: samp add_message_to_chat "[MyBus]: {EAEAEA}Цена не может превышать {c3d73e}100${EAEAEA}." 0xc3d73e
end
else
0AF8: samp add_message_to_chat "[MyBus]: {EAEAEA}Правильный ввод - {c3d73e}/mybus [маршрут] [цена]{EAEAEA}." 0xc3d73e
end
else
30@ = 0
0ACD: show_text_highpriority "~W~MyBus ~R~OFF" time 1500
end
0B43: samp cmd_ret
:sendkeytwo
0B2B: samp 0@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0B24: samp 0@ = get_player_ptr 0@
0@ += 177
0AC8: 1@ = allocate_memory_size 63
0C10: memcpy destination 1@ source 0@ size 63
0C0D: struct 1@ offset 6 size 2 = 512
0B3D: raknet 2@ = new_bit_stream
0B40: raknet bit_stream 2@ write 217 type 0 size 1
0B40: raknet bit_stream 2@ write 1@ type 5 size 63
0B42: raknet send bit_stream 2@ priority 1 reliability 1 ordering_channel 0
0B3E: raknet delete_bit_stream 2@
0AC9: free_allocated_memory 1@
return
