[T1 Request] Evita Transret

Could someone make me an open gl reticle script for Evitas 1.5 or if you have any or know of any standalone opengl ret scripts please let me know





-----
Jessica

$ret::Xoffset = "64";
$ret::Yoffset = "64";

function RetComp::Init() {

if($retComp::Loaded)
return;

$retComp::Loaded = true;

$RetComp::Container = newObject("RetComp_Container", SimGui::Control, 0, 0, 64, 64);
$RetComp::Compass = newObject("RetComp_Compass", FearGui::CompassHud);

Control::SetExtent("RetComp_Compass", 1, 1);

addToSet($RetComp::Contai ner, $RetComp::Compass);
}

function RetComp::GuiOpen(%gui) {

if(%gui != playGui)
return;

if(!$pref::EvRetComp)
return;

addToSet(playGui, $RetComp::Container);

$ret::PosX = ($ScreenX-$ret::Xoffset)/2;
$ret::PosY = ($ScreenY-$ret::Yoffset)/2;

control::setPosition("RetComp_Container", $ret::PosX+1, $ret::PosY+1);
}

function RetComp::GuiClose(%gui) {

if(%gui != playGui)
return;

removeFromSet(playGui, $RetComp::Container);
}

function RetComp::Destroy() {

removeFromSet(playGui, $RetComp::Container);
deleteObject($RetComp::Co ntainer);
}

Event::Attach(eventGuiOpe n, RetComp::GuiOpen);
Event::Attach(eventGuiClo se, RetComp::GuiClose);
Event::Attach(eventExit, RetComp::Destroy);

RetComp::Init();

You'll need his screen.cs file for this to work. Or you can modify the file.