Türkiye'nin ilk OldSchool MOBİL 1-99 Sunucusu Sezar2 9 Ekim'de Açılıyor! Rekor Açılışı Kaçırma! HEMEN TIKLA!
Kod:
quest horse_upgrade begin state start begin when 20349.chat."Atimi gelistirmek istiyorum." begin say_title("Seyis:") say_size(350,380) if game.get_event_flag("horse_upgrade_active") != 1 then say("Üzgünüm, at geliştirme sistemi şu anda aktif değil.") say("Lütfen daha sonra tekrar deneyin.") return end local para = { 1000000, 2000000, 3000000, orkunfx, 5000000, 6000000, 7000000, 8000000, 9000000, 10000000, 11000000, 12000000, 13000000, 14000000, 15000000, 16000000, 17000000, 18000000, 19000000, 20000000, 21000000, 22000000, 23000000, 24000000, 25000000, 26000000, 27000000, 28000000, 29000000, 30000000 } local item = { 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30 } local itemID = 50050 local maxLevel = 30 function hesapla(baslangic_seviye, bitis_seviye) local toplam_para, toplam_item = 0, 0 for i = baslangic_seviye, bitis_seviye - 1 do toplam_para = toplam_para + (para or 0) toplam_item = toplam_item + (item or 0) end return toplam_para, toplam_item end function kontrol(required_para, required_item) if pc.get_money() < required_para or pc.count_item(itemID) < required_item then say_title("Seyis:") say("") say_reward("Uzgunum, yeterli kaynak yok.") if pc.get_money() < required_para then say_reward("Yang miktariniz yetersiz.") end if pc.count_item(itemID) < required_item then say_reward("At madalyonu miktariniz yetersiz.") end say_item("At madalyonu", itemID, "Bu, eski bir zirhtan alinmis bir parcadir.") say_reward("Gerekli kaynaklari topladiginizda tekrar gelin.") return false end pc.change_money(-required_para) pc.remove_item(itemID, required_item) return true end function gelistir(seviye_artisi) local currentLevel = horse.get_level() if currentLevel >= maxLevel then say_title("Seyis:") say("") say_reward("Atiniz zaten maksimum seviyede.") return end local hedef_seviye = math.min(currentLevel + seviye_artisi, maxLevel) local required_para, required_item = hesapla(currentLevel, hedef_seviye) say_title("Seyis:") say("") say_orange(" - Gerekenler -") say_item_vnum_inline(50050, 0, 2) -- İlk eşya say_item_vnum_inline(1, 1, 2) -- İkinci eşya say_reward("Gelistirmek icin gereken Yang miktari: " .. format_number(required_para)) say_reward("Gelistirmek icin gereken At madalyonu: " .. required_item .. " adet") local mesaj if seviye_artisi == maxLevel - currentLevel then mesaj = "Atinizi maksimum seviyeye yukseltmek istiyor musunuz?" else mesaj = "Atinizi " .. seviye_artisi .. " seviye gelistirmek istiyor musunuz?" end say_reward(mesaj) if select("Evet", "Hayir") == 1 then if kontrol(required_para, required_item) then for i = currentLevel, hedef_seviye - 1 do horse.advance() end say_title("Seyis:") say("") if hedef_seviye == maxLevel then say_reward("Tebrikler! Atiniz basariyla maksimum seviyeye yukseltildi.") else say_reward("Tebrikler! Atiniz basariyla gelistirildi.") end say_reward("Atinizin yeni seviyesi: " .. hedef_seviye) end end end function say_orange(text) local orange = color256(255, 165, 0) -- Turuncu renk say(""..orange..text..color256(196, 196, 196)) end function at_gelistirme_sistemi() local currentLevel = horse.get_level() if currentLevel >= maxLevel then say_title("Seyis:") say("") say_reward("Atiniz zaten maksimum seviyede.") return end say("Merhaba " ..pc.get_name()) say_reward("Binicilik seviyen: " .. currentLevel) say_orange(" - Gerekenler -") say_item_vnum_inline(50050, 0, 2) -- İlk eşya say_item_vnum_inline(1, 1, 2) -- İkinci eşya local secim = select("1 Seviye Gelistir", "5 Seviye Gelistir", "10 Seviye Gelistir", "Maksimum Seviyeye Yukselt", "Iptal") if secim == 1 then gelistir(1) elseif secim == 2 then gelistir(5) elseif secim == 3 then gelistir(10) elseif secim == 4 then gelistir(maxLevel - currentLevel) else say_title("Seyis:") say("") say("Anladim, belki daha sonra.") end end at_gelistirme_sistemi() end endend
Son düzenleme: