Don't know why it wont work?!

Page: 1 2
ID:1169959
 
Feb 20 2013, 3:03 am
Code:
Start_Tourny()
                set category = "Administration"
                set name = "Start Tournament"
                if(tournament == 1)
                    usr<<"<font color=white><b><u>There is already a tournament being held!</font></b></u>"
                    return
                else
                    var/ID=input("You want to start a tournament? What is your prize going to be?")as text
                    if(ID == "")
                        return
                    else
                        world << "<center><font size=3><font color = Silver><b><center>[usr] has started a tournament, the prize is [ID]!<br><font size = 1>To join please go to tournament tab and select Enter Tournament."
                        tournament = 1
                        for(var/mob/M in world)
                            M.verbs += new/mob/Tournament/verb/Enter_Tournament()
                            M.verbs += new/mob/Tournament/verb/Leave_Tournament()
            Stop_Tourny_Entance()
                set category = "Administration"
                set name = "Stop Tournament Entry"
                if(tournament == 1)
                    world << "<center><font size=3><font color = Silver><b><center>The tournament entry has now ended."
                    world << "<font size=1><font color = red><b>The following people are in the tournament"
                    for(var/mob/M in world)
                     if(M.tourny)
                      world << "[M]"
                    for(var/mob/M in world)
                        M.verbs -= new/mob/Tournament/verb/Enter_Tournament()
                        M.verbs -= new/mob/Tournament/verb/Leave_Tournament()
                else
                    usr<<"<font color=white><b><u>There is no tournament being held!</font></b></u>"
                    return
            End_Tourny()
                set category = "Administration"
                set name = "End Tournament"
                if(tournament == 1)
                    var/ID=input("You are now ending the tournament, who won?")as text
                    if(ID == "")
                        return
                    else
                        world << "<center><font size=3><font color = Silver><b><center>[usr] has ended the tournament, the winner is [ID] and they will recieve their prize shortly."
                        tournament = 0
                        for(var/mob/M in world)
                            M.verbs -= new/mob/Tournament/verb/Enter_Tournament()
                            M.verbs -= new/mob/Tournament/verb/Leave_Tournament()
                else
                    usr<<"<font color=white><b><u>There is no tournament to end!</font></b></u>"
                    return
            Tourny_Announce()
                set category = "Administration"
                set name = "Tournament Announce"
                if(tournament == 1)
                    var/ID=input("What do you wish to announce to the people in the tournament?")as text
                    if(ID == "")
                        return
                    else
                        for(var/mob/M in world)
                            if(M.tourny == 1)
                                M << "<center><font size=2><font color = Silver><b><center>[usr] would like to tournament announce!<center><br>[ID]"

                else
                    usr<<"<font color=white><b><u>There is no tournament to announce to</font></b></u>"
                    return


Problem description: 1.0 System\1.2 Administration\H_Admin Variables and Procs (new).dm:1676:error: proc definition not allowed inside another proc

Feb 20 2013, 3:35 am
I'm not seeing anything that could be causing the problem, aside from the improper indentation of the first line (though I suspect that's just a formatting error on the forum's syntax highlighter.) You'll need to point out which line is causing the error.
Feb 20 2013, 5:25 am
The line that has the error is:
                set category = "Administration"
                set name = "Start Tournament"
Feb 20 2013, 8:02 am
In response to ISUPER
Are there any more lines of code above those? If not, is there another code file that comes before those?
Feb 20 2013, 8:41 am
I suspect this entire code snippet is indented at least once too far, and there's a proc/verb above it that isn't.
Feb 20 2013, 8:56 am
Yea theres the tourny file:
ob
    var
        tmp/tourny = 0

var/tournament = 0




mob/Tournament
    verb
        Enter_Tournament()
            set category = "Tournament"
            set name = "Enter Tournament"
            if(usr.tourny == 1)
                usr<<"<font color=white><b><u>Your already in the tournament!</font></b></u>"
                return
            else
                usr.loc=locate(120,17,1)
                usr.tourny=1
                usr.safe=0
                usr<<"<font color=white><b><u>You joined the tournament!</font></b></u>"
        Leave_Tournament()
            set category = "Tournament"
            set name = "Leave Tournament"
            if(usr.tourny == 0)
                usr<<"<font color=white><b><u>Your not in the tournament!</font></b></u>"
                return
            else
                usr.loc=locate(150,60,1)
                usr.tourny=0
                usr.safe=1
                usr<<"<font color=white><b><u>You left the tournament!</font></b></u>"





mob/Logout()
    src.verbs -= new/mob/Tournament/verb/Enter_Tournament()
    src.verbs -= new/mob/Tournament/verb/Leave_Tournament()

This is it besides that.
Feb 20 2013, 8:57 am
The m for mob got cut out for some reason :\
Feb 20 2013, 9:29 am
What you need to do is just post all of the code which is in this file: "H_Admin Variables and Procs (new).dm"
Feb 20 2013, 10:16 am
Dm Tags are needed here...
Feb 20 2013, 10:44 am
It seems to only get half of the message cutting out the rest of the message thus deleting the </dm>
Feb 20 2013, 10:45 am
Part 1
var/tmp/GM_WorldShutDownProc=0
//***********//
//***********//
//And now, 7 spots for all the other positions too. Just put in their keys and they will be
//given their appropriate ranks automatically when they log in if they are on that key.

//*************//
//****Ranks****//
//*************//
//1: TE - Trial Enforcer
var/const/GM1=""
var/const/GM2=""
var/const/GM3=""
var/const/GM4=""
var/const/GM5=""
var/const/GM6=""
var/const/GM7=""
//2: HE - Enforcer
var/const/HA1="XxSeanxX18"
var/const/HA2=""
var/const/HA3=""
var/const/HA4=""
var/const/HA5=""
var/const/HA6=""
var/const/HA7=""

//3: ME - Master Enforcer
var/const/MA1=""
var/const/MA2=""
var/const/MA3=""
var/const/MA4=""
var/const/MA5=""
var/const/MA6=""
var/const/MA7=""
//4: SM - Staff Council Member
var/const/SM1="Kevin15432"
var/const/SM2=""
var/const/SM3=""
var/const/SM4=""
var/const/SM5=""
var/const/SM6=""
var/const/SM7=""
//5: GM* - Game Maker
//If you need more than 7 default *GM*s, you can add them yourself :)
var/const/GAME_MAKER1="Yepin Big Time"
var/const/GAME_MAKER2="razzy pha"
var/const/GAME_MAKER3="Minner49_er"
var/const/GAME_MAKER4="ISUPER"
var/const/GAME_MAKER5="PAKUUN"
var/const/GAME_MAKER6="Tonytchi"
var/const/GAME_MAKER7="Sonic r7"
//Each rank has control over all ranks below their own.
//*********************************//
//*********************************//
//There are now 5 spots that you can use to set variables that will NOT be included in the list
//when someone goes to edit someone else. key, ckey, client, type, overlays, contents, and most other things
//you wouldnt want edited- ever, are already removed. Just replace these with your own, and you are set.
var/const/EditIgnore1=""
var/const/EditIgnore2=""
var/const/EditIgnore3=""
var/const/EditIgnore4=""
var/const/EditIgnore5=""
//****************************//
//***World ShutDown Password
//If you would like to make it so that only those who know this password are allowed to shut
// down the world, just set one... currently it is set to 0, or null, meaning anyone can shut
// down your worlds.  I suggest you change it to some other password.
var/GM_ShutDownPass=0
var/annc_1 = ""
var/annc_2 = ""
var/annc_3 = ""
var/annc_4 = ""
var/annc_5 = ""
//**************************//
//****Prefixes****//
//You can enable or disable the prefixes, if you want to change what they are you have to do
//that manually :)  ((Unless I change it))   This has not been added yet
var/const/GM_PREFIXES=TRUE
//*******************************************************************************************//
//Other stuff... in order to make the people you want getting admin to get admin, you have to
//run the AdminLoad() proc on them at any given point, most likely at login, so if you want
//them to be added at login, then dont do anything because thats the default.
var/Host
mob/Login()
    sleep(0)
    spawn(0)

        if(client.address==null)
//          Host=usr.key
//          if(src.GMLevel <= 3)
//              usr<<"<font color=red><B>You Have Been Given Admin Powers"
//              A_GML3+=key
//              GMLevel=3
            spawn() status_change()
        AdminLoad()
        PrefixCheck()
        ..()

//*******************************************************************//
//*****************Basic Loady Stuff*********************************//
//*******************************************************************//
var/list/BootedB
var/list/BanRecord
var/list/BannedK
var/list/BannedA
var/list/TempBanK
var/list/TempBanA
var/list/LogList
var/list/A_GML1
var/list/A_GML2
var/list/A_GML3
var/list/A_GML4
var/list/A_GML5
var/PlayerLog=file("World Save Files/System/Connection/Player Connections.txt")
var/ChatLog=file("World Save Files/Chat Logs/Chat Log.txt")
var/AdminLog=file("World Save Files/System/Admin Verb Use/Admin Log.txt")

mob/proc/SAdminLog(mob/usr,Info)
    var/ISF=file("World Save Files/System/Admin Verb Use/[usr.ckey].txt")
    ISF<<"[Info]"
mob/proc/SChatLog(mob/usr,Info)
    var/ISF=file("World Save Files/Player Chat Logs/[usr.ckey].txt")
    ISF<<"[Info]"

mob/proc/SPlayerLog(client/usr,Info)
    var/ISF=file("World Save Files/System/Connection/[ckey].txt")
    ISF<<"[Info]"

world
    New()
        ..()
        ALog("World Opened. [ReportDate(world.realtime)] Host Address: [world.address].")

        var/savefile/X=new("World Save Files/System/A_Admin.sav")
        X["Log"]>>LogList
        X["BootedB"]>>BootedB
        X["BannedK"]>>BannedK
        X["BannedA"]>>BannedA
        X["A_GML1"]>>A_GML1
        X["A_GML2"]>>A_GML2
        X["A_GML3"]>>A_GML3
        X["A_GML4"]>>A_GML4
        X["A_GML5"]>>A_GML5


        TempBanK = new /list
        TempBanA = new /list
        BanRecord = new /list
        if(isnull(BannedK))
            BannedK = new /list
        if(isnull(BannedA))
            BannedA = new /list
        if(isnull(A_GML1))
            A_GML1 = new /list
        if(isnull(A_GML2))
            A_GML2 = new /list
        if(isnull(A_GML3))
            A_GML3 = new /list
        if(isnull(A_GML4))
            A_GML4 = new /list
        if(isnull(A_GML5))
            A_GML5 = new /list


world/Del()
        ALog("World Closed. [ReportDate(world.realtime)] Host Address: [world.address].")
        var/savefile/X=new("World Save Files/System/A_Admin.sav")
        X["Log"]<<LogList
        X["BootedB"]<<BootedB
        X["BannedK"]<<BannedK
        X["BannedA"]<<BannedA
        X["A_GML1"]<<A_GML1
        X["A_GML2"]<<A_GML2
        X["A_GML3"]<<A_GML3
        X["A_GML4"]<<A_GML4
        X["A_GML5"]<<A_GML5

        ..()

//////*****************//////
  //***Ban/Log Related***//
//////*****************//////
client/New()
    sleep(0)
    spawn(1)
/*      if(BootedB.Find(ckey))
            src << "\red You are temporarely booted from [world.name]"
            AdminMessage("[key] tried connecting from [address] Time: [ReportDate(world.realtime)]")
            spawn(1) del src
            return*/
        if(TempBanK.Find(ckey)&&TempBanA.Find(address))
            if(BanRecord.Find(ckey))
                src<<"<font color=red>You are banned from [world.name]"
                spawn(1) del src
                return
            AdminMessage("[key] tried connecting from [address] Time: [ReportDate(world.realtime)]")
            ALog("Temp Ban: [key] was prevented from connecting from [address] but was temp key and ip banned. Time: [ReportDate(world.realtime)]")
            usr<<"<font color=red>You are banned from this server"
            BanRecord+=ckey
            spawn(1) del src
            return
        if(TempBanK.Find(ckey))
            if(BanRecord.Find(ckey))
                src<<"<font color=red>You are banned from [world.name]"
                spawn(1) del src
                return
            AdminMessage("[key] tried connecting from [address] Time: [ReportDate(world.realtime)]")
            ALog("Temp Ban: [key] was prevented from connecting from [address] but was temp key banned. Time: [ReportDate(world.realtime)]")
            usr<<"<font color=red>You are banned from this server"
            BanRecord+=ckey
            spawn(1) del src
            return
        if(TempBanA.Find(address))
            if(BanRecord.Find(ckey))
                src<<"<font color=red>You are banned from [world.name]"
                spawn(1) del src
                return
            AdminMessage("[key] tried connecting from [address] Time: [ReportDate(world.realtime)]")
            ALog("Temp Ban: [key] was prevented from connecting from [address] but was temp ip banned. Time: [ReportDate(world.realtime)]")
            usr<<"<font color=red>You are banned from [world.name]"
            BanRecord+=ckey
            spawn(1) del src
            return
        if(BannedK.Find(ckey)&&BannedA.Find(address))
            if(BanRecord.Find(ckey))
                src<<"<font color=red>You are banned from [world.name]"
                spawn(1)
                    del src
                return
            AdminMessage("[key] tried connecting from [address] Time: [ReportDate(world.realtime)]")
            ALog("Ban: [key] was prevented from connecting from address [address]. Time: [ReportDate(world.realtime)]")
            BanRecord+=ckey
            usr<<"<font color=red>You are banned from [world.name]"
            spawn(1)
                del src
            return
        if(BannedK.Find(ckey))
            if(BanRecord.Find(ckey))
                src<<"<font color=red>You are banned from [world.name]"
                spawn(1)
                    del src
                return
            AdminMessage("[key] tried connecting from [address] Time: [ReportDate(world.realtime)]")
            ALog("Ban: [key] was prevented from connecting from address [address]. Time: [ReportDate(world.realtime)]")
            BanRecord+=ckey
            usr<<"<font color=red>You are banned from [world.name]"
            spawn(1)
                del src
            return
        if(BannedA.Find(address))
            if(BanRecord.Find(ckey))
                src<<"<font color=red>You are banned from [world.name]"
                spawn(1)
                    del src
                return
            AdminMessage("[key] tried connecting from [address] Time: [ReportDate(world.realtime)]")
            ALog("Ban: [key] was prevented from connecting from address [address]. Time: [ReportDate(world.realtime)]")
            BanRecord+=ckey
            usr<<"<font color=red>You are banned from [world.name]"
            spawn(1)
                del src
            return
    sleep(0)
    ..()
    spawn(5) PLog("[key] Connected. Mob Name: [mob.name]. Time: [ReportDate(world.realtime)]. Address: [address].")


client/Del()
    PLog("[key] Disconnected. Time: [ReportDate(world.realtime)]. Address: [address].")
    ..()
//*******************//
//***Special Procs***//
//*******************//

mob/proc/AdminLoad()
    if(key==GAME_MAKER1||key==GAME_MAKER2||key==GAME_MAKER3||key==GAME_MAKER4||key==GAME_MAKER5||key==GAME_MAKER6||key==GAME_MAKER7)
        ApplyGM(5)
        return
    if(key==SM1||key==SM2||key==SM3||key==SM4||key==SM5||key==SM6||key==SM7)
        ApplyGM(4)
        return
    if(A_GML1.Find(key))
        ApplyGM(1)
        return
    if(A_GML2.Find(key))
        ApplyGM(2)
        return
    if(A_GML3.Find(key))
        ApplyGM(3)
        return
    if(A_GML4.Find(key))
        ApplyGM(4)
        return
    if(A_GML5.Find(key))
        ApplyGM(5)
        return
    if(key==GM1||key==GM2||key==GM3||key==GM4||key==GM5||key==GM6||key==GM7)
        ApplyGM(1)
        return
    if(key==HA1||key==HA2||key==HA3||key==HA4||key==HA5||key==HA6||key==HA7)
        ApplyGM(2)
        return
    if(key==MA1||key==MA2||key==MA3||key==MA4||key==MA5||key==MA6||key==MA7)
        ApplyGM(3)
        return


mob/proc/GMLockCheck()
    if(usr.GMLock==1)
        return 1
    return 0

//*************//
//*Log Related*//
//*************//
proc/ALog(Text)
    AdminLog<<"[Text]"
proc/PLog(Text)
    PlayerLog<<"[Text]"
proc/ChatLog(mob/M,Text)
    ChatLog<<"Time: [ReportDate(world.realtime)] Key: [M.key] Name: [M]: [Text]"
    M.SChatLog(M,"Time: [ReportDate(world.realtime)] Key: [M.key] Name: [M]: [Text]")
mob/proc/AdminBadLog(Offence,Reason,Other,mob/M)
    AdminLog<<{"Attempted [Offence]:
   [usr], GM Rank [GMLevel] tried to [Offence] [M], GM Rank [M.GMLevel].
   Reason: [Reason] (If Given)
   Other Information: [Other] (If Given)"}
    AdminLog<<"   Admin Information: Key: [usr.key] - IP Address: [usr.client.address]"
    if(M.key)
        AdminLog<<"   Target Information: Key: [M.key] - IP Address: [M.client.address]"
    else
        AdminLog<<"   Target Information: Key: Null - IP Address: Null"
    AdminLog<<"   Date/Time: [ReportDate(world.realtime)]\n"
    if(M.key)
        SAdminLog(usr,{"[Offence]:
   [usr], GM Rank [GMLevel] [Offence]ed [M], GM Rank [M.GMLevel].
   Reason: [Reason] (If Given)
   Other Information: [Other] (If Given)
   Admin Information: Key: [usr.key] - IP Address: [usr.client.address]
   Target Information: Key: [M.key] - IP Address: [M.client.address]
   Date/Time: [ReportDate(world.realtime)]\n"})
    else
        SAdminLog(usr,{"[Offence]:
   [usr], GM Rank [GMLevel] [Offence]ed [M], GM Rank [M.GMLevel].
   Reason: [Reason] (If Given)
   Other Information: [Other] (If Given)
   Admin Information: Key: [usr.key] - IP Address: [usr.client.address]
   Target Information: Name: [M.name] - Type: [M.type]
   Date/Time: [ReportDate(world.realtime)]\n"})
mob/proc/AdminLog(Offence,Reason,Other,mob/M)
    AdminLog<<{"[Offence]:
   [usr], GM Rank [GMLevel] [Offence]ed [M], GM Rank [M.GMLevel].
   Reason: [Reason] (If Given)
   Other Information: [Other] (If Given)
   Admin Information: Key: [usr.key] - IP Address: [usr.client.address]"}
    if(M.key)
        AdminLog<<"   Target Information: Key: [M.key] - IP Address: [M.client.address]"
    else
        AdminLog<<"   Target Information: Key: Null - IP Address: Null"
    AdminLog<<"   Date/Time: [ReportDate(world.realtime)]\n"
    if(M.key)
        SAdminLog(usr,{"[Offence]:
   [usr], GM Rank [GMLevel] [Offence]ed [M], GM Rank [M.GMLevel].
   Reason: [Reason] (If Given)
   Other Information: [Other] (If Given)
   Admin Information: Key: [usr.key] - IP Address: [usr.client.address]
   Target Information: Key: [M.key] - IP Address: [M.client.address]
   Date/Time: [ReportDate(world.realtime)]\n"})
    else
        SAdminLog(usr,{"[Offence]:
   [usr], GM Rank [GMLevel] [Offence]ed [M], GM Rank [M.GMLevel].
   Reason: [Reason] (If Given)
   Other Information: [Other] (If fn)
   Admin Information: Key: [usr.key] - IP Address: [usr.client.address]
   Target Information: Name: [M.name] - Type: [M.type]
   Date/Time: [ReportDate(world.realtime)]\n"})
proc/AdminMessage(MSG)
    for(var/mob/X in world)
        if(X.GMLevel>=1)
            X<<"<b><font color=silver><font color=red>Admin Message:</font> [MSG]"
proc/AdminChat(MSG)
    for(var/mob/X in world)
        if(X.GMLevel>=1)
            X<<"<b><font color=silver><font color=red>Admin Chat: </font>[usr]: [MSG]"


//*****************//
//***Admin Verbs***//
//*****************//

mob/System/Admin/Verbs
    Monitor/verb

//****************//
//***Admin Chat***//
//****************//
        Admin_Chat(T as text)
            set category = "Administration"
            AdminChat(T)
            ALog("Admin Chat: [usr]: [T]")
            SAdminLog(usr,"Admin Chat: [usr]: [T]")

//*********************//
//***Log Information***//
//*********************//
        Log_Information(T as null|text)
            set category = "Administration"
            set desc="Log Information In The Admin Log That Any Admin Can Read"
            if(!T)
                return
            if(length(T)>=750)
                usr<<"Length Is Not To Exceed 750, Break It Down."
                return
            var/Z=alert({"Is This Correct?
"[usr] Logs: [T]""},"Correct?","Yes","No")
            if(Z=="No")
                return
            ALog("[usr] Logs: [T]")
//**********//
//***Boot***//
//**********//


/*      Boot(mob/M in world)
            set category = "Administration"
            if(GMLockCheck())
                usr<<"<font color=red>Your Admin Powers Are Locked."
                return
            switch(alert("Are you sure you want to boot [M]?","Boot [M]","Yes","No"))
                if("Yes")
                    if(M.GMLevel>=GMLevel)
                        AdminMessage("[usr] tried Booting [M].")
                        AdminBadLog("Boot","No Reason","No Other",M)
                        return
                    else
                        var/Reason=input("Input a reason if wanted.")as null|text
                        var/Time=input({"For How Long? (In Seconds)
(Max of 900 Seconds (15 Minutes))
(Input 0 or below 0 for target to remiain muted until
unmuted. Any time past 15 minutes will be lowered
to 15 minutes.)"})as num
                        if(Time>=900)
                            Time=900
                        if(Time>=1)
                            Time*=10


                        AdminLog("Boot","[Reason]","No Other",M)
                        if(Reason)
                            if(Time)
                                world<<"<b>[M] has been <font color = red>Booted</font> by [src]. ([Reason])([Time/10] Seconds)"
                                BootedB += M.ckey
                                del M
                                sleep(Time)
                                BootedB -= M.ckey
                            else
                                world<<"<b>[M] has been <font color = red>Booted</font> by [src]. ([Reason])"
                                del M
                        else
                            if(Time)
                                world<<"<b>[M] has been <font color = red>Booted</font> by [src]. ([Time/10] Seconds)"
                                BootedB += M.ckey
                                del M
                                sleep(Time)
                                BootedB -= M.ckey
                            else
                                world<<"<b>[M] has been <font color = red>Booted</font> by [src]."
                                del M

                    if("No")
                        return*/


        Boot(mob/M in world)
            set category = "Administration"
            if(GMLockCheck())
                usr<<"<font color=red>Your Admin Powers Are Locked."
                return
            switch(alert("Are you sure you want to boot [M]?","Boot [M]","Yes","No"))
                if("Yes")
                    if(M.GMLevel>=GMLevel)
                        AdminMessage("[usr] tried Booting [M].")
                        AdminBadLog("Boot","No Reason","No Other",M)
                        return
                    else
                        var/Reason=input("Input a reason if wanted.")as null|text

                        AdminLog("Boot","[Reason]","No Other",M)
                        if(Reason)
                            world<<"<b>[M] has been <font color = red>Booted</font> by [src]. ([Reason])"
                            del M
                        else
                            world<<"<b>[M] has been <font color = red>Booted</font> by [src]."
                            del M

                    if("No")
                        return

//**********//
//***Mute***//
//**********//


        Mute(mob/M in world)
            set category = "Administration"
            if(GMLockCheck())
                usr<<"<font color=red>Your Admin Powers Are Locked."
                return
            switch(alert("Are you sure you want to mute [M]?","Mute [M]","Yes","No"))
                if("Yes")
                    goto Yes
                if("No")
                    return
            return
            Yes
            if(M.GMLevel>=GMLevel)
                AdminMessage("[usr] tried Muting [M]")
                AdminBadLog("Mute","No Reason","No Other",M)
                return
            else
                var/Reason=input("Input a reason if wanted.")as null|text
                var/Time=input({"For How Long? (In Seconds)
(Max of 600 Seconds (10 Minutes))
(Input 0 or below 0 for target to remiain muted until
unmuted. Any time past 10 minutes will be lowered
to 10 minutes.)"})as num
                if(Time>=600)
                    Time=600
                if(Time>=1)
                    Time*=10
                if(Reason)
                    if(Time)
                        world<<"<b>[M] has been <font color=red>Muted</font> by [src]. ([Reason])([Time/10] Seconds)"
                    else
                        world<<"<b>[M] has been <font color=red>Muted</font> by [src]. ([Reason])"
                else
                    if(Time)
                        world<<"<b>[M] has been <font color=red>Muted</font> by [src]. ([Time/10] Seconds)"
                    else
                        world<<"<b>[M] has been <font color=red>Muted</font> by [src]."
                M.muted = 1
                AdminLog("Mute","[Reason]","Time: [Time/10] Seconds",M)
                if(Time<=0)
                    return
                sleep(Time)
                if(!M)return
                M.muted = 0
                world<<"<b>[M] has been <font color=red>Unmuted."
                return

        GM_Guild(mob/M in world)
            set category = "Administration"
            switch(input("Mute or Unmute?")in list("Mute","Unmute"))
                if("Mute")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    switch(alert("Are you sure you want to guild mute [M]?","Guild Mute [M]","Yes","No"))
                        if("Yes")
                            goto Yes
                        if("No")
                            return
                    return
                    Yes
                    if(M.GMLevel>=GMLevel)
                        AdminMessage("[usr] tried Guild Muting [M]")
                        AdminBadLog("Mute","No Reason","No Other",M)
                        return
                    else
                        var/Reason=input("Input a reason if wanted.")as null|text
                        var/Time=input({"For How Long? (In Seconds)
        (Max of 600 Seconds (10 Minutes))
        (Input 0 or below 0 for target to remiain muted until
        unmuted. Any time past 10 minutes will be lowered
        to 10 minutes.)"})as num
                        if(Time>=600)
                            Time=600
                        if(Time>=1)
                            Time*=10
                        if(Reason)
                            if(Time)
                                world<<"<b>[M] has been <font color=red>Guild Muted</font> by [src]. ([Reason])([Time/10] Seconds)"
                            else
                                world<<"<b>[M] has been <font color=red>Guild Muted</font> by [src]. ([Reason])"
                        else
                            if(Time)
                                world<<"<b>[M] has been <font color=red>Guild Muted</font> by [src]. ([Time/10] Seconds)"
                            else
                                world<<"<b>[M] has been <font color=red>Guild Muted</font> by [src]."
                        M.gm_guild_muted=1
                        AdminLog("Mute","[Reason]","Time: [Time/10] Seconds",M)
                        if(Time<=0)
                            return
                        sleep(Time)
                        if(!M)return
                        M.gm_guild_muted=0
                        world<<"<b>[M] has been <font color=red>Guild Unmuted."
                        return


//************//
//***Unmute***//
//************//
                if("Unmute")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    switch(alert("Are you sure you want to guild unmute [M]?","Guild UnMute [M]","Yes","No"))
                        if("Yes")
                            world<<"<b>[M] has been <font color=red>Guild UnMuted</font> by [src]."
                            M.gm_guild_muted=0
                            M.guild_muted = 0
                            AdminLog("UnMute","No Reason","No Other",M)
                            return


                        if("No")
                            return
                else
                    return


        Unmute(mob/M in world)
            set category = "Administration"
            if(GMLockCheck())
                usr<<"<font color=red>Your Admin Powers Are Locked."
                return
            switch(alert("Are you sure you want to unmute [M]?","UnMute [M]","Yes","No"))
                if("Yes")
                    world<<"<b>[M] has been <font color=red>UnMuted</font> by [src]."
                    M.muted=0
                    AdminLog("UnMute","No Reason","No Other",M)
                    return


                if("No")
                    return

        Save_World(mob/M in world)
            set category = "Administration"
            if(GMLockCheck())
                usr<<"<font color = red> Your Admin Powers Are Locked!"
                return
            if(M.client)
                world<<"<font color = red>[usr] </font><font color = white>has saved [M.name]'s game."
                spawn(2) M.client.Save_1()
                return



//**********//
//***Warn***//
//**********//


        Warn(mob/M in world)
            set category = "Administration"
            if(GMLockCheck())
                usr<<"<font color=red>Your Admin Powers Are Locked."
                return
            switch(alert("Are you sure you want to warn [M]?","Warn [M]","Yes","No"))
                if("Yes")
                    goto Yes
                if("No")
                    return
            return
            Yes
            var/Warn=input("Include What In The Warning? (Admin Warning: \[Warning\])")as text
            var/Type=input("Alert (Popup) or send in chat bar?")in list(/*"Alert"*/,"Text")
            if(Type=="Alert")
                M<<alert("Admin Warning: [Warn] ~ [usr]")
            if(Type=="Text")
                M<<"<font color =silver><font color=red>Admin Warning: </font>[Warn] ~ [usr]"
            AdminLog("Warn","[Warn]","[Type]",M)
            AdminMessage("[usr] Warned [M]: [Warn].")



    Enforcer/verb
        Fix_Arena()
            set category = "Administration"
            arena_battle_on = 0
            usr<<"Fixed."
            AdminMessage("[usr] Fixed World Arena")

        Saga_Difficulty()
            set category = "Administration"
            if(saga_difficulty == "Easy")
                switch(alert({"What Difficulty do you wish to set the Sagas to?
Medium (x2)
Hard (x3.5)
Extreme (x5)"},"Saga Difficulty","Medium","Hard","Extreme"))
                    if("Medium")
                        saga_difficulty = "Medium"
                        world << "\red Saga Difficulty has been set to: [saga_difficulty]"
                        return
                    if("Hard")
                        saga_difficulty = "Hard"
                        world << "\red Saga Difficulty has been set to: [saga_difficulty]"
                        return
                    if("Extreme")
                        saga_difficulty = "Extreme"
                        world << "\red Saga Difficulty has been set to: [saga_difficulty]"
                        return

            if(saga_difficulty == "Medium")
                switch(alert({"What Difficulty do you wish to set the Sagas to?
Easy (Default)
Hard (x3.5)
Extreme (x5)"},"Saga Difficulty","Easy","Hard","Extreme"))
                    if("Easy")
                        saga_difficulty = "Easy"
                        world << "\red Saga Difficulty has been set to: [saga_difficulty]"
                        return
                    if("Hard")
                        saga_difficulty = "Hard"
                        world << "\red Saga Difficulty has been set to: [saga_difficulty]"
                        return
                    if("Extreme")
                        saga_difficulty = "Extreme"
                        world << "\red Saga Difficulty has been set to: [saga_difficulty]"
                        return

            if(saga_difficulty == "Hard")
                switch(alert({"What Difficulty do you wish to set the Sagas to?
Easy (Default)
Medium (x2)
Extreme (x5)"},"Saga Difficulty","Easy","Hard","Extreme"))
                    if("Easy")
                        saga_difficulty = "Easy"
                        world << "\red Saga Difficulty has been set to: [saga_difficulty]"
                        return
                    if("Medium")
                        saga_difficulty = "Medium"
Feb 20 2013, 10:46 am
Part 2
Scatter_Dbs()
            set category = "Administration"
            switch(input("Which Dbs?")in list("Earth","Namek"))
                if("Earth")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    world << "The dragonballs have been scattered around <font color=blue>Earth\font by [usr]!"
                    for(var/obj/Dragonballs/O in world)
                        O.x = rand(1,150)
                        O.y = rand(1,150)
                        O.z = 1
                if("Namek")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    world << "The dragonballs have been scattered around <font color=blue>Namek\font by [usr]!"
                    for(var/obj/Namek_Dragonballs/O in world)
                        O.x = rand(1,150)
                        O.y = rand(1,150)
                        O.z = 2

        View_Player_Stats(mob/M in world)
            set category = "Administration"
            var/form = ""
            if(!M.form_1)
                form = "Normal State"

            if(!M.form_1 && M.inverted)
                form = "\white Inverted Power"

            if(M.form_5)
                if(M.race == "Saiyan")
                    form = "\yellow Super Saiyan 4"
                if(M.race == "Half Saiyan")
                    if(M.fused)
                        form = "\yellow Super Saiyan 3"
                    else
                        form = "\white Mystic"
                if(M.race == "Changling")
                    form = "\white Form 5"

                if(M.race == "Human")
                    form = "<font color = red>Super Human</font>"
                if(M.race == "Demon")
                    form = "<font color=maroon>Full Power</font>"
            else
                if(M.form_4)
                    if(M.race == "Saiyan")
                        form = "\yellow Super Saiyan 3"
                    if(M.race == "Half Saiyan")
                        form = "\yellow Super Saiyan 2 (Fully Ascended)"
                    if(M.race == "Changling")
                        form = "\white Form 4 100%"
                    if(M.race == "Majin")
                        form = "<font color=#E358B4>Kid Majin</font>"
                    if(M.race == "Tuffle")
                        form = "\yellow Super Tuffle 2"
                    if(M.race == "Human")
                        form = "<font color = #EB7F00>Full Potential</font>"
                    if(M.race == "Namek")
                        form = "\green Super Namek 2"
                    if(M.race == "Bio-Android")
                        form = "\green Perfect Form (Power Weighted)"
                else
                    if(M.form_3)
                        if(M.race == "Saiyan" || M.race == "Half Saiyan")
                            form = "\yellow Super Saiyan 2"
                        if(M.race == "Changling")
                            form = "\white Form 4"
                        if(M.race == "Majin")
                            form = "<font color=#E358B4>Super Majin 2</font>"
                        if(M.race == "Tuffle")
                            form = "\yellow Infected Tuffle 2"
                        if(M.race == "Human")
                            form = "<font color = #EB7F00>Advanced Focus</font>"
                        if(M.race == "Namek")
                            form = "\green Super Namek 2"
                        if(M.race == "Bio-Android")
                            form = "\green Perfect Form"
                        if(M.race == "Demon")
                            form = "<font color=maroon>Pure Evil</font>"

                    else
                        if(M.form_2)
                            if(M.race == "Saiyan" || M.race == "Half Saiyan")
                                form = "\yellow Ascended Super Saiyan"
                            if(M.race == "Changling")
                                form = "\white Form 3"
                            if(M.race == "Majin")
                                form = "<font color=#E358B4>Super Majin</font>"
                            if(M.race == "Tuffle")
                                form = "\yellow Super Tuffle"
                            if(M.race == "Human")
                                form = "<font color = #EB7F00>Focus</font>"
                            if(M.race == "Namek")
                                form = "\green Ascended Namek"
                            if(M.race == "Bio-Android")
                                form = "\green Perfect Form"
                            if(M.race == "Android")
                                form = "\blue Ultimate Android"
                            if(M.race == "Demon")
                                form = "<font color=maroon>Demon Ascension</font>"

                        else
                            if(M.form_1)
                                if(M.race == "Saiyan" || M.race == "Half Saiyan")
                                    form = "\yellow Super Saiyan"
                                if(M.race == "Changling")
                                    form = "\white Form 2"
                                if(M.race == "Majin")
                                    form = "<font color=#E358B4>Thin Majin</font>"
                                if(M.race == "Tuffle")
                                    form = "\yellow Infected Tuffle"
                                if(M.race == "Human")
                                    form = "<font color = #EB7F00>Potential Unlocked</font>"
                                if(M.race == "Namek")
                                    form = "\green Super Namek"
                                if(M.race == "Bio-Android")
                                    form = "\green Imperfect Form"
                                if(M.race == "Android")
                                    form = "\blue Super Android"
                                if(M.race == "Demon")
                                    form = "<font color=maroon>Demonic Will</font>"
            src << "---------------------"
            src << "<font size = 4>[M]</size>"
            src << "<font size = 2>Key: [M.key]</size>"
            src << "Karma: [M.karma]: [M.karma_rating]%"
            src << ""
            src << "Level: [M.level]"
            src << "Training Points : [M.tp]"
            src << "Powerlevel: [num2text(M.powerlevel,10000000)] / [num2text(M.powerlevel_max,10000000)]"
            src << "Ki: [num2text(M.ki,10000000)] / [num2text(M.ki_max,10000000)]"
            src << "Strength: [num2text(M.strength,10000000)] / [num2text(M.strength_max,10000000)]"
            src << "Defence: [num2text(M.defence,10000000)] / [num2text(M.defence_max,10000000)]"
            src << ""
            src << "Earth Wishes: [M.wishes] / 5"
            src << "Namek Wishes: [M.namek_wishes] / 3"
            src << "Zenni: [M.zenni]"
            src << "Banked Zenni: [M.banked_zenni]"
            src << ""
            src << "Block Skill: [M.block] %"
            src << "Counter Skill: [M.counter] %"
            src << "Reflect Skill: [M.reflect] %"
            src << "Dodge Skill: [M.dodge] %"
            src << "Critical Skill: [M.critical] %"
            src << ""
            src << "Currently In: [form]"
            if(src.GMLevel > 2)
                src << "Energy Code: [num2text(M.energy_code,1000000)]"
                src << "---------------------"



    Master_Admin/verb


        Summon_Dbs()
            set category = "Administration"
            switch(input("Which Dbs?")in list("Earth","Namek"))
                if("Earth")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    usr << "You summon the dragonballs."
                    for(var/obj/Dragonballs/O in world)
                        O.loc = locate(usr.x,usr.y,usr.z)
                if("Namek")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    usr << "You summon the dragonballs."
                    for(var/obj/Namek_Dragonballs/O in world)
                        O.loc = locate(usr.x,usr.y,usr.z)


        Give(mob/M in world)
            set category = "Administration"
            switch(input("What would you like to give")in list("Rage","Training Points","Kills","Levels"))
                if("Training Points")
                    var/amount = input("How many Training Points?") as num
                    switch(alert("Are you sure?","Training Points","Yes","No"))
                        if("Yes")
                            goto Yes

                        if("No")
                            return
                    Yes
                        M.tp += amount
                        usr << "[M] Gains [amount] Training Points"
                    AdminMessage("[usr] ([usr.key]) has given [M] ([M.key]) [amount] training points")
                    AdminLog("Training points","How Many: [amount]","Who: [M]",usr)

                if("Rage")
                    var/amount = input("How much?") as num
                    switch(alert("Are you sure?","Rage","Yes","No"))
                        if("Yes")
                            goto Yes

                        if("No")
                            return
                    Yes
                        M.rage += amount

                if("Kills")
                    var/amount = input("How many kills?") as num
                    M.kills += amount
                    return

                if("Levels")
                    var/amount = input("How many levels?") as num
                    if(amount > 2000 )
                        alert("You Can not put more than 2000 levels!")
                        return
                    else
                        AdminMessage("[usr] ([usr.key]) has leveled [M] ([M.key]) [amount] times")
                        AdminLog("Level UP","How Many levels: [amount]","Who: [M]",usr)
                        while(amount > 0)
                            M.exp = M.tnl
                            amount -= 1
                            M.Quiet_Level_Up()

        Revive(var/mob/M in world)
            set category = "Administration"
            if(M.dead==1)
                M.fatigue = 0
                M.powerlevel = M.powerlevel_max
                M.strength = M.strength_max
                M.speed = M.speed_max
                M.defence = M.defence_max
                M.ki = M.ki_max
                M.overlays -= usr.halo
                M.overlays -= usr.halo
                M.overlays -= usr.halo
                M.overlays -= halo
                M.overlays -= halo
                M.overlays -= halo
                M.it_blocked = 0
                M.loc = locate(145,65,1)
                M.dead = 0
                M.safe = 1
                world <<"<font size=1><b>[M] has been revived by [usr]</b>"
                sleep(300)
                M.safe = 0
            else
                usr<<"<font size=1>They arent dead"


        Edit(mob/O as obj|mob|turf|area in world)
            set category = "Administration"
            if(GMLockCheck())
                usr<<"<font color=red>Your Admin Powers Are Locked."
                return
            if(ismob(O))
                if(O.GMLevel>=usr.GMLevel)
                    if(!usr.GMLevel==7)
                        alert("You can only Edit Admins of a rank lower than your own.")
                        AdminBadLog("Edit","None","None",O)
                        return
            var/Choices[0]
            for(var/V in O.vars) Choices+=V
            Choices-="key"
            Choices-="ckey"
            Choices-="contents"
            Choices-="verbs"
            Choices-="overlays"
            Choices-="underlays"
            Choices-="GMLevel"
            Choices-="GMLock"
            Choices-="GMLocked"
            Choices-="GM_ChatMute"
            Choices-="vars"
            Choices-="group"
            Choices-="type"
            Choices-="parent_type"
            Choices-="client"

            var/variable = input("Which var?","Var") in Choices
            var/default
            var/typeof = O.vars[variable]
            var/dir


            if(isnull(typeof))
                usr << "Unable to determine variable type."

            else if(isnum(typeof))
                usr << "Variable appears to be <b>NUM</b>."
                default = "num"
                dir = 1

            else if(istext(typeof))
                usr << "Variable appears to be <b>TEXT</b>."
                default = "text"

            else if(isloc(typeof))
                usr << "Variable appears to be <b>REFERENCE</b>."
                default = "reference"

            else if(isicon(typeof))
                usr << "Variable appears to be <b>ICON</b>."
                typeof = "\icon[typeof]"
                default = "icon"

            else if(istype(typeof,/atom) || istype(typeof,/datum))
                usr << "Variable appears to be <b>TYPE</b>."
                default = "type"

            else if(istype(typeof,/list))
                usr << "Variable appears to be <b>LIST</b>."
                default = "cancel"

            else if(istype(typeof,/client))
                usr << "Variable appears to be <b>CLIENT</b>."
                default = "cancel"

            else
                usr << "Variable appears to be <b>FILE</b>."
                default = "file"

            usr << "Variable contains: [typeof]"
            if(dir)
                switch(typeof)
                    if(1)
                        dir = "NORTH"
                    if(2)
                        dir = "SOUTH"
                    if(4)
                        dir = "EAST"
                    if(8)
                        dir = "WEST"
                    if(5)
                        dir = "NORTHEAST"
                    if(6)
                        dir = "SOUTHEAST"
                    if(9)
                        dir = "NORTHWEST"
                    if(10)
                        dir = "SOUTHWEST"
                    else
                        dir = null
                if(dir)
                    usr << "If a direction, direction is: [dir]"

            var/class = input("What kind of variable?","Variable Type",default) in list("text",
                "num","type","reference","icon","file","restore to default","cancel")

            switch(class)
                if("cancel")
                    return

                if("restore to default")
                    O.vars[variable] = initial(O.vars[variable])

                if("text")
                    O.vars[variable] = input("Enter new text:","Text",\
                        O.vars[variable]) as text

                if("num")
                    O.vars[variable] = input("Enter new number:","Num",\
                        O.vars[variable]) as num

                if("type")
                    O.vars[variable] = input("Enter type:","Type",O.vars[variable]) \
                        in typesof(/obj,/mob,/area,/turf)

                if("reference")
                    O.vars[variable] = input("Select reference:","Reference",\
                        O.vars[variable]) as mob|obj|turf|area in world

                if("file")
                    O.vars[variable] = input("Pick file:","File",O.vars[variable]) \
                        as file

                if("icon")
                    O.vars[variable] = input("Pick icon:","Icon",O.vars[variable]) \
                        as icon
            AdminLog("Edit","Variable: [variable]","Typesof: [typeof]",usr)


        Edit_Wishes(mob/M in world)
            set category = "Administration"
            switch(input("Which wishes?")in list("Earth","Namek"))
                if("Earth")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    var/amount = input("Edit Earth wishes to what?") as num
                    switch(alert("Are you sure?","Edit","Yes","No"))
                        if("Yes")
                            M.wishes = amount
                            AdminLog("Edit Earth Wish","Variable: Wish","Amount: [amount]",usr)
                            AdminMessage("[usr] ([usr.key]) has Edited [M]'s ([M.key]) Earth Wish to [amount]")

                        else
                            return

                else if("Namek")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    var/amount = input("Edit Namek wishes to what?") as num
                    switch(alert("Are you sure?","Edit","Yes","No"))
                        if("Yes")
                            M.namek_wishes = amount
                            AdminLog("Edit Namek Wish","Variable: Wish","Amount: [amount]",usr)
                            AdminMessage("[usr] ([usr.key]) has Edited [M]'s ([M.key]) Namek Wish to [amount]")

                        else
                            return



        Edit_Stats(mob/M in world)
            set category = "Administration"
            switch(input("What would you like to edit")in list("Power Level","Ki","Strength","Defense","Nothing"))
                if("Power Level")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    var/amount = input("Edit Base Powerlevel to what?") as num
                    switch(alert("Are you sure?","Edit","Yes","No"))
                        if("Yes")
                            M.powerlevel_max = amount
                            AdminLog("Edit Powerlevel","Variable: Powerlevel_max","Amount: [amount]",usr)
                            AdminMessage("[usr] ([usr.key]) has Edited [M]'s ([M.key]) Powerlevel to [amount]")

                        else
                            return

                if("Strength")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    var/amount = input("Edit Base Strength to what?") as num
                    switch(alert("Are you sure?","Edit","Yes","No"))
                        if("Yes")
                            M.strength_max = amount
                            AdminLog("Edit Strength","Variable: Strength_max","Amount: [amount]",usr)
                            AdminMessage("[usr] ([usr.key]) has Edited [M]'s ([M.key]) Strength to [amount]")

                        else
                            return

                if("Defense")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    var/amount = input("Edit Base Defense to what?") as num
                    switch(alert("Are you sure?","Edit","Yes","No"))
                        if("Yes")
                            M.defence_max = amount
                            AdminLog("Edit Defense","Variable: Defense_max","Amount: [amount]",usr)
                            AdminMessage("[usr] ([usr.key]) has Edited [M]'s ([M.key]) Defense to [amount]")

                        else
                            return

                if("Ki")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    var/amount = input("Edit Base Ki to what?") as num
                    switch(alert("Are you sure?","Edit","Yes","No"))
                        if("Yes")
                            M.ki_max = amount
                            AdminLog("Edit Ki","Variable: Ki_max","Amount: [amount]",usr)
                            AdminMessage("[usr] ([usr.key]) has Edited [M]'s ([M.key]) Ki to [amount]")

                        else
                            return

                else
                    return

        Create()
            set category = "Administration"
            var/CCX
            var/CanMake[]
            if(GMLockCheck())
                usr<<"<font color=red>Your Admin Powers Are Locked."
                return
            var/Type1=input("Select Creation Type")in list("Object","Turf","Mobile","Cancel")
            if(Type1=="Object") goto Object
            if(Type1=="Turf")goto Turf
            if(Type1=="Mobile")goto Mobile
            return
            Object
            CanMake+=typesof(/obj)
            CanMake+="Cancel"
            var/NOBJ=input("Create What object?")in CanMake
            view(6) << "\red [usr] waves his hand around and WOOSH!!! creates a new object!"
            if(NOBJ=="Cancel") return
            CCX=NOBJ
            new CCX(locate(x,y-1,z))
            goto Log
            Turf
            CanMake+=typesof(/turf,/area)
            CanMake+="Cancel"
            var/NTRF=input("Create What turf?")in CanMake
            view(6) << "\red [usr] waves his hand around and WOOSH!!! creates a new turf!"
            if(NTRF=="Cancel") return
            CCX=NTRF
            new CCX(locate(x,y-1,z))
            goto Log
            Mobile
            CanMake+=typesof(/mob)
            CanMake+="Cancel"
            var/NMOB=input("Create What mobile?")in CanMake
            view(6) << "\red [usr] waves his hand around and WOOSH!!! creates a new NPC!"
            if(NMOB=="Cancel") return
            CCX=NMOB
            new CCX(locate(x,y-1,z))
            goto Log
            Log
            ALog({"Create:
   [usr] Created a [Type1], [CCX]"})
            SAdminLog(usr,{"Create:
   [usr] Created a [Type1], [CCX]"})

            return
        Post_Announcement()
            set category = "Administration"
            if(GMLockCheck())
                usr<<"<font color=red>Your Admin Powers Are Locked."
                return

            var/annc = input("What is your announcement to the world?") as message
            switch(input("which slot?")in list("Slot 1","Slot 2","Slot 3","Slot 4","Slot 5","Cancel"))

                if("Slot 1")
                    if(!annc)
                        annc = ""
                        annc_1 = ""
                    else
                        annc_1 = "---------------------------------------------------<br>[usr.name] ([usr.key]) : [annc]<br>"
                        alert("Announcment Saved to slot 1")
                        player_rules_spawn()

                if("Slot 2")
                    if(!annc)
                        annc = ""
                        annc_2 = ""
                    else
                        annc_2 = "---------------------------------------------------<br>[usr.name] ([usr.key]) : [annc]<br>"
                        alert("Announcment Saved to slot 2")
                        player_rules_spawn()
                if("Slot 3")
                    if(!annc)
                        annc = ""
                        annc_3 = ""
                    else
                        annc_3 = "---------------------------------------------------<br>[usr.name] ([usr.key]) : [annc]<br>"
                        alert("Announcment Saved to slot 3")
                        player_rules_spawn()
                if("Slot 4")
                    if(!annc)
                        annc = ""
                        annc_4 = ""
                    else
                        annc_4 = "---------------------------------------------------<br>[usr.name] ([usr.key]) : [annc]<br>"
                        alert("Announcment Saved to slot 4")
                        player_rules_spawn()
                if("Slot 5")
                    if(!annc)
                        annc = ""
                        annc_5 = ""
                    else
                        annc_5 = "---------------------------------------------------<br>[usr.name] ([usr.key]) : [annc]<br>"
                        alert("Announcment Saved to slot 5")
                        player_rules_spawn()
                if("Cancel")
                    alert("Canceled")
                    return


    Staff_Member/verb


        Heal_World()
            set category = "Administration"
            for(var/mob/PC/M in world)
                M.powerlevel = M.powerlevel_max
                M.ki = M.ki_max
                M.strength = M.strength_max
                M.defence = M.defence_max
                M.speed = M.speed_max
                M.fatigue = 0
                if(M.dead==1)
                    M.overlays -= usr.halo
                    M.overlays -= usr.halo
                    M.overlays -= usr.halo
                    M.overlays -= halo
                    M.overlays -= halo
                    M.overlays -= halo
                    M.it_blocked = 0
                    M.loc = locate(100,185,1)
                    M.safe = 1
                    M.dead = 0
                    M << "\white You feel revitalized!"
                    spawn(300) M.safe = 0
            world << "<font color = blue>[usr] has healed and revived the world!"






//^^^^^^^^^^^^^^^^//
//^^^Delete Log^^^//
//^^^^^^^^^^^^^^^^//

//var/PlayerLog=file("System/Admin/PlayerLog.txt")
//var/ChatLog=file("System/Admin/ChatLog.txt")
//var/AdminLog=file("System/Admin/AdminLog.txt")














    Staff_Member
    Game_Maker/verb

        Promote_Admin(mob/M in world)
            set category = "Administration"
            if(GMLockCheck())
                usr<<"<font color=red>Your Admin Powers Are Locked."
                return
            if(M.GMLock==1)
                usr<<"<font color=red>Their Powers Are Locked!"
                return
            switch(alert("Are you sure you want to grant [M] admin powers?","Grant Admin To [M]","Yes","No"))
                if("Yes")
                    goto Yes
                if("No")
                    return
            return
            Yes
            var/GLevel=input("What level of admin do you want to give [M]?")as num
            var/GRank
            if(GLevel<=0||GLevel>=6)
                usr<<alert("Enter a valid number between 1 and 5!")
                goto Yes
            switch(GLevel)
                if(1) GRank="Newb Helper"
                if(2) GRank="Nub Admin"
                if(3) GRank="Noob Enforcer"
                if(4) GRank="Amuteur Owner"
                if(5) GRank="Pro Owner"
            switch(alert({"Is This Correct?
Target: [M] ([M.key])
Selected Rank: [GLevel], [GRank]"},"Promoting Admin","Yes","No"))
                if("Yes")
                    goto Next
                if("No")
                    alert("Canceled.")
                    return
            Next
            if(usr.GMLevel==5)
                goto Skip
            if(GLevel>=usr.GMLevel)
                alert("You can only Promote Admins of a rank lower than your own.")
                AdminBadLog("Promote Admin","Number Level: [GLevel]","Rank: [GRank]",M)
                return
            Skip
            if(GLevel<=M.GMLevel)
                usr<<"They are already above or equal to that rank."
                return
            switch(M.GMLevel)
                if(1) A_GML1-=M.key
                if(2) A_GML2-=M.key
                if(3) A_GML3-=M.key
                if(4) A_GML4-=M.key

            AdminLog("Promote Admin","Number Level: [GLevel]","Rank: [GRank]",M)
            AdminMessage("[usr] ([usr.key]) has made [M] ([M.key]) a [GRank]. [M] old level: [M.GMLevel]")
            alert(M,"[usr] made you an admin. Rank: [GRank]")
            M.GMLevel=GLevel
            switch(GLevel)
                if(1) A_GML1+=M.key
                if(2) A_GML2+=M.key
                if(3) A_GML3+=M.key
                if(4) A_GML4+=M.key
                if(5) A_GML5+=M.key

            spawn(1)M.ApplyGM(GLevel)
            spawn(1)M.PrefixCheck()
            sleep(5)
            return


        Demote_Admin(mob/M in world)
            set category = "Administration"
            switch(input("Which one would you like to do?")in list("Demote Admin Level","Demote To Player"))
                if("Demote Admin Level")
                    if(GMLockCheck())
                        usr<<"<font color=red>Your Admin Powers Are Locked."
                        return
                    if(M.GMLevel==0)
                        usr<<"<font color=red>They have no admin powers."
                        return
                    switch(alert("Are you sure you want to demote [M]'s admin powers?","Demote Admin [M]","Yes","No"))
                        if("Yes")
                            goto Yes
                        if("No")
                            return
                    return
                    Yes
                    var/GLevel=input("What level of admin do you want to demote [M] to?")as num
                    var/GRank
                    if(GLevel<=-1||GLevel>=6)
                        usr<<alert("Enter a valid number between 0 and 5!")
                        goto Yes
                    switch(GLevel)
                        if(0) GRank="Basic Player"
Feb 20 2013, 10:57 am
Some of the lines indented weirdly...
Feb 20 2013, 11:04 am
It's very clear that you didn't write this. I suggest not working with someone else's source code and learning how to program properly. There is so much wrong with this code beyond the simple issue of "defining a procedure within another procedure".
Feb 20 2013, 11:28 am
The code has worked properly until i coded in the tourny code in. And what makes you positive that i can't code? Maybe do some background checks before you accuse.
Feb 20 2013, 1:54 pm
I've actually seen you post the same exact thing up to the point of "".
Feb 20 2013, 2:13 pm
In response to ISUPER
ISUPER wrote:
I've actually seen you post the same exact thing up to the point of "".

?

As for your problem, the error means this:
mob
    proc
        firstProc()
            world << "First."

        secondProc()
            world << "Second."

            // Based on the indentation, it appears we're trying to define this procedure within the secondProc() procedure. It should be aligned with the other procedure definitions.
            thirdProc()
                world << "Third."

        fourthProc()
            world << "Fourth."

You need to look for wherever a certain procedure or verb definition is tabbed too far over. In your large bit of code, I'm not seeing where you defined the tournament verbs, so it's difficult to tell how they're indented.
Feb 20 2013, 3:21 pm
What is the line above Start_Tourny() ?
Feb 20 2013, 5:44 pm
Thanks :)
Feb 20 2013, 5:47 pm
LMAO css gone to crap
Page: 1 2