Erlang said:just share this cleo on public cleo postParazitas said:Erlang said:Parazitas said:Erlang said:there some cleo thats make screen clear from server hud ?
I working with this..
this will great one PFFH:
I can't give u this cleo.. , u not reading rules..
https://i.imgur.com/831Fy67.png
I don't accept your request anymore.., you not reading rules...
Good Luck.
PHP:
{$CLEO .cs}
0000: NOP
REPEAT
WAIT 0
UNTIL 0afa:
if 0AAB: file_exists "CLEO\SreenShotTool.ini"
then
0AF0: 1@ getint "Cleo\SreenShotTool.ini" section "DialogPosition" key "Positionxy"
0AF0: 2@ getint "Cleo\SreenShotTool.ini" section "DialogPosition" key "Positionz"
end
Dialog.Create(0@, "{FF0000}")
// right/left
// I
// I down/ up
// I I
// V V
Dialog.SetRECT(0@, 1@, 2@, 200, 220)
/// Dialog Background color
Dialog.SetBackgroundColor(0@, -939524096)
/// Dialog check Box
31@ = 0
Dialog.AddCheckBox(0@, 1, "", 8, 31@, 200, 20)
31@ = 0
Dialog.AddCheckBox(0@, 8, "", 173, 31@, 200, 20)
31@ += 40
Dialog.AddCheckBox(0@, 4, ""/*"{FF0000}Dissable ALL"*/, 8, 31@, 200, 20)
31@ += 20
Dialog.AddCheckBox(0@, 2, ""/*"{FF0000}Dissable HUD"*/, 8, 31@, 200, 20)
31@ += 20
Dialog.AddCheckBox(0@, 3, ""/*"{FF0000}Dissable RADAR"*/, 8, 31@, 200, 20)
31@ += 20
Dialog.AddCheckBox(0@, 5, ""/*"{FF0000}Dissable CAR NAME"*/, 8, 31@, 200, 20)
31@ += 20
Dialog.AddCheckBox(0@, 6, ""/*"{FF0000}Dissable ZONE NAME"*/, 8, 31@, 200, 20)
31@ += 20
Dialog.AddCheckBox(0@, 7, ""/*"{FF0000}Enable CLEAN SREEN"*/, 8, 31@, 200, 20)
/// Dialog AddStatic
31@ = 43
Dialog.AddStatic(0@, 9, "{FFFFFF}Dissable all", 35, 31@, 200, 15)
31@ += 20
Dialog.AddStatic(0@, 9, "{FFFFFF}Dissable hud", 35, 31@, 200, 15)
31@ += 20
Dialog.AddStatic(0@, 9, "{FFFFFF}Dissable radar", 35, 31@, 200, 15)
31@ += 20
Dialog.AddStatic(0@, 9, "{FFFFFF}Dissable car name", 35, 31@, 200, 15)
31@ += 20
Dialog.AddStatic(0@, 9, "{FFFFFF}Dissable zone name", 35, 31@, 200, 15)
31@ += 20
Dialog.AddStatic(0@, 9, "{00FF00}Enable clean sreen", 35, 31@, 200, 15)
/// Dialog AddStatic Dialog Name
Dialog.AddStatic(0@, 9, "{FF0000}SreenShot Tool", 45, 3, 200, 15)
31@ = 180
Dialog.AddButton(0@, 10, "Close", 65, 31@, 70, 20)
/// Dialog minimize off
Dialog.SetMinimized(0@, 0)
/// Dialog CheckBox colors
Dialog.SetCheckBoxColor(0@, 1, -15952405)
Dialog.SetCheckBoxColor(0@, 2, -15952405)
Dialog.SetCheckBoxColor(0@, 3, -15952405)
Dialog.SetCheckBoxColor(0@, 4, -15952405)
Dialog.SetCheckBoxColor(0@, 5, -15952405)
Dialog.SetCheckBoxColor(0@, 6, -15952405)
Dialog.SetCheckBoxColor(0@, 7, -15952405)
Dialog.SetCheckBoxColor(0@, 8, -15952405)
/// Dialog set not visibile
Dialog.SetVisible(0@,0)
0B34: "ss" @ShowDialog
/* -SAMPFUNCS */
0B2D: write_samp_memory offset 0x5D8C1 value 0 size 1
while true
wait 0
IF 8AAB: file_exists "CLEO\SreenShotTool.ini"
THEN
0AF1: write_int 500 to_ini_file "Cleo\SreenShotTool.ini" section "DialogPosition" key "Positionxy"
0AF1: write_int 500 to_ini_file "Cleo\SreenShotTool.ini" section "DialogPosition" key "Positionz"
END
IF
0B92: dialog 0@ checkbox 1 is_checked
THEN
0B9E: dialog 0@ checkbox 8 set_checked 1
ELSE
0B9E: dialog 0@ checkbox 8 set_checked 0
END
IF
0B92: dialog 0@ checkbox 2 is_checked
THEN
0AB1: call @HUD_OFF 0
ELSE
0826: display_hud 1
END
IF
0B92: dialog 0@ checkbox 3 is_checked
THEN
0AB1: call @RADAR_OFF 0
ELSE
0A8C: write_memory 12216172 size 1 value 0 virtual_protect 0
END
IF
0B92: dialog 0@ checkbox 4 is_checked
THEN
0AB1: call @OFF_ALL 0
IF AND
0B92: dialog 0@ checkbox 4 is_checked
0B92: dialog 0@ checkbox 2 is_checked
THEN
0B9E: dialog 0@ checkbox 2 set_checked 0
END
IF AND
0B92: dialog 0@ checkbox 4 is_checked
0B92: dialog 0@ checkbox 3 is_checked
THEN
0B9E: dialog 0@ checkbox 3 set_checked 0
END
IF AND
0B92: dialog 0@ checkbox 4 is_checked
0B92: dialog 0@ checkbox 5 is_checked
THEN
0B9E: dialog 0@ checkbox 5 set_checked 0
END
IF AND
0B92: dialog 0@ checkbox 4 is_checked
0B92: dialog 0@ checkbox 6 is_checked
THEN
0B9E: dialog 0@ checkbox 6 set_checked 0
END
ELSE
0BDD: samp set_chat_display_mode 2
END
IF
0B92: dialog 0@ checkbox 5 is_checked
THEN
0AB1: call @CARNAME_OFF 0
ELSE
09B9: show_entered_car_name 1
END
IF
0B92: dialog 0@ checkbox 6 is_checked
THEN
0AB1: call @ZONE_OFF 0
ELSE
09BA: show_entered_zone_name 1
END
IF AND
0B92: dialog 0@ checkbox 7 is_checked
0AB0: 119 //F8
THEN
WAIT 1 //get clean frame
0AB1: CALL @TakeScreen 0
ELSE
END
if Dialog.IsVisible(0@)
then
SAMP.ToggleCursor(1)
if 0B81: dialog 0@ pop_event_to 2@ control_id_to 3@
then
if and
3@ == 1
0B92: dialog 0@ checkbox 3@ is_checked
then
//move dialog
Dialog.GetRECT(0@, 3@, 4@, 5@, 6@)
0B5E: get_cursor_pos 1@ 2@
000C: 3@ -= 1@
000C: 4@ -= 2@
while 8B81: dialog 0@ pop_event_to $n control_id_to $n
wait 0
0B5E: get_cursor_pos 1@ 2@
000A: 1@ += 3@
000A: 2@ += 4@
Dialog.SetRECT(0@, 1@, 2@, 5@, 6@)
end
//save position, will auto create file if doesn\'t exist
Dialog.GetRECT(0@, 3@, 4@, 5@, 6@)
0AF1: write_int 3@ to_ini_file "Cleo\SreenShotTool.ini" section "DialogPosition" key "Positionxy"
0AF1: write_int 4@ to_ini_file "Cleo\SreenShotTool.ini" section "DialogPosition" key "Positionz"
end
if and
3@ == 10
2@ == 257
then
Dialog.SetVisible(0@,0)
SAMP.ToggleCursor(0)
end
end
end
end
:ShowDialog
Dialog.SetVisible(0@, 1)
SAMP.ToggleCursor(1)
0B43:
:TakeScreen
IF 0AA2: 0@ = "samp.dll"
THEN 0@ += 0x119CBC
0A8C: writeMem 0@ sz 1 val 1 vp 0
END
/*
-SAMPFUNCS
0B2D: write_samp_memory offset 0x119CBC value 1 size 1
*/
0AB2: RET 0
:HUD_OFF
wait 0
0826: display_hud 0
0AB2: RET 0
:RADAR_OFF
wait 0
0A8C: write_memory 12216172 size 1 value 2 virtual_protect 0
0AB2: RET 0
:OFF_ALL
wait 0
0BDD: samp set_chat_display_mode 0
09B9: show_entered_car_name 0
09BA: show_entered_zone_name 0
0AB2: RET 0
:CARNAME_OFF
wait 0
09B9: show_entered_car_name 0
0AB2: RET 0
:ZONE_OFF
wait 0
09BA: show_entered_zone_name 0
0AB2: RET 0