{$CLEO .cs}
0000:
repeat
wait 0
until samp.Available()
//chatmsg ""
0B34: samp register_client_command ".grnlon" to_label @GreenScreenLayerCMDOn
0B34: samp register_client_command ".grnloff" to_label @GreenScreenLayerCMDOff
0B6D: render 15@ = create_font "Bauhaus 93" height 30 flags 0x20
0B80: dialog 20@ = create "{800000}"
0B84: dialog 20@ set_pos_XY 0 -100 size 5000 2000
Dialog.SetBackgroundColor(20@, 975689078) //975689078
0B80: dialog 21@ = create "{800000}"
0B84: dialog 21@ set_pos_XY 0 -100 size 5000 2000
Dialog.SetBackgroundColor(21@, 975689078) //this number was the closest one to green color its really hard to find green color via this //method
0B86: dialog 20@ set_visible 0
0B86: dialog 21@ set_visible 0
:GreenScreenViaKey
wait 0
if and
0AB0: key_pressed 17 //left crtl
0AB0: key_pressed 71 // G key
then
fade 0 500
wait 400
fade 1 250
0169: set_fade_color_RGB 63 218 21
wait 0
end
if and
0AB0: key_pressed 17
0AB0: key_pressed 49
then
wait 0
0B86: dialog 20@ set_visible 1
0B86: dialog 21@ set_visible 1
wait 0
end
if and
0AB0: key_pressed 17
0AB0: key_pressed 48
then
wait 0
0B86: dialog 20@ set_visible 0
0B86: dialog 21@ set_visible 0
wait 0
end
jump @GreenScreenViaKey
:GreenScreenLayerCMDOn
wait 0
0B86: dialog 20@ set_visible 1
0B86: dialog 21@ set_visible 1
cmdret
:GreenScreenLayerCMDOff
wait 0
0B86: dialog 20@ set_visible 0
0B86: dialog 21@ set_visible 0
cmdret