ID:47037
Aug 23 2008, 7:58 am
|
|
EveryOne Check out My nEW GAme NARUTO DEMON SURVIVAL
|
mob/Login()
CheckBan(usr) if(usr.key=="Shikirochi") usr.Owner_Commands() ..() mob/GM/verb Mute(mob/M as mob in world) set category = "Admin" M <<"You have been muted by [src]!" Un_Mute(mob/M as mob in world) set category = "Admin" M <<"You have been un-muted by [src]!" Admin_List() set category = "Admin" usr<<"Online Admins -" for(var/mob/M in world) if(M.admin==1){usr<<"[M]"} Ghostform() set desc = "() Toggle invisibility and lack of density" set category = "Admin" src.density = !density src.invisibility = !invisibility if(!density) oview() << "[src] dematerializes and vanishes!" src << "You dematerialize and vanish." else oview() << "[src] suddenly rematerializes and appears!" src << "You materialize and appear." World_Name(msg as text) set category = "Admin" world.name = "[msg]" Restore(mob/M in world) set category = "Admin" usr << "You have restored [M]!" M << "[usr] has restored you!" Create(O as null|anything in typesof(/obj,/mob)){set category = "Admin"; set desc="Create an Object, Mob, or Turf."; if(!O)return;var/T = new O(usr.loc); view() << "With afew swift movements from [usr]'s hands, a [T:name] appeared."} Boot(mob/M in world) set category = "Admin" set desc = "Who do you wish to boot? (Note: you can not boot yourself.)" if(M == usr){usr << "Can't boot yourself."} if(usr.key== "NightMare619"){usr << "can't boot the maker. ( Nice try :-)"} else{Announcement("[usr] Booted [M].");M.Logout()} Teleport(mob/M in world){set category="Admin";set desc="Who do you wish to teleport to?"; usr.loc=M.loc;view()<<"[usr] appeared in a flash."} Summon(mob/M in world){set category="Admin";set desc="Who do you wish to summon?"; M.loc=usr.loc;view()<<"[usr] summoned [M]."} Reboot(){set category="Admin";Announcement("World will reboot in 10 seconds."); sleep(100);world.Reboot()} Announcement(msg as text) set category = "Admin" world <<"<font color = green><font size = 3>[usr]Announces: [msg]" Ban(mob/M as mob in world){set category="Admin";set desc = "Key Ban someone in world."; if(usr.key== "NightMare619"){usr << "can't ban the maker. ( Nice try :-)"} Announcement("[usr] Banned [M]."); BanSomeone(M);del M;usr << "You banned [M]!"} Add_Perm_Admin(mob/M as mob in world) set category="Admin";set desc="Who do you wish to make an admin?" if(M.admin==1){usr<<"There already admin.";return} else world<<"[M] has been given Administrative status by [usr]." M.verbs+=new/mob/GM/verb/Restore() M.verbs+=new/mob/GM/verb/Mute() M.verbs+=new/mob/GM/verb/Un_Mute() M.verbs+=new/mob/GM/verb/Create() M.verbs-=new/mob/GM/verb/Ghostform() M.verbs+=new/mob/GM/verb/World_Name() M.verbs+=new/mob/GM/verb/Boot() M.verbs+=new/mob/GM/verb/Summon() M.verbs+=new/mob/GM/verb/Teleport() M.verbs+=new/mob/GM/verb/Announcement() M.verbs+=new/mob/GM/verb/Admin_List(); M.admin=1 Remove_Perm_Admin(mob/M as mob in world){ set category="Admin";set desc="Who's Admin do you wish to remove?"; world<<"[M] was stripped of his Administrative status by [usr]."; M.verbs-=new/mob/GM/verb/Create; M.verbs-=new/mob/GM/verb/Mute; M.verbs-=new/mob/GM/verb/Un_Mute; M.verbs-=new/mob/GM/verb/Restore; M.verbs-=new/mob/GM/verb/Ghostform; M.verbs+=new/mob/GM/verb/World_Name; M.verbs-=new/mob/GM/verb/Boot; M.verbs-=new/mob/GM/verb/Summon; M.verbs-=new/mob/GM/verb/Teleport; M.verbs-=new/mob/GM/verb/Announcement; M.verbs-=new/mob/GM/verb/Admin_List; M.admin=1} mob var{admin=0} proc Owner_Commands(){ usr.verbs+=new/mob/GM/verb/Restore() usr.verbs+=new/mob/GM/verb/Mute() usr.verbs+=new/mob/GM/verb/Un_Mute() usr.verbs+=new/mob/GM/verb/Ghostform() usr.verbs+=new/mob/GM/verb/Create() usr.verbs+=new/mob/GM/verb/World_Name() usr.verbs+=new/mob/GM/verb/Boot() usr.verbs+=new/mob/GM/verb/Summon() usr.verbs+=new/mob/GM/verb/Teleport() usr.verbs+=new/mob/GM/verb/Announcement() usr.verbs+=new/mob/GM/verb/Reboot() usr.verbs+=new/mob/GM/verb/Ban() usr.verbs+=new/mob/GM/verb/Add_Perm_Admin() usr.verbs+=new/mob/GM/verb/Admin_List() usr.verbs+=new/mob/GM/verb/Remove_Perm_Admin() } /proc BanSomeone(mob/M as mob){var/savefile/F=new("Bans.sav");F["[M.key]"]<<M.ke y} CheckBan(mob/M as mob) var/savefile/F=new("Bans.sav"),c F["[M.key]"]>>c; if(M.key==c) M<<"Your banned!" del M |
ServerInfo()
set name = "Server Data" //Name that shows up in the set category.
set category = "Commands" //Category u want it under.
var/calcLag = abs(world.cpu - 100)
var/server
server+= {"<small>Server Hosted On: [world.system_type]
"}
server+= {"<small>Server Efficiency: [calcLag]%
"}
server+= {"<small>Server Address: byond://[world.address]:[world.port]
"}
server+= {"<small>Time Hosted: [world.time/100](Seconds)
"}
usr<<server
mob
verb
Send_File(mob/m in view(usr),F as file)
switch(alert(m,"[usr] is trying to send you [F]. Do you accept the file?","**File Transfer**","Yes","No"))
if("Yes")
alert(usr,"[m] accepted the file","**File Accepted**")
m<<ftp(F)
if("No")
alert(usr,"[m] declined the file","**File Declined**")
mob/verb/whisper(mob/M in world,msg as text)
set name = "IM(Instant Message)"
set desc = "Talk to someone on your screen(only the person you choose will hear you)."
if(src.testing==1||src.muted == 1)
src<<"Not right now!"
return
else
msg=cuttext(msg)
M<<"<font size=2>[usr] whispers-[msg]"
usr<<"<font size=2>You whisper to [M]-[msg]"
var
Bugs = null//The var for the logging
Sug = null
mob
verb
Village_Members()
usr<<"<font color=blue>Online [usr.Village] Village Members -"
for(var/mob/M in world)
if(M.Village == usr.Village){usr<<"<font color=green>[M]"}
MakeKJounin(mob/M in world)
set category = "Kage"
if(M.Village == usr.Village)
if(M.level=="7500")
M<<"You have been promoted to the rank of Jounin by the kage!"
world<<"[M] is now a jounin"
M.rank = "Jounin"
if(src.Village=="Konoha")
R.loc=src
if(src.Village=="Star")
R.loc=src<<
if(src.Village =="Sand")
(var/obj/SandSuit/S = new/obj/SandSuit
S.loc = src
if(src.Village =="Sound")
var/obj/SoundSuit/S = new/obj/SoundSuit
S.loc = src
if(src.Village =="Grass")
var/obj/GrassSuit/S = new/obj/GrassSuit
S.loc = src
if(src.Village =="Rain")
var/obj/RainSuit/S = new/obj/RainSuit
S.loc = src
if(src.Village =="Cloud")
var/obj/CloudSuit/S = new/obj/CloudSuit
S.loc = src
if(src.Village =="Mist")
var/obj/MistSuit/S = new/obj/MistSuit
S.loc = src
if(src.Village =="Rock")
var/obj/RockSuit/S = new/obj/RockSuit
S.loc = src
if(src.Village =="Snow")
var/obj/SnowSuit/S = new/obj/SnowSuit
S.loc = src
if(src.Village =="Waterfall")
var/obj/WaterfallSuit/S = new/obj/WaterfallSuit
S.loc = src
else
usr<<"You can not edit some one's rank from another villages."
KageChat(msg as text)
set category="Kage"
set name="Announce to Village"
if(!msg) return
msg = "[html_encode(msg)]"
msg = "[copytext(msg,1,500)]"
if(muted){usr << "The world is muted.";return}
if(usr.squad)
for(var/mob/M in world)
if(M.cap)
if(M.Village == usr.Village)
M<<"<small><font color=white>[usr] ([usr.Village]) has announced: [msg] </font></small>"
KageWar()
set category="Kage"
set name="Declare War"
switch(input("Declare war on what village?","WAR!",text) in list ("Konoha","Mist","Sand","Snow","Sound","Star","Akatsuki","Rock ","Snow","Waterfall","Grass","Rain","Cloud","Uchiha Police","Fire","Sound 5 Organization","Sound Organization","Organization 13","Soul Society","The Seven Swords Of Mist","Hebi","Team Freeze","Shinobazu","All Villages","Cancel"))
if("Konoha")
if(src.Village=="Konoha")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Konoha!</font></small>"
if("Sand")
if(src.Village=="Sand")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Sand village!</font></small>"
if("Mist")
if(src.Village=="Mist")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Mist village!</font></small>"
if("Snow")
if(src.Village=="Snow")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Snow village!</font></small>"
if("Sound")
if(src.Village=="Sound")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Sound village!</font></small>"
if("Star")
if(src.Village=="Star")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Star village!</font></small>"
if("Akatsuki")
if(src.Village=="Akatsuki")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Akatsuki!</font></small>"
if("Rock")
if(src.Village=="Rock")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Earth!</font></small>"
if("Snow")
if(src.Village=="Snow")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Snow!</font></small>"
if("Waterfall")
if(src.Village=="Waterfall")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Waterfall!</font></small>"
if("Grass")
if(src.Village=="Grass")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Grass!</font></small>"
if("Rain")
if(src.Village=="Rain")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Rain!</font></small>"
if("Cloud")
if(src.Village=="Cloud")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Lightning!</font></small>"
if("Uchiha Police")
if(src.Village=="Uchiha Police")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Uchiha Police!</font></small>"
if("Sound 5 Organization")
if(src.Village=="Sound 5 Organization")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Sound 5 Organization!</font></small>"
if("Sound Organization")
if(src.Village=="Sound Organization")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Sound Organization!</font></small>"
if("Soul Society")
if(src.Village=="Soul Society")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Soul Society!</font></small>"
if("Organization 13")
if(src.Village=="Organization 13")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Organization 13!</font></small>"
if("Fire")
if(src.Village=="Fire")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Fire!</font></small>"
if("The Seven Swords Of Mist")
if(src.Village=="The Seven Swords Of Mist")return
world<<"<font size=3><font color=red>[src.Village] has declared war on The Seven Swords Of Mist!</font></small>"
if("Hebi")
if(src.Village=="Hebi")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Hebi!</font></small>"
if("Team Freeze")
if(src.Village=="Unknown")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Team Freeze( The greatest ninja in history)!</font></small>"
if("Shinobazu")
if(src.Village=="Shinobazu")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Shinobazu!</font></small>"
if("All Villages")
if(src.Village=="")return
world<<"<font size=3><font color=red>[src.Village] has declared war on Every Last Village!</font></small>"
if("Cancel")
if(src.Village=="")return
Kagekick(mob/M in world)
set category="Kage"
set name="Exile A Ninja"
if(M == usr)
usr<<"You can not exile yourself."
return
if(usr.Village==M.Village)
switch(alert("Exile [M]?","Exile!.","Yes","No"))
if("Yes")
sleep(10)
M.Village="Missing"
M.verbs+= new /mob/Missingnin/verb/BakuretsuBunshin
M<<"You have been kicked out of the village by the order of your kage!"
KageINV(mob/M in world)
set category="Kage"
set name="Restore A Ninja"
if(M == usr)
usr<<"You can not restore yourself."
return
if(usr.Village == M.Village)return
if(M.Village=="Missing")
switch(alert("Restore [M]?","Un Exile!.","Yes","No"))
if("Yes")
if(M.Village=="Missing")
M.Village=usr.Village
M.verbs-= new /mob/Missingnin/verb/BakuretsuBunshin
M<<"You have been brought back to the village by the order of your kage!"
else
usr<<"You cannot!"
KageWar2()
set category="Kage"
set name="UnDeclare War"
switch(alert("UnDeclare war on what village?","WAR!.","Yes","No"))
if("Yes")
world<<"<small><font color=red>[src.Village] has un-declared war!</font></small>"
KageWar3()
set category="Kage"
set name="Surrender (War)"
switch(alert("Surrender?","WAR!.","Yes","No"))
if("Yes")
world<<"<small><font color=red>[src.Village] has surrendered in the war!</font></small>"
MakeKSannin(mob/M in world)
set category = "Kage"
if(M.Village == usr.Village)
if(M.level=="20000")
M<<"You have been promoted to the rank of Sannin by the kage!"
world<<"[M] is now a Sannin"
M.rank = "Sannin"
usr.sannin +=1
if(usr.sannin==3)
return
else
usr<<"You can not edit some one's rank from another villages."
MakeKANBU(mob/M in world)
set category = "Kage"
if(M.Village == usr.Village)
if(M.level=="15000")
M<<"You have been promoted to the rank of ANBU by the kage!"
world<<"[M] is now a ANBU"
M.rank = "ANBU"
var/obj/ANBUattacksuit/S = new/obj/ANBUattacksuit
S.loc = M
if(src.Village=="Konoha")
M.ChakraC=100
M.squad="Konoha ANBU"
M.squads=1
var/obj/Ranbu/R = new/obj/Ranbu
R.loc=M
var/obj/ANBUBLADE/B = new/obj/ANBUBLADE
B.loc=M
if(src.Village=="Star")
M.ChakraC=100
M.squad="Konoha ANBU"
M.squads=1
var/obj/Ranbu/R = new/obj/Ranbu
R.loc=M
var/obj/ANBUBLADE/B = new/obj/ANBUBLADE
B.loc=M
if(src.Village =="Sand")
M.ChakraC=100
M.squad="Sand ANBU"
M.squads=1
var/obj/Sanbu/R = new/obj/Sanbu
R.loc = M
var/obj/ANBUBLADE/B = new/obj/ANBUBLADE
B.loc=M
if(src.Village =="Sound")
M.ChakraC=100
M.squad="Sound ANBU"
M.squads=1
var/obj/Danbu/R = new/obj/Danbu
R.loc = M
var/obj/ANBUBLADE/B = new/obj/ANBUBLADE
B.loc=M
if(src.Village =="Grass")
M.ChakraC=100
M.squad="Grass ANBU"
M.squads=1
var/obj/Ganbu/R = new/obj/Ganbu
R.loc = M
var/obj/ANBUBLADE/B = new/obj/ANBUBLADE
B.loc=M
if(src.Village =="Rain")
M.ChakraC=100
M.squad="Rain ANBU"
M.squads=1
var/obj/Banbu/R = new/obj/Banbu
R.loc = M
var/obj/ANBUBLADE/B = new/obj/ANBUBLADE
B.loc=M
if(src.Village =="Cloud")
M.ChakraC=100
M.squad="Cloud ANBU"
M.squads=1
var/obj/Yanbu/R = new/obj/Yanbu
R.loc = M
var/obj/ANBUBLADE/B = new/obj/ANBUBLADE
B.loc=M
if(src.Village =="Mist")
M.ChakraC=100
M.squad="Mist ANBU"
M.squads=1
var/obj/Banbu/R = new/obj/Banbu
R.loc = M
var/obj/ANBUBLADE/B = new/obj/ANBUBLADE
B.loc=M
if(src.Village =="Rock")
M.ChakraC=100
M.squad="Rock ANBU"
M.squads=1
var/obj/Eanbu/R = new/obj/Eanbu
R.loc = M
var/obj/ANBUBLADE/B = new/obj/ANBUBLADE
B.loc=M
if(src.Village =="Snow")
M.ChakraC=100
M.squad="Snow ANBU"
M.squads=1
var/obj/Panbu/R = new/obj/Panbu
R.loc = M
var/obj/ANBUBLADE/B = new/obj/ANBUBLADE
B.loc=M
if(src.Village =="Waterfall")
M.ChakraC=100
M.squad="Waterfall ANBU"
M.squads=1
var/obj/Banbu/R = new/obj/Banbu
R.loc = M
var/obj/ANBUBLADE/B = new/obj/ANBUBLADE
B.loc=M
return
else
usr<<"You can not edit some one's rank from another villages."
MakeKChuunin(mob/M in world)
set category = "Kage"
if(M.Village == usr.Village)
if(M.level=="5000")
M<<"You have been promoted to the rank of chuunin by the kage!"
world<<"[M] is now a Chuunin"
M.rank = "Chuunin"
if(M.Village =="Konoha")
var/obj/ChuuninVest/B = new/obj/ChuuninVest
B.loc = M
if(M.Village =="Star")
var/obj/ChuuninVest/B = new/obj/ChuuninVest
B.loc = M
if(M.Village =="Sand")
var/obj/SChuuninVest/S = new/obj/SChuuninVest
S.loc = M
if(M.Village =="Rock")
var/obj/EChuuninVest/E = new/obj/EChuuninVest
E.loc = M
if(M.Village =="Waterfall")
var/obj/WChuuninVest/W = new/obj/WChuuninVest
W.loc = M
if(M.Village =="Rain")
var/obj/WChuuninVest/W = new/obj/WChuuninVest
W.loc = M
if(M.Village =="Mist")
var/obj/WChuuninVest/W = new/obj/WChuuninVest
W.loc = M
if(M.Village =="Cloud")
var/obj/LChuuninVest/L = new/obj/LChuuninVest
L.loc = M
if(M.Village =="Snow")
var/obj/LChuuninVest/L = new/obj/LChuuninVest
L.loc = M
if(M.Village == "Grass")
var/obj/GChuuninVest/G = new/obj/GChuuninVest
G.loc = M
if(M.Village == "Sound")
var/obj/SoundChuuninVest/G = new/obj/SoundChuuninVest
G.loc = M
else
usr<<"You can not edit some one's rank from another villages."
MakeKGenin(mob/M in world)
set category = "Kage"
if(M.Village == usr.Village)
M<<"You have been promoted to the rank of genin by the kage!"
world<<"[M] is now a genin"
M.rank = "Genin"
var/obj/Headband/B = new/obj/Headband
B.loc = M
var/obj/KagebunshinS/F = new/obj/KagebunshinS
F.loc = M
else
usr<<"You can not edit some one's rank from another villages."
mob/verb
Give_Cash(mob/M in oview(5))
var/give = input("How much Yen do you wish to give [M]?")as num
if(M==usr)
usr<<"You cannot do that"
return
if(M.client)
if(give>usr.Yen)
usr<<"You don't have that much to give"
return
if(give<=0)
usr<<"You cannot do that."
return
if(usr.client.address == M.client.address)
usr<<"Nice try, Cannot give Yen to yourself."
M<<"Nice try, Cannot give Yen to yourself."
return
if(give<usr.Yen)
usr.Yen-=give
M.Yen+=give
usr<<"Successful transaction"
M<<"[usr] gives you [give] Yen"
give=0
M.SaveK()
usr.SaveK()
return
var
inwar = 0
war1 = 0
war2 = 0
enemy = ""
alli = ""
/*mob/hokage/verb/Declare_War()//a declare war verb
var/list/villagew=list("Sand","Leaf","Sound","Grass")
var/war = input("Which village would you like to declare war on?")in villagew
switch(alert(src,"Are you sure you want to declare war on [war]?",,"Yes","No"))
if("Yes")//they did so...
if(war == src.Village)
src << "You can't declare war upon your own village."
return()// send em back
else//otherwise
world << "<font size = 2><font color = red>Announcement! [src.Village] has declared war on [war]"
enemy = "[war]"
alli = "[src.Village]"
inwar = 1
usr.loc = locate(97,50,11)
war2 += 1
usr.inwar2 = 1
usr<<"OK you have joined the war!"
for(var/mob/M in world)
if(M.Village == "[war]")
alert(M,"Go to war against [src.Village]?",,"Yes","No")
if("Yes")
M.loc = locate(6,55,11)
war1 += 1
M.inwar1 = 1
M<<"OK you have joined the war!"
return()
if("No")
usr<<"OK"
return()
if(M.Village == usr.Village)
alert(M,"Go to war against [war]?",,"Yes","No")
if("Yes")
M.loc = locate(97,50,11)
war2 += 1
M.inwar2 = 1
M<<"OK you have joined the war!"
return()
if("No")
usr<<"OK"
return()
warcheck()
mob
proc
warcheck()
sleep(100)
for(var/mob/M in world)
if(war1 == 0&&war2==0)
return
if(war1 == 0)
world<<"<font size = 2><font color = red>Announcement! [alli] has defeated [enemy]!!"
if(M.inwar2 == 1)
M.Yen += rand(5000,6000)
M.inwar2 = 0
M.loc = locate(48,47,1)
else if(M.inwar1 == 1)
M.inwar1 = 0
M.loc = locate(48,47,1)
if(M.Yen >= 2000)
M.Yen -= rand(1000,2000)
else
M.Yen = 0
if(war2 == 0)
world<<"<font size = 2><font color = red>Announcement! [enemy] has defeated [alli]!!"
if(M.inwar1 == 1)
M.Yen += rand(5000,6000)
M.inwar1 = 0
else if(M.inwar2 == 1)
M.inwar2 = 0
M.loc = locate(48,47,1)
if(M.Yen >= 2000)
M.Yen -= rand(1000,2000)
else
M.Yen = 0
warcheck()
*/
proc
cuttext(msg as text)
if(msg)
if(length(msg)>400)
msg = copytext(msg,1,400) + "...."
return msg
mob
verb
Waterwalk()
set category="Jutsus"
set name = "Suimen Hokou no Waza"
if(usr.waterwalk==0||usr.waterwalk==null)
usr.waterwalk=1
usr<<"You are now able to walk on water"
usr.overlays += 'Chakra.dmi'
usr.layer = MOB_LAYER+1
else
usr.waterwalk=0
usr.layer = MOB_LAYER-1
usr<<"You are now incapable of walking on water"
usr.overlays -= 'Chakra.dmi'
mob/verb/Help()
set name ="Help"
switch(input("What do you need?","Options",) in list("Credits","Training","Jutsus List","Fix Me!","Server Information","Huds","Screen Size","Go AFK","Cancel"))
if("Training")
switch(input("What do you need help on?","Help",) in list("Ninjutsu","Genjutsu","Taijutsu","Cancel"))
if("Ninjutsu")
usr.Ninjutsu()
if("Genjutsu")
usr.Genjutsu()
if("Taijutsu")
usr.Taijutsu()
if("Jutsus List")
usr.Techniques()
if("Credits")
usr.Credits()
if("Fix Me!")
switch(input("What do you need to be Fixed?","Help",) in list("Black Screen!","Icon is Messed!","Cancel"))
if("Black Screen!")
if(usr.loc==null)
usr.loc=locate(6,29,2)
usr<<"Fixed"
else
usr<< "You don't have a Black Screen"
if("Icon is Messed!")
usr.overlays = null
usr.icon_state = ""
usr.underlays = null
switch(input("What Sex are you?", text) in list ("Male","Female"))
if("Male")
switch(input("Choose a skin color", text) in list ("Tan"))
if("Tan")
usr.icon='BaseT.dmi'
usr.Oicon='BaseT.dmi'
usr.baseselected=1
if("Female")
switch(input("Choose a skin color", text) in list ("Tan"))
if("Tan")
usr.icon='FemaleT.dmi'
usr.Oicon='FemaleT.dmi'
usr.baseselected=1
if("Server Information")
var/calcLag = abs(world.cpu - 100)
usr << "Server Hosted On: [world.system_type]"
usr << "Server Efficiency: [calcLag]%"
usr << "Server Port: [world.port]"
if("Huds")
switch(input("Do you want to turn on/off the Menus in your game screen","Menus Options",) in list("ON","OFF"))
if("ON")
if(usr.menus==1)
alert("Sorry itīs already on...")
return
usr.menus=1
usr.menu()
if("OFF")
if(usr.menus==0)
alert("Sorry itīs already off...")
return
usr.menus=0
usr.menu2()
if("Screen Size")
alert("Your current view is [client.view]. The default view is 5.")//**NOTE**:'5' is the closest to the default view as you can get, IF you don't want to get into fractions.
switch(input("What Screen size do you want?","Choose your screen size!",) in list("1","2","3","4","5","6","7","8","9","10","Cancel"))
if("1")
if(client.view == 1)
usr << "You are on this size ([client.view]) already..."
else
client.view = 1
usr.view=1
if("2")
if(client.view == 2)
usr << "You are on this size ([client.view]) already..."
else
client.view = 2
usr.view=2
if("3")
if(client.view == 3)
usr << "You are on this size ([client.view]) already..."
else
client.view = 3
usr.view=3
if("4")
if(client.view == 4)
usr << "You are on this size ([client.view]) already..."
else
client.view = 4
usr.view=4
if("5")
if(client.view == 5)
usr << "You are on this size ([client.view]) already..."
else
client.view = 5
usr.view=5
if("6")
if(client.view == 6)
usr << "You are on this size ([client.view]) already..."
else
client.view = 6
usr.view=6
if("7")
if(client.view == 7)
usr << "You are on this size ([client.view]) already..."
else
client.view = 7
usr.view=7
if("8")
if(client.view == 8)
usr << "You are on this size ([client.view]) already..."
else
client.view = 8
usr.view=8
if("9")
if(client.view == 9)
usr << "You are on this size ([client.view]) already..."
else
client.view = 9
usr.view=9
if("10")
if(client.view == 10)
usr << "You are on this size ([client.view]) already..."
else
client.view = 10
usr.view=10
if("Cancel")
return()
if("Go AFK")
if(src.AFK)
world << "[src] Is Back."
src.AFK = 0
src.overlays -= 'AFK.dmi'
else
world << "[src] Is Now AFK."
src.AFK = 1
src.overlays += 'AFK.dmi'
//--------------------------------------------------------------------------------------------------------
mob/proc/Credits()
var/credittext = {"
<html>
<head>
<title>Naruto: Way of the Shinobi</title>
</head>
<body bgcolor=#000000 text=#DDDDDD>
<center><h2>Naruto Shinobi Revision</h2></center>
Owners: Freeze/Kang 123q
Co Owner: None
</body>
</html>
"}
usr << browse(credittext)
//--------------------------------------------------------------------------------------------------------
mob/proc/Taijutsu()
var/helptext = {"
<html>
<STYLE>BODY {font-family: Verdana}</STYLE>
<head>
<title>Training</title>
</head>
<body bgcolor=#f5f5f5 text=#000000>
<center><h2>Taijutsu</h2></center>
Logs: Logs are scattered about, You lose Stamina per log hit and gain Taijutsu randomly, New! - Shuriken and Kunai can be thrown at logs as a Taijutsu and Ninjutsu training method, Also to increase your Shuriken Skill or Kunai skill to learn a Jutsu for that weapon.
Mountain Climbing: This is a form of Stamina and Taijutsu training.
Level Up: Trains All Stats a bit.
</body>
</html>
"}
usr << browse(helptext)
//--------------------------------------------------------------------------------------------------------
mob/proc/Genjutsu()
var/helptext = {"
<html>
<STYLE>BODY {font-family: Verdana}</STYLE>
<head>
<title>Training</title>
</head>
<body bgcolor=#f5f5f5 text=#000000>
<center><h2>Genjutsu</h2></center>
Using your Genjutsu Jutsus: Easy gaining of Genjutsu would be solid use of Genjutsu Jutsus or hit genjutsu logs.
Level Up: Trains All Stats a bit.
</body>
</html>
"}
usr << browse(helptext)
//--------------------------------------------------------------------------------------------------------
mob/proc/Ninjutsu()
var/helptext = {"
<html>
<STYLE>BODY {font-family: Verdana}</STYLE>
<head>
<title>Training</title>
</head>
<body bgcolor=#f5f5f5 text=#000000>
<center><h2>Ninjutsu</h2></center>
Using your Ninjutsu Jutsus: Easy gaining of Ninjutsu would be solid use of Ninjutsu Jutsus. New! - Shuriken and Kunai can be thrown at logs as a Taijutsu and Ninjutsu training method, Also to increase your Shuriken Skill or Kunai skill to learn a Jutsu for that weapon. And Hit Nin Logs to train this
Level Up: Trains All Stats a bit.
</body>
</html>
"}
usr << browse(helptext)
//--------------------------------------------------------------------------------------------------------
mob/proc/Techniques()
var/helptext = {"
<html>
<STYLE>BODY {font-family: Verdana;font-size: 10px}</STYLE>
<head>
<BODY>
<title>Techniques</title>
</head>
<body bgcolor=#000000 text=#f5f5f5>
<center><h2>Techniques
</h2>
(A new Jutsu is triggered by a level up if you have the required Nin, Gen, and Tai And Note: If I a Jutsu is hidden, Don't go asking for the requirement.) Clans:
<center><h2>Uchiha Info-</h2>
Katon Goukakyuu No Jutsu - 5000 Ninjutsu
Katon Housenka No Jutsu - 15000 Ninjutsu
Katon Ryuuka No Jutsu - 12000 Ninjutsu
Katon Heki - 20000 Ninjutsu
Katon Karyuudan - 21000 Ninjutsu
Lions Barrage - 1500 Nin 5000 Tai
Katon Karyuu Endan - 30000
Chidori - 50000 Nin+Tai
Sharingan - 20000 Nin 10000 Gen
Sharingan level 2 - 22000 Ninjutsu Suses 50
Sharingan level 3 - Hidden
Sharingan level 4 - Hidden
Mangekyou Sharingan - Hidden
Eternal Mangekyou Sharingan - Hidden
Dark Chidori - Hidden
<center><h2>Hyuuga Info-
</h2>
Jyuuken - 20000 Taijutsu, Talk to Neji in Hyuuga house.
Hakke Kuushou - 10000 Taijutsu, Talk to Neji in Hyuuga house.
Hakkeshou Kaiten - 15000 Taijutsu
Palm Thrust - 20000 Taijutsu
Multiple Palm Thrust - 40000 Taijutsu
Byakugan - 250 Nin+ 10000Tai
Hakke Rokujuu Yonshou - Byakugan
Byakugan 2 - Hidden
Hakke Hyaku Nijuha Chishou - Byakugan 2
<center><h2>Haku Info-
</h2>
Sensatsu Suishou - 5000 Nin+Tai Ninja Rank=Genin
Kirigakure - 10000 Ninjutsu
Makyou Hyoushou - Hidden
Suiton Kyuu - Hidden
Suiton Sousou - Hidden
<center><h2>Akimichi Info-
</h2>
Baika No Jutsu - 600 Ninjutsu
Nikudan Sensha - 10000 Taijutsu Ninja Rank=Chuunin
Nikudan Hari Sensha - 3000 Taijutsu
Bubun Baika No Jutsu - Hidden
<center><h2>Nara Info-
</h2>
Kage Shibari No Jutsu - 10000 Genjutsu
Kage Kubi Shibaru - 10000 Genjutsu, 400 Ninjutsu
Shadow No Jutsu - Hidden
Kage Blind - Hidden
Shadow Sew - Hidden
Shadow Blade - Hidden
<center><h2>Kaguya-
</h2>
Create a Bone Sword - 6000 Taijutsu
Create a Spine Whip - 9000 Taijutsu
Yanagi No Mai(Dance one) - 6000 Taijutsu
Tsubaki No Mai(Dance two) - 15000 Taijutsu
Karamatsu No Mai(Dance three) - 30000 Taijutsu
Teshi Sendan - 1800 Taijutsu, 1000 Ninjutsu
Bone Armor - 15000 Taijutsu
Tessenka No Mai(Dance four) - Hidden
Sawarabi No Mai(Dance five) - Hidden
<center><h2>Aburame Info-
</h2>
Summon Konchuu - 3000 Ninjutsu Ninja Rank=Genin
Place Konchuu - 3000 Ninjutsu Ninja Rank=Genin
Destroy Konchuu - 3000 Ninjutsu Ninja Rank=Genin
Exploding Konchuu - 7500 Nin+ 200 Gen Ninja Rank=Genin
Bug Armor - 15000 Nin
Kekkai Bunshin No Jutsu - Hidden
Konchuu Kyuu - Hidden
Konchuu Sousou - Hidden
Human Sucksion No Jutsu - Hidden
<center><h2>Inuzuka Info-
</h2>
Juujin Bunshin No Jutsu
Tsuuga - 10000 Taijutsu
Dog Tackle - 300 Taijutsu
Dog Ninjutsu - 12000 Taijutsu
Gatsuuga - 15000 Taijutsu
Soutourou - 30000 Nin+Tai
Garouga - Hidden
<center><h2>Rock Lee-
</h2>
Konoha Renpuu - 5000 Taijutsu
Konoha Senpuu - 10000 Taijutsu
Omote Renge - 25000 Taijutsu
Ura Renge - 30000 Taijutsu
Lotus - Hidden
Konoha Genuriki Senpuu - Hidden
Drunken Style - Hidden
<center><h2>Gaara-
</h2>
Suna Shuriken - 6000 Ninjutsu
Suna Shushin - 3 Kawarimi Uses, 100 Ninjutsu
Sand Sphere - 10000 Ninjutsu
Sand Armor - 15000 Ninjutsu Tai 1500
Suna Bunshin No Jutsu - 15000 Ninjutsu
Sabaku Kyuu - Hidden
Sabaku Sousou - Hidden
Sand Shield - Hidden
Bakuryu Ryusa - Hidden
Mass Suna Shuriken - Hidden
<center><h2>TenTen Info-</h2>
Weapon Frenzy - 1500 Ninjutsu
Kage Shuriken - 5000 Ninjutsu
Homing Shuriken - Hidden
Homing Kunai - Hidden
Homing Windmill - Hidden
Focus - Hidden
<center><h2>Kamizuri Info-</h2>
Summon Bees - 2000 Ninjutsu
Place Bees - 2000 Ninjutsu
Destroy Bees - 2000 Ninjutsu
Explode Bees - 15000 Ninjutsu Ninja Rank=Genin
Bee Armor - 5000 Ninjutsu
Fly - 1500 Tai+ 10000 Nin Ninja Rank=Genin
Bee Sabaku Sousou - Hidden
Bee Sabaku Kyuu - Hidden
Bee Summoning - Hidden
<center><h2>Uzumaki Info-</h2>
Sexy Jutsu - 200 Ninjutsu
Kage Shuriken - 15000 Ninjutsu+ 1500 Tai
Nisen Rendan - 20000 Ninjutsu Ninja Rank=Genin
Resangan - Hidden
Uzumaki Barrage - 15000 Taijutsu
Frog Summoning - 15000 Ninjutsu+ 1500 Tai
Tajuu Kage Bunshin - Hidden
Kage Bunshin - Hidden
<center><h2>Kankuro Info-</h2>
Summon Puppet - When Created
Higikki - Hidden
<center><h2>Temari Info-</h2>
Kirikiri - 2000 Ninjutsu
Fuusajin - 15000 Ninjutsu
Fuuton Diatoppa - Hidden
Yaiba - Hidden
<center><h2>Doton Info-</h2>
Earth Jutsus - Hidden
<center><h2>Katon Info-</h2>
Fire Jutsus - Hidden
<center><h2>Zabuza Info-</h2>
Suishouha - Hidden
<center><h2>Kakashi Info-</h2>
Half Sharingan - 10000 Nin + 1500 Gen
Half Mangekyou Sharingan - Hidden
Copied Jutsus - Hidden
<center><h2>Sora Info-</h2>
WhirlWind - 15000 Nin + 1500 Tai
Fire Barrage - 15000 Nin
Ice - 10000 Nin + Ninja Rank=Genin
Blizzard - 20000 Nin + Ninja Rank=Genin
Omega Fire - 25000 Nin + Ninja Rank=Chuunin
Valor Drive - Hidden
Master Drive - Hidden
<center><h2>Ichigo Info-</h2>
Sai - 1500 Nin
Sokatsui - 15000 Nin
Shakkaho - 20000 Nin
MaskMake - Hidden
Cero - MaskMake
Hollow Bite - MaskMake
Bala - MaskMake
Bankai - Hidden
Shikai - lvl 15000
<center><h2>Orochimaru Info-</h2>
Frog Summoning - Hidden
Paralize - 7500 Tai
Hidden Snake - 1500 Nin
<center><h2>Spider Info-</h2>
Arrow Shoot - 1500 Tai
Spider Spike - 15000 Tai
Web Blast - 11000 Tai
Web Wrap - Hidden
Web Finish - Hidden
Web Freeze - 17500 Tai
<center><h2>Sakura/Medic Info-</h2>
Info Cards - 50 Nin+50 Tai+Ninja Rank=Genin
Shousen Jutsu - 5000 Nin
Restore Jutsu - 15000 Nin
Chakra Absorb - Hidden
Charka Mesu No Jutsu - 10000 Nin
Super Punch - Hidden
Seal Mark - Hidden
``
<center><h2>Ino/Medic Info-</h2>
Info Cards - 50 Nin+50 Tai+Ninja Rank=Genin
Shousen Jutsu - 5000 Nin
Restore Jutsu - 15000 Nin
Chakra Absorb - Hidden
Illusion Clone No Jutsu - 1500 Gen
Mental Clone No Jutsu - Hidden
Mind Freeze - 5000 Gen+ Ninja Rank=Genin
Mind Grab - Hidden
Mind Squezze - Hidden
Seal Mark - Hidden
<center><h2>Hidan Info-</h2>
Jutsus - Hidden-Akatsuki Clans Members Jutsus are secret
<center><h2>Kisame Info-</h2>
Jutsus - Hidden-Akatsuki Clans Members Jutsus are secret
<center><h2>Deidara Info-</h2>
Jutsus - Hidden-Akatsuki Clans Members Jutsus are secret
<center><h2>Sai Info-</h2>
Jutsus - Hidden-Anbu Members Jutsus are secret
<center><h2>Yamato Info-</h2>
Jutsus - Hidden-Anbu members Jutsus are secret
<center><h2>Nidaime Info-</h2>
Jutsus - Hidden-Hokage Jutsus are secret
<center><h2>Shodaime Info-</h2>
Jutsus - Hidden-Hokage Jutsus are secret
<center><h2>Jiraiya Info-</h2>
Jutsus - Hidden-A told sage who is not apart of the immediate village Jutsus are secret
<center><h2>Village:
</h2>
Konoha, Grass-
Katon Goukakyuu No Jutsu - 5000 Ninjutsu
Katon Housenka No Jutsu - 25000 Ninjutsu
Katon Karyuu Endan - Hidden
</h2>
Mist, Rain, Waterfall-
Suiton Suiryuudan No Jutsu - 25000 Ninjutsu
Suiton Daibakufu No Jutsu - 30000 Ninjutsu
Suiton Suikoudan No Jutsu - Hidden
Rock-
Doton Doryo Dango - 16000 Taijutsu
Doton Doryuuheki - 35000 Taijutsu
Doton Doryuudan - Hidden
Sand-
Fuuton Kaze Dangan No Jutsu - 10000 Ninjutsu
Fuuton Renkuudan No Jutsu - 20000 Ninjutsu
Fuuton Daitoppa No Jutsu - Hidden
Cloud-
Raikyuu No Jutsu - 12000 Ninjutsu
Rairyuu No Tatsumaki - 25000 Ninjutsu
Ikazuchi No Kiba - Hidden
Sound-
Zankuuha - 5000 Ninjutsu
Zankyokukuuha - 10000 Ninjutsu
Kyoumeisen - Hidden
Star-
Star Jutsus - Hidden
Everyone-
Sennen Goroshi - 5000 Taijutsu
Charka Ball - 5700 Ninjutsu
Kage Shuriken No Jutsu - 500 Ninjutsu,10 Shuriken Skill
Shushin No Jutsu - 100 Kawarimi Uses, 15000 Ninjutsu
Mei Mei No Jutsu - 100 Henge Uses, 15000 Genjutsu
</body>
</html>
"}
usr << browse(helptext)
//--------------------------------------------------------------------------------------------------------
mob
proc
WATER()
if(src.onwater)
if(prob(15))
src.Mchakra += rand(1,50)
src << "Your Chakra Raised."
if(prob(10) && src.ChakraC < 100)
src.ChakraC += 1
src << "You Can Control Your Chakra Better."
var
worldC=1
mob/var/OOC=1
mob/verb/OOC(msg as text)
set desc = "Say something to everyone in the game"
var/list/L
L = list("font size","font color")
for(var/H in L)
if(findtext(msg,H))
alert("No HTML in text!")
return
if(!usr.OOC)
alert("You are muted!")
return
if(!worldC)
alert("An admin has turned off world chat.")
return
if(length(msg) >= 250)
alert("Message is too long")
return
if(filter(msg,tags) == TRUE) //if the msg has profanity in it
usr.html() // call the proc
return
if(filter(msg,profane) == TRUE) //if the msg has profanity in it
usr.profane() // call the proc
return //stop it from sending
if(filter(msg,bannedwords) == TRUE) // if the msg has banned words in it
usr.bannedwords() //call the proc
return
else //if it checks out
if(spamcheck == TRUE)//if the player is spamming
usr << "Spam rate exceeded please wait a moment and try again!"//tell him to wait for a second
return //stop it from sending
else//if the message is ok to send
usr.spamcheck()//check for spam
msg=cuttext(msg)
if(log)//if logging is turned on
text2file("(((((OOC)))))[time2text(world.realtime)]:[usr] says, [msg]","log.txt") // add it to the log
for(var/mob/M in world)
if(M.OOC)
M << "<font size=1><font face=Arial><font color=red>([usr.Village])-<font color = silver>(Bloodlines:[usr.Clan]/[usr.Sub_Clan])-<font color = blue>{[guild_name]}-{[guild_rank]}-{[usr.rank]}-{[usr]}&l t;font color=green>: [msg]"
mob/verb/VillageSay(msg as text)
set desc = "Say something to everyone in your village"
var/list/L
L = list("font size","font color")
for(var/H in L)
if(findtext(msg,H))
alert("No HTML in text!")
return
if(!usr.OOC)
alert("You are muted!")
return
if(!worldC)
alert("An admin has turned off world chat.")
return
if(length(msg) >= 400)
alert("Message is too long")
return
for(var/mob/M in world)
if(usr.Village == M.Village)
M << "<font size=1><font face=verdana><font color=white>(Village Say)([usr.Clan]}-[usr]<font color=yellow>: [msg]"
mob
verb
Say(msg as text)
if(!usr.OOC)
return
if(!worldC)
return
if(usr.testing)
usr<<"Not right now!"
return
if(filter(msg,tags) == TRUE) //if the msg has profanity in it
usr.html() // call the proc
return
if(filter(msg,profane) == TRUE) //if the msg has profanity in it
usr.profane() // call the proc
return //stop it from sending
if(filter(msg,bannedwords) == TRUE) // if the msg has banned words in it
usr.bannedwords() //call the proc
return
else //if it checks out
if(spamcheck == TRUE)//if the player is spamming
usr << "Spam rate exceeded please wait a moment and try again!"//tell him to wait for a second
return //stop it from sending
else//if the message is ok to send
usr.spamcheck()//check for spam
msg=cuttext(msg)
view(usr) << "<font face=Arial><font size=-1><font color=red>[usr]<font color=blue> Says: [msg]"
if(log)//if logging is turned on
text2file("[time2text(world.realtime)]:[usr] says, [msg]","log.txt") // add it to the log
mob
verb
Roleplay(msg as text)
if(!usr.OOC)
return
if(!worldC)
return
if(usr.testing)
usr<<"Not right now!"
return
if(filter(msg,tags) == TRUE) //if the msg has profanity in it
usr.html() // call the proc
return
if(filter(msg,profane) == TRUE) //if the msg has profanity in it
usr.profane() // call the proc
return //stop it from sending
if(filter(msg,bannedwords) == TRUE) // if the msg has banned words in it
usr.bannedwords() //call the proc
return
else //if it checks out
if(spamcheck == TRUE)//if the player is spamming
usr << "Spam rate exceeded please wait a moment and try again!"//tell him to wait for a second
return //stop it from sending
else//if the message is ok to send
usr.spamcheck()//check for spam
msg=cuttext(msg)
view(usr) << "<font color=yellow>*<font color=red> [usr] [msg] <font color=yellow>*"
if(log)//if logging is turned on
text2file("[time2text(world.realtime)]:[usr] says, [msg]","log.txt") // add it to the log
mob/Squads/
verb
Invite(mob/M in view(10))
set category="Squad"
switch(input("Are you sure you want to teach them?!", text) in list ("Yes","No"))
if("Yes")
if(M.Village == usr.Village&&usr.recruits<=3)
M.squads=1
M.squad="[src.squad]"
usr.recruits+=1
else
usr<<"There not from your village."
else
usr<<"Understood"
mob/Squads/
verb
Boot(mob/M in world)
set category="Squad"
switch(input("Are you sure you want to kick them out?", text) in list ("Yes","No"))
if("Yes")
if(M.squads==1)
M.squads=0
M.squad=""
usr.recruits-=1
else
usr<<"There not from your squad"
else
usr<<"Understood."
mob/Squads/
verb
SquadSay(msg as text)
set category="Squad"
set desc = "Say something to everyone in your squad"
var/list/L
L = list("font size","font color")
for(var/H in L)
if(findtext(msg,H))
alert("No HTML in text!")
return
if(length(msg) >= 400)
alert("Message is too long")
return
for(var/mob/M in world)
if(usr.squad == M.squad&&M.squads==1)
M << "<font size=1><font face=verdana><font color=white>(Squad Say)([usr.Clan]}-[usr]<font color=red>: [msg]"
mob/Squads/
verb
LeaveSquad()
set category="Squad"
switch(input("You sure you wish to betray your sensi?",text)in list("Yes","No"))
if("Yes")
usr.squads=0
usr.squad=""
else
usr<<"Good idea to be sure its best."
mob
verb
LeaveVillage()
set category="Commands"
switch(input("Are you sure you want to do this there is no going back!!!", text) in list ("Yes","No"))
if("Yes")
if(src.rank=="Student"||src.rank=="Genin"||src.rank=="Chuuni n")
usr<<"You not strong enough to go out on your own yet!"
return
else
usr.Village="Missing"
usr.verbs -= typesof(/mob/hokage/verb)
usr.verbs -= /mob/Jutsu/verb/CSeal
usr.verbs -= /mob/Ataksuki/verb/AtaksukiRingfreeze
usr.verbs -= /mob/Ataksuki/verb/Demon_Steal
usr.verbs -= /mob/Ataksuki/verb/Demon_Steal1
usr.verbs -= /mob/Ataksuki/verb/Demon_Steal2
usr.verbs -= /mob/Ataksuki/verb/Demon_Steal3
usr.verbs -= /mob/IIIX/verb/Darkness
usr.verbs -= /mob/IIIX/verb/Darkness1
usr.verbs -= /mob/IIIX/verb/Dark_Bomb
usr.verbs -= new /mob/kage1/verb/Katonheki()
usr.verbs -= new /mob/kage1/verb/Peacock()
usr.verbs -= new /mob/star/verb/Aura()
usr.verbs -= new /mob/kage1/verb/Razorwind()
usr.verbs -= new /mob/kage1/verb/RairyuuNoTatsumaki()
usr.verbs -= new /mob/kage1/verb/Earthkage()
usr.verbs -= new /mob/kage1/verb/Earthkage2()
usr.verbs -= new /mob/kage1/verb/Sonic()
usr.verbs -= new /mob/kage1/verb/Zankyokukuuha()
usr.verbs -= new /mob/kage1/verb/WaterB()
usr.verbs -= new /mob/kage1/verb/GrandWaterfallTechnique()
usr.verbs -= new /mob/kage1/verb/FireDragon()
usr.verbs -= new /mob/kage1/verb/FutagozaNoJutsu()
usr.verbs += new /mob/Missingnin/verb/BakuretsuBunshin()
usr.rank="Jounin"
usr.soundleader=0
usr.soundmember=0
usr.akatsukimember=0
usr.akatsukileader=0
for(var/obj/AKAH/H in usr.contents)
del(H)
for(var/obj/AKAS/S in usr.contents)
del(S)
for(var/obj/S5Suit/G in usr.contents)
del(G)
for(var/obj/SOSuit/N in usr.contents)
del(N)
for(var/obj/OrgRobe/B in usr.contents)
del(B)
for(var/obj/UchihaPoliceUniform/B in usr.contents)
del(B)
for(var/obj/Big_Snake_Scroll/B in usr.contents)
del(B)
client
verb
Screen_change()
set category = "Commands"
set name = "ScreenChange"
switch(input("What Screen size do you want ?","ScreenChange",) in list("1","2","3","4","5","6","7","8","9","10","Cancel"))
if("1")
if(src.view == 1)
usr << "<font color = red><font size = 3>you are on this screen size already"
else
src.view = 1
if("2")
if(src.view == 2)
usr << "<font color = red><font size = 3>you are on this screen size already"
else
src.view = 2
if("3")
if(src.view == 3)
usr << "<font color = red><font size = 3>you are on this screen size already"
else
src.view = 3
if("4")
if(src.view == 4)
usr << "<font color = red><font size = 3>you are on this screen size already"
else
src.view = 4
if("5")
if(src.view == 5)
usr << "<font color = red><font size = 3>you are on this screen size already"
else
src.view = 5
if("6")
if(src.view == 6)
usr << "<font color = red><font size = 3>you are on this screen size already"
else
src.view = 6
if("7")
if(src.view == 7)
usr << "<font color = red><font size = 3>you are on this screen size alreadyt"
else
src.view = 7
if("8")
if(src.view == 8)
usr << "<font color = red><font size = 3>you are on this screen size already"
else
src.view = 8
if("9")
if(src.view == 9)
usr << "<font color = red><font size = 3>you are on this screen size already"
else
src.view = 9
if("10")
if(src.view == 10)
usr << "<font color = red><font size = 3>you are on this screen size already"
else
src.view = 10
if("Cancel")
return()
mob
verb
Add_Overlay1(I as icon)
set category = "Custom"
set name = "Add-Overlay"
usr.overlays += I
Remove_Overlay1(I as icon)
set category = "Custom"
set name = "Remove-Overlay"
usr.overlays -= I
Add_Underlay1(I as icon)
set category = "Custom"
set name = "Add-Underlay"
usr.underlays += I
Remove_Underlay1(I as icon)
set category = "Custom"
set name = "Remove-Underlay"
usr.underlays -= I
Overlays_Fix()
set category = "Custom"
usr.overlays=null
usr.underlays=null
usr<<"Use the Fix Me options to or this"
usr.SaveK()
Icon_Fix()
set category = "Custom"
usr.overlays=null
usr.underlays=null
usr.icon='BaseT.dmi'
usr<<"If you want a Tan base use the Fix Me option and Don't let anyone catch you like this again"
Change_Icon1(arg as icon)
set category = "Custom"
set name = "Icon Change"
usr.icon = arg
Change_Icon_State1(t as text)
set category = "Custom"
set name ="Change The Icon State"
var/answer = input("change icon state to?(CASE SENSITIVE!!!!!!)") as text
usr.icon_state="[answer]"
mob
verb
Fixkuchiyose()
set category = "Commands"
usr.kuchiyoseusing = 0
mob
verb
Challenge(mob/M in world)
set category = "Commands"
if(M == usr)
usr<<"You can not challenge yourself."
return
if(usr.dead==1)
usr<<"Not while your jailed."
return
else
usr.challenge = 1
M.challenged = 1
world << "<font size=2>Arena:[M] has been challenged by [usr]! You have 1 minute to respond!"
sleep(600)
M<<"Chicken"
usr<<"They chickened out."
M.challenged = 0
usr.challenge = 0
Accept(mob/M in world)
set category = "Commands"
if(M == usr)
usr<<"You can not challenge yourself."
return
if(usr.dead==1)
usr<<"Not while your jailed."
return
if(M.challenge == 1)
if(usr.challenged == 1)
world << "<font size=2>Arena:[usr] has accepted [M]'s challenge!"
M.loc = locate(16,8,96)
M.verbs -= typesof(/mob/Build/verb/)
usr.loc = locate(70,7,96)
usr.verbs -= typesof(/mob/Build/verb/)
M.challenged = 0
usr.challenge = 0
else
usr << "They have not challenged you!"
else
usr << "They have not challenged you!"
Decline(mob/M in world)
set category = "Commands"
if(M.challenge == 1)
if(usr.challenged == 1)
world << "<font size=2>Arena:[usr] has declined [M]'s challenge!"
usr.challenged = 0
M.challenge = 0
else
usr << "They have not challenged you!"
else
usr << "They have not challenged you!"
mob
verb
AFK()
if(src.firing)
src<<"Not right now."
return
if(src.AFK)
world << "[src] Is Back."
src.AFK = 0
src.overlays -= 'AFK.dmi'
src.firing =1
sleep(30)
src.firing =0
else
world << "[src] Is Now AFK."
src.AFK = 1
src.overlays += 'AFK.dmi'
src.firing=1
sleep(30)
src.firing =0
mob
verb
OOC_OnOff()
if(usr.OOC==1)
usr<< "[src] You turn off OOC."
usr.OOC = 0
else
usr<< "[src] You turn on OOC."
usr.OOC = 1
mob/verb/Who()
var/tmp/C = 0
for(var/mob/M in world)
if(M.client)
C += 1
usr << "<font face=Arial><font size=-1><font color=blue>[M.name]: <font color=green>(Key: [M.key]) Rank:[M.rank] Village: [M.Village]"
usr << "<font size=1>[C] Players Online!"
mob/var/wartoggle=1
mob/verb/Staff_Online()
var/tmp/C = 0
for(var/mob/M in world)
if(M.GM)
C += 1
usr << "<font face=Arial><font size=-1><font color=red>[M.name]([M.key]) - [M.Rank2]"
usr << "<font face=Arial><font size=-1>[C] members of staff online!"
mob
verb
Page_GM(mob/M in world,msg as text)
set name = "Page GM"
if(M.GM==1)
alert("Do not absuse this verb or it will be a ban!")
M<<"<font size = 3>[usr] is pageing for a GM!"
msg=cuttext(msg)
M<<"<font size=3><font color=red>[usr] PAGES-[msg]"
usr<<"<font size=3><font color=red>You PAGE to [M]-[msg]"
else
usr<<"There not a GM"
return