Register for your free account! | Forgot your password?

Go Back   elitepvpers > Popular Games > Metin2 > Metin2 Private Server > Metin2 PServer Guides & Strategies
You last visited: Today at 13:36

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



[Releas - Quest]Guthaben[Aufladen - Abheben - Senden - Pin]

Discussion on [Releas - Quest]Guthaben[Aufladen - Abheben - Senden - Pin] within the Metin2 PServer Guides & Strategies forum part of the Metin2 Private Server category.

Reply
 
Old   #1
 
[SGA]Jango's Avatar
 
elite*gold: 3
Join Date: Oct 2010
Posts: 390
Received Thanks: 463
Post [Releas - Quest]Guthaben[Aufladen - Abheben - Senden - Pin]

Es ist eine Art Bankscript! Besondere Daran: Man kan Damit Anderen Usern Geldschiken!

Was kann das Script:
-User können Geld einzahlen
-User können sich Geld auszaheln[nur das was sie eingezahlt haben]
-Sie können anderen Usern Geld Schiken[nur wenn sie Online sind!]
-Es kann ein Pin gesetzt werden wenn nur wen der User es möchte!
-Das ganze ist in einem Item: Goldklumpen[80008]

Das ganze ist für DJMT2 gewesen, dort ist das ganze aber ein wenig anderst aufgebaut.. Kann auch Usern Geld senden wenn sie Offline sind und es ist zusätzlich im Userpannel[iPhone] drin.

Damit die Quest auch funktioniert muss noch folgendes in quest_lib.lua:
PHP Code:
function geld_get_from_name(name)
    
local get_name="geld_guthaben_"..name..""
    
local get_geld=game.get_event_flag(get_name)
    return 
get_geld
end

function geld_give_to_name(namegeld)
    
local get_name="geld_guthaben_"..name..""
    
local get_geld=game.get_event_flag(get_name)
    
game.set_event_flag(get_nameget_geld+geld)
end

function geld_give_to_name_with_check(namegeld)
    
local get_name="geld_guthaben_"..name..""
    
local get_geld=game.get_event_flag(get_name)
    
local check1=get_geld+geld
    
if check1>2000000000 then
        
return 2
    
else
        
game.set_event_flag(get_namecheck1)
        return 
1
    end
end

function transfer_geld_from_self_to_name_with_check(namegeld)
    
local get_name="geld_guthaben_"..name..""
    
local get_geld=game.get_event_flag(get_name)
    
local check1=get_geld+geld
    local check2
=geld_get_from_name(pc.name)-geld
    
if check1>2000000000 then
        
return 2
    
elseif check2<0 then
        
return 3
    
else
        
geld_give_to_name(pc.name, -geld)
        
game.set_event_flag(get_namecheck1)
        return 
1
    end
end 
Dann noch das in die quest_functions

PHP Code:
geld_get_from_name
geld_give_to_name
geld_give_to_name_with_check
transfer_geld_from_self_to_name_with_check 
Quest:
PHP Code:
--Script by Jango for DJMT2
quest guthaben_script begin
    state start begin
        when 80008.
use begin
            
if pc.getqf("pw_for_guthaben_panel")!=0 then
                say
("Gebe dein Passwort für den")
                
say("Guthaben Bereich ein:")
                
local pw=input()
                if 
pw=="" then
                    say
("Du must schon etwas eingeben!")
                    return
                
end
                local pw
=pw+0
                
if pw!=pc.getqf("pw_for_guthaben_panel"then
                    say
("Das ist nicht dein Passwort!")
                    return
                
end
            end
            say
("Wähle ein Aktion aus:")
            
say("Dein Guthaben: "..geld_get_from_name(pc.name).." Yang")
            
local s=select("Geld einzahlen""Geld auszaheln""Geld Senden""Passwort""Abbrechen")
            if 
s==5 then
                
return
            
end
            
if s==1 then
                say
("Wie viel Geld willst du den einzahlen?")
                
local geld=input()
                if 
geld=="" then
                    say
("Du must schon etwas eintragen!")
                    return
                
end
                local geld
=geld+0
                
if geld==0 then
                    say
("Mehr als 0 muss es schon sein")
                    return
                
end
                
if pc.get_gold()<geld then
                    say
("So viel Geld besitzt du nicht!")
                    return
                
end
                local geld_on_tresor
=geld_get_from_name(pc.name)+geld
                
if geld_on_tresor>2000000000 then
                    say
("Du kannst Maximal 2.000.000.000 Yang")
                    
say("eingezahl haben!")
                    return
                
end
                say
("Willst du "..geld.." Yang einzahlen?")
                
local c=select("Ja""Abbrechen")
                if 
c==2 then
                    
return
                
end
                
if pc.get_gold()<geld then
                    say
("So viel Geld besitzt du nicht!")
                    return
                
end
                geld_give_to_name
(pc.namegeld)
                
pc.change_gold(-geld)
                
say("Das Geld wurde Erfolgreich eingezahlt!")
                return
            
end
            
if s==2 then
                say
("Dein Guthaben beträgt: "..geld_get_from_name(pc.name).." Yang")
                
say("Wie viel willst du davon asugezahlt haben?")
                
local geld=input()
                if 
geld=="" then
                    say
("Du must schon etwas eintragen!")
                    return
                
end
                local geld
=geld+0
                
if geld==0 then
                    say
("Mehr als 0 muss es schon sein")
                    return
                
end
                local self_gold
=pc.get_gold()
                
local check1=self_gold+geld
                local check2
=geld_get_from_name(pc.name)-geld
                
if check1>2000000000 then
                    say
("So viel Geld kannst du nicht abheben!")
                    
say("Es währe mehr als 2.000.000.000 Yang!")
                    
say("Dann kommt ein Fluch über dich!")
                    return
                
end
                
if check2<0 then
                    say
("Du hast nicht so viel Guthaben!")
                    return
                
end
                
if check1>=1800000000 then
                    say
("Zusammengerechnet mit deinem momentanen")
                    
say("Geld sind das fast 2.000.000.000 Yang!")
                    
say("Wenn mehr Yang in deinem Inventar ist")
                    
say("Kommt ein Fluch über dich!")
                
end
                say
("Willst du "..geld.." Yang")
                
say("ausgezahlt haben?")
                
local c=select("Ja""Abbrechen")
                if 
c==2 then
                    
return
                
end
                
if check1>2000000000 then
                    say
("So viel Geld kannst du nicht abheben!")
                    
say("Es währe mehr als 2.000.000.000 Yang!")
                    
say("Dann kommt ein Fluch über dich!")
                    return
                
end
                
if check2<0 then
                    say
("Du hast nicht so viel Guthaben!")
                    return
                
end
                local new_geld
=pc.get_gold()+geld
                geld_give_to_name
(pc.name, -geld)
                
pc.change_gold(geld)
                
say("Du hast nun "..new_geld.." Yang!")
                return
            
end
            
if s==3 then
                say
("Wem willst du den das Geld senden?")
                
say("Der jenige mus Online sein!")
                
local name=input()
                
local search find_pc_by_name(name)
                if 
name=="" then
                    say
("Du must schon etwas eingeben!")
                    return
                
end
                
if name==pc.name then
                    say
("Du kannst dir selbst kein Yang schiken!")
                    return
                
end
                
if search==0 then
                    say
("Der Spieler existiert nicht oder ist Offline!")
                    return
                
end
                
if search>0 then
                    say
("Wie viel Geld willst du ihm Senden?")
                    
say("Dein Guthaben beträgt: "..geld_get_from_name(pc.name).." Yang")
                    
local geld=input()
                    if 
geld=="" then
                        say
("Du must schon etwas eingeben!")
                        return
                    
end
                    local geld
=geld+0
                    
if geld<0 then
                        say
("Du kannst ihm keine minusbeträge schiken!")
                        return
                    
end
                    local self_geld
=geld_get_from_name(pc.name)
                    
local friend_geld=geld_get_from_name(name)
                    
local check1=friend_geld+geld
                    local check2
=self_geld-geld
                    
if geld>self_geld then
                        say
("Du hast nich so viel Guthaben!")
                        return
                    
end
                    
if check1>2000000000 then
                        say
("Er hat leider schon zu viel Guthaben!")
                        
say("Sag ihm er soll ein wenig Abheben!")
                        return
                    
end
                    
if check2<0 then
                        say
("So viel Geld hast du nicht einmal selbst!")
                        return
                    
end
                    say
("Willst du "..name.." wirklich")
                    
say(""..geld.." Yang senden?")
                    if 
geld<=100000000 then
                        say
("")
                    elseif 
geld<=500000000 then
                        say
("Das ist sehr viel Yang!")
                    elseif 
geld<=750000000 then
                        say
("Ein batzen Geld, sehr viel!")
                    elseif 
geld<=1000000000 then
                        say
("Unfassbar! Wirklich so viel?")
                    elseif 
geld<=1500000000 then
                        say
("Woher bekommst du nur so viel Yang?")
                        
say("Das ist mir echt ein Rätzel!")
                    elseif 
geld<=1750000000 then
                        say
("OMG! So viel Geld habe ich noch nie gesehn!")
                    
end
                    local c
=select("Ja""Abbrechen")
                    if 
c==2 then
                        
return
                    
end
                    
if geld>self_geld then
                        say
("Du hast nich so viel Guthaben!")
                        return
                    
end
                    
if check1>2000000000 then
                        say
("Er hat leider schon zu viel Guthaben!")
                        
say("Sag ihm er soll ein wenig Abheben!")
                        return
                    
end
                    
if check2<0 then
                        say
("So viel Geld hast du nicht einmal selbst!")
                        return
                    
end
                    geld_give_to_name
(pc.name, -geld)
                    
geld_give_to_name(namegeld)
                    
say("Deine Sendung ist Erfolgreich angekommen!")
                    return
                
end
            end
            
if s==4 then
                
if 1==1 then --alles um eine zeile verschoben
                    
if pc.getqf("pw_for_guthaben_panel")==0 then
                        say
("Es gibt die Möglichkeit ein Passwort")
                        
say("für den Guthaben Bereich festzulegen!")
                        
say("")
                        
say("Damit niemand an dein Guthaben ran kommt")
                        
say("wenn du mal gehäckt wirst!")
                        
say("")
                        
local c=select("Passwort setzen""Abbrechen")
                        if 
c==2 then
                            
return
                        
end
                        say
("Gebe dein Passwort ein:")
                        
say("")
                        
say("Darf nur aus Ziffern bestehen!")
                        
say("Min. 5 Zahlen! Max. 5 Zahlen!")
                        
say("Mus zwischen 10000 und 99999 liegen")
                        
say("")
                        
local pw=input()
                        if 
pw=="" then
                            say
("Du must schon etwas eingeben!")
                            return
                        
end
                        local pw
=pw+0
                        
if pw>=10000 and pw<=99999 then
                            say
("Dein gewähltes Passwort: "..pw.."")
                            
say("")
                            
say("Willst du es als Passwort setzen?")
                            
local c2=select("Passwort setzen""Abbrechen")
                            if 
c2==2 then
                                
return
                            
end
                            say
("Dein Passwort wurde erfolgreich gespeichert!")
                            
pc.setqf("pw_for_guthaben_panel"pw)
                            return
                        else
                            
say("Das Passwort kannst du nicht wählen!")
                            
say("Eingegebens Passwort: "..pw.."")
                            return
                        
end
                    
else
                        
say("Das sicherheits Passwort ist momentan: Aktiv")
                        
local c=select("Passwort deaktivieren""Passwort ändern""Abbrechen")
                        if 
c==3 then
                            
return
                        
end
                        
if c==1 then
                            say
("Bist du dir sicher das du das Passowort")
                            
say("deaktivieren willst?")
                            
local c2=select("Deaktivieren""Abbrechen")
                            if 
c2==2 then
                                
return
                            
end
                            say
("Das Passwort wurde deaktiviert!")
                            
pc.setqf("pw_for_guthaben_panel"0)
                            return
                        
end
                        
if c==2 then
                            say_reward
("Passwort ändern")
                            
say("Gebe dein Momentanes Passwort ein:")
                            
local old_pw=input()
                            if 
old_pw=="" then
                                say
("Du must schon etwas eingeben!")
                                return
                            
end
                            local old_pw
=old_pw+0
                            
if old_pw!=pc.getqf("pw_for_guthaben_panel"then
                                say
("Das ist nicht dein momentanes Passwort!")
                                return
                            
end
                            
if old_pw==pc.getqf("pw_for_guthaben_panel"then
                                say
("Gebe dein neues Passwort ein:")
                                
say("")
                                
say("Darf nur aus Ziffern bestehen!")
                                
say("Min. 5 Zahlen! Max. 5 Zahlen!")
                                
say("Mus zwischen 10000 und 99999 liegen")
                                
local new_pw=input()
                                if 
new_pw=="" then
                                    say
("Du must schon etwas eingeben!")
                                    return
                                
end
                                local new_pw
=new_pw+0
                                
if new_pw>=10000 and new_pw<=99999 then
                                    say
("Dein gewähltes Passwort: "..new_pw.."")
                                    
say("")
                                    
say("Willst du es als Passwort setzen?")
                                    
local c2=select("Passwort setzen""Abbrechen")
                                    if 
c2==2 then
                                        
return
                                    
end
                                    say
("Dein Passwort wurde erfolgreich gespeichert!")
                                    
pc.setqf("pw_for_guthaben_panel"new_pw)
                                    return
                                else
                                    
say("Das Passwort kannst du nicht wählen!")
                                    
say("Eingegebens Passwort: "..pw.."")
                                    return
                                
end
                            
else
                                
say("Das ist nicht dein Passwort!")
                                return
                            
end
                        end
                    end
                end        
            end    
        end
    end
end 

MFG TGJ


€Der fehler mit "say_gold" kommt jetzt nicht mehr! Habs vergessen raus zu machen weil meine quest_lib.lua noch ein paar andere befehl. Also in dem fall währ die schrift einfach nur gold gewesen stats ganz normal weis. Einfach jetzt komplet ersetzen dann sollte es gehn
[SGA]Jango is offline  
Thanks
30 Users
Old 04/10/2011, 23:52   #2
 
elite*gold: 35
Join Date: Jun 2009
Posts: 2,187
Received Thanks: 6,906
Hmm sieht eig ziemlich gut aus.
Es gibt etwas ähnliches aber nicht mit pin funktion und einem anderen user geld zu senden.
CranK™ is offline  
Old 04/11/2011, 00:30   #3
 
.Risan.'s Avatar
 
elite*gold: 30
Join Date: Jul 2010
Posts: 1,627
Received Thanks: 1,450
Gut gecodet, man sieht du hast ahnung vom Scripten..
.Risan. is offline  
Old 04/11/2011, 01:03   #4
 
LS-fanfan's Avatar
 
elite*gold: 140
Join Date: Mar 2009
Posts: 1,345
Received Thanks: 194
sehr schön

Also sowas gabs wirklich noch nicht thx
LS-fanfan is offline  
Old 04/11/2011, 01:45   #5
 
elite*gold: 3
Join Date: Jan 2010
Posts: 1,714
Received Thanks: 854
Woha wie ihr immer auf so etwas kommt, das ist echt Nice.
Ich danke dir ^^

EDIT:
Kann es sein das ne function Fehlt?

Quote:
Calls undeclared function! :
say_gold
Abort trap (core dumped)
.Sh4rk is offline  
Old 04/11/2011, 03:17   #6
 
elite*gold: 0
Join Date: Feb 2011
Posts: 115
Received Thanks: 462
good job
verkaufst du die mit dem offline yangsenden und so vll? oder garnicht? ^^
Hoshikuro is offline  
Old 04/11/2011, 07:26   #7
 
lfcmaus's Avatar
 
elite*gold: 205
Join Date: Jun 2010
Posts: 5,334
Received Thanks: 2,510
Quote:
Originally Posted by .Sh4rk View Post
Woha wie ihr immer auf so etwas kommt, das ist echt Nice.
Ich danke dir ^^

EDIT:
Kann es sein das ne function Fehlt?
das wurde shcon in nem anderen thread pub gemacht wie du die say_ functionen deklarierst einfahc mal suchen oder ersetzt es in say
lfcmaus is offline  
Old 04/11/2011, 15:12   #8
 
Critone's Avatar
 
elite*gold: 149
Join Date: Feb 2010
Posts: 1,297
Received Thanks: 345
Nice
Critone is offline  
Old 04/11/2011, 17:40   #9
 
»Côoper«™'s Avatar
 
elite*gold: 48
Join Date: Feb 2011
Posts: 974
Received Thanks: 264
Sehr Nice

Ich werde es mal testen und gucken ob die auch perfekt geht
»Côoper«™ is offline  
Old 04/11/2011, 18:03   #10
 
Critone's Avatar
 
elite*gold: 149
Join Date: Feb 2010
Posts: 1,297
Received Thanks: 345
Das ist echt mal nice, wenn die geht

#thx given
Critone is offline  
Old 04/11/2011, 19:29   #11
 
[SGA]Jango's Avatar
 
elite*gold: 3
Join Date: Oct 2010
Posts: 390
Received Thanks: 463
So der fehler mit say_gold ist jetzt weg! Wenn ihr wollt könnt ihr einfach mein anderes Releas einbauen das ist der fehler auch weg! Die schrif wird einfach nur Gold angezeigt mehr nicht! Und normalerweise gibt es den befehl nicht habs also einfach mit "say" ersetzt.

[SGA]Jango is offline  
Old 04/13/2011, 13:26   #12
 
elite*gold: 0
Join Date: Jan 2010
Posts: 1,916
Received Thanks: 538
geht das für alle server files oder nur 2010er?
'oShet is offline  
Old 04/13/2011, 13:56   #13
 
.Shanks's Avatar
 
elite*gold: 0
Join Date: Mar 2011
Posts: 366
Received Thanks: 143
Das geht mit allen Files, weil er keine neuen funktionen nutzt, nur selber geschriebene.

€: Werde Quest umschreiben damit man auch wen man offfline ist, geld auf das Konto anderer
"überweisen" kann ist aber gute idee
.Shanks is offline  
Thanks
1 User
Old 04/13/2011, 14:28   #14
 
elite*gold: 0
Join Date: Jan 2010
Posts: 1,916
Received Thanks: 538
Kann sein das GM rechte wegen der Quest weg geht?
'oShet is offline  
Old 04/13/2011, 15:41   #15
 
EddiiE's Avatar
 
elite*gold: 0
Join Date: Apr 2011
Posts: 108
Received Thanks: 35
sehr hübsch

#thx given
EddiiE is offline  
Reply


Similar Threads Similar Threads
[Releas] Vip hack!!!!!!
08/15/2011 - WarRock Hacks, Bots, Cheats & Exploits - 14 Replies
Download link Vip.exe OPK STW FAF SVP Anti kick Unl ammo
PayPal-Guthaben aufladen?
10/14/2009 - Technical Support - 2 Replies
Hallo leute, Ich brauche euren Rat, Ich habe mich vor einigen Tagen bei paypal registriert, heute bin ich zur meiner Bank hingegangen um mein konto zu verifizieren. Nun ist meine Frage, wie lade ich was auf mein Paypal Account was auf? mfg
Handy Guthaben Kostenlos aufladen
09/26/2008 - Main - 7 Replies
Hey Leute ihr könnt euer Handy guthaben um 15 euro kostenlos erhöhen klickt auf den link schickt euren Link an 30 andere leute weiter, und wenn dann 30 leute euren link angeklickt haben.....seht ihr den schon den Code mitdem ihr euer guthaben aufladen könnt..... schauts euch einfach an ... mfg skiller



All times are GMT +2. The time now is 13:36.


Powered by vBulletin®
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2024 elitepvpers All Rights Reserved.