- 21
- 7
so i cant get this why this dialog shits dont working. help me pls. ty
{$CLEO}
0000:NOP
REPEAT
wait 100
until 0AFA:
0B34: "hg" @cmdHg
while true
wait 0
end
while true
wait 0
IF 0B3C: samp is_dialog_responded id 100 button 9@ list_item 10@ input_text 0
THEN
IF 0039: 9@ == 1
THEN
IF 0039: 10@ == 0
THEN
Model.Load(368)
END
IF MODEL.Available(368)
THEN
01B2: give_actor $PLAYER_ACTOR weapon 44 ammo 1
wait 50
Model.Destroy(368)
END
IF 0039: 10@ == 1
THEN
Model.Load(369)
END
IF MODEL.Available(369)
THEN
01B2: give_actor $PLAYER_ACTOR weapon 45 ammo 1
wait 50
Model.Destroy(369)
END
IF 0039: 10@ == 2
THEN
Model.Load(343)
END
IF MODEL.Available(343)
THEN
01B2: give_actor $PLAYER_ACTOR weapon 17 ammo 9999
wait 50
Model.Destroy(343)
END
IF 0039: 10@ == 3
THEN
Model.Load(371)
END
IF MODEL.Available(371)
THEN
01B2: give_actor $PLAYER_ACTOR weapon 45 ammo 1
wait 50
Model.Destroy(371)
END
IF 0039: 10@ == 4
THEN
Model.Load(367)
END
IF MODEL.Available(367)
THEN
01B2: give_actor $PLAYER_ACTOR weapon 43 ammo 9999
wait 50
Model.Destroy(367)
END
IF 0039: 10@ == 5
THEN
IF
Not Actor.Driving($PLAYER_ACTOR)
THEN
048F: actor $PLAYER_ACTOR remove_weapons
END
END
END
END
:cmdHg
wait 0
0AC6: 1@ = label @TEXT offset
0B3B: samp show_dialog id 100 caption "HGun" text 1@ button_1 "OK" button_2 "CANCEL" style 2
0B43: samp cmd_ret
:text
hex
"{494949}1) {FFFFFF}NIGHT GOGGLES" A
"{494949}2) {FFFFFF}TERMAL GOGGLES" A
"{494949}3) {FFFFFF}TEAR GAS" A
"{494949}4) {FFFFFF}PARACHUTE" A
"{494949}5) {FFFFFF}CAMERA" A
"{a50000}REMOVE ALL WEAPONS" 0
end
{$CLEO}
0000:NOP
REPEAT
wait 100
until 0AFA:
0B34: "hg" @cmdHg
while true
wait 0
end
while true
wait 0
IF 0B3C: samp is_dialog_responded id 100 button 9@ list_item 10@ input_text 0
THEN
IF 0039: 9@ == 1
THEN
IF 0039: 10@ == 0
THEN
Model.Load(368)
END
IF MODEL.Available(368)
THEN
01B2: give_actor $PLAYER_ACTOR weapon 44 ammo 1
wait 50
Model.Destroy(368)
END
IF 0039: 10@ == 1
THEN
Model.Load(369)
END
IF MODEL.Available(369)
THEN
01B2: give_actor $PLAYER_ACTOR weapon 45 ammo 1
wait 50
Model.Destroy(369)
END
IF 0039: 10@ == 2
THEN
Model.Load(343)
END
IF MODEL.Available(343)
THEN
01B2: give_actor $PLAYER_ACTOR weapon 17 ammo 9999
wait 50
Model.Destroy(343)
END
IF 0039: 10@ == 3
THEN
Model.Load(371)
END
IF MODEL.Available(371)
THEN
01B2: give_actor $PLAYER_ACTOR weapon 45 ammo 1
wait 50
Model.Destroy(371)
END
IF 0039: 10@ == 4
THEN
Model.Load(367)
END
IF MODEL.Available(367)
THEN
01B2: give_actor $PLAYER_ACTOR weapon 43 ammo 9999
wait 50
Model.Destroy(367)
END
IF 0039: 10@ == 5
THEN
IF
Not Actor.Driving($PLAYER_ACTOR)
THEN
048F: actor $PLAYER_ACTOR remove_weapons
END
END
END
END
:cmdHg
wait 0
0AC6: 1@ = label @TEXT offset
0B3B: samp show_dialog id 100 caption "HGun" text 1@ button_1 "OK" button_2 "CANCEL" style 2
0B43: samp cmd_ret
:text
hex
"{494949}1) {FFFFFF}NIGHT GOGGLES" A
"{494949}2) {FFFFFF}TERMAL GOGGLES" A
"{494949}3) {FFFFFF}TEAR GAS" A
"{494949}4) {FFFFFF}PARACHUTE" A
"{494949}5) {FFFFFF}CAMERA" A
"{a50000}REMOVE ALL WEAPONS" 0
end