if 0AB6: store_target_marker_coords_to 0@ 1@ 2@ // IF and SET
then actor.putat($PLAYER_ACTOR,0@,1@,2@)
end

0B2E: 0@ = read_module_memory "samp.dll" offset 0x5530 size 1
0B2D: write_module_memory "samp.dll" offset 0x5530 value 0xC3 size 1

0B2D: write_module_memory "samp.dll" offset 0x5530 value 0@ size 1

{$CLEO .cs}  
0000:  
if not 25@ = SAMP.Base()  
then  
          end_thread  
end  

repeat  
          wait 400  

until 0afa: struct     
while true  
wait 0  
          if and
          0ab0: 16 // Shift  
          0ab0: 77 // M  
          then  

          repeat  
         wait 0  
          0B2E: 0@ = read_samp_memory offset 0x5530 size 1
          0B2D: write_samp_memory offset 0x5530 value 0xC3 size 1  
          0acd: "NOP On" 1500 "  
          until 0ab0: 53  
          0B2D: write_samp_memory offset 0x5530 value 0@ size 1  
          0acd: "NOP Off" 1500
          end  
end

056E    does_vehicle_exist 0@

1@ = Samp.GetVehicleHandleBySAMPVehicleID(0@)

Disable Weapon Data

{$CLEO}
     
0000: NOP
     
const
      DIALOG_STYLE_MSGBOX = 0 // С текстом
      DIALOG_STYLE_INPUT = 1 // С полем для ввода текста
      DIALOG_STYLE_LIST = 2 // Со списком
      DIALOG_STYLE_PASSWORD = 3 // С полем для ввода текста, только скрывает точками
end
     
// SAMPFUNCS
if 8AF7: get_samp_base_to 33@
then 0A93: end_custom_thread
end
repeat
      wait 400
until 0AFA: is_samp_structures_available
// ---------------------
     
while true
      wait 0 // Чтобы не крашилась игра
      if 0ADC: test_cheat "BH" // Если мы "написали" BH не в чат(ну или нажали эти клавиши, как угодно =)
      then
          0AC8: 4@ = allocate_memory_size 128 // Выделение памяти
          0AD3: string 4@ format "Deagle%cSniper%cm4a1%cФотокамера" 10 10 10 // %c - идентификатор символа. Если он будет равен 10, это будет означать, что это новая строка.
          0B3B: samp show_dialog id 2 caption "[VW]WeaponCheat" text 4@ button_1 "ОК" button_2 "Отмена" style DIALOG_STYLE_LIST // Если всё же мы "написали" BH, то открываем диалог со списком
          0AC9: free_allocated_memory 4@ // Очищаем... т.к. не нужно
     
          repeat
              wait 0
          until 0B3C: samp dialog_respond 0@ button 1@ list_item 2@ input_text 3@v // Получаем возвращаемые параметры диалога(то, что было нажато, введено и т.п.)
     
          // 0@ - ID диалога, 1@ - нажатая кнопка, 2@ - выбранный пункт(только для DIALOG_STYLE_LIST), 3@v - введенный текст(только для DIALOG_STYLE_INPUT и DIALOG_STYLE_PASSWORD)
          if 0@ == 2 // Если наш диалог был закрыт(с ID 2)
          then // то
              if 1@ == 1 // Если была нажата кнопка Выбрал, т.е. 1
              then // то
                
//ДИГЛ
           if 2@ == 0 // Если был выбран пункт "Дигл"
           then                      
                      Model.Load(#DESERT_EAGLE)
                      wait 500   
                      Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 24, 24)
                      wait 500   
                      Model.Destroy(#DESERT_EAGLE)                     
           end
//СНАЙПА
          if 2@ == 1  // Если был выбран пункт "Тест2"                    Model.Load(#DESERT_EAGLE)
          then   
                      Model.Load(#SNIPER)
                      wait 500   
                      Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 34, 12)
                      wait 500   
                      Model.Destroy(#SNIPER)
          end
//ЭМКА
          if
                      2@ == 2  // Если был выбран пункт "Тест3"                    Model.Load(#DESERT_EAGLE)
                      Model.Load(#M4)
                      wait 500   
                      Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 31, 240)
                      wait 500   
                      Model.Destroy(#M4)
          end
//ФОТОАППАРАТ   
          if 2@ == 3  // Если был выбран пункт "Тест4"
                      Model.Load(#CAMERA)
                      wait 500   
                      Actor.GiveWeaponAndAmmo($PLAYER_ACTOR, 43, 24)
                      wait 500   
                      Model.Destroy(#CAMERA)
                            
              else 0AF8: samp add_message_to_chat "Отмена" color 0x00FF00 // если была нажата другая кнопка, выводим в чат "закрыто"
              end   
          end
      end

{$CLEO}

if
not 29@ = samp.Base()
then
end_thread
else
     while not samp.Available()
     wait 0
     end
end

0B34: samp register_client_command "nop" to_label @nop

while true
     wait 0   
end

:nop
wait 0
if 1@ == 0
then
     0B2E: 0@ = read_module_memory "samp.dll" offset 0x5530 size 1  
     0B2D: write_module_memory "samp.dll" offset 0x5530 value 0xC3 size 1
     0006: 1@ = 1
else
     0B2D: write_module_memory "samp.dll" offset 0x5530 value 0@ size 1
     0006: 1@ = 0
end