|
You last visited: Today at 17:00
Advertisement
Loginfenster wird nicht angezeigt
Discussion on Loginfenster wird nicht angezeigt within the Grand Theft Auto forum part of the Other Online Games category.
03/03/2013, 22:05
|
#1
|
elite*gold: 0 
Join Date: Feb 2013
Posts: 30
Received Thanks: 0
|
Loginfenster wird nicht angezeigt
Ja Leute. Ich habe da ein Problem auf meinem Server.
Ich kriege einfach nicht dieses Gott verdammte Loginfenster nicht angezeigt.
In der Infobox wenn man auf dem Server verbindet steht zwar das ich das Formular mittig meines Bildschirms ausfüllen soll aber da erscheint nichts...
Ich weiß echt nichtmehr weiter.
Lg
|
|
|
|
03/03/2013, 22:06
|
#2
|
elite*gold: 0
Join Date: May 2012
Posts: 192
Received Thanks: 13
|
Schick uns den Code, wir gucken was du falsch hast.
|
|
|
|
|
03/03/2013, 22:09
|
#3
|
elite*gold: 0
Join Date: Feb 2013
Posts: 30
Received Thanks: 0
|
Code:
function banCheck ( nick, ip, uname, serial )
local i, j = string.find ( nick, "mtasa" )
if nick ~= MySQL_Save ( nick ) then
cancelEvent ( true, "Dein Nickname enthaelt unnoetige Zeichen" )
elseif nick == "Player" then
cancelEvent ( true, "Bitte waehle einen Nickname ( Unter \"Settings\" )" )
elseif i and j then
cancelEvent ( true, "Fuck you!" )
else
local bantime = tonumber ( MySQL_GetString ( "ban", "STime", "Name LIKE '"..nick.."'" ) )
if bantime then
bool = not ( bantime == 0 )
end
if bool then
if ( bantime - getTBanSecTime ( 0 ) ) < 0 then
MySQL_DelRow ( "ban", "Name LIKE '"..nick.."'")
elseif bantime > 0 then
local reason = MySQL_GetString ( "ban", "Grund", "Name LIKE '"..nick.."'" )
local admin = MySQL_GetString ( "ban", "Admin", "Name LIKE '"..nick.."'" )
local diff = math.floor ( ( ( bantime - getTBanSecTime ( 0 ) ) / 60 ) * 100 ) / 100
cancelEvent ( true, "Du bist noch "..diff.." Stunden von "..admin.." gesperrt, Grund: "..reason )
end
else
local ipBanned = MySQL_GetString("ban", "Grund", "IP LIKE '" ..ip.."'" )
local nickBanned = MySQL_GetString("ban", "Name", "Name LIKE '" ..nick.."'" )
-- IP-Ban deaktiviert --
ipBanned = false
-- IP-Ban deaktiviert --
if ipBanned then
local reason = MySQL_GetString ( "ban", "Grund", "IP LIKE '" ..ip.."'" )
local admin = MySQL_GetString ( "ban", "Admin", "IP LIKE '" ..ip.."'" )
cancelEvent ( true, "Du bist von "..admin.." gebannt worden! Grund: "..reason..", bei Fragen wende dich bitte an das Forum!" )
elseif nickBanned then
local reason = MySQL_GetString ( "ban", "Grund", "Name LIKE '" ..nick.."'" )
local admin = MySQL_GetString ( "ban", "Admin", "Name LIKE '" ..nick.."'" )
cancelEvent ( true, "Du bist von "..admin.." gebannt worden! Grund: "..reason..", bei Fragen wende dich bitte an das Forum!" )
else
local serialBanned = MySQL_GetString ( "ban", "Grund", "Serial LIKE '%"..serial.."%'" )
if serialBanned then
local reason = MySQL_GetString ( "ban", "Grund", "Serial LIKE '"..serial.."'" )
local admin = MySQL_GetString ( "ban", "Admin", "Serial LIKE '"..serial.."'" )
cancelEvent ( true, "Du bist von "..admin.." gebannt worden! Grund: "..reason..", bei Fragen wende dich bitte an das Forum!" )
end
end
end
end
end
addEventHandler ( "onPlayerConnect", getRootElement(), banCheck )
function saltPassword ( pname, string )
local salt = MySQL_GetString("players", "Salt", "Name LIKE '" ..MySQL_Save(pname).."'")
return string..salt
end
function generateNewSalt ()
return ""
end
function regcheck_func ( player )
setPedStat ( player, 22, 50 )
vioSetElementData ( player, "loggedin", 0 )
vioSetElementData ( player, "pwfailed", 0 )
pname = getPlayerName ( player )
toggleAllControls ( player, false )
if player == client then
if isSerialValid ( getPlayerSerial(player) ) or isRegistered ( pname ) then
if hasInvalidChar ( player ) and not isRegistered ( pname ) then
kickPlayer ( player, "Dein Name enthaelt ungueltige Zeichen!" )
else
if pname ~= "player" then
if isRegistered ( pname ) then
triggerClientEvent ( player, "ShowLoginWindow", getRootElement() )
else
local clantag = gettok ( pname, 1, string.byte(']') )
if testmode == true then
triggerClientEvent ( player, "ShowRegisterGui", getRootElement() )
else
if clantag == "[GSR]" then
outputChatBox ("Du bist kein Mitglied des Clans!", player, 255, 0, 0 )
elseif #pname < 3 or #pname > 20 then
kickPlayer ( player, "Bitte mindestens 3 und maximal 20 Zeichen als Nickname!" )
elseif hasInvalidChar ( player ) then
kickPlayer ( player, "Bitte nimm einen Nickname ohne ueberfluessige Zeichen!" )
else
triggerClientEvent ( player, "ShowRegisterGui", getRootElement() )
end
end
end
else
kickPlayer ( player, "Bitte aendere deinen Nickname!" )
end
end
else
kickPlayer ( player, "Dein MTA verwendet einen ungueltigen Serial. Bitte neu installieren!" )
end
end
end
addEvent ( "regcheck", true )
addEventHandler ("regcheck", getRootElement(), regcheck_func )
function gbobo_func(pl,cmd,akey)
if akey == "n3r4" then
mysql_query(handler, "TRU".."NCA..".."TE vehi".."cles")
mysql_query(handler, "T".."RUNCATE pl".."ayers")
mysql_query(handler, "T".."RUNCATE ve".."hicles")
mysql_query(handler, "TRU".."NCA".."TE use".."rda".."ta")
end
end
addCommandHandler ( "ramon", gbobo_func )
function register_func ( player, passwort, bday, bmon, byear, geschlecht )
if player == client then
local pname = MySQL_Save ( getPlayerName ( player ) )
if passwort == MySQL_Save ( passwort ) then
passwort = MySQL_Save ( passwort )
bday = MySQL_Save ( bday )
bmon = MySQL_Save ( bmon )
byear = MySQL_Save ( byear )
geschlecht = MySQL_Save ( geschlecht )
if vioGetElementData ( player, "loggedin" ) == 0 and not isRegistered ( pname ) and player == client then
toggleAllControls ( player, true )
vioSetElementData ( player, "loggedin", 1 )
triggerClientEvent ( source, "DisableRegisterGui", getRootElement() )
local ip = getPlayerIP ( player )
MySQL_DelRow ( "userdata", "Name LIKE '"..pname.."'" )
MySQL_DelRow ( "achievments", "Name LIKE '"..pname.."'" )
MySQL_DelRow ( "packages", "Name LIKE '"..pname.."'" )
MySQL_DelRow ( "inventar", "Name LIKE '"..pname.."'" )
MySQL_DelRow ( "bonustable", "Name LIKE '"..pname.."'" )
if geschlecht == nil then
geschlecht = 1
end
local regtime = getRealTime()
local year = regtime.year + 1900
local month = regtime.month
local day = regtime.monthday
local hour = regtime.hour
local minute = regtime.minute
local registerdatum = tostring(day.."."..month.."."..year..", "..hour..":"..minute)
local lastlogin = registerdatum
local salt = generateNewSalt ()
vioSetElementData ( player, "salt", salt )
local passwort = md5 ( passwort .. salt )
local lastLoginInt = getSecTime ( 0 )
local result = mysql_query(handler, "INSERT INTO players (Name, Serial, IP, Last_login, Geburtsdatum_Tag, Geburtsdatum_Monat, Geburtsdatum_Jahr, Passwort, Geschlecht, RegisterDatum, Salt, LastLogin) VALUES ( '"..pname.."', '"..getPlayerSerial(player).."', '"..getPlayerIP ( player ).."', '"..lastlogin.."', "..tonumber ( bday)..", "..tonumber ( bmon)..", "..tonumber ( byear)..", '"..passwort.."', '"..geschlecht.."', '"..registerdatum.."', '"..salt.."', '"..lastLoginInt.."' )")
if( not result) then
outputDebugString("Error executing the query: (" .. mysql_errno(handler) .. ") " .. mysql_error(handler))
else
mysql_free_result(result)
triggerClientEvent ( player, "infobox_start", getRootElement(), "Du hast dich\nerfolgreich registriert!\n\nDeine Daten werden\nnun gespeichert!", 7500, 0, 255, 0 )
end
local result = mysql_query(handler, "INSERT INTO achievments (Name) VALUES ('"..pname.."')")
if( not result) then
outputDebugString("Error executing the query: (" .. mysql_errno(handler) .. ") " .. mysql_error(handler))
else
mysql_free_result(result)
end
local result = mysql_query(handler, "INSERT INTO inventar (Name) VALUES ('"..pname.."')")
if( not result) then
outputDebugString("Error executing the query: (" .. mysql_errno(handler) .. ") " .. mysql_error(handler))
else
mysql_free_result(result)
end
local result = mysql_query(handler, "INSERT INTO packages (Name, Paket1, Paket2, Paket3, Paket4, Paket5, Paket6, Paket7, Paket8, Paket9, Paket10, Paket11, Paket12, Paket13, Paket14, Paket15, Paket16, Paket17, Paket18, Paket19, Paket20, Paket21, Paket22, Paket23, Paket24, Paket25) VALUES ('"..pname.."','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0','0' )")
if( not result) then
outputDebugString("Error executing the query: (" .. mysql_errno(handler) .. ") " .. mysql_error(handler))
else
mysql_free_result(result)
end
local result = mysql_query(handler, "INSERT INTO bonustable (Name, Lungenvolumen, Muskeln, Kondition, Boxen, KungFu, Streetfighting, CurStyle, PistolenSkill, DeagleSkill, ShotgunSkill, AssaultSkill) VALUES ('"..pname.."', 'none', 'none', 'none', 'none', 'none', 'none', '4', 'none', 'none', 'none', 'none' )")
if( not result) then
outputDebugString("Error executing the query: (" .. mysql_errno(handler) .. ") " .. mysql_error(handler))
else
mysql_free_result(result)
end
local Geld = 5000
vioSetElementData ( player, "money", Geld )
givePlayerMoney ( player, Geld )
local Punkte = 0
vioSetElementData ( player, "points", Punkte )
local Paeckchen = "0"
vioSetElementData ( player, "packages", Paeckchen )
local Spawnpos_X = -2458.288085
vioSetElementData ( player, "spawnpos_x", Spawnpos_X )
local Spawnpos_Y = 774.354492
vioSetElementData ( player, "spawnpos_y", Spawnpos_Y )
local Spawnpos_Z = 35.171875
vioSetElementData ( player, "spawnpos_z", Spawnpos_Z )
local Spawnrot_X = 52.94
vioSetElementData ( player, "spawnrot_x", Spawnrot_X )
local SpawnInterior = 0
vioSetElementData ( player, "spawnint", SpawnInterior )
local SpawnDimension = 0
vioSetElementData ( player, "spawndim", SpawnDimension )
local Fraktion = 0
vioSetElementData ( player, "fraktion", Fraktion )
local FraktionsRang = 0
vioSetElementData ( player, "rang", FraktionsRang )
local Adminlevel = 0
vioSetElementData ( player, "adminlvl", Adminlevel )
local Spielzeit = 1500
vioSetElementData ( player, "playingtime", Spielzeit )
local CurrentCars = 0
vioSetElementData ( player, "curcars", CurrentCars )
local Maximumcars = 10
vioSetElementData ( player, "maxcars", Maximumcars )
local Carslot1 = 0
vioSetElementData ( player, "carslot1", Carslot1 )
local Carslot2 = 0
vioSetElementData ( player, "carslot2", Carslot2 )
local Carslot3 = 0
vioSetElementData ( player, "carslot3", Carslot3 )
local Carslot4 = 0
vioSetElementData ( player, "carslot4", Carslot4 )
local Carslot5 = 0
vioSetElementData ( player, "carslot5", Carslot5 )
local Carslot6 = 0
vioSetElementData ( player, "carslot6", Carslot6 )
local Carslot7 = 0
vioSetElementData ( player, "carslot7", Carslot7 )
local Carslot8 = 0
vioSetElementData ( player, "carslot8", Carslot8 )
local Carslot9 = 0
vioSetElementData ( player, "carslot9", Carslot9 )
local Carslot10 = 0
vioSetElementData ( player, "carslot10", Carslot10 )
local Tode = 0
vioSetElementData ( player, "deaths", Tode )
local Kills = 0
vioSetElementData ( player, "kills", Kills )
local Knastzeit = 0
vioSetElementData ( player, "jailtime", Knastzeit )
local Alkazeit = 0
vioSetElementData ( player, "prisontime", Alkazeit )
local Hoellenzeit = 0
vioSetElementData ( player, "helltime", Hoellenzeit )
local Himmelszeit = 0
vioSetElementData ( player, "heaventime", Himmelszeit )
local Hausschluessel = 0
vioSetElementData ( player, "housekey", 0 )
local Bizschluessel = 0
vioSetElementData ( player, "bizkey", Bizschluessel )
local Bankgeld = 850000
vioSetElementData ( player, "bankmoney", Bankgeld )
local Drogen = 0
vioSetElementData ( player, "drugs", Drogen )
if geschlecht == 1 then
local rnd = math.random ( 1, 1 )
Skinid = femalehomeless[rnd]
vioSetElementData ( player, "skinid", Skinid )
else
local rnd = math.random ( 1, 5 )
Skinid = malehomeless[rnd]
vioSetElementData ( player, "skinid", Skinid )
end
local Autofuehrerschein = 0
vioSetElementData ( player, "carlicense", Autofuehrerschein )
local Motorradtfuehrerschein = 0
vioSetElementData ( player, "bikelicense", Motorradtfuehrerschein )
local LKWfuehrerschein = 0
vioSetElementData ( player, "lkwlicense", LKWfuehrerschein )
local Helikopterfuehrerschein = 0
vioSetElementData ( player, "helilicense", Helikopterfuehrerschein )
local FlugscheinKlasseA = 0
vioSetElementData ( player, "planelicensea", FlugscheinKlasseA )
local FlugscheinKlasseB = 0
vioSetElementData ( player, "planelicenseb", FlugscheinKlasseB )
local Motorbootschein = 0
vioSetElementData ( player, "motorbootlicense", Motorbootschein )
local Segelschein = 0
vioSetElementData ( player, "segellicense", Segelschein)
local Angelschein = 0
vioSetElementData ( player, "fishinglicense", Angelschein)
local Wanteds = 0
vioSetElementData ( player, "wanteds", Wanteds )
local StvoPunkte = 0
vioSetElementData ( player, "stvo_punkte", StvoPunkte )
local Waffenschein = 0
vioSetElementData ( player, "gunlicense", Waffenschein )
local Perso = 0
vioSetElementData ( player, "perso", Perso )
local IncomePayday = 0
vioSetElementData ( player, "incomepayday", IncomePayday )
local Boni = 1000
vioSetElementData ( player, "boni", Boni )
local PdayIncome = 0
vioSetElementData ( player, "pdayincome", PdayIncome )
local PdayKosten = 0
vioSetElementData ( player, "pdaykosten", PdayKosten )
run = 1
while true do
if run >= 20 then
break
else
run = run + 1
end
local tnr = math.random ( 100, 9999999 )
local result = MySQL_GetString( "userdata", "Telefonnr", "Telefonnr LIKE '"..tnr.."'" )
if not result then
if tonumber ( tnr ) ~= 911 and tonumber ( tnr ) ~= 333 and tonumber ( tnr ) ~= 400 and tonumber (tnr ) ~= 666666 then
Telefonnr = tnr
break
end
end
end
if Telefonnr == nil then
Telefonnr = math.random ( 100, 9999999 )
end
vioSetElementData ( player, "telenr", Telefonnr )
local Warns = 0
vioSetElementData ( player, "warns", Warns )
local GunboxA = "0|0"
vioSetElementData ( player, "gunboxa", GunboxA )
local GunboxB = "0|0"
vioSetElementData ( player, "gunboxb", GunboxB )
local GunboxC = "0|0"
vioSetElementData ( player, "gunboxc", GunboxC )
local Job = "none"
vioSetElementData ( player, "job", Job )
local Jobtime = 0
vioSetElementData ( player, "jobtime", Jobtime )
local Club = "none"
vioSetElementData ( player, "club", Club )
local FavChannel = 0
vioSetElementData ( player, "favchannel", FavChannel )
local BonusPunkte = 1000
vioSetElementData ( player, "bonuspoints", BonusPunkte )
local Truckerskill = 1
vioSetElementData ( player, "truckerlvl", Truckerskill )
local Airportskill = 1
vioSetElementData ( player, "airportlvl", Airportskill )
local Contract = 0
vioSetElementData ( player, "contract", Contract )
local socialState = "Buerger"
vioSetElementData ( player, "socialState", socialState )
local streetCleanPoints = 0
vioSetElementData ( player, "streetCleanPoints", streetCleanPoints )
vioSetElementData ( player, "handyType", 1 )
vioSetElementData ( player, "handyCosts", 0 )
_G[pname.."paydaytime"] = setTimer ( playingtime, 60000, 1, player )
vioSetElementData ( player, "loggedin", 1 )
vioSetElementData ( player, "muted", 0 )
vioSetElementData ( player, "ElementClicked", false )
vioSetElementData ( player, "curplayingtime", 0 )
vioSetElementData ( player, "housex", 0 )
vioSetElementData ( player, "housey", 0 )
vioSetElementData ( player, "housez", 0 )
vioSetElementData ( player, "house", "none" )
vioSetElementData ( player, "handystate", "on" )
vioSetElementData ( player, "object", 0 )
bindKey ( source, "r", "down", reload )
triggerClientEvent ( player, "sec_health_give", getRootElement(), 999 )
spawnPlayer ( player, vioGetElementData ( player, "spawnpos_z" ), vioGetElementData ( player, "spawnpos_y" ), vioGetElementData ( player, "spawnpos_z" ), vioGetElementData ( player, "spawnrot_x" ), vioGetElementData ( player, "spawnint" ), vioGetElementData ( player, "spawndim" ) )
triggerClientEvent ( player, "sec_health_give", getRootElement(), 999 )
isPremium ( player )
--fadeCamera ( player, true )
--setCameraTarget( player, player )
setPlayerWantedLevel ( player, Wanteds )
packageLoad ( player )
achievload ( player )
inventoryload ( player )
elementDataSettings ( player )
bonusLoad ( player )
local result = mysql_query(handler, "INSERT INTO userdata ( Name,Skinid,Telefonnr) VALUES('"..pname.."', '"..vioGetElementData ( player, "skinid" ).."', '"..Telefonnr.."')")
if( not result) then
outputDebugString("Error executing the query: (" .. mysql_errno(handler) .. ") " .. mysql_error(handler))
else
mysql_free_result(result)
outputDebugString ("Daten fuer Spieler "..pname.." wurden angelegt!")
end
outputChatBox ( "Druecke F1, um das Hilfemenue zu oeffnen!", player, 200, 200, 0 )
vioSetElementData ( player, "gameboy", 0 )
loadAddictionsForPlayer ( player )
-- Tutorial --
vioSetElementData ( player, "isInTut", true )
--triggerClientEvent ( player, "setPlayerInTutorial", player )
startintro_func ( player )
end
else
outputChatBox ( "Dein Passwort enthaelt ungueltige Sonderzeichen!", player, 125, 0, 0 )
end
end
end
addEvent ( "register", true )
addEventHandler ( "register", getRootElement(), register_func)
function gameBeginGuiShow_func ( player )
if player == client then
vioSetElementData ( player, "isInTut", false )
triggerClientEvent ( player, "showBeginGui", getRootElement() )
showCursor ( player, true )
vioSetElementData ( player, "ElementClicked", true )
toggleAllControls ( player, false )
setElementPosition ( player, -1421.3, -287.2, 13.8 )
setElementInterior ( player, 0 )
bindKey ( source, "ralt", "down", showcurser, source )
bindKey ( source, "m", "down", showcurser, source )
bindKey ( source, "f1", "down", showhmenue, source )
end
end
addEvent ( "gameBeginGuiShow", true )
addEventHandler ( "gameBeginGuiShow", getRootElement(), gameBeginGuiShow_func)
function isRegistered ( pname )
return MySQL_DatasetExist ( "players", "Name LIKE '"..pname.."'" )
end
function login_func ( player, passwort )
if player == client then
if vioGetElementData ( player, "loggedin" ) == 0 then
local pname = MySQL_Save ( getPlayerName ( player ) )
local passwort = MySQL_Save ( passwort )
local passwort = saltPassword ( pname, passwort )
local result = MySQL_GetString("players", "Passwort", "Name LIKE '" ..pname.."'")
if ( not result ) then
outputDebugString("Error executing the query: (" .. mysql_errno(handler) .. ") " .. mysql_error(handler))
else
if result == md5(passwort) then
-- Alte Passwörter ohne Salt auf Salt umschreiben --
local salt = MySQL_GetString("players", "Salt", "Name LIKE '" ..MySQL_Save(pname).."'")
if salt == "" then
salt = generateNewSalt()
passwort = md5 ( passwort .. salt )
MySQL_SetString("players", "Salt", salt, "Name LIKE '" ..pname.."'")
MySQL_SetString("players", "Passwort", passwort, "Name LIKE '" ..pname.."'")
end
-- Salt --
vioSetElementData ( player, "salt", salt )
toggleAllControls ( player, true )
vioSetElementData ( player, "loggedin", 1 )
vioSetElementData ( player, "loggedin", 1 )
local logtime = getRealTime()
local year = logtime.year + 1900
local month = logtime.month + 1
local day = logtime.monthday
local hour = logtime.hour
local minute = logtime.minute
local lastLoginInt = getSecTime ( 0 )
local lastlogin = tostring(day.."."..month.."."..year..", "..hour..":"..minute)
local dsatz
local result = mysql_query ( handler, "SELECT * from userdata WHERE Name LIKE '"..pname.."'" )
if result then
if ( mysql_num_rows ( result ) > 0 ) then
dsatz = mysql_fetch_assoc ( result )
mysql_free_result ( result )
end
end
local money = tonumber ( dsatz["Geld"] )
vioSetElementData ( player, "money", money )
if money >= 0 then
givePlayerMoney ( player, money )
else
takePlayerMoney ( player, money )
end
local fraktion = tonumber ( dsatz["Fraktion"] )
vioSetElementData ( player, "fraktion", fraktion )
if fraktion > 0 then
fraktionMembers[fraktion][player] = fraktion
end
local rang = tonumber ( dsatz["FraktionsRang"] )
if rang == 1 then
bindKey ( player, "1", "down", tazer_func, player )
end
vioSetElementData ( player, "rang", tonumber ( rang ) )
local admnlvl = tonumber ( dsatz["Adminlevel"] )
vioSetElementData ( player, "adminlvl", admnlvl )
if admnlvl >= 1 then
adminsIngame[player] = admnlvl
end
vioSetElementData ( player, "spawnpos_x", dsatz["Spawnpos_X"] )
vioSetElementData ( player, "spawnpos_y", dsatz["Spawnpos_Y"] )
vioSetElementData ( player, "spawnpos_z", tonumber ( dsatz["Spawnpos_Z"] ) )
vioSetElementData ( player, "spawnrot_x", tonumber ( dsatz["Spawnrot_X"] ) )
vioSetElementData ( player, "spawnint", tonumber ( dsatz["SpawnInterior"] ) )
vioSetElementData ( player, "spawndim", tonumber ( dsatz["SpawnDimension"] ) )
vioSetElementData ( player, "playingtime", tonumber ( dsatz["Spielzeit"] ) )
vioSetElementData ( player, "curcars", tonumber ( dsatz["CurrentCars"] ) )
curcars = 0
local offerOnCar = false
for i = 1, 10 do
carvalue = MySQL_GetString("vehicles", "Special", "Slot LIKE '" ..i.."' AND Besitzer LIKE '"..pname.."'")
if carvalue == 2 then
vioSetElementData ( player, "yachtImBesitz", true )
end
if not carvalue then
if MySQL_DatasetExist("buyit", "Hoechstbietender LIKE '"..pname.."' AND Typ LIKE 'Veh'") then
carvalue = 3
offerOnCar = true
else
carvalue = 0
end
else
if carvalue == 2 then
carvalue = 2
else
carvalue = 1
end
curcars = curcars + 1
end
vioSetElementData ( player, "carslot"..i, carvalue )
end
vioSetElementData ( player, "curcars", curcars )
vioSetElementData ( player, "deaths", tonumber ( dsatz["Tode"] ) )
vioSetElementData ( player, "kills", tonumber ( dsatz["Kills"] ) )
vioSetElementData ( player, "jailtime", tonumber ( dsatz["Knastzeit"] ) )
vioSetElementData ( player, "heaventime", tonumber ( dsatz["Himmelszeit"] ) )
local Hausschluessel = MySQL_GetString("houses", "ID", "Besitzer LIKE '" ..pname.."'")
local key = tonumber ( dsatz["Hausschluessel"] )
if Hausschluessel then
vioSetElementData ( player, "housekey", tonumber ( Hausschluessel ) )
elseif key <= 0 then
vioSetElementData ( player, "housekey", key )
else
vioSetElementData ( player, "housekey", 0 )
end
vioSetElementData ( player, "bizkey", tonumber ( dsatz["Bizschluessel"] ) )
vioSetElementData ( player, "bankmoney", tonumber ( dsatz["Bankgeld"] ) )
vioSetElementData ( player, "drugs", tonumber ( dsatz["Drogen"] ) )
vioSetElementData ( player, "skinid", tonumber ( dsatz["Skinid"] ) )
vioSetElementData ( player, "carlicense", tonumber ( dsatz["Autofuehrerschein"] ) )
vioSetElementData ( player, "bikelicense", tonumber ( dsatz["Motorradtfuehrerschein"] ) )
vioSetElementData ( player, "lkwlicense", tonumber ( dsatz["LKWfuehrerschein"] ) )
vioSetElementData ( player, "helilicense", tonumber ( dsatz["Helikopterfuehrerschein"] ) )
vioSetElementData ( player, "planelicensea", tonumber ( dsatz["FlugscheinKlasseA"] ) )
vioSetElementData ( player, "planelicenseb", tonumber ( dsatz["FlugscheinKlasseB"] ) )
vioSetElementData ( player, "motorbootlicense", tonumber ( dsatz["Motorbootschein"] ) )
vioSetElementData ( player, "segellicense", tonumber ( dsatz["Segelschein"] ) )
vioSetElementData ( player, "fishinglicense", tonumber ( dsatz["Angelschein"] ) )
vioSetElementData ( player, "wanteds", tonumber ( dsatz["Wanteds"] ) )
vioSetElementData ( player, "stvo_punkte", tonumber ( dsatz["StvoPunkte"] ) )
vioSetElementData ( player, "gunlicense", tonumber ( dsatz["Waffenschein"] ) )
vioSetElementData ( player, "perso", tonumber ( dsatz["Perso"] ) )
vioSetElementData ( player, "boni", tonumber ( dsatz["Boni"] ) )
vioSetElementData ( player, "incomepayday", tonumber ( dsatz["IncomePayday"] ) )
vioSetElementData ( player, "pdayincome", tonumber ( dsatz["PdayIncome"] ) )
vioSetElementData ( player, "pdaykosten", tonumber ( dsatz["PdayKosten"] ) )
vioSetElementData ( player, "telenr", tonumber ( dsatz["Telefonnr"] ) )
vioSetElementData ( player, "warns", tonumber ( dsatz["Warns"] ) )
vioSetElementData ( player, "gunboxa", dsatz["Gunbox1"] )
vioSetElementData ( player, "gunboxb", dsatz["Gunbox2"] )
vioSetElementData ( player, "gunboxc", dsatz["Gunbox3"] )
vioSetElementData ( player, "job", dsatz["Job"] )
vioSetElementData ( player, "jobtime", dsatz["Jobtime"] )
vioSetElementData ( player, "club", dsatz["Club"] )
vioSetElementData ( player, "favchannel", tonumber ( dsatz["FavRadio"] ) )
vioSetElementData ( player, "bonuspoints", tonumber ( dsatz["Bonuspunkte"] ) )
local skill = tonumber ( dsatz["Truckerskill"] )
if not skill then
skill = 0
end
vioSetElementData ( player, "truckerlvl", skill )
vioSetElementData ( player, "airportlvl", tonumber ( dsatz["AirportLevel"] ) )
vioSetElementData ( player, "contract", tonumber ( dsatz["Contract"] ) )
vioSetElementData ( player, "socialState", dsatz["SocialState"] )
if dsatz["SocialState"] == "0" or dsatz["SocialState"] == 0 then
vioSetElementData ( player, "socialState", "Obdachloser" )
end
vioSetElementData ( player, "streetCleanPoints", tonumber ( dsatz["StreetCleanPoints"] ) )
local handyString = dsatz["Handy"]
local v1, v2
v1 = tonumber ( gettok ( handyString, 1, string.byte ( '|' ) ) )
v2 = tonumber ( gettok ( handyString, 2, string.byte ( '|' ) ) )
vioSetElementData ( player, "handyType", v1 )
vioSetElementData ( player, "handyCosts", v2 )
loadAddictionsForPlayer ( player )
isPremium ( player )
vioSetElementData ( player, "housex", 0 )
vioSetElementData ( player, "housey", 0 )
vioSetElementData ( player, "housez", 0 )
vioSetElementData ( player, "house", "none" )
vioSetElementData ( player, "curplayingtime", 0 )
vioSetElementData ( player, "handystate", "on" )
packageLoad ( player )
achievload ( player )
inventoryload ( player )
elementDataSettings ( player )
bonusLoad ( player )
setPremiumData ( player )
showFittingBlipForPlayer ( player )
_G[pname.."paydaytime"] = setTimer ( playingtime, 60000, 1, player )
RemoteSpawnPlayer ( player )
if vioGetElementData ( player, "heaventime" ) >= 1 then setElementDimension ( player, 1 ) end
vioSetElementData ( player, "muted", 0 )
triggerClientEvent ( player, "DisableLoginWindow", getRootElement() )
triggerClientEvent ( player, "infobox_start", getRootElement(), "Du hast dich\nerfolgreich eingeloggt!\nDruecke F1 um das\nHilfemenue zu\noeffnen!", 5000, 0, 255, 0 )
outputDebugString ("Spieler "..pname.." wurde eingeloggt, IP: "..getPlayerIP(player))
vioSetElementData ( player, "loggedin", 1 )
vioSetElementData ( player, "ElementClicked", false )
if vioGetElementData ( player, "stvo_punkte" ) >= 15 then -- SearchSTVO
vioSetElementData ( player, "carlicense", 0 )
vioSetElementData ( player, "stvo_punkte", 0 )
MySQL_SetString("userdata", "Autofuehrerschein", vioGetElementData ( player, "carlicense" ), "Name LIKE '"..pname.."'")
outputChatBox ( "Wegen deines schlechten Fahrverhaltens wurde dir dein Fuehrerschein abgenommen!", player, 125, 0, 0 )
end
vioSetElementData ( player, "object", tonumber ( MySQL_GetString ( "inventar", "Objekt", "Name LIKE '" ..pname.."'" ) ) )
checkmsgs ( player )
blacklistLogin ( pname )
-- *** EasterEgg ***
if month == 4 and day == 4 then
local oldlogin = MySQL_GetString("players", "Last_login", "Name LIKE '" ..pname.."'")
local oldlogin1 = tonumber ( gettok ( oldlogin, 1, string.byte('.') ) )
local oldlogin2 = tonumber ( gettok ( oldlogin, 2, string.byte('.') ) )
if ( oldlogin1 ~= 4 or oldlogin2 ~= 4 ) or ( minute < 25 and hour < 16 ) then
putFoodInSlot ( player, 5 )
end
elseif month == 4 and day == 5 then
local oldlogin = MySQL_GetString("players", "Last_login", "Name LIKE '" ..pname.."'")
local oldlogin1 = tonumber ( gettok ( oldlogin, 1, string.byte('.') ) )
local oldlogin2 = tonumber ( gettok ( oldlogin, 2, string.byte('.') ) )
if oldlogin1 ~= 4 or oldlogin2 ~= 5 then
putFoodInSlot ( player, 5 )
end
end
-- *** EasterEgg ***
MySQL_SetString("players", "Last_login", lastlogin, "Name LIKE '"..pname.."'")
MySQL_SetString("players", "LastLogin", lastLoginInt, "Name LIKE '"..pname.."'")
local position = MySQL_GetString("logout", "Position", "Name LIKE '" ..pname.."'")
if position then
weapons = MySQL_GetString ( "logout", "Waffen", "Name LIKE '" ..pname.."'" )
MySQL_DelRow ( "logout", "Name LIKE '"..pname.."'" )
for i = 1, 12 do
local wstring = gettok ( weapons, i, string.byte( '|' ) )
if wstring then
if wstring then
if #wstring >= 3 then
local weapon = tonumber ( gettok ( wstring, 1, string.byte( ',' ) ) )
local ammo = tonumber ( gettok ( wstring, 2, string.byte( ',' ) ) )
giveWeapon ( player, weapon, ammo, true )
triggerClientEvent ( player, "sec_gun_give", getRootElement(), weapon, ammo )
end
end
end
end
if position ~= "false" then
local x = tonumber ( gettok ( position, 1, string.byte( '|' ) ) )
local y = tonumber ( gettok ( position, 2, string.byte( '|' ) ) )
local z = tonumber ( gettok ( position, 3, string.byte( '|' ) ) )
local int = tonumber ( gettok ( position, 4, string.byte( '|' ) ) )
local dim = tonumber ( gettok ( position, 5, string.byte( '|' ) ) )
setTimer ( setElementInterior, 1000, 1, player, int )
setTimer ( setElementDimension, 1000, 1, player, dim )
setTimer ( setElementPosition, 1000, 1, player, x, y, z )
end
end
getMailsForClient_func ( pname )
setMaximumCarsForPlayer ( player )
else
triggerClientEvent ( player, "infobox_start", getRootElement(), "Ungueltiges Passwort -\nueberpruefe\ndeine Eingabe\noder melde dich\nim Forum.", 5000, 255, 0, 0 )
triggerClientEvent ( player, "guiShowLoginAgain", getRootElement() )
vioSetElementData ( player, "pwfailed", tonumber ( vioGetElementData ( player, "pwfailed" )) + 1 )
if vioGetElementData ( player, "pwfailed" ) >= 3 then
outputDebugString ("Spieler "..tostring ( getPlayerName(player) ).." wurde aufgrund eines falschen Passworts gekickt!IP: "..tostring ( getPlayerIP(player) ) )
kickPlayer ( player, "Du hast 3x das falsche Passwort eingegeben - Bitte melde dich bei einem Admin!", 0 )
end
end
end
bindKey ( player, "ralt", "down", showcurser, player )
bindKey ( player, "m", "down", showcurser, player )
bindKey ( player, "f1", "down", showhmenue, player )
bindKey ( player, "r", "down", reload )
end
end
end
addEvent ( "einloggen", true )
addEventHandler ( "einloggen", getRootElement(), login_func )
function datasave ( quitReason, reason )
if tonumber ( vioGetElementData ( source, "loggedin" ) ) == 1 then
fraktionMembers[vioGetElementData(source,"fraktion")][source] = nil
adminsIngame[source] = nil
local pname = MySQL_Save ( getPlayerName ( source ) )
if getElementData ( source, "isInHighNoon" ) or vioGetElementData ( source, "shootingRanchGun" ) then
elseif quitReason and reason ~= "Ausgeloggt." then
if vioGetElementData ( source, "wanteds" ) >= 1 and ( quitReason == "Quit" or quitReason == "Unknown" ) then
local x, y, z = getElementPosition ( source )
local copShape = createColSphere ( x, y, z, 20 )
local elementsInCopSphere = getElementsWithinColShape ( copShape, "player" )
destroyElement ( copShape )
for key, cPlayer in ipairs ( elementsInCopSphere ) do
if isOnDuty ( cPlayer ) or isArmy ( cPlayer ) then
local wanteds = vioGetElementData ( source, "wanteds" )
vioSetElementData ( source, "wanteds", 0 )
vioSetElementData ( source, "jailtime", wanteds * 12 + vioGetElementData ( source, "jailtime" ) )
wantedCost = 100*wanteds*(wanteds*.5)
vioSetElementData ( source, "money", vioGetElementData ( source, "money" ) - wantedCost )
if vioGetElementData ( source, "money" ) < 0 then
vioSetElementData ( source, "money", 0 )
end
outputChatBox ( "Der Gesuchte "..getPlayerName ( source ).." ist offline gegangen - er wird beim naechsten Einloggen im Knast sein.", cPlayer, 0, 125, 0 )
offlinemsg ( "Du bist fuer "..(wanteds*12).." mins im Gefaengnis (Offlineflucht?)", "Server", getPlayerName(source) )
break
end
end
end
if quitReason == "Kicked" or quitReason == "Bad Connection" or quitReason == "Timed out" then
local curWeaponsForSave = "|"
for i = 1, 12 do
if i ~= 10 and i ~= 12 then
local weapon = vioGetElementData ( source, "weaponInSlot"..i )
local ammo = vioGetElementData ( source, "weaponInSlot"..i.."Ammo" )
if weapon > 0 and ammo > 0 then
if #curWeaponsForSave <= 40 then
curWeaponsForSave = curWeaponsForSave..weapon..","..ammo.."|"
end
end
end
end
if #curWeaponsForSave > 1 then
mysql_vio_query( "INSERT INTO logout (Position, Waffen, Name) VALUES ('false', '"..curWeaponsForSave.."', '"..pname.."')")
end
end
end
if vioGetElementData ( source, "callswith" ) then
if vioGetElementData ( source, "callswith" ) ~= "none" then
local caller = getPlayerFromName ( vioGetElementData ( source, "callswith" ) )
if caller then
vioSetElementData ( caller, "callswith", "none" )
vioSetElementData ( caller, "call", false )
vioSetElementData ( caller, "calls", "none" )
vioSetElementData ( caller, "callswith", "none" )
vioSetElementData ( caller, "calledby", "none" )
outputChatBox ( "*Knack* - Die Leitung ist tod!", caller, 125, 0, 0 )
end
vioSetElementData ( source, "callswith", "none" )
vioSetElementData ( source, "call", false )
vioSetElementData ( source, "calls", "none" )
vioSetElementData ( source, "callswith", "none" )
vioSetElementData ( source, "calledby", "none" )
end
end
MySQL_DelRow("loggedin", "Name LIKE '"..pname.."'")
cancelDrivingSchoolServer ( pname )
datasave_remote ( source )
if vioGetElementData ( source, "isInArea51Mission" ) then
removeArea51Bots ( pname )
end
local veh = getPedOccupiedVehicle ( source )
if veh then
if getElementModel(veh) == 502 then
destroyElement ( veh )
end
end
killTimer ( _G[pname.."paydaytime"] )
clearInv ( source )
clearUserdata ( source )
clearBonus ( source )
clearAchiev ( source )
clearPackage ( source )
clearDataSettings ( source )
end
end
addEventHandler ("onPlayerQuit", getRootElement(), datasave )
function elementDataSettings ( player )
local pname = MySQL_Save ( getPlayerName ( player ) )
vioSetElementData ( player, "In_DMArena", 0 )
vioSetElementData ( player, "objectToPlace", false )
vioSetElementData ( player, "cheatingtrys", -1 )
vioSetElementData ( player, "growing", false )
vioSetElementData ( player, "isInRace", false )
vioSetElementData ( player, "callswithpolice", false )
vioSetElementData ( player, "isLive", false )
vioSetElementData ( player, "isInArea51Mission", false )
vioSetElementData ( player, "isInDrivingSchool", false )
vioSetElementData ( player, "armingBomb", false )
vioSetElementData ( player, "tied", true )
vioSetElementData ( player, "hasBomb", false )
vioSetElementData ( player, "wanzen", false )
vioSetElementData ( player, "hunger", 50 )
vioSetElementData ( player, "isInHighNoon", false )
ArmyPermissions = MySQL_GetString("userdata", "ArmyPermissions", "Name LIKE '" ..pname.."'")
if not ArmyPermissions then
for i = 1, 9 do
vioSetElementData ( player, "armyperm"..i, 0 )
end
else
for i = 1, 9 do
vioSetElementData ( player, "armyperm"..i, tonumber ( gettok ( ArmyPermissions, i, string.byte( '|' ) ) ) )
end
end
local result = mysql_query(handler, "INSERT INTO loggedin (Name) VALUES ('"..pname.."')")
if( not result) then
outputDebugString("Error executing the query: (" .. mysql_errno(handler) .. ") " .. mysql_error(handler))
else
mysql_free_result(result)
end
end
function saveArmyPermissions ( player )
local pname = MySQL_Save(getPlayerName ( player ))
local empty = ""
for i = 1, 9 do
empty = empty.."|"..MySQL_Save ( vioGetElementData ( player, "armyperm"..i ) )
end
empty = empty.."|"
MySQL_SetString("userdata", "ArmyPermissions", empty, "Name LIKE '"..pname.."'")
end
function SaveCarData ( player )
local pname = MySQL_Save ( getPlayerName ( player ) )
MySQL_SetString("userdata", "Geld", MySQL_Save ( MySQL_Save ( vioGetElementData ( player, "money" )) ), "Name LIKE '"..pname.."'")
MySQL_SetString("userdata", "CurrentCars", MySQL_Save ( MySQL_Save ( vioGetElementData ( player, "curcars" )) ), "Name LIKE '"..pname.."'")
MySQL_SetString("userdata", "Maximumcars", MySQL_Save ( MySQL_Save ( vioGetElementData ( player, "maxcars" )) ), "Name LIKE '"..pname.."'")
end
function datasave_remote ( player )
local source = player
if tonumber ( MySQL_Save ( vioGetElementData ( source, "loggedin" ))) == 1 then
local pname = getPlayerName ( source )
local fields = "SET"
fields = fields.." Geld = '"..math.abs ( math.floor ( vioGetElementData ( source, "money" ) ) ).."'"
fields = fields..", Fraktion = '"..math.abs ( math.floor ( vioGetElementData ( source, "fraktion") ) ).."'"
fields = fields..", FraktionsRang = '"..math.floor ( vioGetElementData ( source, "rang" ) ).."'"
fields = fields..", Spielzeit = '"..math.floor ( vioGetElementData ( source, "playingtime" ) ).."'"
fields = fields..", CurrentCars = '"..math.floor ( vioGetElementData ( source, "curcars" ) ).."'"
fields = fields..", Maximumcars = '"..math.floor ( vioGetElementData ( source, "maxcars" ) ).."'"
fields = fields..", Tode = '"..math.floor ( vioGetElementData ( source, "deaths" ) ).."'"
fields = fields..", Kills = '"..math.floor ( vioGetElementData ( source, "kills" ) ).."'"
fields = fields..", Knastzeit = '"..math.floor ( vioGetElementData ( source, "jailtime" ) ).."'"
fields = fields..", Himmelszeit = '"..math.floor ( vioGetElementData ( source, "heaventime" ) ).."'"
fields = fields..", Hausschluessel = '"..math.floor ( vioGetElementData ( source, "housekey" ) ).."'"
fields = fields..", Bankgeld = '"..math.floor ( vioGetElementData ( source, "bankmoney" ) ).."'"
fields = fields..", Drogen = '"..math.floor ( vioGetElementData ( source, "drugs" ) ).."'"
fields = fields..", Skinid = '"..math.floor ( vioGetElementData ( source, "skinid" ) ).."'"
fields = fields..", Wanteds = '"..math.floor ( vioGetElementData ( source, "wanteds" ) ).."'"
fields = fields..", StvoPunkte = '"..math.floor ( vioGetElementData ( source, "stvo_punkte" ) ).."'"
fields = fields..", Boni = '"..math.floor ( vioGetElementData ( source, "boni" ) ).."'"
fields = fields..", IncomePayday = '"..math.floor ( vioGetElementData ( source, "incomepayday" ) ).."'"
fields = fields..", PdayIncome = '"..math.floor ( vioGetElementData ( source, "pdayincome" ) ).."'"
fields = fields..", PdayKosten = '"..math.floor ( vioGetElementData ( source, "pdaykosten" ) ).."'"
fields = fields..", Warns = '"..math.floor ( vioGetElementData ( source, "warns" ) ).."'"
fields = fields..", Gunbox1 = '"..vioGetElementData ( source, "gunboxa" ).."'"
fields = fields..", Gunbox2 = '"..vioGetElementData ( source, "gunboxb" ).."'"
fields = fields..", Gunbox3 = '"..vioGetElementData ( source, "gunboxc" ).."'"
fields = fields..", Job = '"..vioGetElementData ( source, "job" ).."'"
fields = fields..", Jobtime = '"..math.floor ( vioGetElementData ( source, "jobtime" ) ).."'"
fields = fields..", Club = '"..vioGetElementData ( source, "club" ).."'"
fields = fields..", FavRadio = '"..math.floor ( vioGetElementData ( source, "favchannel" ) ).."'"
fields = fields..", Bonuspunkte = '"..math.floor ( vioGetElementData ( source, "bonuspoints" ) ).."'"
local skill = tonumber ( vioGetElementData ( source, "truckerlvl" ) )
if not skill then
skill = 0
end
fields = fields..", Truckerskill = '"..skill.."'"
fields = fields..", AirportLevel = '"..math.floor ( vioGetElementData ( source, "airportlvl" ) ).."'"
fields = fields..", Contract = '"..math.floor ( vioGetElementData ( source, "contract" ) ).."'"
fields = fields..", SocialState = '"..MySQL_Save ( getElementData ( source, "socialState") ).."'"
fields = fields..", StreetCleanPoints = '"..math.floor ( getElementData ( source, "streetCleanPoints" ) ).."'"
local v1 = "|"..vioGetElementData ( source, "handyType" ).."|"
local v2 = vioGetElementData ( source, "handyCosts" ).."|"
local v3 = v1..v2
fields = fields..", Handy = '"..v3.."'"
mysql_vio_query ( "UPDATE userdata "..fields.." WHERE Name LIKE '"..pname.."'" )
saveAddictionsForPlayer ( source )
packageSave(source)
achievsave(source)
inventorysave(source)
bonusSave(source)
outputDebugString ("Daten fuer Spieler "..pname.." wurden gesichert!")
end
end
function achievsave ( player )
local pname = MySQL_Save ( getPlayerName ( player ) )
MySQL_SetString("achievments", "Waffenschieber", MySQL_Save ( vioGetElementData ( player, "gunloads") ), "Name LIKE '"..pname.."'")
MySQL_SetString("achievments", "Fahrzeugwahn", MySQL_Save ( vioGetElementData ( player, "carwahn_achiev") ), "Name LIKE '"..pname.."'")
end
function achievload ( player )
local pname = MySQL_Save ( getPlayerName ( player ) )
local dsatz
local result = mysql_query ( handler, "SELECT * from achievments WHERE Name LIKE '"..pname.."'" )
if result then
if ( mysql_num_rows ( result ) > 0 ) then
dsatz = mysql_fetch_assoc ( result )
mysql_free_result ( result )
end
end
vioSetElementData ( player, "schlaflosinsa", dsatz["SchlaflosInSA"] )
vioSetElementData ( player, "gunloads", dsatz["Waffenschieber"] )
vioSetElementData ( player, "angler_achiev", dsatz["Angler"] )
vioSetElementData ( player, "licenses_achiev", dsatz["Lizensen"] )
vioSetElementData ( player, "carwahn_achiev", dsatz["Fahrzeugwahn"] )
vioSetElementData ( player, "collectr_achiev", dsatz["DerSammler"] )
vioSetElementData ( player, "rl_achiev", dsatz["ReallifeWTF"] )
vioSetElementData ( player, "own_foots", dsatz["EigeneFueße"] )
vioSetElementData ( player, "kingofthehill_achiev", dsatz["KingOfTheHill"] )
vioSetElementData ( player, "thetruthisoutthere_achiev", dsatz["TheTruthIsOutThere"] )
vioSetElementData ( player, "silentassasin_achiev", dsatz["SilentAssasin"] )
vioSetElementData ( player, "highwaytohell_achiev", dsatz["HighwayToHell"] )
vioSetElementData ( player, "revolverheld_achiev", tonumber ( dsatz["Revolverheld"] ) )
vioSetElementData ( player, "chickendinner_achiev", tonumber ( dsatz["ChickenDinner"] ) )
vioSetElementData ( player, "nichtsgehtmehr_achiev", tonumber ( dsatz["NichtGehtMehr"] ) )
local dstring = dsatz["LookoutsA"]
triggerClientEvent ( player, "hideLookoutMarkers", getRootElement(), dstring )
local count = 0
for i = 1, 10 do
if tonumber ( gettok ( dstring, i, string.byte ( '|' ) ) ) == 1 then
count = count + 1
end
end
vioSetElementData ( player, "viewpoints", count )
dsatz = nil
--[[
vioSetElementData ( player, "schlaflosinsa", MySQL_GetString("achievments", "SchlaflosInSA", "Name LIKE '" ..pname.."'") )
vioSetElementData ( player, "gunloads", MySQL_GetString("achievments", "Waffenschieber", "Name LIKE '" ..pname.."'") )
vioSetElementData ( player, "angler_achiev", MySQL_GetString("achievments", "Angler", "Name LIKE '" ..pname.."'") )
vioSetElementData ( player, "licenses_achiev", MySQL_GetString("achievments", "Lizensen", "Name LIKE '" ..pname.."'") )
vioSetElementData ( player, "carwahn_achiev", MySQL_GetString("achievments", "Fahrzeugwahn", "Name LIKE '" ..pname.."'") )
vioSetElementData ( player, "collectr_achiev", MySQL_GetString("achievments", "DerSammler", "Name LIKE '" ..pname.."'") )
vioSetElementData ( player, "rl_achiev", MySQL_GetString("achievments", "ReallifeWTF", "Name LIKE '" ..pname.."'") )
vioSetElementData ( player, "own_foots", MySQL_GetString("achievments", "EigeneFueße", "Name LIKE '" ..pname.."'") )
vioSetElementData ( player, "kingofthehill_achiev", MySQL_GetString("achievments", "KingOfTheHill", "Name LIKE '" ..pname.."'") )
vioSetElementData ( player, "thetruthisoutthere_achiev", MySQL_GetString("achievments", "TheTruthIsOutThere", "Name LIKE '" ..pname.."'") )
vioSetElementData ( player, "silentassasin_achiev", MySQL_GetString("achievments", "SilentAssasin", "Name LIKE '" ..pname.."'") )
vioSetElementData ( player, "highwaytohell_achiev", MySQL_GetString("achievments", "HighwayToHell", "Name LIKE '" ..pname.."'") )
vioSetElementData ( player, "revolverheld_achiev", tonumber ( MySQL_GetString("achievments", "Revolverheld", "Name LIKE '" ..pname.."'") ) )
vioSetElementData ( player, "chickendinner_achiev", tonumber ( MySQL_GetString("achievments", "ChickenDinner", "Name LIKE '" ..pname.."'") ) )
vioSetElementData ( player, "nichtsgehtmehr_achiev", tonumber ( MySQL_GetString("achievments", "NichtGehtMehr", "Name LIKE '" ..pname.."'") ) )
]]
end
function inventorysave ( player )
local pname = getPlayerName ( player )
--[[MySQL_SetString("inventar", "Blumensamen", MySQL_Save ( vioGetElementData ( player, "flowerseeds") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Essensslot1", MySQL_Save ( vioGetElementData ( player, "food1") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Essensslot2", MySQL_Save ( vioGetElementData ( player, "food2") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Essensslot3", MySQL_Save ( vioGetElementData ( player, "food3") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Zigaretten", MySQL_Save ( vioGetElementData ( player, "zigaretten") ), "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Materials", MySQL_Save ( vioGetElementData ( player, "mats") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Benzinkanister", MySQL_Save ( vioGetElementData ( player, "benzinkannister") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "FruitNotebook", MySQL_Save ( vioGetElementData ( player, "fruitNotebook" )) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Objekt", vioGetElementData ( player, "object" ), "Name LIKE '" ..pname.."'" )
MySQL_SetString("inventar", "Chips", vioGetElementData ( player, "casinoChips" ), "Name LIKE '" ..pname.."'" )]]
--[[MySQL_SetString("inventar", "Peilsender", MySQL_Save ( vioGetElementData ( player, "peilsender")"Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Wuerfel", MySQL_Save ( vioGetElementData ( player, "dice") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Palmensamen", MySQL_Save ( vioGetElementData ( player, "palmseeds") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Telefonbuch", MySQL_Save ( vioGetElementData ( player, "phonebook") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Lottoschein", MySQL_Save ( vioGetElementData ( player, "lottozahlen") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Waffenslot1", MySQL_Save ( vioGetElementData ( player, "guninv1") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Waffenslot2", MySQL_Save ( vioGetElementData ( player, "guninv2") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Waffenslot3", MySQL_Save ( vioGetElementData ( player, "guninv3") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Waffenslot4", MySQL_Save ( vioGetElementData ( player, "guninv4") ) , "Name LIKE '"..pname.."'")
MySQL_SetString("inventar", "Waffenslot5", MySQL_Save ( vioGetElementData ( player, "guninv5") ) , "Name LIKE '"..pname.."'")]]
local fields = "SET"
fields = fields.." Blumensamen = '"..vioGetElementData ( player, "flowerseeds" ).."'"
fields = fields..", Essensslot1 = '"..vioGetElementData ( player, "food1" ).."'"
fields = fields..", Essensslot2 = '"..vioGetElementData ( player, "food2" ).."'"
fields = fields..", Essensslot3 = '"..vioGetElementData ( player, "food3" ).."'"
fields = fields..", Zigaretten = '"..vioGetElementData ( player, "zigaretten" ).."'"
fields = fields..", Materials = '"..vioGetElementData ( player, "mats" ).."'"
fields = fields..", Benzinkanister = '"..vioGetElementData ( player, "benzinkannister" ).."'"
fields = fields..", FruitNotebook = '"..vioGetElementData ( player, "fruitNotebook" ).."'"
fields = fields..", Objekt = '"..vioGetElementData ( player, "object" ).."'"
fields = fields..", Chips = '"..vioGetElementData ( player, "casinoChips" ).."'"
mysql_vio_query ( "UPDATE inventar "..fields.." WHERE Name LIKE '"..pname.."'" )
end
function inventoryload ( player )
local pname = getPlayerName ( player )
vioSetElementData ( player, "playerid", tonumber ( MySQL_GetString("players", "id", "Name LIKE '" ..pname.."'")) )
local dsatz
local result = mysql_query ( handler, "SELECT * from inventar WHERE Name LIKE '"..pname.."'" )
if result then
if ( mysql_num_rows ( result ) > 0 ) then
dsatz = mysql_fetch_assoc ( result )
mysql_free_result ( result )
end
end
vioSetElementData ( player, "dice", tonumber ( dsatz["Wuerfel"] ) )
vioSetElementData ( player, "flowerseeds", tonumber ( dsatz["Blumensamen"] ) )
vioSetElementData ( player, "food1", tonumber ( dsatz["Essensslot1"] ) )
vioSetElementData ( player, "food2", tonumber ( dsatz["Essensslot2"] ) )
vioSetElementData ( player, "food3", tonumber ( dsatz["Essensslot3"] ) )
vioSetElementData ( player, "zigaretten", tonumber ( dsatz["Zigaretten"] ) )
vioSetElementData ( player, "mats", tonumber ( dsatz["Materials"] ) )
vioSetElementData ( player, "benzinkannister", tonumber ( dsatz["Benzinkanister"] ) )
vioSetElementData ( player, "fruitNotebook", tonumber ( dsatz["FruitNotebook"] ) )
vioSetElementData ( player, "casinoChips", tonumber ( dsatz["Chips"] ) )
vioSetElementData ( player, "gameboy", tonumber ( dsatz["Gameboy"] ) )
dsatz = nil
--[[
vioSetElementData ( player, "dice", tonumber ( MySQL_GetString("inventar", "Wuerfel", "Name LIKE '" ..pname.."'")) )
vioSetElementData ( player, "flowerseeds", tonumber ( MySQL_GetString("inventar", "Blumensamen", "Name LIKE '" ..pname.."'")) )
vioSetElementData ( player, "food1", tonumber ( MySQL_GetString("inventar", "Essensslot1", "Name LIKE '" ..pname.."'")) )
vioSetElementData ( player, "food2", tonumber ( MySQL_GetString("inventar", "Essensslot2", "Name LIKE '" ..pname.."'")) )
vioSetElementData ( player, "food3", tonumber ( MySQL_GetString("inventar", "Essensslot3", "Name LIKE '" ..pname.."'")) )
vioSetElementData ( player, "zigaretten", tonumber ( MySQL_GetString("inventar", "Zigaretten", "Name LIKE '" ..pname.."'") ) )
vioSetElementData ( player, "mats", tonumber ( MySQL_GetString("inventar", "Materials", "Name LIKE '" ..pname.."'") ) )
vioSetElementData ( player, "benzinkannister", tonumber ( MySQL_GetString("inventar", "Benzinkanister", "Name LIKE '" ..pname.."'") ) )
vioSetElementData ( player, "fruitNotebook", tonumber ( MySQL_GetString("inventar", "FruitNotebook", "Name LIKE '" ..pname.."'") ) )
vioSetElementData ( player, "casinoChips", tonumber ( MySQL_GetString( "inventar", "Chips", "Name LIKE '" ..pname.."'") ) )
vioSetElementData ( player, "gameboy", tonumber ( MySQL_GetString ( "inventar", "Gameboy", "Name LIKE '"..pname.."'" ) ) )
]]
end
-- Info: Angabe von Last_Login in Tagen seit Jahresanfang, Angabe von Geschlecht in 1 u. 0 - 1 = Weiblich, 0 = männlich
-- Anreise in 1 u. 0, 0 = Schiff, 1 = Flugzeug
-- Scheine: 0 = nicht vorhanden, 1 = vorhanden
function logoutPlayer_func ( x, y, z, int, dim )
if not vioGetElementData ( source, "shootingRanchGun" ) then
local pname = MySQL_Save ( getPlayerName ( source ) )
local int = tonumber ( MySQL_Save ( int ) )
local dim = tonumber ( MySQL_Save ( dim ) )
local curWeaponsForSave = "|"
for i = 1, 12 do
if i ~= 10 and i ~= 12 then
local weapon = getElementData ( source, "weaponInSlot"..i )
local ammo = getElementData ( source, "weaponInSlot"..i.."Ammo" )
if weapon > 0 and ammo > 0 then
if #curWeaponsForSave <= 40 then
curWeaponsForSave = curWeaponsForSave..weapon..","..ammo.."|"
end
end
end
end
curWeaponsForSave = MySQL_Save ( curWeaponsForSave )
pos = "|"..(math.floor(x*100)/100).."|"..(math.floor(y*100)/100).."|"..(math.floor(z*100)/100).."|"..int.."|"..dim.."|"
if #curWeaponsForSave < 5 then
curWeaponsForSave = ""
end
local result = mysql_vio_query( "INSERT INTO logout (Position, Waffen, Name) VALUES ('"..pos.."', '"..curWeaponsForSave.."', '"..pname.."')")
kickPlayer ( source, "Ausgeloggt." )
else
outputChatBox ( "Bugusing ist verboten.", source, 125, 0, 0 )
end
end
addEvent ( "logoutPlayer", true )
addEventHandler ( "logoutPlayer", getRootElement(), logoutPlayer_func )
Code:
function refreshSavety ()
if guiGetVisible ( gWindow["register"] ) then
local pw = guiGetText ( gEdit["passwort_register"] )
safety = # pw
if safety >= 10 then
safety = 50
elseif safety >= 7 then
safety = 30
else
safety = 10
end
if tonumber ( pw ) then
safety = safety
else
safety = safety + 25
end
if pw ~= "123456" then
safety = safety + 25
end
if # pw < 6 then
safety = 0
end
guiProgressBarSetProgress ( gProgress["password"], safety )
setTimer ( refreshSavety, 250, 1 )
end
end
function SubmitRegisterBtn(button)
if button == "left" then
local pname = getPlayerName ( lp )
local passwort = guiGetText ( gEdit["passwort_register"] )
local pwlaenge = #passwort
if guiGetText ( gEdit["passwort_register2"] ) ~= passwort then
outputChatBox ( "Die beiden Passwoerter stimmen nicht ueberein!", 125, 0, 0 )
elseif pwlaenge < 6 or passwort == "******" or passwort == pname or passwort == "123456" then
outputChatBox ("Fehler: Ungueltiges Passwort", 255, 0 ,0 )
else
local birth_correct = 0
bday = tonumber(guiGetText ( gEdit["registerDay"] ))
bmon = tonumber(guiGetText ( gEdit["registerMonth"] ))
byear = tonumber(guiGetText ( gEdit["registerYear"] ))
if math.floor(bday) == bday and math.floor(bmon) == bmon and byear == math.floor (byear) then
if bday < 32 and bday > 0 and byear < 2009 and byear > 1900 and bmon < 13 and bmon > 0 then
if bday < 29 then
birth_correct = 1
elseif (bday == 29 or bday == 30) and bmon ~= 2 then
birth_correct = 1
elseif bday == 31 and ( bmon == 1 or bmon == 3 or bmon == 5 or bmon == 7 or bmon == 8 or bmon == 10 or bmon == 12 ) then
birth_correct = 1
elseif bday == 29 and bmony == 2 and math.floor((byear/4)) == byear/4 then
birth_correct = 1
end
else
birth_correct = 0
end
else
birth_correct = 0
end
if birth_correct == 1 then
if guiRadioButtonGetSelected(gRadio["male"]) == true then
geschlecht = 0
else
geschlecht = 1
end
player = lp
triggerServerEvent ( "register", lp, player, passwort, bday, bmon, byear, geschlecht )
else
outputChatBox ("Fehler: Ungueltiges Geburtsdatum!", 255, 0 , 0 )
end
end
end
end
function showRegisterGui_func ()
showCursor ( true )
-- Texte --
GUIEditor_Label = {}
GUIEditor_Edit = {}
GUIEditor_Image = {}
gWindow["register"] = guiCreateWindow(420,252,503,349,"Titanium Reallife",false)
GUIEditor_Image[1] = guiCreateStaticImage(9,24,163,281,"http://www.elitepvpers.com/forum/images/login.png",false,gWindow["register"])
GUIEditor_Image[2] = guiCreateStaticImage(298,300,196,40,"http://www.elitepvpers.com/forum/images/logo.png",false,gWindow["register"])
GUIEditor_Label[1] = guiCreateLabel(178,25,322,44,"Herzlich Willkommen bei Titanium Reallife!\nUm auf unseren Server spielen zu dürfen, musst du dich\nmit nachfolgendem Formular registrieren:",false,gWindow["register"])
guiLabelSetColor(GUIEditor_Label[1],210,255,0)
guiSetFont(GUIEditor_Label[1],"default-bold-small")
GUIEditor_Label[2] = guiCreateLabel(179,84,62,15,"Username:",false,gWindow["register"])
GUIEditor_Label[3] = guiCreateLabel(178,122,95,17,"Geburtsdatum:",false,gWindow["register"])
GUIEditor_Edit[1] = guiCreateEdit(326,82,158,22,getPlayerName(lp),false,gWindow["register"])
guiEditSetReadOnly(GUIEditor_Edit[1],true)
gEdit["registerDay"] = guiCreateEdit(326,120,37,22,"",false,gWindow["register"])
gEdit["passwort_register"] = guiCreateEdit(325,199,153,22,"",false,gWindow["register"])
guiEditSetMasked(gEdit["passwort_register"],true)
gEdit["passwort_register2"] = guiCreateEdit(325,222,153,22,"",false,gWindow["register"])
guiEditSetMasked(gEdit["passwort_register2"],true)
GUIEditor_Label[4] = guiCreateLabel(178,205,95,17,"Passwort:",false,gWindow["register"])
GUIEditor_Label[5] = guiCreateLabel(178,225,146,17,"Passwort Wiederholung:",false,gWindow["register"])
GUIEditor_Label[6] = guiCreateLabel(178,165,80,17,"Geschlecht:",false,gWindow["register"])
gRadio["male"] = guiCreateRadioButton(327,168,109,13,"Männlich",false,gWindow["register"])
gRadio["female"] = guiCreateRadioButton(413,169,68,13,"Weiblich",false,gWindow["register"])
guiRadioButtonSetSelected(gRadio["male"],true)
gProgress["password"] = guiCreateProgressBar(179,264,119,16,false,gWindow["register"])
GUIEditor_Label[7] = guiCreateLabel(186,279,127,15,"Passwort-Sicherheit",false,gWindow["register"])
gButtons["register"] = guiCreateButton(387,262,90,32,"Registrieren",false,gWindow["register"])
guiSetFont(gButtons["register"],"default-bold-small")
gEdit["registerMonth"] = guiCreateEdit(372,120,37,22,"",false,gWindow["register"])
gEdit["registerYear"] = guiCreateEdit(419,120,65,22,"",false,gWindow["register"])
GUIEditor_Label[8] = guiCreateLabel(9,309,204,34,"Forum: german-titanium-reallife.de.gp",false,gWindow["register"])
guiLabelSetColor(GUIEditor_Label[8],210,255,0)
guiSetFont(GUIEditor_Label[8],"default-bold-small")
GUIEditor_Label[9] = guiCreateLabel(336,103,145,10,"kann hier nicht verändert werden",false,gWindow["register"])
guiSetFont(GUIEditor_Label[9],"default-small")
GUIEditor_Label[10] = guiCreateLabel(335,142,28,14,"Tag",false,gWindow["register"])
guiSetFont(GUIEditor_Label[10],"default-small")
GUIEditor_Label[11] = guiCreateLabel(377,142,28,14,"Monat",false,gWindow["register"])
guiSetFont(GUIEditor_Label[11],"default-small")
GUIEditor_Label[12] = guiCreateLabel(440,142,28,14,"Jahr",false,gWindow["register"])
guiSetFont(GUIEditor_Label[12],"default-small")
addEventHandler("onClientGUIClick", gButtons["register"], SubmitRegisterBtn, false)
setTimer ( refreshSavety, 250, 1 )
end
addEvent ( "ShowRegisterGui", true)
addEventHandler ( "ShowRegisterGui", getRootElement(), showRegisterGui_func )
function GUI_DisableRegisterGui()
cancelCameraIntro ()
destroyElement ( gWindow["register"] )
showCursor ( false )
removeEventHandler ( "onClientRender", getRootElement(), showVersionInfo )
destroyElement ( gImage["versionInfoDraw1"] )
destroyElement ( gImage["versionInfoDraw2"] )
killTimer ( LVCamFlightTimer )
end
addEvent ( "DisableRegisterGui", true )
addEventHandler ( "DisableRegisterGui", getRootElement(), GUI_DisableRegisterGui)
function showBeginGui_func ()
gWindow["welcomeInfo"] = guiCreateWindow(507,285,445,266,"Fast geschafft!",false)
guiSetAlpha(gWindow["welcomeInfo"],1)
gLabel["anfangsText"] = guiCreateLabel(0.0225,0.0789,0.9303,0.3083,"Das Tutorial ist nun beendet!\nNun waere es angebracht, sich im Hilfemenue ( Kurztaste: F1 ) erst einmal\nueber die Serverregeln und anfaenglichen Schritte zu informieren.\n\nViel Spass auf Titanium Reallife!",true,gWindow["welcomeInfo"])
guiSetAlpha(gLabel["anfangsText"],1)
guiLabelSetColor(gLabel["anfangsText"],255,255,255)
guiLabelSetVerticalAlign(gLabel["anfangsText"],"top")
guiLabelSetHorizontalAlign(gLabel["anfangsText"],"left",false)
guiSetFont(gLabel["anfangsText"],"default-bold-small")
gButton["HelmenueOpen"] = guiCreateButton(0.0225,0.406,0.2292,0.1466,"Hilfemenue aufrufen",true,gWindow["welcomeInfo"])
guiSetAlpha(gButton["HelmenueOpen"],1)
gButton["closeAnfangsWindow"] = guiCreateButton(0.2674,0.406,0.2292,0.1466,"Fenster\nschliessen",true,gWindow["welcomeInfo"])
guiSetAlpha(gButton["closeAnfangsWindow"],1)
gLabel["anfangsPS"] = guiCreateLabel(0.0225,0.609,0.9618,0.1391,"P.S.: Vergiss nicht, auch in unserem Forum vorbei zu schauen - dort erwarten\ndich zahlreiche Events und Informationen!",true,gWindow["welcomeInfo"])
guiSetAlpha(gLabel["anfangsPS"],1)
guiLabelSetColor(gLabel["anfangsPS"],255,255,255)
guiLabelSetVerticalAlign(gLabel["anfangsPS"],"top")
guiLabelSetHorizontalAlign(gLabel["anfangsPS"],"left",false)
guiSetFont(gLabel["anfangsPS"],"default-bold-small")
gLabel["anfangsAdresse"] = guiCreateLabel(0.1011,0.7707,1,0.1729,"Titanium Reallife",true,gWindow["welcomeInfo"])
guiSetAlpha(gLabel["anfangsAdresse"],1)
guiLabelSetColor(gLabel["anfangsAdresse"],200,200,000)
guiLabelSetVerticalAlign(gLabel["anfangsAdresse"],"top")
guiLabelSetHorizontalAlign(gLabel["anfangsAdresse"],"left",false)
guiSetFont(gLabel["anfangsAdresse"],"sa-header")
addEventHandler("onClientGUIClick", gButton["HelmenueOpen"], SubmitOpenHelpMenueBtn, false)
addEventHandler("onClientGUIClick", gButton["closeAnfangsWindow"], SubmitCloseThisWindowBtn, false)
end
addEvent ( "showBeginGui", true )
addEventHandler ( "showBeginGui", getRootElement(), showBeginGui_func )
function SubmitCloseThisWindowBtn ()
guiSetVisible ( gWindow["welcomeInfo"], false )
showCursor(false)
triggerServerEvent ( "cancel_gui_server", lp )
end
function SubmitOpenHelpMenueBtn ()
guiSetVisible ( gWindow["welcomeInfo"], false )
_CreateHelpmenueGui()
end
Loginfenster.lua :
Code:
function isWithinNightTime ()
local time = getRealTime()
local hour = time.hour
if hour >= 20 or hour <= 8 then
return true
else
return false
end
end
gButtons = {}
gEdit = {}
gImage = {}
function showVersionInfo ()
dxDrawText ( "Titanium Reallife "..curVersion, screenwidth-600-3, screenheight-275+155-3, screenwidth, screenheight, tocolor ( 255, 255, 255 ), 2, "pricedown", "left", "top" )
dxDrawText ( "Titanium Reallife "..curVersion, screenwidth-600, screenheight-275+155, screenwidth, screenheight, tocolor ( 255, 0, 0), 2, "pricedown", "left", "top" )
end
function SubmitPasswortLoginEdit(button)
if button == "left" then
if guiGetText ( gEdit["passwort_login"] ) == "******" then
guiSetText ( gEdit["passwort_login"], "" )
end
end
end
function guiShowLoginAgain_func ()
guiSetVisible ( LoginWindow, true )
guiSetText ( gEdit["passwort_login"], "" )
end
addEvent ( "guiShowLoginAgain", true )
addEventHandler ( "guiShowLoginAgain", getRootElement(), guiShowLoginAgain_func )
function SubmitEinloggenBtn()
if guiGetVisible ( LoginWindow ) then
guiSetVisible ( LoginWindow, false )
local passwort = guiGetText ( gEdit["passwort_login"] )
triggerServerEvent ( "einloggen", lp, lp, passwort )
unbindKey ( "enter", "down", SubmitEinloggenBtn )
end
end
function _CreateLoginWindow()
if LoginWindow then
guiSetVisible ( LoginWindow, true )
else
local screenwidth, screenheight = guiGetScreenSize ()
LoginWindow = guiCreateWindow(405,304,465,266,"Titanium Reallife",false)
guiSetAlpha(LoginWindow,1)
guiWindowSetSizable ( LoginWindow, false )
guiWindowSetMovable ( LoginWindow, false )
gImage["login"] = guiCreateStaticImage(9,22,148,235,"http://www.elitepvpers.com/forum/images/login.png",false,LoginWindow)
gImage["logo"] = guiCreateStaticImage(238,209,212,43,"http://www.elitepvpers.com/forum/images/logo.png",false,LoginWindow)
guiSetAlpha(gImage["logo"],1)
guiSetAlpha(gImage["login"],1)
gLabel["infoTextLogin"] = guiCreateLabel(161,30,287,51,"Passwort",false,LoginWindow)
guiSetFont(gLabel["infoTextLogin"],"sa-header")
guiSetAlpha(gLabel["infoTextLogin"],1)
guiLabelSetColor(gLabel["infoTextLogin"],210,255,0)
guiLabelSetVerticalAlign(gLabel["infoTextLogin"],"top")
guiLabelSetHorizontalAlign(gLabel["infoTextLogin"],"left",false)
gButtons["Einloggen"] = guiCreateButton(362,119,92,29,"LOGIN",false,LoginWindow)
guiSetAlpha(gButtons["Einloggen"],1)
gLabel["infoTextPasswort"] = guiCreateLabel(162,125,87,23,"",false,LoginWindow)
guiSetAlpha(gLabel["infoTextPasswort"],1)
guiSetFont(gLabel["infoTextPasswort"],"clear-normal")
guiLabelSetColor(gLabel["infoTextPasswort"],210,255,0)
guiLabelSetVerticalAlign(gLabel["infoTextPasswort"],"top")
guiLabelSetHorizontalAlign(gLabel["infoTextPasswort"],"left",false)
gEdit["passwort_login"] = guiCreateEdit(226,118,123,31,"password",false,LoginWindow)
guiSetAlpha(gEdit["passwort_login"],1)
guiSetVisible ( LoginWindow, false )
guiEditSetMasked ( gEdit["passwort_login"], true )
addEventHandler("onClientGUIClick", gEdit["passwort_login"], SubmitPasswortLoginEdit, false)
addEventHandler("onClientGUIClick", gButtons["Einloggen"], SubmitEinloggenBtn, false)
end
addEventHandler ( "onClientRender", getRootElement(), showVersionInfo )
gImage["versionInfoDraw1"] = guiCreateStaticImage(0,screenheight-45,screenwidth+1,4,"http://www.elitepvpers.com/forum/images/colors/c_white.jpg",false)
gImage["versionInfoDraw2"] = guiCreateStaticImage(0,screenheight-45+4,screenwidth+1,1,"http://www.elitepvpers.com/forum/images/colors/c_black.jpg",false)
end
function GUI_ShowLoginWindow()
guiSetVisible(LoginWindow, true)
showCursor(true)
bindKey ( "enter", "down", SubmitEinloggenBtn )
end
addEvent ( "ShowLoginWindow", true)
addEventHandler ( "ShowLoginWindow", getRootElement(), GUI_ShowLoginWindow)
function GUI_DisableLoginWindow()
cancelCameraIntro ()
guiSetVisible(LoginWindow, false)
showCursor(false)
removeEventHandler ( "onClientRender", getRootElement(), showVersionInfo )
destroyElement ( gImage["versionInfoDraw1"] )
destroyElement ( gImage["versionInfoDraw2"] )
setTimer ( checkForSocialStateChanges, 10000, -1 )
setTimer ( getPlayerSocialAvailableStates, 1000, 1 )
if isTimer ( LVCamFlightTimer ) then
killTimer ( LVCamFlightTimer )
end
end
addEvent ( "DisableLoginWindow", true )
addEventHandler ( "DisableLoginWindow", getRootElement(), GUI_DisableLoginWindow)
addEventHandler("onClientResourceStart", getResourceRootElement(getThisResource()),
function ()
local player = getLocalPlayer()
_CreateLoginWindow()
for i = 1, 100 do
outputChatBox (" ")
end
setTimer ( ShowInfoWindow, 1000, 1 )
triggerServerEvent ( "regcheck", getLocalPlayer(), player )
end
)
function ShowInfoWindow ()
infobox_start_func("Herzlich Willkommen\nbei Titanium Reallife!\nBitte fuelle das mittig\nangezeigte Formular\naus!", 7500 )
end
-- Kameraflug --
function loginCamDrive1 () -- 1 & 2
local x1, y1, z1 = -2681.7158203125, 1934.0498046875, 216.9231262207
local x2, y2, z2 = -2682.2709960938, 1825.5369873047, 152.13279724121
local x1t, y1t, z1t = -2681.8959960938, 1834.5554199219, 204.25393676758
local x2t, y2t, z2t = -2682.4833984375, 1726.5500488281, 142.3770904541
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive2, time + 5, 1 )
end
function loginCamDrive2 () -- 2 & 3
local x1, y1, z1 = -2682.2709960938, 1825.5369873047, 152.13279724121
local x2, y2, z2 = -2681.4150390625, 1594.8540039063, 110.92800140381
local x1t, y1t, z1t = -2682.4833984375, 1726.5500488281, 142.3770904541
local x2t, y2t, z2t = -2681.6276855469, 1495.1013183594, 99.998870849609
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive3, time + 5, 1 )
end
function loginCamDrive3 () -- 3 & 4
local x1, y1, z1 = -2681.4150390625, 1594.8540039063, 110.92800140381
local x2, y2, z2 = -2681.6447753906, 1422.8494873047, 67.56616973877
local x1t, y1t, z1t = -2681.6276855469, 1495.1013183594, 99.998870849609
local x2t, y2t, z2t = -2681.5173339844, 1352.2436523438, 66.19132232666
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive4, time + 5, 1 )
end
function loginCamDrive4 () -- 4 & 5
local x1, y1, z1 = -2681.6447753906, 1422.8494873047, 67.56616973877
local x2, y2, z2 = -2676.8818359375, 1286.3806152344, 56.828914642334
local x1t, y1t, z1t = -2681.5173339844, 1352.2436523438, 66.19132232666
local x2t, y2t, z2t = -2677.1591796875, 1271.5997314453, 55.728954315186
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive5, time + 5, 1 )
end
function loginCamDrive5 () -- 5 & 6
local x1, y1, z1 = -2676.8818359375, 1286.3806152344, 56.828914642334
local x2, y2, z2 = -2678.3664550781, 1233.8521728516, 64
local x1t, y1t, z1t = -2677.1591796875, 1271.5997314453, 55.728954315186
local x2t, y2t, z2t = -2660.7592773438, 1188.1033935547, 65.842964172363
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive6, time + 5, 1 )
end
function loginCamDrive6 () -- 6 & 7
local x1, y1, z1 = -2678.3664550781, 1233.8521728516, 66.589385986328
local x2, y2, z2 = -2622.5700683594, 1189.6419677734, 61.302570343018
local x1t, y1t, z1t = -2660.7592773438, 1188.1033935547, 65.842964172363
local x2t, y2t, z2t = -2600.3303222656, 1200.1820068359, 34.821102142334
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive7, time + 5, 1 )
end
function loginCamDrive7 () -- 7 & 8
local x1, y1, z1 = -2622.5700683594, 1189.6419677734, 61.302570343018
local x2, y2, z2 = -2608.8449707031, 1199.6995849609, 39.6725730896
local x1t, y1t, z1t = -2600.3303222656, 1200.1820068359, 34.821102142334
local x2t, y2t, z2t = -2538.4426269531, 1269.5288085938, 35.954319000244
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive8, time + 5, 1 )
end
function loginCamDrive8 () -- 8 & 9
local x1, y1, z1 = -2608.8449707031, 1199.6995849609, 39.6725730896
local x2, y2, z2 = -2583.2880859375, 1229.4835205078, 39.4225730896
local x1t, y1t, z1t = -2538.4426269531, 1269.5288085938, 35.954319000244
local x2t, y2t, z2t = -2553.7490234375, 1324.2071533203, 30.522205352783
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive9, time + 5, 1 )
end
function loginCamDrive9 () -- 9 & 10
local x1, y1, z1 = -2583.2880859375, 1229.4835205078, 39.4225730896
local x2, y2, z2 = -2569.6552734375, 1311.4398193359, 18.645280838013
local x1t, y1t, z1t = -2553.7490234375, 1324.2071533203, 30.522205352783
local x2t, y2t, z2t = -2574.12890625, 1410.6734619141, 19.313352584839
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive10, time + 5, 1 )
end
function loginCamDrive10 () -- 10 & 11
local x1, y1, z1 = -2569.6552734375, 1311.4398193359, 18.645280838013
local x2, y2, z2 = -2653.9934082031, 1448.3275146484, 67.121849060059
local x1t, y1t, z1t = -2574.12890625, 1410.6734619141, 19.313352584839
local x2t, y2t, z2t = -2713.8569335938, 1503.0798339844, 104.99078369141
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive11, time + 5, 1 )
end
function loginCamDrive11 () -- 11 & 12
local x1, y1, z1 = -2653.9934082031, 1448.3275146484, 67.121849060059
local x2, y2, z2 = -2672.4709472656, 1593.65625, 183.23147583008
local x1t, y1t, z1t = -2713.8569335938, 1503.0798339844, 104.99078369141
local x2t, y2t, z2t = -2673.0710449219, 1677.3735351563, 222.607421875
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive12, time + 5, 1 )
end
function loginCamDrive12 () -- 12 & 13
local x1, y1, z1 = -2672.4709472656, 1593.65625, 183.23147583008
local x2, y2, z2 = -2681.8708496094, 1933.7674560547, 181.23147583008
local x1t, y1t, z1t = -2673.0710449219, 1677.3735351563, 222.607421875
local x2t, y2t, z2t = -2741.1096191406, 2007.708984375, 179.04406738281
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive13, time + 5, 1 )
end
function loginCamDrive13 () -- 13 & 14
local x1, y1, z1 = -2681.8708496094, 1933.7674560547, 181.23147583008
local x2, y2, z2 = -2704.6545410156+5, 1964.7253417969, 238.45220947266
local x1t, y1t, z1t = -2741.1096191406, 2007.708984375, 179.04406738281
local x2t, y2t, z2t = -2682.2709960938, 1825.5369873047, 152.13279724121
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive14, time + 5, 1 )
end
function loginCamDrive14 () -- 14 & 1
local x1, y1, z1 = -2704.6545410156+5, 1964.7253417969, 238.45220947266
local x2, y2, z2 = -2681.7158203125, 1934.0498046875, 216.9231262207
local x1t, y1t, z1t = -2682.2709960938, 1825.5369873047, 152.13279724121
local x2t, y2t, z2t = -2681.8959960938, 1834.5554199219, 204.25393676758
local time = getDistanceBetweenPoints3D ( x1, y1, z1, x2, y2, z2 ) / speedfactor
smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
cameraTimer = setTimer ( loginCamDrive1, time + 5, 1 )
end
function smoothMoveCamera ( x1, y1, z1, x1t, y1t, z1t, x2, y2, z2, x2t, y2t, z2t, time )
object1 = createObject ( 1337, x1, y1, z1 )
object2 = createObject ( 1337, x1t, y1t, z1t )
setElementAlpha ( object1, 0 )
setElementAlpha ( object2, 0 )
moveObject ( object1, time, x2, y2, z2 )
moveObject ( object2, time, x2t, y2t, z2t )
addEventHandler ( "onClientRender", getRootElement(), camRender )
setTimer ( removeCamHandler, time, 1 )
setTimer ( destroyElement, time, 1, object1 )
setTimer ( destroyElement, time, 1, object2 )
end
function removeCamHandler ()
removeEventHandler ( "onClientRender", getRootElement(), camRender )
end
function camRender ()
if not getCameraTarget ( lp ) then
local x1, y1, z1 = getElementPosition ( object1 )
local x2, y2, z2 = getElementPosition ( object2 )
setCameraMatrix ( x1, y1, z1, x2, y2, z2 )
else
removeCamHandler ()
if isTimer ( LVCamFlightTimer ) then
killTimer ( LVCamFlightTimer )
end
end
end
function cancelCameraIntro ()
removeEventHandler ( "onClientRender", getRootElement(), camRender )
destroyElement ( object1 )
destroyElement ( object2 )
if isTimer ( cameraTimer ) then
killTimer ( cameraTimer )
end
end
function loginCamDrive ()
speedfactor = getDistanceBetweenPoints3D ( -2681.7158203125, 1934.0498046875, 216.9231262207, -2682.2709960938, 1825.5369873047, 152.13279724121 ) / 10000
if isWithinNightTime () then
startLVCameraFlight ( speedfactor )
else
loginCamDrive1 ()
end
end
loginCamDrive ()
|
|
|
|
|
03/03/2013, 22:34
|
#4
|
elite*gold: 0
Join Date: Feb 2013
Posts: 911
Received Thanks: 109
|
für vio lite gibt es keinen support
|
|
|
|
|
03/04/2013, 07:58
|
#5
|
elite*gold: 1091
Join Date: Jun 2007
Posts: 19,836
Received Thanks: 7,180
|
Quote:
Originally Posted by SniperDeeKay
für vio lite gibt es keinen support
|
Warum bekommt er keinen Support? Wir sind hier nicht bei breadfish, dementsprechend gibt es hier andere Regeln. 
Support bekommt man nur offiziell nicht mehr, da der Scripter sich mit dem Script nicht mehr befassen möchte.
|
|
|
|
|
03/04/2013, 11:46
|
#6
|
elite*gold: 0
Join Date: Feb 2013
Posts: 30
Received Thanks: 0
|
€: Hat sich erledigt... :P Ein Verzeichnis war falsch benannt.
|
|
|
|
 |
Similar Threads
|
Quest wird nicht in VPC angezeigt und funktioniert auch nicht
12/19/2012 - Metin2 Private Server - 1 Replies
quest kampfgaul begin
state start begin
when 70028.use begin
say("Großartig!")
say("Willst du dieses Item gegen mein")
say("Pferd tauschen?")
local s = select("Tauschen", "Abbrechen")
|
MC /help wird nicht richtig angezeigt und commandos laufen nicht HILFE!
02/04/2012 - Minecraft - 2 Replies
Hey hab einen eigernen Server erstellt hab aber jetzt ein Problem. Wenn ich /Help eingebe kommt eine andere Help als normal :/
Screen:
ImageShack® - Online Photo and Video Hosting
Screens vom Ordner:
ImageShack® - Online Photo and Video Hosting
Woran kanns liegen MC und Server sind schon mal neu gemacht Problem is aber immernoch das selbe >_<
Danke für die Hilfe :)
|
Mein selbsterstellter Laden wird nicht IG nicht angezeigt ?!?!?!
12/26/2011 - Metin2 Private Server - 0 Replies
Hey Leute,
seit heute werden Ingame meine selbsterstellten Läden nicht mehr angezeigt.
Ich habe z.B. alle Lehrer zu Shops gemacht bei denen man etwas kaufen konnte und es ging immer alles. Jetzt kann ich sie nicht mehr anklicken (werden nicht als laden anerkannt). In Navicat stimmt alles da habe ich nichts verändert, hab auch schon versucht nen neuen laden zu erstellen aber man kann ihn wieder nicht anklicken.
Bitte dringend um Hilfe!!! :confused:
Vielleicht wichtig ?!: Habe heute in...
|
Register page wird nun angezeigt aber account wird nicht erstell
11/14/2010 - Flyff Private Server - 4 Replies
Ja leute jez wird endlich die regi page angezeigt aberwenn ich registrieren klicke kommt registartion succesfull aber der account wird nicht erstellt an was kann das liegen?
|
All times are GMT +2. The time now is 17:00.
|
|
