Немножко переписанный под себя, но всё тот же старый, добрый dgun. Очень удобно ставить на бинд. В архиве скомпилированный скрипт и исходный код.
Исходный код:
PHP:
{$VERSION 3.1.0027}
{$CLEO .cs}
0662: NOP "CLEO mini-dgun"
thread "minidgun"
if
8AF7: get_samp_base_to 33@
then
0A93: end_custom_thread
end
repeat
wait 400
until 0AFA: is_samp_structures_available
wait 0
0AF8: samp add_message_to_chat "[Minidgun]: %cEAEAEA%cВведите %c00CCFF%c/dmini%cEAEAEA%c, чтобы создать оружие." 0x00CCFF 123 125 123 125 123 125
0B34: samp register_client_command "dmini" to_label @minidgun
while true
wait 0
end
:minidgun
0B35: samp 0@ = get_last_command_params
0C17: 1@ = strlen 0@
if
1@ > 0
then
0AD4: 0@ = scan_string 0@ format "%d %d" 1@ 2@
if or
1@ == 17
1@ == 23
1@ == 24
1@ == 25
1@ == 29
1@ == 5
1@ == 11
1@ == 41
then
jump @givegun
else
if or
1@ == 30
1@ == 31
1@ == 33
1@ == 34
1@ == 46
1@ == 10
1@ == 12
1@ == 13
then
jump @givegun
else
if or
1@ == 14
1@ == 15
1@ == 42
1@ == 43
then
:givegun
if
2@ > 0
then
8AF7: get_samp_base_to 32@
32@ += 22112
Model.Load(#SILENCED)
Model.Load(#DESERT_EAGLE)
Model.Load(#CHROMEGUN)
Model.Load(#M4)
Model.Load(#AK47)
Model.Load(#MP5LNG)
Model.Load(#CUNTGUN)
Model.Load(#SNIPER)
Model.Load(#TEARGAS)
Model.Load(#GUN_DILDO1)
Model.Load(#GUN_DILDO2)
Model.Load(#GUN_VIBE1)
Model.Load(#GUN_VIBE2)
Model.Load(#BAT)
Model.Load(#GUN_PARA)
Model.Load(#FLOWERA)
Model.Load(#GUN_CANE)
Model.Load(#SPRAYCAN)
Model.Load(#FIRE_EX)
Model.Load(#CAMERA)
0A8C: write_memory 32@ size 1 value 195 virtual_protect 1
wait 500
01B2: give_actor $PLAYER_ACTOR weapon 1@ ammo 2@
wait 500
Model.Destroy(#SILENCED)
Model.Destroy(#DESERT_EAGLE)
Model.Destroy(#CHROMEGUN)
Model.Destroy(#M4)
Model.Destroy(#AK47)
Model.Destroy(#MP5LNG)
Model.Destroy(#CUNTGUN)
Model.Destroy(#SNIPER)
Model.Destroy(#TEARGAS)
Model.Destroy(#GUN_DILDO1)
Model.Destroy(#GUN_DILDO2)
Model.Destroy(#GUN_VIBE1)
Model.Destroy(#GUN_VIBE2)
Model.Destroy(#BAT)
Model.Destroy(#GUN_PARA)
Model.Destroy(#FLOWERA)
Model.Destroy(#GUN_CANE)
Model.Destroy(#SPRAYCAN)
Model.Destroy(#FIRE_EX)
Model.Destroy(#CAMERA)
0AF8: samp add_message_to_chat "[Minidgun]: %cEAEAEA%cВы создали оружие id%c00CCFF%c %d %cEAEAEA%cи %c00CCFF%c%d %cEAEAEA%cпатронов." 0x00CCFF 123 125 123 125 1@ 123 125 123 125 2@ 123 125
else
jump @elsjump
end
else
jump @elsjump
end
end
end
else
jump @elsjump
end
0B43: samp cmd_ret
:elsjump
0AF8: samp add_message_to_chat " * %cEAEAEA%cПравильное использование команды: %c00CCFF%c/dmini [id] [патроны]%cEAEAEA%c. Список разрешённых id:" 0x00CCFF 123 125 123 125 123 125
0AF8: samp add_message_to_chat " * %cEAEAEA%c5(Бита), 10-13(Фалосы), 14(Цветы), 15(Палка), 41(Балончик), 42(Огнетушитель), 43(Камера), 46(Парашют)," 0x00CCFF 123 125
0AF8: samp add_message_to_chat " * %cEAEAEA%c17(Дымовуха), 23(SD Pistol), 24(Deagle), 25(Shotgun), 29(MP5), 30(AK-47), 31(M4), 33(Rifle), 34(Sniper)." 0x00CCFF 123 125
0B43: samp cmd_ret
