How Can You Make a Night Vision Gui Have Actual Night Vision? Please Help!

So I have a night vision gui that only shows red night vision, but when your in a dark place you can't see anything! Theres 2 buttons to turn it on and off;

On:

local Buttone = script.Parent
Short = script.Parent.Parent.Vision


function onClick()


  Short.Active = false
  Short.Visible = true


end

Buttone.MouseButton1Click:connect(onClick)

Off:

local Buttona = script.Parent
Short = script.Parent.Parent.Vision



function onClick()


  Short.Active = false
  Short.Visible = false


end

How can you make it show the gui and have a local ambient 100, 100, 100? Thank you for your time!