login panel

[momar5700]

Hello

I will, infield registration plate instead of logging to the panel in GameMode

login panel :

http://up.top4top.net/downloadf-top4top ... 1-zip.html

GameMode

    
              
            function centerWindow(center_window) 
                local screenW,screenH=guiGetScreenSize() 
                local windowW,windowH=guiGetSize(center_window,false) 
                local x,y = (screenW-windowW)/2,(screenH-windowH)/2 
                guiSetPosition(center_window,x,y,false) 
            end     
              
            local sm = {} 
            sm.moov = 0 
            sm.object1, sm.object2 = nil, nil 
              
            local function removeCamHandler () 
                if(sm.moov == 1) then 
                    sm.moov = 0 
                    removeEventHandler ( "onClientPreRender", getRootElement(), camRender ) 
                end 
            end 
  
function anim(tag,animTime,de1,de2,de3,hasta1,hasta2,hasta3,typeAnim) 
    local now = getTickCount() 
    local endTime = tag + animTime 
    local elapsedTime = now - tag 
    local duration = endTime - tag 
    local progress = elapsedTime / duration 
    local a, b, c = interpolateBetween ( de1,de2,de3,hasta1,hasta2,hasta3, progress, typeAnim) 
    
    return a, b, c 
end         
            
            function camRender () 
                if sm.object1 and isElement(sm.object1) then 
                    local x1, y1, z1 = getElementPosition ( sm.object1 ) 
                    local x2, y2, z2 = getElementPosition ( sm.object2 ) 
                    setCameraMatrix ( x1, y1, z1, x2, y2, z2 ) 
                end 
            end 
              
            function smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time ) 
                if(sm.moov == 1) then return false end 
                sm.object1 = createObject ( 1337, x1, y1, z1 ) 
                sm.object2 = createObject ( 1337, x1t, y1t, z1t ) 
                setElementAlpha ( sm.object1, 0 ) 
                setElementAlpha ( sm.object2, 0 ) 
                setObjectScale(sm.object1, 0.01) 
                setObjectScale(sm.object2, 0.01) 
                moveObject ( sm.object1, time, x2, y2, z2, 0, 0, 0, "InOutQuad" ) 
                moveObject ( sm.object2, time, x2t, y2t, z2t, 0, 0, 0, "InOutQuad" ) 
                
                addEventHandler ( "onClientPreRender", getRootElement(), camRender ) 
                sm.moov = 1 
                setTimer ( removeCamHandler, time, 1 ) 
                setTimer ( destroyElement, time, 1, sm.object1 ) 
                setTimer ( destroyElement, time, 1, sm.object2 ) 
                return true 
            end 
  
  
  
  
x, y = guiGetScreenSize() 
font="default-bold" 
fontTam=5 
  
spcGam=dxGetTextWidth ("server-SH-3",fontTam,font)  -- اسم سيرفرك بالنجليزي 
  
  
  
function intro() 
    ahora = getTickCount() 
    count=ahora-start 
    dxDrawImage(0, 0, x, y, '',0,0,0,tocolor(255,255,255),false) 
    sizeX=64*1.21 
    sizeY=64*1.21 
    varX,varY,varZ = anim(start,1000,spcGam,0,0,0,spcGam,150,"OutBack") 
    dxDrawText("server-SH-3",0+x/2-varY/2,y/2-100,varY+x/2-varY/2,y,tocolor(38,205,0,255),fontTam,font,nil,nil,true)   ---- اسم سيرفرك 
    dxDrawText("",1+x/-varY/6-dxGetTextWidth ("i",fontTam,font),y/2-100,varY+x/2-varY/2,y,tocolor(255,255,255,255),fontTam,font,nil,nil,false,false,false,true) 
    dxDrawText("♥",x/2+varY/2,y/2-100,varY+x/2-varY/2,y,tocolor(255,255,255,255),fontTam,font,nil,nil,false,false,false,true) 
    if (count>1500) then 
    varX2,varY2,varZ2 = anim(start+1500,1000,0,0,0,200,250,360,"OutBack") 
    dxDrawText("اهلا وسهلا بكم في سيرفر عشاق الوناسة",0+x/2-varY/2,y/2-100+dxGetFontHeight(fontTam,font),varY+x/2-varY/2,y,tocolor(255,255,255,varX2),1.5,font,"center",nil,false,false,false,true)   ---- اسم سيرفرك 
    dxDrawText("نتمنا  ان ينال السيرفر اعجابكم",0+x/2-varY/2,y/2-80+dxGetFontHeight(fontTam,font),varY+x/2-varY/2,y,tocolor(255,255,255,varX2),1.5,font,"center",nil,false,false,false,true)   ---- اسم سيرفرك   
   dxDrawText("Welcome to sever__SH-3 ...",0+x/2-varY/2,y/2-60+dxGetFontHeight(fontTam,font),varY+x/2-varY/2,y,tocolor(255,255,255,varX2),1.5,font,"center",nil,false,false,false,true) 
   end 
    if (count>2000) then 
        varX2,varY3,varZ3 = anim(start+2000,1000*10,0,0,0,200,250,360*5,"Linear") 
    dxDrawImage ( x/2-sizeX/2, y/2+50, sizeX, sizeY, 'img/cargando2.png',180+varZ3) 
    dxDrawText("Loading..",12,y/2+60+sizeY+1,x,y,tocolor(0,0,0,85),1.5,font,"center",nil,false,false,false,true) 
    dxDrawText("Loading..",10,y/2+60+sizeY,x,y,tocolor(255,255,255,255),1.5,font,"center",nil,false,false,false,true) 
    end 
end 
  
function anim(tag,animTime,de1,de2,de3,hasta1,hasta2,hasta3,typeAnim) 
    local now = getTickCount() 
    local endTime = tag + animTime 
    local elapsedTime = now - tag 
    local duration = endTime - tag 
    local progress = elapsedTime / duration 
    local a, b, c = interpolateBetween ( de1,de2,de3,hasta1,hasta2,hasta3, progress, typeAnim) 
    
    return a, b, c 
end 
  
fileDelete("intro_c.lua") 
  
  
  
  
  
local sx, sy = guiGetScreenSize() 
  
alpha = 250 
MP = "files/1.png" 
MX = sx 
MY = sy 
  
function adjIntro(adj) 
    _, times = getTimerDetails(IntroTimer) 
    if adj == "M1" then 
        MX = (MX*0.95)+5 
        MY = (MY*0.95) 
        if times == 1 then 
            setTimer(function() 
                if (alpha <= 250) and not (alpha <= 0) then 
                    alpha = alpha - 10 
                else 
                    IntroTimer = setTimer(adjIntro, 50, 26, "M2") 
                end 
            end, 50, 26) 
        end 
    elseif adj == "M2" then 
        if (alpha < 250) and (alpha >= 0) then 
            alpha = alpha + 10 
        end 
        MX = (MX/0.95)-5 
        MY = (MY/0.95) 
        MP = "files/2.png" 
        if times == 1 then 
            setTimer(function() 
                MP = "files/3.png" 
                setTimer(function() 
                    IntroTimer = setTimer(adjIntro, 50, 26, "M3") 
                end, 3500, 1) 
            end, 4000, 1) 
        end 
    elseif adj == "M3" then 
            MX = (MX*0.95)+5 
            MY = (MY*0.95) 
        if times == 1 then 
            MP = "files/4.png" 
            MX = (MX/0.95)-5 
            MY = (MY/0.95) 
            setTimer(function() 
                setTimer(function() 
                    if (alpha <= 250) and not (alpha <= 0) then 
                        alpha = alpha - 10 
                    else 
                        removeEventHandler("onClientRender", root, drawIntro) 
                        fadeCamera(true, 6, 0, 0, 0) 
                        setCameraMatrix(-1475.5, 831.18, 65.5, -1487.5, 800.18, 65.5) 
                        dx = true 
                        showCursor(true) 
                        guiSetVisible(wnd, true) 
                    end 
                end, 50, 26) 
            end, 3500, 1) 
        end 
    end 
end 
  
function drawIntro() 
    dxDrawImage(sx/2-(MX/2), sy/2-(MY/2), MX, MY, MP, 0, 0, 0, tocolor(255, 255, 255, alpha)) 
end 
  
function main() 
    removeEventHandler ("onClientRender",root,Dx) 
    fadeCamera(false); 
    showChat(false) 
    IntroSong = playSound ("files/Intro.mp3") 
    showPlayerHudComponent("all", false) 
    start = getTickCount() 
    addEventHandler("onClientRender",getRootElement(),intro) 
    setTimer ( function() 
    removeEventHandler("onClientRender",getRootElement(),intro) 
    IntroTimer = setTimer(adjIntro, 50, 26, "M1") 
    addEventHandler("onClientRender", root, drawIntro) 
    triggerEvent("onFinishIntro",getRootElement()) 
    setCameraMatrix(-1475.5, 831.18, 65.5, -1487.5, 800.18, 65.5) 
    
    guiSetInputEnabled(true) 
  
    setElementDimension(localPlayer,0) 
  
    setElementData(localPlayer,"new",false) 
  
    outputChatBox("#0069c7 ## #ff0000 GameMode By #0069c7[#ff0000MR~#0069c7Mos.[T].aّّّfA~#ff0000] #0069c7##",255,0,0,true) 
    
    end, 5000, 1 ) 
end 
addEventHandler("onClientResourceStart",getResourceRootElement(getThisResource()),main) 
  
  
            wnd = guiCreateStaticImage(45, 8, 718, 544, "img.png",false) 
   
            lojio = guiCreateStaticImage(9, 6, 694, 285, "fondo.png", false, wnd)   
            english = guiCreateButton(0.0231,0.0284,0.0566,0.1082,"En",false,wnd) 
            guiSetFont(english,"default-bold-small") 
    guiSetVisible(wnd,false) 
            setTimer(function() 
            guiSetProperty(english, 'NormalTextColour', string.format("%.2X%.2X%.2X%.2X", 255, math.random(255), math.random(255), math.random(255))) 
                end, 1000, 0) 
            arabic = guiCreateButton(621, 372, 125, 125, "Ar",true,wnd) 
            guiSetFont(arabic,"default-bold-small") 
            setTimer(function() 
            guiSetProperty(arabic, 'NormalTextColour', string.format("%.2X%.2X%.2X%.2X", 255, math.random(255), math.random(255), math.random(255))) 
                end, 1000, 0) 
            user_2 = guiCreateLabel(463, 310, 177, 29, "Username", false, wnd) 
            function Color ( ) 
            guiLabelSetColor (user_2, math.random(0, 255), math.random(0, 255), math.random(0, 255) ) 
            end 
            setTimer ( Color, 1000, 0 ) 
            guiLabelSetHorizontalAlign(user_2,"center",false) 
            guiSetFont(user_2,"default-bold-small") 
            setElementData(user_2, "tooltip-text", "اسم حسابك", false) -- أضافة الكلام للزر 
            setElementData(user_2, "tooltip-color", "#FFFFFF", false) -- تغيير لون الخط 
            setElementData(user_2, "tooltip-background", "#666666", false) -- تغيير لون الخلفية 
            setElementData(user_2, "default-bold", "bankgothic 0.5", false) -- تغيير نوع الخط و حجم الخط 
            user_l = guiCreateLabel(115, 310, 177, 29, "Username",false,wnd) 
            function Color ( ) 
            guiLabelSetColor (user_l, math.random(0, 255), math.random(0, 255), math.random(0, 255) ) 
            end 
            setTimer ( Color, 1000, 0 ) 
            guiLabelSetHorizontalAlign(user_l,"center",false) 
            guiSetFont(user_l,"default-bold-small") 
            setElementData(user_l, "tooltip-text", "اسم حسابك", false) -- أضافة الكلام للزر 
            setElementData(user_l, "tooltip-color", "#FFFFFF", false) -- تغيير لون الخط 
            setElementData(user_l, "tooltip-background", "#666666", false) -- تغيير لون الخلفية 
            setElementData(user_l, "default-bold", "bankgothic 0.5", false) -- تغيير نوع الخط و حجم الخط 
            user1 = guiCreateEdit(476, 345, 159, 28, "", false, wnd) 
            setTimer(function() 
            guiSetProperty(user1, 'NormalTextColour', string.format("%.2X%.2X%.2X%.2X", 255, math.random(255), math.random(255), math.random(255))) 
                end, 1000, 0) 
            user = guiCreateEdit(126, 343, 159, 28, "",false,wnd) 
            setTimer(function() 
            guiSetProperty(user, 'NormalTextColour', string.format("%.2X%.2X%.2X%.2X", 255, math.random(255), math.random(255), math.random(255))) 
                end, 1000, 0) 
            pass_2 = guiCreateLabel(462, 379, 177, 29, "Password", false,wnd) 
            function Color ( ) 
            guiLabelSetColor (pass_2, math.random(0, 255), math.random(0, 255), math.random(0, 255) ) 
            end