Zaloguj się by uzyskać pełen dostęp. Nie masz jeszcze konta? Założ je już teraz w kilka sekund.

Wysłany: 2018-04-15, 15:46


Troyson







Wiek: 29
Na forum: 3590 dni
Posty: 12
Nick w MP: Troy



Respekt: 50

Witam. ot?? napisa?em taki oto kod kt?ry ma za zadanie sprawdzi? czy mamy przy sobie dan? bro?, je?li tak to je?eli wpiszemy
/daj [nick gracza] [nazwa broni np. ak-47]
to nam usunie t? bro? a da graczowi kt?remu chcemy przekaza? dan? bro?.

SERVER:

function give_ak(playercommandwhoweapID)
    local weapID getWeaponIDFromName weapName )
    local targetPlayer getPlayerFromName (who)
    if (targetPlayerthen                                   
        if player (getWeaponNameFromID(30) == falsethen
                outputChatBox "Nie posiadasz AK-47 aby m?c go przekaza? komu? innemu."player255255255true )
        else
            giveWeapon(targetPlayer300)
            outputChatBox "Odda?e? AK-47"player255255255true )
            outputChatBox "Otrzyma?e? AK-47"targetPlayer255255255true )
            takeWeapon(player30)
        end
    else
        outputChatBox "Nie znaleziono gracza o podanym nicku."root255255255true )
    end
end
addCommandHandler("daj"give_ak)



Pomo?e mi kto? w przerobieniu tego skryptu?


Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-04-15, 16:08


Atroth







Wiek: 23
Na forum: 3677 dni
Posty: 1089
Nick w MP: Atroth

Piwa: 4808

Respekt: 540
Respekt: 540

Troyson,Spr?buj tak:


function give_ak(playercommandwhoweapID)
    local weapID getWeaponIDFromName weapName )
    local targetPlayer getPlayerFromName (who)
    if (targetPlayer) and (weapIDthen                                   
        if weapID ~= 30 then
                outputChatBox "Nie posiadasz AK-47 aby m?c go przekaza? komu? innemu."player255255255true )
        else
            giveWeapon(targetPlayer300)
            outputChatBox "Odda?e? AK-47"player255255255true )
            outputChatBox "Otrzyma?e? AK-47"targetPlayer255255255true )
            takeWeapon(player30)
        end
    else
        outputChatBox "Nie znaleziono gracza o podanym nicku."player255255255true )
    end
end
addCommandHandler("daj"give_ak)


Powinno dzia?a? :oops: .

Podpis

Użytkownik - 10-05-2016
Support Team - 17.06.2017
Moderator - 25.11.2017
Mod-Team - 02.07.2018

Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-04-16, 22:34


Troyson







Wiek: 29
Na forum: 3590 dni
Posty: 12
Nick w MP: Troy



Respekt: 50

"Atroth" napisał/a:

Troyson,Spr?buj tak:


function give_ak(playercommandwhoweapID)
    local weapID getWeaponIDFromName weapName )
    local targetPlayer getPlayerFromName (who)
    if (targetPlayer) and (weapIDthen                                   
        if weapID ~= 30 then
                outputChatBox "Nie posiadasz AK-47 aby m?c go przekaza? komu? innemu."player255255255true )
        else
            giveWeapon(targetPlayer300)
            outputChatBox "Odda?e? AK-47"player255255255true )
            outputChatBox "Otrzyma?e? AK-47"targetPlayer255255255true )
            takeWeapon(player30)
        end
    else
        outputChatBox "Nie znaleziono gracza o podanym nicku."player255255255true )
    end
end
addCommandHandler("daj"give_ak)


Powinno dzia?a? :oops: .


*******************************************************************************************************************
No ju? co? tam dzia?a tylko nie daje i nie zabiera broni graczowi kt?ry chce j? przekaza? innemu graczowi a wy?wietla ten tekst ?e odda?e? itd..

oto skrypt (zamiast weapID da?em weapName)


function give_ak(playercommandwhoweapName)
    local weapID getWeaponIDFromName weapName )
    local targetPlayer getPlayerFromName (who)
    if (targetPlayer) and (weapIDthen                                   
        if weapID ~= 30 then
                outputChatBox "Nie posiadasz AK-47 aby m?c go przekaza? komu? innemu."player255255255true )
        else
            outputChatBox "Odda?e? AK-47"player255255255true )
            outputChatBox "Otrzyma?e? AK-47"targetPlayer255255255true )
            takeWeapon(player30)
            giveWeapon(targetPlayer300)
        end
    else
        outputChatBox "Nie znaleziono gracza o podanym nicku."player255255255true )
    end
end
addCommandHandler("daj"give_ak)



Brakuje tu takiej linijki kt?ra sprawdza gracza kt?ry u?ywa tej komendy czy ma AK-47 przy sobie i dopiero gdy je ma to skrypt zadzia?a a je?eli nie ma to poka?e nam wiadomo?? ?e nie posiadamy AK.

I w?a?nie nie wiem jakby to dopisa? ale z g?ry dzi?ki za przerobienie. ;)

Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-04-18, 19:30


Marcineq1234







Wiek: 27
Na forum: 3367 dni
Posty: 12
Nick w MP: Bocikk



Respekt: 35,8

Witam ;D , przychodz? do was aby kto? mi pom?g?, temat jest prosty.
1.Gdy wychodz? z markera to buguje mi si? hud ;/ prosze o pomoc
2.Nie moge kupi? mo?otva

https://pastebin.com/a4mQGSGP - c
https://pastebin.com/FThNfLzs - s

pomocnym postawie rep + oraz tyskie ((piwero))

Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-04-21, 10:06


Waszkaa







Wiek: 33
Na forum: 3220 dni
Posty: 24
Nick w MP: WaszkaG



Respekt: 50

Witam ,
Mam problem z tym skryptem , po wej?ciu na serwer pokazuje mi si? automatycznie okno tego skryptu a chc? aby w??cza? si? panel po nacisnieciu klawisza "F2", za pomoc z g?ry dzi?kuje i stawiam :piwo:


function Window ( )

        if ( guiGetVisible myWindow ) == true then   
        
                guiSetVisible myWindowfalse )

                showCursor false )
        else      
                guiSetVisible myWindowtrue )

                showCursor true )
        end
end

myWindow guiCreateWindow 0.160.0.7.7"Teleport"true )


local tabPanel guiCreateTabPanel 00.111truemyWindow )
local Teleports guiCreateTab"Drift mapy"tabPanel )




--GUI Buttons
LSAirport guiCreateButton0.030.010.180.12"Touge Akina UP"trueTeleports )
guiSetFont LSAirport"default-bold-small" )

LVAirport guiCreateButton0.030.130.180.12"Touge Akina Down"trueTeleports )
guiSetFont LVAirport"default-bold-small" )

AbandedAirstrip guiCreateButton0.030.250.180.12"Touge Bihoku"trueTeleports )
guiSetFont AbandedAirstrip"default-bold-small" )

SFAirport guiCreateButton0.030.370.180.12"Drift Stage"trueTeleports )
guiSetFont SFAirport"default-bold-small" )

MountChiliad guiCreateButton0.030.490.180.12"East Minami Circuit"trueTeleports )
guiSetFont MountChiliad"default-bold-small" )

WangCars guiCreateButton0.030.610.180.12"Meihancircuit"trueTeleports )
guiSetFont WangCars"default-bold-small" )

Ottos guiCreateButton0.40.010.180.12"Drift Track"trueTeleports )
guiSetFont Ottos"default-bold-small" )

Area51 guiCreateButton0.40.130.180.12"Touge Ebisu Soutch"trueTeleports )
guiSetFont Area51"default-bold-small" )

BigEar guiCreateButton0.40.250.180.12"Touge Ebisu West"trueTeleports )
guiSetFont BigEar"default-bold-small" )

BlueBerry guiCreateButton0.40.370.180.12"Touge Project Touge"trueTeleports )
guiSetFont BlueBerry"default-bold-small" )

Heli guiCreateButton0.40.490.180.12"Touge Nikko"trueTeleports )
guiSetFont Heli"default-bold-small" )

Grove guiCreateButton0.40.610.180.12"Nakayubi"trueTeleports )
guiSetFont Grove"default-bold-small" )

Dam guiCreateButton0.770.010.180.12"Touge Okaru"trueTeleports )
guiSetFont Dam"default-bold-small" )

BackBeyond guiCreateButton0.770.130.180.12"Touge Gokart"trueTeleports )
guiSetFont BackBeyond"default-bold-small" )

Quarry guiCreateButton0.770.250.180.12"Ultra Nitro Track"trueTeleports )
guiSetFont Quarry"default-bold-small" )

Bayside guiCreateButton0.770.370.180.12"Touge Sekia."trueTeleports )
guiSetFont Bayside"default-bold-small" )

Pecker guiCreateButton0.770.490.180.12"Tsukuba"trueTeleports )
guiSetFont Pecker"default-bold-small" )

Bridge guiCreateButton0.770.610.180.12"Fantazy Hill"trueTeleports )
guiSetFont Bridge"default-bold-small" )


Redring guiCreateButton0.40.780.180.063"Russian drift"trueTeleports )
guiSetFont Close"default-bold-small" )
Garage guiCreateButton( -0.080.871.10.063"Garage"trueTeleports )
guiSetFont Close"default-bold-small" )
Close guiCreateButton( -0.080.941.10.063"Zamknij (f2)'"trueTeleports )
guiSetFont Close"default-bold-small" )


bindKey "F2""down"Window )


guiSetAlpha myWindow)
guiWindowSetSizable myWindowfalse )

--Label Color
function changeLabelColor ( )

    guiLabelSetColor Onemath.random(0255), math.random(0255), math.random(0255) )
end

setTimer changeLabelColor1000)


--Close
addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
           if (source == Closethen
           guiSetVisiblemyWindowfalse )
           showCursorfalse )
                end  

           end
)


--Teleports
addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
    function ( )
        if (source == MountChiliadthen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
            setElementPosition (player , -877.7409667969520.676635742214.1091003418  )
        end
    end)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == LSAirportthen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                        setElementPosition (player , -3289.7409667969890.6766357422322.1091003418  ) 
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == LVAirportthen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player , -2926.9138183594487.12048339845.2602405548  )
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == AbandedAirstripthen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player , -3266.59480957031, -1067.166115234413.2322671096  ) 
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == SFAirportthen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player , -3112.1933, -868.013682067871110.471401863098  ) 
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == WangCarsthen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player , -28441483.88152187549.9797288131714  )
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == Ottosthen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player 1326.7004394531, -2840.5749218759.8597288131714  )
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == Area51then
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player , -824.610333007812192.1982431641123.08539108276  ) 
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == BigEarthen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player 174.564470214843035.121528320329.465629577637  )
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == BlueBerrythen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player 2969.3661103248596, -1723.7834129333537.5212655067444  )
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == Helithen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player , -2246.394470214842099.94152832035.965629577637  )
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == Grovethen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player , -311.3193359375, -3027.171630859450.765625 )
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == Damthen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player , -4235.02734375633.9217529297620.654315948486 )
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == BackBeyondthen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player 3409.932983398441335.801025390620.003288269043 )
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == Quarrythen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player , -3449.7600, -1642.9484059570361.8789616699 )
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == Baysidethen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player 2082.322290625, -142.64066015628.9991247940063 )
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == Peckerthen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player 140.91618725586637.1567421875420.863159790039 )
            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == Bridgethen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                  setElementPosition (player 827.9711, -2061.232413.86 )

            end
         end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == Garagethen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                    setElementPosition (player 2591.8709667969, -2347.736635742213.652  )
            end
          end
)

addEventHandler "onClientGUIClick"getResourceRootElement(getThisResource()),
        function ( )
            if (source == Redringthen
            local player getLocalPlayer()
            if isPedInVehicle(localPlayerthen
                player getPedOccupiedVehicle(localPlayer)
            end
                    setElementPosition (player , -566.404409667969, -649.5066357422326.252  )
            end
          end
)


Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-04-21, 10:31


Atroth







Wiek: 23
Na forum: 3677 dni
Posty: 1089
Nick w MP: Atroth

Piwa: 4808

Respekt: 540
Respekt: 540

Waszkaa, Powinno dzia?a? :oops:

https://pastebin.com/FGz5L2Yi

Podpis

Użytkownik - 10-05-2016
Support Team - 17.06.2017
Moderator - 25.11.2017
Mod-Team - 02.07.2018

Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-04-21, 10:40


Waszkaa







Wiek: 33
Na forum: 3220 dni
Posty: 24
Nick w MP: WaszkaG



Respekt: 50

Atroth nie pokazuje sie teraz odrazu okno ale r?wniez nie moge go w?aczyc przyciskiem f2 , czyli jak by go nie by?o ;(

Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-04-21, 11:00


Atroth







Wiek: 23
Na forum: 3677 dni
Posty: 1089
Nick w MP: Atroth

Piwa: 4808

Respekt: 540
Respekt: 540

Waszkaa, Podmie? to:


function Window ( )
 
        if ( guiGetVisible myWindow ) == true then  
       
                guiSetVisible myWindowfalse )
 
                showCursor false )
        else      
                guiSetVisible myWindowtrue )
 
                showCursor true )
        end
end
bindKey("F2","down",Window)


pod to:


local enable false 

function Window ( )

    if enable == false then 
        guiSetVisible myWindowtrue )
        showCursor true )
        enable true 
    else
        enable false 
        guiSetVisible myWindowfalse )
        showCursor false )
    end 
end
bindKey("F2","down",Window)


Jakby nie dzia?a?o podaj db3.

Podpis

Użytkownik - 10-05-2016
Support Team - 17.06.2017
Moderator - 25.11.2017
Mod-Team - 02.07.2018

Postaw piwo autorowi tego posta
 

 
Więcej szczegółów
Wystawiono 1 piw(a):
Waszkaa
Wysłany: 2018-04-22, 12:50


Waszkaa







Wiek: 33
Na forum: 3220 dni
Posty: 24
Nick w MP: WaszkaG



Respekt: 50

Witam ,
Mam problem z panelem logowania , mianowicie rozchodzi si? o to ?e gdy piszemy sw?j nick NP. Maciek , to pod klawiszem "M" Na serwerze mam bind na okno na prywatn? wiadomo?? i w?asnie to okno sie otwiera, z innymi klawiszami jest tak samo , Podczas pisania has?a pod "N" w??cza sie radio itp .

link: https://community.multitheftauto.com/index.php?p=resources&s=details&id=8971

client

sW,sH guiGetScreenSize()
mXmY 00
myFont dxCreateFont"opensans-light.ttf"15 )
logoWlogoH sW/8.4sW/8.4
bgY 0
function createLoginPanel()
    addEventHandler("onClientRender",getRootElement(),renderLoginPanel)
    addEventHandler("onClientRender",getRootElement(),renderButtons)
    showCursor(true,true)
    toggleAllControls(false)
    showChat(false)
    xml xmlLoadFile("userdata.xml")
    loadXML()
end
addEventHandler("onClientResourceStart"getResourceRootElement(getThisResource()), createLoginPanel)

function loadXML()
  if not xml then
    xml xmlCreateFile("userdata.xml","userdata")
    usernameChild xmlCreateChild(xml,"username")
    passwordChild xmlCreateChild(xml,"password")
    checkboxChild xmlCreateChild(xml,"state")
    xmlSaveFile(xml)
  else
    usernameChild xmlFindChild(xml,"username",0)
    passwordChild xmlFindChild(xml,"password",0)
    checkboxChild xmlFindChild(xml,"state",0)
  end
  if xmlNodeGetValue(checkboxChild) == "true" then
    checkboxs[1].state true
  end
    usernameLoad xmlNodeGetValue(usernameChild)
    passwordLoad xmlNodeGetValue(passwordChild)
    for w in string.gmatch(usernameLoad".") do
      for i,ebox in ipairs(editbox) do
        if ebox.name == "username" then
          table.insert(text[i], w)
        end
      end
    end
    for w in string.gmatch(passwordLoad".") do
      for i,ebox in ipairs(editbox) do
        if ebox.name == "password" then
          table.insert(text[i], w)
        end
      end
    end
end
function saveXML(username,password,checkboxState)
  if checkboxs[1].state == true then
    xmlNodeSetValue(usernameChild,username)
    xmlNodeSetValue(passwordChild,password)
    xmlNodeSetValue(checkboxChild,tostring(checkboxState))
    xmlSaveFile(xml)
  else
    xmlNodeSetValue(usernameChild,"")
    xmlNodeSetValue(passwordChild,"")
    xmlNodeSetValue(checkboxChild,"")
    xmlSaveFile(xml)
  end
end
addEvent("saveXML",true)
addEventHandler("saveXML",getRootElement(),saveXML)
boxes = {
  {sW/2-sW/10sH/2-sH/7sW/5sH/20borderColor tocolor(224224224), boxD "green"text "Zaloguj si?"messageBox "1"},
    {sW/2-sW/10sH/2-sH/7.4+sH/18sW/5sW/5borderColor tocolor(224224224)},
  {sW/2-sW/10sH/2-sH/sHsW/5sH/20borderColor tocolor(224224224), boxD "green"text "Rejestracja"messageBox "2"},
  {sW/2-sW/10sH/2-sH/7.4+sH/18 sHsW/5sW/5borderColor tocolor(224224224)},
}
buttons = {
  {boxes[2].sW/47boxes[2].boxes[2].sH/14sW/13boxes[2].w/6.5color tocolor(255,255,255), borderColor tocolor(224224224), text "Rejestracja"func "pressRegisterBut"},
  {boxes[2].boxes[2].sW/47 sW/13boxes[2].boxes[2].sH/14sW/13boxes[2].w/6.5color tocolor(255,255,255), borderColor tocolor(224224224), text "Graj"func "pressLogin"},
  {boxes[2].boxes[2].sW/47 sW/13boxes[2].boxes[2].sH/14 sHsW/13boxes[2].w/6.5color tocolor(255,255,255), borderColor tocolor(224224224), text "Cofnij"func "pressBack"},
  {boxes[2].sW/47boxes[2].boxes[2].sH/14 sHsW/13boxes[2].w/6.5color tocolor(255,255,255), borderColor tocolor(224224224), text "Stworz"func "pressRegister"}
}
editbox = {
  {boxes[2].sW/47boxes[2].boxes[2].w/6.5sW/13 sW/13 + (boxes[2].sW/47 sW/13 sW/47 sW/13), boxes[2].w/6.5borderColor tocolor(224224224), textUp "Nick"text ""name "username"},
  {boxes[2].sW/47boxes[2].boxes[2].w/6.5 boxes[2].w/6.5 boxes[2].w/6.5sW/13 sW/13 + (boxes[2].sW/47 sW/13 sW/47 sW/13), boxes[2].w/6.5borderColor tocolor(224224224), textUp "Haslo"text ""hide truename "password"},
  {boxes[2].sW/47boxes[2].boxes[2].w/6.5 sHsW/13 sW/13 + (boxes[2].sW/47 sW/13 sW/47 sW/13), boxes[2].w/6.5borderColor tocolor(224224224), textUp "Nick"text ""name "usernameReg"},
  {boxes[2].sW/47boxes[2].boxes[2].w/6.5 boxes[2].w/6.5 boxes[2].w/6.5 sHsW/13 sW/13 + (boxes[2].sW/47 sW/13 sW/47 sW/13), boxes[2].w/6.5borderColor tocolor(224224224), textUp "Haslo"text ""hide truename "passwordReg"},
}
checkboxs = {
  {boxes[2].sW/47boxes[2].boxes[2].w/6.5 boxes[2].w/6.5 boxes[2].w/boxes[2].w/6wh boxes[2].w/25state falsetext "Zapamietaj"}
} 
text = {}
for i,ebox in ipairs(editbox) do
table.insert(text,{})
end
bindKey("backspace""down", function ()
  table.remove(text[eboxClickI], #text[eboxClickI])
end)
function getCharacter(character)
  for i,ebox in ipairs(editbox) do
    if eboxClickI == i then
      table.insert(text[i], character)
    end
  end
end
function renderLoginPanel()
    dxDrawRectangle(bgYsWsHtocolor(241241241))
    dxDrawImage sW/logoW/mXboxes[1].logoH sH/50 mYlogoWlogoH'logo.png')
    dxDrawImage sW/logoW/mXboxes[1].logoH sH/50 mY sHlogoWlogoH'logo.png')
    for i,box in ipairs(boxes) do
        dxDrawRectangle(box.mXbox.mYbox.wbox.h)
        dxDrawRectangle(box.mXbox.mYbox.w1box.borderColor)
        dxDrawRectangle(box.mXbox.mY1box.hbox.borderColor)
        dxDrawRectangle(box.mXbox.box.mYbox.w1box.borderColor)
        dxDrawRectangle(box.box.mXbox.mY1box.hbox.borderColor)
    if box.boxD then
      if box.boxD == "green" then
      dxDrawRectangle(box.mXbox.mYsW/160box.htocolor(124,198,35))
      elseif box.boxD == "red" then
      dxDrawRectangle(box.mXbox.mYsW/160box.htocolor(255,0,0))
    end
    end
    if box.text then
        dxDrawText box.textbox.sW/80 mXbox.mYbox.box.mXbox.box.mYtocolor(31,31,31), sW/1600myFont"left""center")
    end
    end
    for i,ebox in ipairs(editbox) do
      dxDrawRectangle(ebox.mXebox.mYebox.webox.h)
      dxDrawRectangle(ebox.mXebox.mYebox.w1ebox.borderColor)
      dxDrawRectangle(ebox.mXebox.mY1ebox.hebox.borderColor)
      dxDrawRectangle(ebox.mXebox.ebox.mYebox.w1ebox.borderColor)
      dxDrawRectangle(ebox.ebox.mXebox.mY1ebox.hebox.borderColor)
      if ebox.textUp then
        dxDrawText ebox.textUpebox.mXebox.ebox.mYebox.ebox.mXebox.mYtocolor(31,31,31), sW/1600myFont"left""bottom")
      end
      if isMouseWithinRangeOf(ebox.mXebox.mYebox.webox.hthen
        ebox.borderColor tocolor(204,204,204)
      else
        ebox.borderColor tocolor(224,224,224)
      end
      if ebox.text then
        ebox.text table.concat(text[i],"")
        if ebox.hide == true then
        dxDrawText (string.rep("*",#text[i],""), ebox.x + 10 + mX, ebox.y + mY, ebox.x + ebox.w + mX, ebox.y + ebox.h + mY, tocolor(31,31,31), sW/1600, myFont, "left", "center", true)
        else
        dxDrawText table.concat(text[i],""), ebox.10 mXebox.mYebox.ebox.mXebox.ebox.mYtocolor(31,31,31), sW/1600myFont"left""center",true)
      end
      end
      if eboxClickI == i then
        dxDrawRectangle(ebox.mXebox.mYebox.w1tocolor(124,198,35))
        dxDrawRectangle(ebox.mXebox.mY1ebox.htocolor(124,198,35))
        dxDrawRectangle(ebox.mXebox.ebox.mYebox.w1tocolor(124,198,35))
        dxDrawRectangle(ebox.ebox.mXebox.mY1ebox.htocolor(124,198,35))
      end
    end
    for i,cbox in ipairs(checkboxs) do
      if cbox.state == true then
        dxDrawRectangle(cbox.mXcbox.mYcbox.whcbox.whtocolor(124,198,35))
      else
        dxDrawRectangle(cbox.mXcbox.mYcbox.whcbox.whtocolor(200,200,200))
      end
      if cbox.text then
        dxDrawText (cbox.textcbox.cbox.wh mXcbox.mYcbox.cbox.wh*10 mXcbox.cbox.wh mYtocolor(31,31,31), sW/2000myFont"left""center",true)
      end
    end
end
addEventHandler("onClientCharacter"getRootElement(), getCharacter)
function pressLogin()
  for iebox in ipairs(editbox) do
    if ebox.name == "username" then
      gUser ebox.text
    elseif ebox.name == "password" then
      gPass ebox.text
    end
  end 
triggerServerEvent "onLogin"getLocalPlayer(), gUsergPasscheckboxs[1].state)
end
function pressRegister()
  for iebox in ipairs(editbox) do
    if ebox.name == "usernameReg" then
      rUser ebox.text
    elseif ebox.name == "passwordReg" then
      rPass ebox.text
    end
  end 
triggerServerEvent "onRegister"getLocalPlayer(), rUserrPass)
end
function pressRegisterBut()
  p_Move = {}
  p_Move.startTime getTickCount()
  p_Move.endTime p_Move.startTime 1200
  p_Move.easingFunction "InOutQuad"
  addEventHandler("onClientRender"getRootElement(), movePanelOut)
end
function pressBack()
  p_Move = {}
  p_Move.startTime getTickCount()
  p_Move.endTime p_Move.startTime 1200
  p_Move.easingFunction "InOutQuad"
  addEventHandler("onClientRender"getRootElement(), movePanelIn)
end
addEvent("pressBack",true)
addEventHandler("pressBack",getRootElement(),pressBack)
function movePanelOut()
  local now getTickCount()
  local elapsedTime now p_Move.startTime
  local duration p_Move.endTime p_Move.startTime
  local progress elapsedTime duration
 
  local fAnimationTime getEasingValue(progressp_Move.easingFunction)
 
  local move fAnimationTime*sH
  mY = ( -move )
  if now p_Move.endTime then
    removeEventHandler("onClientRender"getRootElement(), movePanelOut)
  end
end
function movePanelIn()
  local now getTickCount()
  local elapsedTime now p_Move.startTime
  local duration p_Move.endTime p_Move.startTime
  local progress elapsedTime duration
 
  local fAnimationTime getEasingValue(progressp_Move.easingFunction)
 
  local move fAnimationTime*sH
  mY = (-sH move)
  if now p_Move.endTime then
    removeEventHandler("onClientRender"getRootElement(), movePanelIn)
  end
end
function renderButtons()
    for i,b in ipairs(buttons) do
        dxDrawRectangle(b.mX,b.mY,b.w,b.h,b.color)
        dxDrawRectangle(b.mXb.mYb.w1b.borderColor)
      dxDrawRectangle(b.mXb.mY1b.hb.borderColor)
      dxDrawRectangle(b.mXb.b.mYb.w1b.borderColor)
      dxDrawRectangle(b.b.mXb.mY1b.hb.borderColor)
      if b.text then
        dxDrawText b.textb.mXb.mYb.b.mXb.b.mYtocolor(31,31,31), sW/1600myFont"center""center")
      end
        if isMouseWithinRangeOf(b.mXb.mYb.wb.hthen
           dxDrawRectangle(b.mX,b.mY,b.w,b.h,tocolor(124,198,35))
           if b.text then
            dxDrawText b.textb.mXb.mYb.b.mXb.b.mYtocolor(255,255,255), sW/1600myFont"center""center")
           end
        end
    end
end

function changeMessage(mesBoxnewMessageboxColor)
  for i,box in ipairs(boxes) do
    if box.messageBox ==  mesBox then
      box.text newMessage
      box.boxD boxColor
    end
  end
end
addEvent("changeMessage",true)
addEventHandler("changeMessage",getRootElement(),changeMessage)
function onClick(mButton,state,ax,ay)
  if not (state == "down" and mButton == "left"then
    return false
  end
  for i,b in pairs(buttons) do
    if isMouseWithinRangeOf(b.mXb.mYb.wb.hthen
      outputDebugString("Pressed "..b.text)
      if b.func then
      loadstring("return "..b.func.."()")()
      end
    end
  end
  for i,ebox in pairs(editbox) do
    if isMouseWithinRangeOf(ebox.mXebox.mYebox.webox.hthen
      outputDebugString("Pressed "..ebox.textUp)
      eboxClickI i
      return true
    end
  end
  for i,cbox in pairs(checkboxs) do
    if isMouseWithinRangeOf(cbox.mXcbox.mYcbox.whcbox.whthen
      outputDebugString("Pressed "..i.." checkbox")
      if cbox.state == false then
      cbox.state true
      else
      cbox.state false
      end
    end
  end
  eboxClickI nil
  return false
end

addEventHandler("onClientClick",getRootElement(),onClick)

function isMouseWithinRangeOf(posXposYsizeXsizeY)
  if isCursorShowing() == false then
    return false
  end
  local cx,cy getCursorPosition()
  cx,cy cx*sW,cy*sH
  if cx >= posX and cx <= posX+sizeX and cy >= posY and cy <= posY+sizeY then
    return true,cx,cy
  else
    return false
  end
end


function hideLoginPanel()
  p_Move = {}
  p_Move.startTime getTickCount()
  p_Move.endTime p_Move.startTime 1200
  p_Move.easingFunction "InOutQuad"
  addEventHandler("onClientRender"getRootElement(), hidePanelOut)
end
function hidePanelOut()
  local now getTickCount()
  local elapsedTime now p_Move.startTime
  local duration p_Move.endTime p_Move.startTime
  local progress elapsedTime duration
 
  local fAnimationTime getEasingValue(progressp_Move.easingFunction)
 
  local move fAnimationTime*sH
  mY move
  bgY move

  if now p_Move.endTime then
    removeEventHandler("onClientRender"getRootElement(), hidePanelOut)
    removeEventHandler("onClientRender",getRootElement(),renderLoginPanel)
    removeEventHandler("onClientRender",getRootElement(),renderButtons)
    showCursor(false,false)
    toggleAllControls(true)
    showChat(true)
  end
end
addEvent("hideLoginPanel",true)
addEventHandler("hideLoginPanel",getRootElement(),hideLoginPanel)


server

function onLogin(username,password,checkboxState)
    if not (username == ""then
        if not (password == ""then
            local account getAccount usernamepassword )
            if ( account ~= false then
                logIn(sourceaccountpassword)
                triggerClientEvent (source,"hideLoginPanel",getRootElement())
                triggerClientEvent (source,"saveXML",getRootElement(),username,password,tostring(checkboxState))
            else
                triggerClientEvent(source,"changeMessage",getRootElement(),"1","Cos poszlo nie tak""red")
            end
        else
            triggerClientEvent(source,"changeMessage",getRootElement(),"1","Wpisz haslo!""red")
        end
    else
        triggerClientEvent(source,"changeMessage",getRootElement(),"1","Wpisz nick!""red")
    end
end
addEvent("onLogin",true)
addEventHandler("onLogin",getRootElement(),onLogin)

function onRegister(username,password)
    if not (username == ""then
        if not (password == ""then
                    local account getAccount (usernamepassword)
                    if (account == falsethen
                        addAccount(tostring(username),tostring(password))
                        triggerClientEvent(source,"changeMessage",getRootElement(),"2","Eleganco , mozesz juz grac""green")
                        triggerClientEvent(source,"changeMessage",getRootElement(),"1","Teraz zaloguj sie""green")
                        triggerClientEvent(source,"pressBack"getRootElement())
                    else
                        triggerClientEvent(source,"changeMessage",getRootElement(),"2","Taki nick juz gdzies widzialem!""red")
                    end
        else
            triggerClientEvent(source,"changeMessage",getRootElement(),"2","Wpisz haslo!""red")
        end
    else
        triggerClientEvent(source,"changeMessage",getRootElement(),"2","Wpisz nick!""red")
    end
end
addEvent("onRegister",true)
addEventHandler("onRegister",getRootElement(),onRegister


Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-04-22, 21:27


TeeNekk

Cienzaruwka :v






Wiek: 23
Na forum: 3210 dni
Posty: 264
Nick w MP: TeeNekk.

Piwa: 919

Respekt: 110,5
Respekt: 110,5

dodaj: guiSetInputMode("no_binds_when_editing")

Podpis
Pomogłem Ci
? Może zostawiłbyś za to piwko, lub respekt? Dzięki!
Mój projekt:
?
Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-04-22, 21:36


Waszkaa







Wiek: 33
Na forum: 3220 dni
Posty: 24
Nick w MP: WaszkaG



Respekt: 50

M?g?by? mi podes?ac gotowy kod gdyz nie wiem gdzie to wrzucic ?

Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-04-22, 23:14


Atroth







Wiek: 23
Na forum: 3677 dni
Posty: 1089
Nick w MP: Atroth

Piwa: 4808

Respekt: 540
Respekt: 540

Waszkaa,


addEventHandler("onClientResourceStart"getResourceRootElement(),
function()
    guiSetInputMode("no_binds_when_editing") --Calls guiSetInputMode once and for all to not have to handle binds state dynamically
end)


Kod z wiki i powinno ?miga?. R*

Podpis

Użytkownik - 10-05-2016
Support Team - 17.06.2017
Moderator - 25.11.2017
Mod-Team - 02.07.2018

Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-04-23, 15:29


Qwertick

Coming soon...






Wiek: 23
Na forum: 3577 dni
Posty: 472
Nick w MP: Qwertick

Piwa: 2726

Respekt: 215,8
Respekt: 215,8Respekt: 215,8

Waszkaa,
function createLoginPanel()
    addEventHandler("onClientRender",getRootElement(),renderLoginPanel)
    addEventHandler("onClientRender",getRootElement(),renderButtons)
    showCursor(true,true)
    toggleAllControls(false)
    showChat(false)
    xml xmlLoadFile("userdata.xml")
    loadXML()
    guiSetInputMode("no_binds_when_editing")
end
addEventHandler("onClientResourceStart"getResourceRootElement(getThisResource()), createLoginPanel)


Podpis

Kontakt
Discord: Qwertick#1210

Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-04-23, 16:06


Waszkaa







Wiek: 33
Na forum: 3220 dni
Posty: 24
Nick w MP: WaszkaG



Respekt: 50

Dalej dzialaja klawisze serwerowe ;(

Postaw piwo autorowi tego posta
 

 
Wysłany: 2018-05-12, 14:22


Ciastuuś

Truck soon...






Wiek: 26
Na forum: 3071 dni
Posty: 799
Nick w MP: Ciastuuś

Piwa: 4297

Respekt: 640
Respekt: 640Respekt: 640

Zr?b tak,

addEventHandler("onClientResourceStart"resourceRoot, function()
    guiSetInputMode("no_binds_when_editing")
end)


Podpis
Truck soon...
Postaw piwo autorowi tego posta
 

 
Tagi: prośby :: przerobienie :: skryptu
Anonymous





Na forum: 245 dni
Posty: 1



Anonymous Koniecznie zajrzyj na:






Skocz do:  
Wyświetl posty z ostatnich:   
GTAONLINE.PL » JĘZYKI PROGRAMOWANIA » LUA » Zasoby do MTA » PROŚBY O PRZEROBIENIE SKRYPTU Odpowiedz do tematu

Nie możesz pisać nowych tematów
Nie możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Dodaj temat do Ulubionych
Wersja do druku