essa Posted June 12, 2014 Share Posted June 12, 2014 السلام عليكم ورحمة الله وبركاته , اخواني اريد كود عند فتح نافذة تظهر من الاسفل مثلاً عندما افتح مود تظهر نافذته من الاسفل الى الاعلى اتمنى ان يكون طلبي مفهوم وشكراً Link to comment
ΞĪŚŚÀ Posted June 12, 2014 Share Posted June 12, 2014 السلام عليكم ورحمة الله وبركاته, اخواني اريد كود عند فتح نافذة تظهر من الاسفل مثلاً عندما افتح مود تظهر نافذته من الاسفل الى الاعلى اتمنى ان يكون طلبي مفهوم وشكراً -------------------------------------------------------------- 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 Posted June 12, 2014 Author Share Posted June 12, 2014 السلام عليكم ورحمة الله وبركاته, اخواني اريد كود عند فتح نافذة تظهر من الاسفل مثلاً عندما افتح مود تظهر نافذته من الاسفل الى الاعلى اتمنى ان يكون طلبي مفهوم وشكراً -------------------------------------------------------------- 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
#DRAGON!FIRE Posted June 12, 2014 Share Posted June 12, 2014 فقط ضع اسم النافذة تحت النافذة او مكان تحتها local element = guiCreateWindow( ...... ) guiMoveDownToCenter( element ) Link to comment
jafar Posted June 12, 2014 Share Posted June 12, 2014 (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 June 12, 2014 by Guest Link to comment
TAPL Posted June 12, 2014 Share Posted June 12, 2014 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 Posted June 12, 2014 Author Share Posted June 12, 2014 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
TAPL Posted June 12, 2014 Share Posted June 12, 2014 لازم تستخدم هذا الكود عشان تسوي الحركة guiMoveDownToCenter(window) Link to comment
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now