Jump to content

اظهار النافذه من الاسفل الى الاعلى

essa

By essa
in البرمجة

Recommended Posts

essa Advanced Member

essa

Posted
Posted

السلام عليكم ورحمة الله وبركاته

,

اخواني اريد كود عند فتح نافذة تظهر من الاسفل

مثلاً عندما افتح مود تظهر نافذته من الاسفل الى الاعلى

اتمنى ان يكون طلبي مفهوم

وشكراً

Link to comment
ΞĪŚŚÀ Thug

ΞĪŚŚÀ

Posted
Posted
السلام عليكم ورحمة الله وبركاته

,

اخواني اريد كود عند فتح نافذة تظهر من الاسفل

مثلاً عندما افتح مود تظهر نافذته من الاسفل الى الاعلى

اتمنى ان يكون طلبي مفهوم

وشكراً

  
  
  
  
-------------------------------------------------------------- 
  
Code Move Gui Down To Center ------------- 
  
Create By Booo ----------- 
-------------------------------------------------------------- 
  
  
  TimeGuiSetDownC = { } 
      
      
    function guiMoveDownToCenter(gui) 
    if getElementData(gui,"HelhGui") == false then 
        setElementData(gui,"HelhGui",true) 
        local s1,s2=guiGetScreenSize() 
        local w1,w2=guiGetSize(gui,false) 
        local x,y = (s1-w1)/2,(s2-w2)/2 
        guiSetPosition(gui,x,(w2*4),false) 
      
    TimeGuiSetDownC[gui] = setTimer(guiMoveDownToCenter,50,0,gui) 
    end 
        local a,b=guiGetScreenSize() 
        local w1,w2=guiGetSize(gui,false) 
        local x,y = (a-w1)/2,(b-w2)/2 
        local x1,y1 = guiGetPosition ( gui, false) 
    if (y1 <= y) then 
        killTimer(TimeGuiSetDownC[gui]) 
        setElementData(gui,"HelhGui",false) 
        else 
        guiSetPosition(gui,x1,(y1-10),false) 
    end 
    end

Link to comment
essa Advanced Member

essa

Posted
  • Author
Posted
السلام عليكم ورحمة الله وبركاته

,

اخواني اريد كود عند فتح نافذة تظهر من الاسفل

مثلاً عندما افتح مود تظهر نافذته من الاسفل الى الاعلى

اتمنى ان يكون طلبي مفهوم

وشكراً

  
  
  
  
-------------------------------------------------------------- 
  
Code Move Gui Down To Center ------------- 
  
Create By Booo ----------- 
-------------------------------------------------------------- 
  
  
  TimeGuiSetDownC = { } 
      
      
    function guiMoveDownToCenter(gui) 
    if getElementData(gui,"HelhGui") == false then 
        setElementData(gui,"HelhGui",true) 
        local s1,s2=guiGetScreenSize() 
        local w1,w2=guiGetSize(gui,false) 
        local x,y = (s1-w1)/2,(s2-w2)/2 
        guiSetPosition(gui,x,(w2*4),false) 
      
    TimeGuiSetDownC[gui] = setTimer(guiMoveDownToCenter,50,0,gui) 
    end 
        local a,b=guiGetScreenSize() 
        local w1,w2=guiGetSize(gui,false) 
        local x,y = (a-w1)/2,(b-w2)/2 
        local x1,y1 = guiGetPosition ( gui, false) 
    if (y1 <= y) then 
        killTimer(TimeGuiSetDownC[gui]) 
        setElementData(gui,"HelhGui",false) 
        else 
        guiSetPosition(gui,x1,(y1-10),false) 
    end 
    end

ما ضبط معي

Link to comment
jafar Loc

jafar

Posted
Posted (edited)

 

-------------------------------------------------------------- 
  
-- Code Move Gui Down To Center ------------- 
  
-- Create By Booo ----------- 
-------------------------------------------------------------- 
  
  TimeGuiSetDownC = { } 
      
      
    function guiMoveDownToCenter(gui) 
    if getElementData(gui,"HelhGui") == false then 
        setElementData(gui,"HelhGui",true) 
        local s1,s2=guiGetScreenSize() 
        local w1,w2=guiGetSize(gui,false) 
        local x,y = (s1-w1)/2,(s2-w2)/2 
        guiSetPosition(gui,x,(w2*4),false) 
      
    TimeGuiSetDownC[gui] = setTimer(guiMoveDownToCenter,50,0,gui) 
    end 
        local a,b=guiGetScreenSize() 
        local w1,w2=guiGetSize(gui,false) 
        local x,y = (a-w1)/2,(b-w2)/2 
        local x1,y1 = guiGetPosition ( gui, false) 
    if (y1 <= y) then 
        killTimer(TimeGuiSetDownC[gui]) 
        setElementData(gui,"HelhGui",false) 
        else 
        guiSetPosition(gui,x1,(y1-10),false) 
    end 
    end 
  
window = guiCreateWindow ( 100, 100, 100, 100, "", false ); 
guiMoveDownToCenter ( window );

Edited by Guest
Link to comment
TAPL Ghetto Star

TAPL

Posted
Posted 
local s1, s2 = guiGetScreenSize() 
TimeGuiSetDownC = {} 
  
function guiMoveDownToCenter(gui) 
    local w1, w2 = guiGetSize(gui, false) 
    if not isTimer(TimeGuiSetDownC[gui]) then 
        local x, y = (s1-w1)/2, (s2-w2)+w2 
        guiSetPosition(gui, x, y, false) 
        TimeGuiSetDownC[gui] = setTimer(guiMoveDownToCenter, 50, 0, gui) 
    end 
    local x, y = guiGetPosition(gui, false) 
    if (y <= (s2-w2)/2) then 
        killTimer(TimeGuiSetDownC[gui]) 
        TimeGuiSetDownC[gui] = nil 
    else 
        guiSetPosition(gui, x, (y-10), false) 
    end 
end 
  
window = guiCreateWindow(100, 100, 100, 100, "TEST!!!", false) 
guiMoveDownToCenter(window)

او ممكن تجرب ذا الحركة بتكون فيه اكثر سلاسه

local s1, s2 = guiGetScreenSize() 
GuiSetDownC = {} 
speed = 5 -- تقدر تزيد سرعة الحركة من هنا 
  
function guiMoveDownToCenter(gui) 
    for i, v in ipairs (GuiSetDownC) do 
        if (v == gui) then 
            return false 
        end 
    end 
    local w1, w2 = guiGetSize(gui, false) 
    local x, y = (s1-w1)/2, (s2-w2)+w2 
    guiSetPosition(gui, x, y, false) 
    table.insert(GuiSetDownC, gui) 
end 
  
addEventHandler("onClientRender", root, 
function() 
    for i, gui in ipairs(GuiSetDownC) do 
        local x, y = guiGetPosition(gui, false) 
        local w1, w2 = guiGetSize(gui, false) 
        if (y <= (s2-w2)/2) then 
            GuiSetDownC[i] = nil 
        else 
            guiSetPosition(gui, x, (y-speed), false) 
        end 
    end 
end) 
  
window = guiCreateWindow(100, 100, 100, 100, "TEST!!!", false) 
guiMoveDownToCenter(window)

Link to comment
essa Advanced Member

essa

Posted
  • Author
Posted 
local s1, s2 = guiGetScreenSize() 
TimeGuiSetDownC = {} 
  
function guiMoveDownToCenter(gui) 
    local w1, w2 = guiGetSize(gui, false) 
    if not isTimer(TimeGuiSetDownC[gui]) then 
        local x, y = (s1-w1)/2, (s2-w2)+w2 
        guiSetPosition(gui, x, y, false) 
        TimeGuiSetDownC[gui] = setTimer(guiMoveDownToCenter, 50, 0, gui) 
    end 
    local x, y = guiGetPosition(gui, false) 
    if (y <= (s2-w2)/2) then 
        killTimer(TimeGuiSetDownC[gui]) 
        TimeGuiSetDownC[gui] = nil 
    else 
        guiSetPosition(gui, x, (y-10), false) 
    end 
end 
  
window = guiCreateWindow(100, 100, 100, 100, "TEST!!!", false) 
guiMoveDownToCenter(window)

او ممكن تجرب ذا الحركة بتكون فيه اكثر سلاسه

local s1, s2 = guiGetScreenSize() 
GuiSetDownC = {} 
speed = 5 -- تقدر تزيد سرعة الحركة من هنا 
  
function guiMoveDownToCenter(gui) 
    for i, v in ipairs (GuiSetDownC) do 
        if (v == gui) then 
            return false 
        end 
    end 
    local w1, w2 = guiGetSize(gui, false) 
    local x, y = (s1-w1)/2, (s2-w2)+w2 
    guiSetPosition(gui, x, y, false) 
    table.insert(GuiSetDownC, gui) 
end 
  
addEventHandler("onClientRender", root, 
function() 
    for i, gui in ipairs(GuiSetDownC) do 
        local x, y = guiGetPosition(gui, false) 
        local w1, w2 = guiGetSize(gui, false) 
        if (y <= (s2-w2)/2) then 
            GuiSetDownC[i] = nil 
        else 
            guiSetPosition(gui, x, (y-speed), false) 
        end 
    end 
end) 
  
window = guiCreateWindow(100, 100, 100, 100, "TEST!!!", false) 
guiMoveDownToCenter(window)

شكراً لك اخي تابل

,

لكن في هذا الكود فقط عند فتح النافذة اول مره تظهر الحركة

ولكن عند فتح النافذة مره اخرى لا يظهر التأثير

هل يمكن جعل هذا التأثير دائم ؟

-

Link to comment

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
Go to topic listing

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...