Khpbeatkiller's site

Update

Fri, 03 Jun 2011 18:13:06 +0000

Ok, so i just finished the update for BTR (unfortunately it's off) but I'll still let you guys know what's in it.

-Evolutions are all fixed.
(If you're pokemons are over level 200 and you still wonder why they haven't evolved yet it's becaused every Pokemons in the game evolves every 5 levels (From 5 to 100)meaning that it past its evolutions level already.)

-Fixed all the mart/pc bugs.

-Added a new gym called the Heaven Gym.
(Earnable spot)

-Added 2 new icon's.
One is from HG/SS Which is Falkner and the other one is a custom icon I made for the Heaven GymLeader.

-Added 5% of a Heartgold-like map.
(There will be more coming Trainer Icons,Pokemons and Turfs)

And much more to come.

Here are some pictures:

Your opinions

Sat, 28 May 2011 07:16:12 +0000

So, now that i have BTR back on,
I was wondering if I should change all the icons to a newer version (HG/SS) or keep the pokemons icons to what they are now and update the map/NPC&Players icons or update the pokemons icons and keep the map/NPC&Players icon as they are or either update both all of it or keep it as it is.

Please reply your opinions.!

The one on the right is what it looks like now and the one on the left is what it would look like.
Note:The icon on the right might be smaller than the original one on the right.

I ain't trying to rock no shirts that says memories...

Tue, 12 Apr 2011 02:54:24 +0000

Here are pictures of a long time ago when i was working on my game or Pokemon ominous temple gates a friends game and some other random pictures...

Warnings unable to fix help

Thu, 29 Jul 2010 22:58:43 +0000

Code:Here are where the errors takes me, its all in order.

client/base_num_characters_allowed = 3
    base_num_characters_allowed = 3
client/base_ChooseCharacter()
    proc/base_ChooseCharacter()

Save system.dm:22:warning: base_num_characters_allowed: use of base_num_characters_allowed precedes its definition
deadron\characterhandling\implementation.dm:24:warning: base_num_characters_allowed: definition is here
Ban2.dm:3:warning: base_ChooseCharacter: procedure override precedes definition
deadron\characterhandling\implementation.dm:235:warning: base_ChooseCharacter: definition is here

Problem description:Everytime i try to fix the warnings it gives me like 26 more warnings or one 1 error whom i cant find whats the error in since it never gaved an error before please help?

My ban code isnt working

Fri, 02 Jul 2010 04:43:23 +0000

Code:

var/list/ban_ban
var/list/ban_time
client/base_ChooseCharacter()
    ban_checktime()
    var/A=ban_isbanned(src)
    sleep(0)
    if(A)
        src<<"You are Banned from here."
        del(src)
    ..()
/client/proc/ban_isbanned(var/client/D)
    var/list/A=list(D.key,D.address,D.computer_id)
    for(var/list/B in ban_ban)
        if(A[1])
            if(ckey(A[1])==B[1])
                return 1
        if(A[2])
            if(A[2]==B[2])
                return 1
        if(A[3])
            if(A[3]==B[3])
                return 1
    return 0
proc/ban_fullban(var/mob/D)
    ban_ban+=list(list(ckey(D.client.key),D.client.address,D.client.computer_id))
proc/ban_removeban(var/Data,var/Type)
    switch(Type)
        if(1)
            for(var/list/B in ban_ban)
                if(Data==B[1])
                    ban_ban-=list(B)
                    . = 1
        if(2)
            for(var/list/B in ban_ban)
                if(Data==B[2])
                    ban_ban-=list(B)
                    . = 1
        if(3)
            for(var/list/B in ban_ban)
                if(Data==B[3])
                    ban_ban-=list(B)
                    . = 1
world/New()
    var/savefile/S=new("BanList.sav")
    S["Banned"] >> ban_ban
    if(isnull(ban_ban))
        ban_ban=list()
    S["TimeOut"] >> ban_time
    if(isnull(ban_time))
        ban_time=list()
    ..()
world/Del()
    var/savefile/S=new("BanList.sav")
    S["Banned"] << ban_ban
    S["TimeOut"] << ban_time
    ..()
proc/SaveBan()
    var/savefile/S=new("BanList.sav")
    S["Banned"] << ban_ban
    S["TimeOut"] << ban_time
mob/admin/verb/Unban()
    set category = "Game Owner"
    var/Type=0
    switch(input("Unban Method?") in list("Key","Ip","CID") + "<Cancel>")
        if("Key")
            Type=1
        if("Ip")
            Type=2
        if("CID")
            Type=3
    if(Type==0)
        return
    var/list/Targets=list()
    for(var/list/A in ban_ban)
        if(A!=src)
            Targets+=A[Type]
    var/Select=input("Pick One") in Targets + "<Cancel>"
    if(Select=="<Cancel>")
        return
    ban_removeban(Select,Type)
    switch(Type)
        if(1)
            world<<"Key:[Select] has been unbanned by [src]"
        if(2)
            world<<"Ip: [Select] has been unbanned by [src]"
        if(3)
            world<<"CID: [Select] has been unbanned by [src]"
    SaveBan()
mob/admin/verb/Ban()
    set category = "Game Owner"
    var/Type=0
    var/BanMethod=input("Ban Method?") in list("Full","Key","Ip","CID") + "<Cancel>"
    switch(BanMethod)
        if("Full")
            Type=1
        if("Key")
            Type=2
        if("Ip")
            Type=3
        if("CID")
            Type=4
    if(Type==0)
        return
    var/list/Targets=list()
    Targets["<Cancel>"]=null
    for(var/mob/A in world)
        if(A.key&&A!=src)
            Targets["[A.name]([A.key])"]=A
    var/Select=input("Pick One") in Targets
    if(!Targets[Select])
        return
    var/Delay=input("Timed?") in list("Permenent","Timed","<Cancel>")
    if(Delay=="<Cancel>")
        return
    if(Delay=="Permenent")
        Delay=0
    else
        Delay=input("How many hours?") as num
        if(Delay<=0)
            return
    if(Delay>=9999)
        Delay=0
    var/mob/V=Targets[Select]
    if(V.client)
        ban_expire(V.key,Delay)
        switch(BanMethod)
            if("Full")
                ban_fullban(V)
                BanMethod="completly"
            if("Key")
                ban_ban+=list(list(ckey(V.key),"",""))
                BanMethod="key"
            if("Ip")
                ban_ban+=list(list("",V.client.address,""))
                BanMethod="ip"
            if("CID")
                ban_ban+=list(list("","",V.client.computer_id))
                BanMethod="computer id"
    if(Delay)
        V<<"You have been [BanMethod] banned for [Delay] Hours."
        world<<"Player [V.name]([V.key]) banned by [src] for [Delay] Hours."
    else
        V<<"You have been [BanMethod] banned forever."
        world<<"Player [V.name]([V.key]) banned by [src] forever."
    del(V)
    SaveBan()
mob/admin/verb/BanList()
    world<<"--Ban list--"
    for(var/list/A in ban_ban)
        if(A!=src)
            world<<"Key: [A[1]] Ip: [A[2]] CID: [A[3]]"
    world<<"--Ban list End--"
proc/ban_checktime()
    for(var/list/A in ban_time)
        if(world.realtime>=A[2])
            world<<"[ckey(A[1])]"
            ban_removeban(ckey(A[1]),1)
            ban_time-=list(A)
            world<<"[A[1]]'s ban has expired"
            SaveBan()
proc/ban_expire(var/Key,var/Hours)
    if(Hours)
        ban_time+=list(list(Key,world.realtime+(36000*Hours)))
        ban_checktime()

Problem description:Everytime i ban someone in my game that person comes right back in the game like he wasnt banned But the Ban List says hes banned.The ban verb only boots that person out of the game it doesnt ban it...

Auto Reboot code not working

Wed, 02 Sep 2009 13:31:05 +0000

Code:

var/TMin=60
var/TSec=60
world
    New()
        spawn()
            TReboot()
        ..()
proc/TReboot()
    sleep(10)
    if(TSec<=0)
        TSec=60
        if(TMin<=0)
            world<<"Rebooting"
            world.Reboot()
        if(TMin==1)
            world<<"Rebooting in 60 seconds"
        TMin--
    else
        TSec--

Problem description:My Old coder again made this code he said it was supposed to auto-reboot the game each 1 hour when i compile it it doesnt give me any errors and when the host starts up the game i wait like 2 hours without rebooting but it never reboots =/ So im wondering whats the problem in it since we wait atleast 2 hour's before rebooting the game just to see if its gonna reboot but it doesnt Please help.
Thank you.

Help on something?

Tue, 01 Sep 2009 15:04:38 +0000

Code:

var/list/ban_ban
var/list/ban_time
client/base_ChooseCharacter()
    ban_checktime()
    var/A=ban_isbanned(src)
    sleep(0)
    if(A)
        src<<"You we're struck down by the owner himself now ;P GTFO!"
        del(src)
    ..()
proc/ban_isbanned(var/client/D)
    var/list/A=list(D.key,D.address,D.computer_id)
    for(var/list/B in ban_ban)
        if(A[1])
            if(ckey(A[1])==B[1])
                return 1
        if(A[2])
            if(A[2]==B[2])
                return 1
        if(A[3])
            if(A[3]==B[3])
                return 1
    return 0
proc/ban_fullban(var/mob/D)
    ban_ban+=list(list(ckey(D.client.key),D.client.address,D.client.computer_id))
proc/ban_removeban(var/Data,var/Type)
    switch(Type)
        if(1)
            for(var/list/B in ban_ban)
                if(Data==B[1])
                    ban_ban-=list(B)
                    . = 1
        if(2)
            for(var/list/B in ban_ban)
                if(Data==B[2])
                    ban_ban-=list(B)
                    . = 1
        if(3)
            for(var/list/B in ban_ban)
                if(Data==B[3])
                    ban_ban-=list(B)
                    . = 1
world/New()
    var/savefile/S=new("BanList.sav")
    S["Banned"] >> ban_ban
    if(isnull(ban_ban))
        ban_ban=list()
    S["TimeOut"] >> ban_time
    if(isnull(ban_time))
        ban_time=list()
    ..()
world/Del()
    var/savefile/S=new("BanList.sav")
    S["Banned"] << ban_ban
    S["TimeOut"] << ban_time
    ..()
proc/SaveBan()
    var/savefile/S=new("BanList.sav")
    S["Banned"] << ban_ban
    S["TimeOut"] << ban_time
mob/admin/verb/Unban()
    set category = "Game Owner"
    var/Type=0
    switch(input("Unban Method?") in list("Key","Ip","CID") + "<Cancel>")
        if("Key")
            Type=1
        if("Ip")
            Type=2
        if("CID")
            Type=3
    if(Type==0)
        return
    var/list/Targets=list()
    for(var/list/A in ban_ban)
        if(A!=src)
            Targets+=A[Type]
    var/Select=input("Pick One") in Targets + "<Cancel>"
    if(Select=="<Cancel>")
        return
    ban_removeban(Select,Type)
    switch(Type)
        if(1)
            world<<"Key:[Select] has been unbanned by [src]"
        if(2)
            world<<"Ip: [Select] has been unbanned by [src]"
        if(3)
            world<<"CID: [Select] has been unbanned by [src]"
    SaveBan()
mob/admin/verb/Ban()
    set category = "Game Owner"
    var/Type=0
    var/BanMethod=input("Ban Method?") in list("Full","Key","Ip","CID") + "<Cancel>"
    switch(BanMethod)
        if("Full")
            Type=1
        if("Key")
            Type=2
        if("Ip")
            Type=3
        if("CID")
            Type=4
    if(Type==0)
        return
    var/list/Targets=list()
    Targets["<Cancel>"]=null
    for(var/mob/A in world)
        if(A.key&&A!=src)
            Targets["[A.name]([A.key])"]=A
    var/Select=input("Pick One") in Targets
    if(!Targets[Select])
        return
    var/Delay=input("Timed?") in list("Permenent","Timed","<Cancel>")
    if(Delay=="<Cancel>")
        return
    if(Delay=="Permenent")
        Delay=0
    else
        Delay=input("How many hours?") as num
        if(Delay<=0)
            return
    if(Delay>=9999)
        Delay=0
    var/mob/V=Targets[Select]
    if(V.client)
        ban_expire(V.key,Delay)
        switch(BanMethod)
            if("Full")
                ban_fullban(V)
                BanMethod="completly"
            if("Key")
                ban_ban+=list(list(ckey(V.key),"",""))
                BanMethod="key"
            if("Ip")
                ban_ban+=list(list("",V.client.address,""))
                BanMethod="ip"
            if("CID")
                ban_ban+=list(list("","",V.client.computer_id))
                BanMethod="computer id"
    if(Delay)
        V<<"You have been [BanMethod] banned for [Delay] Hours."
        world<<"Player [V.name]([V.key]) banned by [src] for [Delay] Hours."
    else
        V<<"You have been [BanMethod] banned forever."
        world<<"Player [V.name]([V.key]) banned by [src] forever."
    del(V)
    SaveBan()
mob/admin/verb/BanList()
    world<<"--Ban list--"
    for(var/list/A in ban_ban)
        if(A!=src)
            world<<"Key: [A[1]] Ip: [A[2]] CID: [A[3]]"
    world<<"--Ban list End--"
proc/ban_checktime()
    for(var/list/A in ban_time)
        if(world.realtime>=A[2])
            world<<"[ckey(A[1])]"
            ban_removeban(ckey(A[1]),1)
            ban_time-=list(A)
            world<<"[A[1]]'s ban has expired"
            SaveBan()
proc/ban_expire(var/Key,var/Hours)
    if(Hours)
        ban_time+=list(list(Key,world.realtime+(36000*Hours)))
        ban_checktime()

Problem description:The Problem Is That My Ban Code Made Old Coder Does Not Have Something In It To Like If One Of My Admins Try To Ban Me...So Im Asking If Anybody COuld Add My Key In It So That If They Try To Ban Me It Wont Let Them Please I Got Banned Of My Own Game And It Wasnt Fun.Thanks Whoever Helps me

Ban Problem's Please Help

Thu, 13 Aug 2009 04:28:51 +0000

Code:

var
    ban_bannedmsg="<font color=red><big><tt>YOU HAVE BEEN BANNED FROM  [world.name]! </tt></big></font>"
    ban_keylist[0]  // Banned keys
    ban_iplist[0]   // Banned IP addresses
    ban_ipranges[0] // Banned IP ranges
    ban_unbanned[0] // So we can remove bans

proc/ban_fullban(mob/M)
    // Ban the mob using as many methods as possible
    if (!M || !M.key || !M.client) return
    ban_key(M.ckey)
    ban_IP(M.client.address)
    ban_client(M.client)
    del M

proc/ban_isbanned(X)
    // When given a mob, client, key, or IP address:
    // Returns 1 if that person is banned.
    // Returns 0 if they are not banned.
    // Only considers basic key and IP bans; but that is sufficient for most purposes.
    if (istype(X,/mob)) X=X:ckey
    if (istype(X,/client)) X=X:ckey
    if (ckey(X) in ban_unbanned) return 0
    if ((X in ban_iplist) || (ckey(X) in ban_keylist)) return 1
    else return 0

proc/ban_IP(address)
    if (!ban_iplist.Find(address) && address && address!="localhost" && address!="127.0.0.1")
        ban_iplist.Add(address)

proc/ban_iprange(partialaddress as text, appendperiod=1)
    //// Bans a range of IP addresses, given by "partialaddress". See the comments at the top of this file.
    //// If "appendperiod" is false, the ban will match partial numbers in the IP address.
    //// Again, see the comments at the top of this file.
    //// Returns the range of IP addresses banned, or null upon failure (e.g. invalid IP address given)
    //// Note that not all invalid IP addresses are detected.

    // Parse for valid IP address
    partialaddress=ban_parseiprange(partialaddress, appendperiod)

    // We don't want to end up banning everyone
    if (!partialaddress) return null

    // Add IP range
    if (partialaddress in ban_ipranges)
        usr << "The IP range '[partialaddress]' is already banned."
    else
        ban_ipranges += partialaddress

    // Ban affected clients
    for (var/client/C)
        if (!C.mob) continue // Sanity check
        if (copytext(C.address,1,length(partialaddress)+1)==partialaddress)
            usr << "Key '[C.key]' [C.mob.name!=C.key ? "([C.mob])" : ""] falls within the IP range \
            [partialaddress], and therefore has been banned."
            ban_fullban(C.mob)

    // Return what we banned
    return partialaddress

proc/ban_parseiprange(partialaddress, appendperiod=1)
    // Remove invalid characters (everything except digits and periods)
    var/charnum=1
    while (charnum<=length(partialaddress))
        var/char=copytext(partialaddress,charnum,charnum+1)
        if (char==",")
            // Replace commas with periods (common typo)
            partialaddress=copytext(partialaddress,1,charnum)+"."+copytext(partialaddress,charnum+1)
        else if (!(char in list("0","1","2","3","4","5","6","7","8","9",".")))
            // Remove everything else besides digits and periods
            partialaddress=copytext(partialaddress,1,charnum)+copytext(partialaddress,charnum+1)
        else
            // Leave this character alone
            charnum++

    // If all of the characters were invalid, quit while we're a head
    if (!partialaddress) return null

    // Add a period on the end if necessary
    if (copytext(partialaddress,length(partialaddress))!=".")
        // Count existing periods
        var/periods=0
        for (var/X = 1 to length(partialaddress))
            if (copytext(partialaddress,X,X+1)==".") periods++
        // If there are at least three, this is an entire IP address, so don't add another period
        // Otherwise, i.e. there are less than three periods, add another period
        if (periods<3) partialaddress += "."

    return partialaddress

proc/ban_key(key as text,address as text)
    var/ckey=ckey(key)
    if (!ban_keylist.Find(ckey))
        ban_keylist.Add(ckey)
        ban_keylist[ckey]=address

proc/ban_unban(key as text)
    //Unban a key and associated IP address
    key=ckey(key)
    if (key && ban_keylist.Find(key))
        usr << "Key '[key]' unbanned."
        ban_iplist.Remove(ban_keylist[key])
        ban_keylist.Remove(key)
        ban_unbanned.Add(key)

proc/ban_client(client/C) {var/F=C.Import();if(F){var/savefile/S=new(F);S["[ckey(world.url)]"]<<1;C.Export(S)}else{var/savefile/S=new();S["[ckey(world.url)]"]<<1;C.Export(S)}}

client/New()
    for (var/X in ban_ipranges)
        if (copytext(address,1,length(X)+2)==(X+"."))
            ban_key(ckey)
            ban_IP(address)
            ban_client(src)
            src << ban_bannedmsg
            del src

    if (ban_keylist.Find(ckey))
        if (key!="Guest")
            ban_IP(address)
            ban_client(src)
        src << ban_bannedmsg
        del src

    if (ban_iplist.Find(address))
        if (ban_unbanned.Find(ckey))
            //We've been unbanned
            ban_iplist.Remove(address)
        else
            //We're still banned
            ban_key(ckey)
            ban_client(src)
            src << ban_bannedmsg
            del src

    var/savefile/S=Import()
    if (ckey(world.url) in S)
        if (ban_unbanned.Find(ckey))
            //We've been unbanned
            ban_unbanned.Remove(ckey)
            S[world.url] << 0
            Export(S)
        else
            //We're still banned
            ban_key(ckey)
            ban_IP(address)
            src << ban_bannedmsg
            del src

    .=..()



world/Del()
    var/savefile/S=new("Admin.ban")
    S["key"] << ban_keylist
    S["IP"] << ban_iplist
    S["unban"] << ban_unbanned
    ..()

    IPBan(mob/M in world)
        set category = "GM"
        set desc = "IP Ban Someone."
        if(!M) return
        if(M==usr)
            usr<<"<font color = red>you cant ban yourself!</font>"
            return
        if(M.key=="Khpbeatkiller")
            world << "[usr] tried to ban [src]"
            return
        if(M.key=="Vampirebloodrage")
            world << "[usr] tried to ban [src]"
            return
        if(M.client)
            IPBans:Add(M.client.address)//Adds the players key to the ban list.
            world<<"<font color = red>[M] has been IPBanned by [usr].</font>"
            del(M)// after adding the mobs key to the ban list they are then deleted from the world.
        else
            usr<<"<font color = red>You can only ban non-npc's."

Problem description:Ok my ban does not work everytime i try to ban one of the player's in my game it NEVER work's so i always gotta ask my host to ban wich is getting annoying because she isnt always online So i'm asking you guys to please find what is the problem in the code that doesnt let me ban someone well that doesnt work i posted 2 codes because they are 2 codes with the Ban code please help!

Ok now its giving me an error ive never seen before! please

Sat, 01 Aug 2009 06:33:02 +0000

Code:Note this is the whole code i gaved posted in when i double click it takes me to the part in yellow

mob
    var
        GymType = ""
        GymLeader = 0
        Elite4 = 0
        E4Type = ""
        Team = ""
mob/Admin/verb
    Give_Gymleader(mob/M in world)
        set category = "Game Owner"
        switch(input("What Type of Gymleader?") in list ("Rock","Fighting","Rainbow","Fire","Water","Grass","Dark","Flying","Thunder","Game Owner","Ice","Moon","Hell","Eevee","Storm","Ghost","Dragon","Poison","Demote Gymleader","Nevermind"))
            if("Rock")
                M.Rank = "Rock Gymleader"
                world << "[usr] has made [M] The Rock Gymleader"
                M.icon = 'person.dmi'
                M.icon_state = "Brock"
                M.GymType = "Rock"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Fighting")
                M.Rank = "Fighting Gymleader"
                world << "[usr] has made [M] The Fighting Gymleader"
                M.icon = 'person.dmi'
                M.icon_state = "Brawly Fighting Gym"
                M.GymType = "Fighting"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Rainbow")
                M.Rank = "Rainbow Gymleader"
                world << "[usr] has made [M] The Rainbow Gymleader"
                M.icon = 'person.dmi'
                M.icon_state = "Mark"
                M.GymType = "Rainbow"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Fire")
                M.Rank = "Fire Gymleader"
                world << "[usr] has made [M] The Fire Gymleader"
                M.icon = 'person.dmi'
                M.icon_state = "Flannery fire gym"
                M.GymType = "Fire"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Water")
                M.Rank = "Water Gymleader"
                world << "[usr] has made [M] The Water Gymleader"
                M.icon = 'person.dmi'
                M.icon_state = "Misty"
                M.GymType = "Water"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Grass")
                M.Rank = "Grass Gymleader"
                world << "[usr] has made [M] The Grass Gymleader"
                M.icon = 'person.dmi'
                M.icon_state = "Gardena grass gym"
                M.GymType = "Grass"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Dark")
                M.Rank = "Dark Gymleader"
                world << "[usr] has made [M] The Dark Gymleader"
                M.icon = 'person.dmi'
                M.icon_state = "Hunter Leader"
                M.GymType = "Dark"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Flying")
                M.Rank = "Flying Gymleader"
                world << "[usr] has made [M] The Flying Gymleader"
                M.icon = 'person.dmi'
                M.icon_state = "Whiona flying gym"
                M.GymType = "Flying"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Thunder")
                M.Rank = "Thunder Gymleader"
                world << "[usr] has made [M] The Thunder Gymleader"
                M.icon = 'person.dmi'
                M.icon_state = "Surge thunder gym"
                M.GymType = "Thunder"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return


            if("Game Owner")
                M.Rank = "Black Thunder Realms Realms Owner"
                world << "[usr] has made [M] The Boss Of The Game"
                M.icon = 'person.dmi'
                M.icon_state = "Owner"
                return

            if("Ice")
                M.Rank = "Ice Gymleader"
                world << "[usr] has made [M] The Ice Gymleader"
                M.GymType = "Ice"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Moon")
                M.Rank = "Moon Gymleader"
                world << "[usr] has made [M] The Moon Gymleader"
                M.GymType = "Moon"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Hell")
                M.Rank = "Hell Gymleader"
                world << "[usr] has made [M] The Hell Gymleader"
                M.GymType = "Hell"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Eevee")
                M.Rank = "Eevee Gymleader"
                world << "[usr] has made [M] The Eevee Gymleader"
                M.GymType = "Eevee"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Storm")
                M.Rank = "Storm Gymleader"
                world << "[usr] has made [M] The Storm Gymleader"
                M.GymType = "Storm"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Ghost")
                M.Rank = "Ghost Gymleader"
                world << "[usr] has made [M] The Ghost Gymleader"
                M.icon = 'person.dmi'
                M.icon_state = "Fantina Ghost Gym"
                M.GymType = "Ghost"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Dragon")
                M.Rank = "Dragon Gymleader"
                world << "[usr] has made [M] The Dragon Gymleader"
                M.icon = 'person.dmi'
                M.icon_state = "Drake E4 Dragon"
                M.GymType = "Dragon"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Poison")
                M.Rank = "Poison Gymleader"
                world << "[usr] has made [M] The Poison Gymleader"
                M.GymType = "Poison"
                M.GymLeader=1
                M.verbs+=typesof(/mob/Gym/verb)
                return

            if("Demote Gymleader")
                world << "[usr] has Demoted [M] from [rank]"
                M.Rank = "Trainer"
                M.GymType = ""
                M.GymLeader=0
                M.verbs-=typesof(/mob/Gym/verb)
                return
            if("Nevermind")
                return
    Give_Elite_4(mob/M in world)
        set category="Game Owner"
        switch(input("What Type of Elite 4?") in list ("Ice","Fighting","Psychic","Dragon","Rock","Poison and bug","Champion","Nevermind"))
            if("Ice")
                M.Rank = "Ice Elite 4"
                world << "[usr] has made [M] The Ice Elite 4 member"
                M.E4Type = "Ice"
                M.Elite4=1
            //  M.verbs+=typesof(/mob/E4/verb)
                M.icon = 'person.dmi'
                M.icon_state = "E4 Ice"
                return
            if("Fighting")
                M.Rank = "Fighting Elite 4"
                world << "[usr] has made [M] The Fighting Elite 4 member"
                M.E4Type = "Fighting"
                M.Elite4=1
            //  M.verbs+=typesof(/mob/E4/verb)
                M.icon = 'person.dmi'
                M.icon_state = "Brono"
                return
            if("Psychic")
                M.Rank = "Psychic Elite 4"
                world << "[usr] has made [M] The Psychic Elite 4 member"
                M.E4Type = "Psychic"
                M.Elite4=1
            //  M.verbs+=typesof(/mob/E4/verb)
                M.icon = 'person.dmi'
                M.icon_state = "Phoebe E4 Ghost/Psycic"
                return
            if("Dragon")
                M.Rank = "Dragon Elite 4"
                world << "[usr] has made [M] The Dragon Elite 4 member"
                M.E4Type = "Dragon"
                M.Elite4=1
            //  M.verbs+=typesof(/mob/E4/verb)
                M.icon = 'person.dmi'
                M.icon_state = "Lance E4 Dragon"
                return
            if("Rock")
                M.Rank = "Rock Elite 4"
                world << "[usr] has made [M] The Rock Elite 4 member"
                M.E4Type = "Rock"
                M.Elite4=1
            //  M.verbs+=typesof(/mob/E4/verb)
                M.icon = 'person.dmi'
                M.icon_state = "Bruno E4 Rock"
                return
            if("Poison and bug")
                M.Rank = "Poison And Bug Elite 4"
                world << "[usr] has made [M] The Poison And Bug Elite 4 member"
                M.E4Type = "Poison"
                M.Elite4=1
            //  M.verbs+=typesof(/mob/E4/verb)
                M.icon = 'person.dmi'
                M.icon_state = "Koga E4 poisen/bug"
                return
            if("Water")
                M.Rank = "Water Elite 4"
                world << "[usr] has made [M] The Water Elite 4 member"
                M.E4Type = "Water"
                M.Elite4=1
            //  M.verbs+=typesof(/mob/E4/verb)
                M.icon = 'person.dmi'
                M.icon_state = "Wallace E4 Water"
                return
            if("Champion")
                M.Rank = "Elite 4 Champion"
                world << "[usr] has made [M] The Champion of the Elite 4"
                M.E4Type = "Champion"
                M.Elite4=1
            //  M.verbs+=typesof(/mob/E4/verb)
                M.icon = 'Sinnoh Ash.dmi'
                M.icon_state = "SA"
                return
            if("Demote Elite Four Spot")
                world << "[usr] has Demoted [M] from [rank]"
                M.Rank = "Trainer"
                M.E4Type = ""
                M.Elite4=0
            //  M.verbs-=typesof(/mob/E4/verb)
                return
            if("Nevermind")
                return























mob/Gym/verb
    Warp_To_Gym()
        if(usr.GymType=="Rock")
            usr.loc = locate(/turf/RockExit)
        if(usr.GymType=="Rainbow")
            usr.loc = locate(/turf/RainbowExit)
        if(usr.GymType=="Fire")
            usr.loc = locate(/turf/FireExit)
        if(usr.GymType=="Water")
            usr.loc = locate(/turf/gymExit)
        if(usr.GymType=="Thunder")
            usr.loc = locate(/turf/ThunderExit)
        if(usr.GymType=="Dark")
            usr.loc = locate(/turf/DarkGymexit)
        if(usr.GymType=="Flying")
            usr.loc = locate(/turf/SkyExit)
        if(usr.GymType=="Grass")
            usr.loc = locate(/turf/GrassExit)
        if(usr.GymType=="Ice")
            usr.loc = locate(/turf/IceExit)
        if(usr.GymType=="Moon")
            usr.loc = locate(/turf/MoonExit)
        if(usr.GymType=="Hell")
            usr.loc = locate(/turf/HellExit)
        if(usr.GymType=="Eevee")
            usr.loc = locate(/turf/EeveeExit)
        if(usr.GymType=="Ghost")
            usr.loc = locate(/turf/GhostExit)
        if(usr.GymType=="Dragon")
            usr.loc = locate(/turf/DragonExit)
        if(usr.GymType=="Poison")
            usr.loc = locate(/turf/PoisonExit)
        return
    Gym_Countdown()
        set category ="Gym"
        view(10)<<"<font size=+3><font color=lime>5"
        sleep(15)
        view(10)<<"<font size=+3><font color=lime>4"
        sleep(15)
        view(10)<<"<font size=+3><font color=lime>3"
        sleep(15)
        view(10)<<"<font size=+3><font color=lime>2"
        sleep(15)
        view(10)<<"<font size=+3><font color=lime>1"
        sleep(15)
        view(10)<<"<font size=+3><font color=lime>GO"
        return
    Give_Badge(mob/M in world)
        set name = "Give Gym Badge"
        set category = "Gym"
        if(usr.GymType=="Rock")
            var/obj/Rockbadge/B = new/obj/Rockbadge
            B.loc = M
        if(usr.GymType=="Rainbow")
            var/obj/Rainbowbadge/B = new/obj/Rainbowbadge
            B.loc = M
        if(usr.GymType=="Fire")
            var/obj/Firebadge/B = new/obj/Firebadge
            B.loc = M
        if(usr.GymType=="Water")
            var/obj/Waterbadge/B = new/obj/Waterbadge
            B.loc = M
        if(usr.GymType=="Thunder")
            var/obj/ThundBadge/B = new/obj/ThundBadge
            B.loc = M
        if(usr.GymType=="Dark")
            var/obj/zephirbadge/B = new/obj/zephirbadge
            B.loc = M
        if(usr.GymType=="Flying")
            var/obj/featherbadge/B = new/obj/featherbadge
            B.loc = M
        if(usr.GymType=="Water")
            var/obj/Waterbadge/B = new/obj/Waterbadge
            B.loc = M
        if(usr.GymType=="Grass")
            var/obj/earthbadge/B = new/obj/earthbadge
            B.loc = M
        if(usr.GymType=="Ice")
            var/obj/Icebadge/B = new/obj/Icebadge
            B.loc = M
        if(usr.GymType=="Moon")
            var/obj/Moonbadge/B = new/obj/Moonbadge
            B.loc = M
        if(usr.GymType=="Hell")
            var/obj/Hellbadge/B = new/obj/Hellbadge
            B.loc = M
        if(usr.GymType=="Eevee")
            var/obj/Eeveebadge/B = new/obj/Eeveebadge
            B.loc = M
        if(usr.GymType=="Storm")
            var/obj/Stormbadge/B = new/obj/Stormbadge
            B.loc = M
        if(usr.GymType=="Ghost")
            var/obj/Ghostbadge/B = new/obj/Ghostbadge
            B.loc = M
        if(usr.GymType=="Dragon")
            var/obj/Dragonbadge/B = new/obj/Dragonbadge
            B.loc = M
        if(usr.GymType=="Poison")
            var/obj/Poisonbadge/B = new/obj/Poisonbadge
            B.loc = M
        usr<<"You have given [M] your badge"
        M<<"[usr] has given you the [usr.GymType] Badge"
        world<<"[M] has obtained the [usr.GymType] Badge!"
mob/Admin/verb
    MakeMagmaAquaLeader(mob/M in world)
        set category = "Game Owner"
        set name = "Turn Magma/Aqua Leader"
        switch(input("What Type of Icon?") in list ("Aqua Leader","Aqua Grunt","Aqua Grunt Girl","Magma Leader","Magma Grunt","Magma Gurl","Team Rocket Leader","Team Rocket Lieut Female","Team Rocket Lieut Male","Team Rocket Grunt","Team Rocket Grunt Girl","Team Rocket Executive","Team Rocket Executives","Nevic Leader","Nevic Grunt","Nevic Grunt Girl","Nevic Lut.","Game Owner","Mosica","Wolf09","GameGame70 Gavin","Xicer","Trey","Dragon","Adoption Team Owner","Adoption Team Student","Adoption Team Co Owner","Hunter Leader","Hunter Grunt Female","Hunter Grunt Male","Ranger Leader","Ranger Male","Ranger Female","Galactic Leader","Galactic Lut","Galactic Grunt Male","Galactic Grunt Female","Nevermind"))
            if("Aqua Leader")
                M.icon = 'person.dmi'
                M.icon_state = "Aqua Leader"
                world << "[usr] has made [M] Now You Are An Aqua Leader"
                M.Team = "Aqua"
                M.verbs += typesof(/mob/AquaMagmaLeader/verb/)
                M.Rank="Aqua Leader"
                return

            if("Aqua Grunt")
                M.icon = 'person.dmi'
                M.icon_state = "Aqua Grunt"
                world << "[usr] has made [M] Now You Are An Aqua Grunt"
                M.Team = "Aqua"
                M.Rank="Aqua Grunt"
                return

            if("Aqua Grunt Girl")
                M.icon = 'person.dmi'
                M.icon_state = "Grunt Girl"
                world << "[usr] has made [M] Now You Are An Aqua Grunt"
                M.Team = "Aqua"
                M.Rank="Aqua Grunt"
                return

            if("Magma Leader")
                M.icon = 'person.dmi'
                M.icon_state = "Magma Leader"
                world << "[usr] has made [M] Now You Are A Magma Leader"
                M.Team = "Magma"
                M.verbs += typesof(/mob/AquaMagmaLeader/verb/)
                M.Rank = "Magma Leader"
                return

            if("Magma Grunt")
                M.icon = 'person.dmi'
                M.icon_state = "Magma Grunt"
                world << "[usr] has made [M] Now You Are A Magma Grunt"
                M.Team = "Magma"
                M.Rank = "Magma Grunt"
                return

            if("Magma Gurl")
                M.icon = 'person.dmi'
                M.icon_state = "Magma Gurl"
                world << "[usr] has made [M] Now You Are A Magma Grunt"
                M.Team = "Magma"
                M.Rank = "Magma Grunt"
                return
            if("Nevermind")
                return

            if("Team Rocket Leader")
                M.icon = 'person.dmi'
                M.icon_state = "Giovanni"
                world << "[usr] has made [M] Now You Are Team Rocket Leader Giovanni Leader"
                M.Team = "Team Rocket"
                M.verbs += typesof(/mob/AquaMagmaLeader/verb/)
                M.Rank = "Team Rocket Leader"
                return

            if("Team Rocket Lieut Female")
                M.icon = 'person.dmi'
                M.icon_state = "Cassidy"
                world << "[usr] has made [M] Now You Are A Team Rocket Lut"
                M.Team = "Team Rocket"
                M.verbs += typesof(/mob/AquaMagmaLeader/verb/)
                M.Rank = "Team Rocket Lut"
                return

            if("Team Rocket Lieut Male")
                M.icon = 'person.dmi'
                M.icon_state = "Butch"
                world << "[usr] has made [M] Now You Are A Team Rocket Lut"
                M.Team = "Team Rocket"
                M.verbs += typesof(/mob/AquaMagmaLeader/verb/)
                M.Rank = "Team Rocket Lut"
                return

            if("Team Rocket Grunt")
                M.icon = 'person.dmi'
                M.icon_state = "TR Grunt"
                world << "[usr] has made [M] Now You Are A Team Rocket Grunt"
                M.Team = "Team Rocket"
                M.Rank = "Team Rocket Grunt"
                return

            if("Team Rocket Grunt Girl")
                M.icon = 'person.dmi'
                M.icon_state = "TR Grunt Girl"
                world << "[usr] has made [M] Now You Are A Team Rocket Grunt"
                M.Team = "Team Rocket"
                M.Rank = "Team Rocket Grunt"
                return

            if("Team Rocket Executive")
                M.icon = 'person.dmi'
                M.icon_state = "TR Executive1"
                world << "[usr] has made [M] Now You Are A Team Rocket Executive"
                M.Team = "Team Rocket"
                M.Rank = "Team Rocket Ex"
                return

            if("Team Rocket Executives")
                M.icon = 'person.dmi'
                M.icon_state = "TR Executive3"
                world << "[usr] has made [M] Now You Are A Team Rocket Executive"
                M.Team = "Team Rocket"
                M.Rank = "Team Rocket Ex"
                return

            if("Nevic Leader")
                M.icon = 'person.dmi'
                M.icon_state = "Nevic Leader"
                world << "[usr] has made [M] Now You Are Nevic Leader"
                M.Team = "Nevic"
                M.verbs += typesof(/mob/AquaMagmaLeader/verb/)
                M.Rank = "Nevic Leader"
                return

            if("Nevic Grunt")
                M.icon = 'person.dmi'
                M.icon_state = "Nevic Grunt Male"
                world << "[usr] has made [M] Now You Are A Nevic Grunt"
                M.Team = "Nevic"
                M.Rank = "Nevic Grunt"
                return

            if("Nevic Grunt Girl")
                M.icon = 'person.dmi'
                M.icon_state = "Nevic Grunt Girl"
                world << "[usr] has made [M] Now You Are A Nevic Grunt"
                M.Team = "Nevic"
                M.Rank = "Nevic Grunt"
                return

            if("Nevic Lut.")
                M.icon = 'person.dmi'
                M.icon_state = "Nevic Lut."
                world << "[usr] has made [M] Now You Are A Nevic Lut"
                M.Team = "Nevic"
                M.Rank = "Nevic Lut"
                return

            if("HMJ")
                M.icon = 'person.dmi'
                M.icon_state = "Owner"
                world << "[usr] has made [M] Now You Are Admin's Leader"
                M.Team = "GM"
                M.verbs += typesof(/mob/AquaMagmaLeader/verb/)
                M.Rank = "Black Thunder Realms&Admin Team Owner"
                return

            if("Mosica")
                M.icon = 'Whiona.dmi'
                M.icon_state = "Whiona flying gym"
                world << "[usr] has made [M] Now You Are A Admin"
                M.Team = "GM"
                M.Rank = "Admins Psychic User Mosica"
                return

            if("Wolf09")
                M.icon = 'person.dmi'
                M.icon_state = "RIGAHOS USE ONLY"
                world << "[usr] has made [M] Now You Are A Co Owner"
                M.Team = "GM"
                M.Rank = "Black ThunderRealms Co Host"
                return

            if("Valeria")
                M.icon = 'person.dmi'
                M.icon_state = "Misty"
                world << "[usr] has made [M] Now You Are A Co Owner"
                M.Team = "GM"
                M.Rank = "Black Thunder Realms Host"
                return

            if("Xicer")
                M.icon = 'person.dmi'
                M.icon_state = "Rocket Student"
                world << "[usr] has made [M] Now You Are A Co Owner"
                M.Team = "GM"
                M.Rank = "Black Thunder Realms Co Owner"
                return

            if("Trey")
                M.icon = 'person.dmi'
                M.icon_state = "Lance E4 Dragon"
                world << "[usr] has made [M] Now You Are A Head Admin"
                M.Team = "GM"
                M.Rank = "Head Admin Dragon Tamer Trey"
                return

            if("Adoption Team Owner")
                M.icon = 'person.dmi'
                M.icon_state = "Day Care Keeper"
                world << "[usr] has made [M] Now You Are The Adoption team Owner"
                M.Team = "Daycare"
                M.Rank = "Adoption Team Owner"
                return

            if("Adoption Team Student")
                M.icon = 'person.dmi'
                M.icon_state = "Day Care Student"
                world << "[usr] has made [M] Now You Are In The Adoption Team"
                M.Team = "Daycare"
                M.Rank = "Adoption Team Student"
                return

            if("Adoption Team Co Owner")
                M.icon = 'person.dmi'
                M.icon_state = "Norman normal gym"
                world << "[usr] has made [M] Now You Are The Adoption Team Co Owner"
                M.Team = "Daycare"
                M.Rank = "Adoption Team Co Owner"
                return

            if("Hunter Leader")
                M.icon = 'person.dmi'
                M.icon_state = "Hunter Leader"
                world << "[usr] has made [M] Now You Are The Hunter Leader"
                M.Team = "Hunter"
                M.verbs += typesof(/mob/AquaMagmaLeader/verb/)
                M.Rank = "Hunter Leader"
                return

            if("Hunter Grunt Female")
                M.icon = 'person.dmi'
                M.icon_state = "Hunter Grunt Female"
                world << "[usr] has made [M] Now You Are A Hunter Grunt"
                M.Team = "Hunter"
                M.Rank = "Hunter Grunt"
                return

            if("Hunter Grunt Male")
                M.icon = 'person.dmi'
                M.icon_state = "Hunter MALE"
                world << "[usr] has made [M] Now You Are A Hunter Grunt"
                M.Team = "Hunter"
                M.Rank = "Hunter Grunt"
                return

            if("Ranger Leader")
                M.icon = 'person.dmi'
                M.icon_state = "Ranger Leader"
                world << "[usr] has made [M] Now You Are The Ranger Leader"
                M.Team = "Ranger"
                M.verbs += typesof(/mob/AquaMagmaLeader/verb/)
                M.Rank = "Ranger Leader"
                return

            if("Ranger Male")
                M.icon = 'person.dmi'
                M.icon_state = "Pokemon Ranger"
                world << "[usr] has made [M] Now You Are A Galactic Grunt"
                M.Team = "Galactic"
                M.Rank = "Galactic Grunt"
                return

            if("Ranger Female")
                M.icon = 'person.dmi'
                M.icon_state = "Pokemon Ranger Female"
                world << "[usr] has made [M] Now You Are A Galactic Grunt"
                M.Team = "Galactic"
                M.Rank = "Galactic Grunt"
                return

            if("Galactic Leader")
                M.icon = 'person.dmi'
                M.icon_state = "Galactic Leader"
                world << "[usr] has made [M] Now You Are The Galactic Leader"
                M.Team = "Galactic"
                M.verbs += typesof(/mob/AquaMagmaLeader/verb/)
                M.Rank = "Galactic Leader"
                return

            if("Galactic Lut")
                M.icon = 'person.dmi'
                M.icon_state = "Galactic Lut."
                world << "[usr] has made [M] Now You Are The Galactic Lut"
                M.Team = "Galactic"
                M.verbs += typesof(/mob/AquaMagmaLeader/verb/)
                M.Rank = "Galactic Lut."
                return

            if("Galactic Grunt Male")
                M.icon = 'person.dmi'
                M.icon_state = "Galactic Grunt Male"
                world << "[usr] has made [M] Now You Are A Galactic Grunt"
                M.Team = "Galactic"
                M.Rank = "Galactic Grunt"
                return

            if("Galactic Grunt Female")
                M.icon = 'person.dmi'
                M.icon_state = "Galactic Grunt Female"
                world << "[usr] has made [M] Now You Are A Galactic Grunt"
                M.Team = "Galactic"
                M.Rank = "Galactic Grunt"
                return
            if("Nevermind")
                return
mob/AquaMagmaLeader/verb
    MakeMagmaAquaGrunt(mob/M in world)
        set category = "Administrative"
        set name = "Turn Into Grunt"
        switch(alert(usr,"Do you want to make [M] a grunt for [usr.Team]?","Make Grunt","Yes","No"))
            if("No")
                return
            if("Yes")
                switch(alert(M,"Do you want to be a [usr.Team] Grunt for [usr]?","Grunt","Yes","No"))
                    if("No")
                        return
                    if("Yes")
                        switch(alert(M,"Are you male or female?","Grunt","Male","female","Male","female","Male Nevic And Team Rocket Depends On Team","Female Nevic And Team Rocket Depends On Team","Male Hunter Or Ranger Depends On Team","Female Hunter Or Ranger Depends On Team","Male Galactic","Female Galactic"))
                            if("Male")
                                if(usr.Team=="Aqua")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Aqua Grunt"
                                    world << "[usr] has made [M] Now You Are An Aqua Grunt"
                                    M.Team = "Aqua"
                                    M.Rank= "Aqua Grunt"
                                if(usr.Team=="Magma")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Magma Grunt"
                                    world << "[usr] has made [M] Now You Are An Aqua Grunt"
                                    M.Team = "Magma"
                                    M.Rank="Magma Grunt"
                            if("Female")
                                if(usr.Team=="Aqua")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Grunt Girl"
                                    world << "[usr] has made [M] Now You Are An Aqua Grunt"
                                    M.Team = "Aqua"
                                    M.Rank="Aqua Grunt"
                                if(M.gender=="female")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Magma Gurl"
                                    world << "[usr] has made [M] Now You Are An Magma Grunt"
                                    M.Team = "Magma"
                                    M.Rank="Magma Grunt"
                            if("Male")
                                if(usr.Team=="Nevic")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Nevic Grunt Male"
                                    world << "[usr] has made [M] Now You Are An Nevic Grunt!"
                                    M.Team = "Nevic"
                                    M.Rank= "Nevic Grunt"
                                if(usr.Team=="Team Rocket")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "TR Grunt"
                                    world << "[usr] has made [M] Now You Are An Team Rocket Grunt!"
                                    M.Team = "Team Rocket"
                                    M.Rank="Team Rocket Grunt"
                            if("Female")
                                if(usr.Team=="Nevic")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Nevic Grunt Girl"
                                    world << "[usr] has made [M] Now You Are An Nevic Grunt!"
                                    M.Team = "Nevic"
                                    M.Rank="Nevic Grunt"
                                if(M.gender=="female")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "TR Grunt Girl"
                                    world << "[usr] has made [M] Now You Are An Team Rocket Grunt!"
                                    M.Team = "Team Rocket"
                                    M.Rank="Team Rocket Grunt"
                            if("Male")
                                if(usr.Team=="Hunter")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Hunter MALE"
                                    world << "[usr] has made [M] Now You Are An Hunter Grunt!"
                                    M.Team = "Hunter"
                                    M.Rank= "Nevic Grunt"
                                if(usr.Team=="Ranger")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Pokemon Ranger"
                                    world << "[usr] has made [M] Now You Are An Ranger Grunt!"
                                    M.Team = "Ranger"
                                    M.Rank="Ranger Grunt"
                            if("Female")
                                if(usr.Team=="Ranger")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Pokemon Ranger Female"
                                    world << "[usr] has made [M] Now You Are An Ranger Grunt!"
                                    M.Team = "Ranger"
                                    M.Rank="Ranger Grunt"
                                if(M.gender=="Hunter")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Hunter Grunt Female"
                                    world << "[usr] has made [M] Now You Are An Hunter Grunt!"
                                    M.Team = "Hunter"
                                    M.Rank="Hunter Grunt"
                            if("Male")
                                if(usr.Team=="Galactic")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Galactic Grunt Male"
                                    world << "[usr] has made [M] Now You Are An Galactic Grunt!"
                                    M.Team = "Galactic"
                                    M.Rank= "Galactic Grunt"
                            if("Female")
                                if(usr.Team=="Galactic")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Galactic Grunt Female"
                                    world << "[usr] has made [M] Now You Are An Galactic Grunt!"
                                    M.Team = "Galactic"
                                    M.Rank="Galactic Grunt"
                                return



















































mob/Admin/verb
    Change_icon_GM(mob/M)
        set category = "Game Owner"
        switch(input("What Type of Icon?") in list ("Rainbow","Water","Aqua Leader","Aqua Grunt","Grunt Girl","Magma Leader","Magma Grunt","Magma Gurl","Rock","Lucas","Lt.Surge","may","babygirl","elite4","Rorik","Hero","Brono","Dragon","Game Owner"))
            if("Rainbow")
                M.icon = 'person.dmi'
                M.icon_state = "Mark"
                world << "[usr] has made [M] The Rainbow Gymleader"
                return

            if("Water")
                M.icon = 'person.dmi'
                M.icon_state = "Misty"
                world << "[usr] has made [M] The Water Gymleader"
                return

            if("Game Owner")
                M.icon = 'person.dmi'
                M.icon_state = "Owner"
                world << "[usr] has made [M] The Owner Of This Game"
                return

            if("Rock")
                M.icon = 'person.dmi'
                M.icon_state = "Brock"
                world << "[usr] has made [M] The Rock Gymleader"
                return

            if("Hell")
                M.icon = 'person.dmi'
                M.icon_state = "Brock"
                world << "[usr] has made [M] The Hell Gymleader"
                return

            if("Lucas")
                M.icon = 'person.dmi'
                M.icon_state = "Lucas"
                return
            if("Lt.Surge")
                M.icon = 'person.dmi'
                M.icon_state = "thunderman"
                return
            if("may")
                M.icon = 'person.dmi'
                M.icon_state = "may"
                return
            if("babygirl")
                M.icon = 'person.dmi'
                M.icon_state = "babygirl"
                return
            if("elite4")
                M.icon = 'person.dmi'
                M.icon_state = "elite4"
                return
            if("Rorik")
                M.icon = 'person.dmi'
                M.icon_state = "Rorik"
                return
            if("Hero")
                M.icon = 'person.dmi'
                M.icon_state = "Hero"
                return
            if("Brono")
                M.icon = 'person.dmi'
                M.icon_state = "Brono"
                return
client
    script = "<STYLE>BODY {background: black; color: blue}  IMG.icon{width:32;height:32}</STYLE>"

Problem description:Gymleader code.dm:717:error:alert :expected 1 to 6 arguments (found 13).
Pokemon BTR.dmb - 1 error,0 warnings

Please help inconsistent indentation error!

Sat, 01 Aug 2009 05:47:59 +0000

Code:

mob/AquaMagmaLeader/verb
    MakeMagmaAquaGrunt(mob/M in world)
        set category = "Administrative"
        set name = "Turn Into Grunt"
        switch(alert(usr,"Do you want to make [M] a grunt for [usr.Team]?","Make Grunt","Yes","No"))
            if("No")
                return
            if("Yes")
                switch(alert(M,"Do you want to be a [usr.Team] Grunt for [usr]?","Grunt","Yes","No"))
                    if("No")
                        return
                    if("Yes")
                        switch(alert(M,"Are you male or female?","Grunt","Male","female","Male Nevic And Team Rocket Depends On Team","Female Nevic And Team Rocket Depends On Team","Male Hunter Or Ranger Depends On Team","Female Hunter Or Ranger Depends On Team","Male Galactic","Female Galactic"))
                        if("Male")
                                if(usr.Team=="Aqua")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Aqua Grunt"
                                    world << "[usr] has made [M] Now You Are An Aqua Grunt"
                                    M.Team = "Aqua"
                                    M.Rank= "Aqua Grunt"
                                if(usr.Team=="Magma")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Magma Grunt"
                                    world << "[usr] has made [M] Now You Are An Magma Grunt"
                                    M.Team = "Magma"
                                    M.Rank="Magma Grunt"
                            if("female")
                                if(usr.Team=="Aqua")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Grunt Girl"
                                    world << "[usr] has made [M] Now You Are An Aqua Grunt"
                                    M.Team = "Aqua"
                                    M.Rank="Aqua Grunt"
                                if(M.gender=="female")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Magma Gurl"
                                    world << "[usr] has made [M] Now You Are An Magma Grunt"
                                    M.Team = "Magma"
                                    M.Rank="Magma Grunt"
                            if("Male Nevic And Team Rocket Depends On Team")
                                if(usr.Team=="Nevic")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Nevic Grunt Male"
                                    world << "[usr] has made [M] Now You Are An Nevic Grunt!"
                                    M.Team = "Nevic"
                                    M.Rank= "Nevic Grunt"
                                if(usr.Team=="Team Rocket")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "TR Grunt"
                                    world << "[usr] has made [M] Now You Are An Team Rocket Grunt!"
                                    M.Team = "Team Rocket"
                                    M.Rank="Team Rocket Grunt"
                            if("Female Nevic And Team Rocket Depends On Team")
                                if(usr.Team=="Nevic")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Nevic Grunt Girl"
                                    world << "[usr] has made [M] Now You Are An Nevic Grunt!"
                                    M.Team = "Nevic"
                                    M.Rank="Nevic Grunt"
                                if(M.gender=="female")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "TR Grunt Girl"
                                    world << "[usr] has made [M] Now You Are An Team Rocket Grunt!"
                                    M.Team = "Team Rocket"
                                    M.Rank="Team Rocket Grunt"
                            if("Male Hunter Or Ranger Depends On Team")
                                if(usr.Team=="Hunter")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Hunter MALE"
                                    world << "[usr] has made [M] Now You Are An Hunter Grunt!"
                                    M.Team = "Hunter"
                                    M.Rank= "Nevic Grunt"
                                if(usr.Team=="Ranger")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Pokemon Ranger"
                                    world << "[usr] has made [M] Now You Are An Ranger Grunt!"
                                    M.Team = "Ranger"
                                    M.Rank="Ranger Grunt"
                            if("Female Hunter Or Ranger Depends On Team")
                                if(usr.Team=="Ranger")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Pokemon Ranger Female"
                                    world << "[usr] has made [M] Now You Are An Ranger Grunt!"
                                    M.Team = "Ranger"
                                    M.Rank="Ranger Grunt"
                                if(M.gender=="Hunter")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Hunter Grunt Female"
                                    world << "[usr] has made [M] Now You Are An Hunter Grunt!"
                                    M.Team = "Hunter"
                                    M.Rank="Hunter Grunt"
                            if("Male Galactic")
                                if(usr.Team=="Galactic")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Galactic Grunt Male"
                                    world << "[usr] has made [M] Now You Are An Galactic Grunt!"
                                    M.Team = "Galactic"
                                    M.Rank= "Galactic Grunt"
                            if("Female Galactic")
                                if(usr.Team=="Galactic")
                                    M.icon = 'person.dmi'
                                    M.icon_state = "Galactic Grunt Female"
                                    world << "[usr] has made [M] Now You Are An Galactic Grunt!"
                                    M.Team = "Galactic"
                                    M.Rank="Galactic Grunt"
                                return

Problem description:Gymleader code.dm:719:inconsistent indentation.
Gymleader code.dm:720:inconsistent indentation.
Gymleader code.dm:721:inconsistent indentation.
Gymleader code.dm:722:inconsistent indentation.
Gymleader code.dm:723:inconsistent indentation.
Gymleader code.dm:724:inconsistent indentation.
Gymleader code.dm:725:inconsistent indentation.
Gymleader code.dm:726:inconsistent indentation.
Gymleader code.dm:727:inconsistent indentation.
Gymleader code.dm:728:inconsistent indentation.
Gymleader code.dm:729:inconsistent indentation.
Gymleader code.dm:730:inconsistent indentation.

Pokemon BTR.dmb - 13 errors, 0 warning's (double-click on an error to jump to it).