Comunitatea TequilaX

Bun venit in comunitatea TequilaX
 
AcasaPortalUltimele imaginiÎnregistrareConectare

Distribuiţi|

[QUEST]Panoul Moderatorului

Vezi subiectul anterior Vezi subiectul urmator In jos
AutorMesaj
faramanele2
Membru
faramanele2

Rank: Membru
Mesaje : 27
Bani pe Mana: : 53
Multumiri primite : 0
Data de inscriere : 30/03/2013
Varsta : 25
Localizare : Jibou
[QUEST]Panoul Moderatorului Empty
MesajSubiect: [QUEST]Panoul Moderatorului [QUEST]Panoul Moderatorului EmptyMier Apr 03 2013, 03:24

Cum spuneam intr-un alt topic am decis sa va prezint PANOUL MODERATORULUI.

Ce OFERA?

-> te teleportezi la un jucator
->teleportezi tu un jucator la tine
->Dai mute
->scoti mute.

Toate aceastea se fac cu ajutorul unui item nu a unei misiuni


Cod:
    quest mod_item begin
            state start begin
                when 70021.use with pc.is_gm() or pc.get_gm_level() >= 2 begin
                     
                    say_title ("Buna, ".. pc.get_name() ..".")
                    say("")
                                say("Itemul Moderatorului poate : sa dea mute, ")
                                say("- Sa dea mute, ")
                                say("- Sa scoata mute-ul")
                                say("- Sa te teleporteze pe tine sau un player la tine. ")
                    say("")
                                local a = select ( "Da Mute la un player" , "Scoate mute-ul la un player" , "Teleporteaza-te", "Transfera un Player", "Iesire" )
                             
                    if a == 1 then
                                say("Te rog sa scrii numele celui caruia vrei sa ii dai mute.")
                                say("")
                                say("Atentie! Daca abuezi de acest item ,poti fi scos din functie!")
                    say("Fi sigur ca scrii numele jucatorului corect!")
                                local cblock = input()
                    say("Acesta e numele playerului caruia doresti sa ii dai mute???")
                    say_title(" Name : ".. cblock .." ")
                    local m = select ( "Da", "Nu")
                    if m == 1 then
                                say("Timp in secunde!")
                                say("Exemple :")
                                say("5 Min. = 300s")
                                say("10 Min. = 600s")
                                say("1 Ora = 3600s")
                            say("Scrie numarul de secunde dorite!")
                            local cbtime = input()
                            command("block_chat ".. cblock .." ".. cbtime .."")
                                notice_all("Player-ul ".. cblock .." i s-a dat mute pentru ".. cbtime .." secunde!")
                              notice_all("Aveti grija la limbaj si la comportament!")
                    end
                    if m == 2 then
                    return
                    end
                                end
                             
                            if a == 2 then
                              say("Scrie numele playerului caruia doresti sa ii scoti mute-ul.")
                      say("Poti sa il verifici in lista celor ce au mute.")
                      say("cu aceasta comanda : block_chat_list ")
                              local cublock = input()
                              command("block_chat ".. cublock .." 0")
                              notice_all("Playerul ".. cublock .." poate iarasi sa vorbeasca!")
                    notice_all("Mute-ul i-a fost scos!")
                    notice_all("Sa nu se mai repete greseala facuta!")
                              end
                             
                      if a == 3 then
                      say("Te poti teleporta langa playerii care doresti tu.")
                      say("Scrie numele player-ului langa care doresti sa te teleportezi.")
                      say("Atentie! Cateodata, poti fi teleportat putin mai departe de acesta.")
                  say("Asa ca te rog sa mai folosesti odata aceasta optiune daca intampini erori")
                    local t = select ("Teleporteaza-ma!", "Nu, merci!")
                    if t == 1 then
                    say("Scrie numele playerului :")
                    local wtp = input()
                    command("warp ".. wtp .."")
                    end
                    if t == 2 then
                    return
                        end 
                      end
             
                      if a == 4 then
                      say("Poti sa transferi playerii langa tine acum.")
                      say("Trebuie doar sa introduci numele playerului aici :)")
                      say("Vrei sa aduci un player langa tine? :D")
                    local r = select ("Transfera!", "Nu, merci!")
                    if r == 1 then
                    say("Scrie numele playerului aici :")
                    local ttp = input()
                    command("transfer ".. ttp .." ")
                    end
                    if r == 2 then
                    return
                    end             
                        end

                      if a == 5 then
                      return
                      end

        end
        end
        end       


Numele codului este 70021 .
Sus In jos

[QUEST]Panoul Moderatorului

Vezi subiectul anterior Vezi subiectul urmator Sus

Subiecte similare

-
t [QUEST]100 Dueluri =recompensa
t Ghid - Cum sa iti faci propriul quest pentru metin
Pagina 1 din 1

Permisiunile acestui forum:Nu puteti raspunde la subiectele acestui forum
Comunitatea TequilaX :: Faq si Ghiduri-