[Quest] Dozorca + Bank

[Sunushi]

Toć napisanie takiego questa to chwila moment ;d co by nie było, że oftopuje, możesz dodać tego mojego "questa" na kredyt do swojego.

[z4z0l]

Ten quest jest dla was, do waszej dospozycji więc róbcie z nim co chcecie, przypisujcie sobie, zmieniajcie i bóg (którego nie ma) wie co jeszcze ... I tak gdzie bym go nie znalazł, to będę wiedział, że jest mój :> peace.

[Gość]

Nie lepiej byłoby ustawić ten bank na pin ?

 

Bo jeżeli ktoś się włamie na konto, na którym np. jest shop to bez problemu wyciągnie nam całą kasę ;X

 

Na niektórych serwerach 2kkk to dużo ;]

 

Osobiście bym się za to zabrał, ale jestem nowicjuszem w pisaniu questów (Coś tam umiem ale nie znam wszystkich komend i co oznaczają)

[Sunushi]

Tak teraz dogłębniej analizuje tego questa..

local wplac = tonumber(input(""))
if wplac > 0 and wplac < 2000000000 then
if wplac == "" then
say_title("Dozorca :")
say("Musisz wpisać ilość yang !")
end
end

Wpiszemy poprawną wartość po czym następuje end. Tobie normalnie działało wpłacanie kasy?

 

Poprawka Twojego questa + dodany PIN + dodany kredyt:

quest dozorca begin
state start begin
when 9005.chat."Chcę otworzyć magazyn" begin
say_title("Dozorca : ")
say("Możesz u mine przechowywać swoje")
say("przedmioty. Jeżeli chcesz, musisz")
say("wykupić sobie miejsce.")
say("Będzie Cię to kosztowało 500 yang.")
say("")
say_reward("Czy chcesz otworzyć prywatny magazyn?")
local s=select("Zapłać " , "Nie płać ")
if s==1 and pc.get_money()>=500 then
say_title("Dozorca :")
say("A więc zdecydowałeś się ")
say("skorzystać z moich usług!")
say("Twoje hasło do magazynu to : 000000")
pc.change_gold(-500)
pc.setqf("mamkonto", 0)
set_state(drugi)
elseif pc.get_money()<=500 then
say_title("Dozorca : ")
say("Nie posiadasz wystarczającej")
say("ilości yang !")
end
end
end

state drugi begin
when 9005.click begin
say_title("Dozorca :")
say("Witaj! Jestem dozorcą. ")
say("Możesz u mnie przechowywać przedmioty.")
local f=select("Otwórz magazyn" , "Odbierz przedmioty z ItemShop" , "Kupno Srebrnej lub Złotej Sztabki" , "Bank" , "Anuluj")
if f==1 then
game.open_safebox()
elseif 2==f then
game.open_mall()
elseif 3==f then
npc.open_shop(7)
elseif 4==f then
say_title("Dozorca :")
say("Witaj. Możesz u mnie zostawić swoje całe")
say("oszczędności bądź wziąć kredyt.")
say("")
if pc.getqf("mamkonto") == 0 then
say("Nie masz jeszcze konta. Czy chcesz je")
say("utworzyć ? Kosztuje to 1 000 000 yang")
say("oraz poziom Twojej postaci musi być ")
say("większy niż 75.")
if pc.get_level() >= 75 then
local g=select("Tak" , "Nie")
if g==1 then
if pc.get_money() >= 1000000 then
say_title(mob_name(9005)..":")
say("W celu zabezpieczenia konta przed złodziejami")
say("musisz podać kod PIN. Kod musi składać się z")
say("conajmniej 5 cyfr (od 10000 do 99999).")
local q = tonumber(input())
if q >= 10000 and q <= 99999 then
say_title(mob_name(9005)..":")
say("Powtórz kod PIN:")
local w = tonumber(input())
if w == q then
say_title("Dozorca :")
say("Twoje konto bankowe zostało utworzone.")
pc.change_money(-1000000)
pc.setqf("mamkonto", 1)
pc.setqf("pin", q)
else
say_title(mob_name(9005)..":")
say("Powtórzony kod PIN się nie zgadza.")
say("")
end
else
say_title(mob_name(9005)..":")
say("Wprowadziłeś błędny PIN.")
say("")
end
else
say_title("Dozorca :")
say("Nie masz wystarczającej ilości yang aby")
say("utworzyć konto.")
end
end
else
say_title("Dozorca :")
say("Nie masz 75 poziomu!")
end
else
say_title(mob_name(9005)..":")
say("Podaj kod PIN:")
local kod = tonumber(input())
if kod == "" then
return
end
if kod != pc.getqf("pin") then
say_title(mob_name(9005)..":")
say("Podałeś błędny kod PIN.")
say("")
return
end
local stankkonta = pc.getqf("stankonta")
local h=select("Sprawdź stan konta" , "Wpłać pieniądze" , "Wypłać pieniądze" , "Weź kredyt" , "Spłać kredyt" , "Anuluj")
if h==1 then
say_title("Dozorca :")
say("Stan Twojego konta to:")
say_reward("" ..pc.getqf("stankonta").. " yang.")
elseif 2==h then
say_title("Dozorca :")
say("Wpisz ilość yang którą chcesz wpłacić.")
local wplac = tonumber(input())
if wplac > 0 and wplac < 2000000000 then
if wplac == "" then
say_title("Dozorca :")
say("Musisz wpisać ilość yang !")
end
if wplac > pc.get_money() then
say_title("Dozorca :")
say("Nie masz " ..wplac.. " yang.")
end
local stannowy = wplac + pc.getqf("stankonta")
pc.change_money(-wplac)
pc.setqf("stankonta", stannowy)
say_title("Dozorca :")
say("Wpłaciłeś yangi na swoje konto.")
say("Aktualny stan Twojego konta to :")
say_reward(pc.getqf("stankonta").." yang.")
else
say_title("Dozorca :")
say("Nie możesz wpłacić tej kwoty!")
end
elseif 3==h then
say_title("Dozorca :")
say("Aktualny stan Twojego konta to :")
say_reward(pc.getqf("stankonta").." yang.")
say("")
say("Jednorazowo możesz wypłacić nie więcej")
say("niż 500 000 000 yang.")
local wyplac = tonumber(input())
if wyplac > 0 and wyplac < 500000000 then
if wyplac > pc.getqf("stankonta") then
say_title("Dozorca :")
say("Nie masz tyle yang na koncie.")
else
local yang_bug = pc.get_money() + wyplac
if yang_bug <= 1999999999 then
local stannowy = pc.getqf("stankonta") - tonumber(wyplac)
pc.change_money(wyplac)
pc.setqf("stankonta", stannowy)
say_title("Dozorca :")
say("Twoje yangi zostały wypłacone z konta.")
say("Aktualny stan Twojego konta to :")
say_reward("" ..pc.getqf("stankonta").. " yang.")
else
say_title("Dozorca :")
say("Nie możesz wypłacić yang. Stan Twoich")
say("yang w ekwpiunku wynosiłby więcej niż ")
say("dopuszczalna norma.")
end
end
else
say_title("Dozorca :")
say("Nie możesz wypłacić tej kwoty!")
end
elseif h == 4 then
say_title(mob_name(9005)..":")
if pc.get_level() < 75 then
say("Aby dostać kredyt musisz mieć conajmniej")
say("75 poziom.")
say("")
return
elseif pc.getqf("kredyt") != 0 then
say("Aktualnie masz już u mnie kredyt.")
say("Pozostało do spłacenia "..pc.getqf("kredyt").." Yang.")
say("")
return
end
say("Chcesz kredytu? Nie ma sprawy tylko pamiętaj,")
say("że oprocentowanie wynosi 10%! Wypłacona")
say("kwota również nie może przekraczać 10.000.000 Yang.")
say("Wpisz jaką kwotę chcesz pobrać:")
local kredyt = tonumber(input())
if kredyt > 10000000 then	   -- tutaj można zmienić max wartość kredytu
say_title(mob_name(9005)..":")
say("Nie możesz tyle wypłacić.")
say("")
elseif kredyt + pc.get_gold() >= 2000000000 then
say_title(mob_name(9005)..":")
say("Nie możesz tyle wypłacić, gdyż zbugują ")
say("Ci się yangi.")
say("")
else
pc.changegold(kredyt)
pc.setqf("kredyt", kredyt+kredyt*0.1) -- 0.1 = 10%, można zmienić wg. uznania
pc.setqf("czas", get_time()+7*24*60*60)
say_title(mob_name(9005)..":")
say("Otrzymałeś kredyt. Musisz spłacić go w ciągu 7 dni")
say("albo komornik zrobi Ci wjazd na chatę.")
say("Miłego spłacania.")
end
elseif h == 5 then
local kre = pc.get_gold()-pc.getqf("kredyt")
if kre < 0 then
local kre = 0
end
say_title(mob_name(9005)..":")
if pc.get_level() < 75 then
return
elseif pc.getqf("kredyt") == 0 then
say("Nie masz zaczerpniętego żadnego kredytu.")
say("")
return
elseif pc.get_gold() == 0 then
say("Za co chcesz spłacić kredyt?")
say("")
return
end
say_notice("Posiadasz "..pc.get_gold().." Yang.")
say_notice("musisz spłacić "..pc.getqf("kredyt").." Yang.")
say_notice("Po oddaniu pozostanie Ci "..kre.." Yang.")
say("Na pewno chcesz spłacić?")
local a = select("Tak","Nie")
if a == 2 then
return
end
say_title(mob_name(9005)..":")
if pc.get_gold() >= pc.getqf("kredyt") then
pc.changegold(-pc.getqf("kredyt"))
pc.setqf("kredyt", 0)
say("Dzięki za skorzystanie z moich usług.")
say("Zapraszam ponownie!")
say("")
else
local czesc = pc.getqf("kredyt") - pc.get_gold()
pc.setqf("kredyt", czesc)
pc.changegold(-pc.get_gold())
say("Pozostało do spłacenia "..pc.getqf("kredyt").." Yang.")
say("Udanego dnia życzę.")
end
end
end
end
end

when login or enter with pc.getqf("czas") < get_time() and
pc.getqf("kredyt") > pc.getqf("kredyt")-pc.get_gold() begin
say("Minął tydzień a Ty wciąż nie spłaciłeś kredytu.")
if pc.get_gold() >= pc.getqf("kredyt") then
pc.changegold(-pc.getqf("kredyt"))
say("Z Twojego konta zostało pobrane "..pc.getqf("kredyt").." Yang.")
pc.setqf("kredyt", 0)
say("")
say("Spłaciłeś cały kredyt.")
say("")
else
local czesc = pc.getqf("kredyt") - pc.get_gold()
pc.setqf("kredyt", czesc)
say("Z Twojego konta zostało pobrane "..pc.get_gold().." Yang.")
pc.changegold(-pc.get_gold())
say("")
say("Do spłacenia pozostało "..pc.getqf("kredyt").." Yang.")
say("")
end
end
end
end

 

 

Nie ponoszę odpowiedzialności za błędnie działający quest.

[z4z0l]

Mi wszystko działało normalnie Jeżeli ktoś znalazł jakiś błąd to piszcie.