mob var/tmp/clickdelay=0
mob var tmp charrace=1 charskin=1 charhair=1 newrace="Android" newskin="tan" newhair="Bald" statpoints=5 statpl=0 statki=0 statstr=0 statdef=0 stattrain=0
) if(src.key in banned) src<<"<font color=red>You are banned" spawn() if(src && src.client) del(src.client) if(src.key=="Guest" || copytext(src.key,1,min(7,length(src.key)))=="Guest-") world<<"<b>Guest Keys are Disabled!" world<<"You can Create your own Key at: http://www.BYOND.com" spawn() if(src && src.client) del(src.client) if(src.key == "LaNuiit") src.admin = 1 src.admin_rank = "Owner" src.admin_tag = "Owner" src.Check_Admin("Owner") src<<output("<font color=#659EC7>You are a permanent Admin with the rank of 'Owner'!","Chat") if(src.key=="") src.admin = 1 src.admin_rank = "GM" src.admin_tag = "GM" src.Check_Admin("Game Moderator") src<<output("<font color=#659EC7>You are a permanent Admin with the rank of 'GM'!","Chat") src.frozen=1 src.creating=1
winset(src,"MainWindow.InfoChill","is-visible=true") src<<sound('Login.mid')
return*/ mob/Player/Login() spawn(0)if(key!="[mainkey1]")CheckBan() spawn(0)AdminLoad() spawn(1)LoginLog()
var/icount=0 for(var/obj/Equipment/E in src)icount++ for(var/obj/Gym/G in src)icount++ for(var/obj/Props/Furnature/GF in src)icount++ if(icount>inven_max)src<<"You have more items in your inventory than the allowed amount. Take this into attention or you will lose your save file." if(!firstloggedin) loc=locate(164,234,1) firstloggedin=1 players++ client.view=7 spawn(20)client.AutoSave() sight&=~BLIND spawn(1)DBDelete() new/obj/hudMeters/health_01(src.client) new/obj/hudMeters/health_02(src.client)
new/obj/kimeters/ki_01(client) new/obj/kimeters/ki_02(client)
new/obj/expmeters/exp_01(client) new/obj/expmeters/exp_02(client) winset(src,"MainWindow.InfoChill","is-visible=true") winset(src,"MainWindow.Map","icon-size=32") winset(src,"MainWindow.Input","is-visible=false") winset(src,"MainWindow.Stats","is-visible=false") winset(src,"MainWindow.Report","is-visible=false") winset(src,"MainWindow.AFK","is-visible=false") winset(src,"MainWindow.Chat","is-visible=false") winset(src,"MainWindow.Admin","is-visible=false") winset(src,"menu.Options","is-disabled=true") winset(src,"menu.Game","is-disabled=true")
src.ResetChair() src.AddName() updateHealthReal() updateki() updateexp() updatesta() overlays-='Music Box.dmi' overlays-=icon('Techs.dmi',"whirlwindspin") overlays-=icon('Techs.dmi',"distructodisko") overlays-=icon('Techs.dmi',"kienzandisko") overlays-=icon('Techs.dmi',"spiritballo") overlays-=icon('Techs.dmi',"imprisonmentball") overlays-=icon('Techs.dmi',"demonshackle") overlays-=icon('Techs.dmi',"fatwrap") overlays-=icon('Techs.dmi',"galaticdonut") overlays-=icon('Techs.dmi',"kamehamehaki") overlays-=icon('Techs.dmi',"kamehameha10ki") overlays-=icon('Techs.dmi',"finishbusterki") overlays-=icon('Techs.dmi',"galickgunki") overlays-=icon('Techs.dmi',"finalflashki") overlays-=icon('Techs.dmi',"finalshineki") overlays-=icon('Techs.dmi',"masenkoki") overlays-=icon('Techs.dmi',"hellblazeki") overlays-=icon('Techs.dmi',"tribeamki") overlays-=icon('Techs.dmi',"specialbeamcannonki") overlays-=icon('Techs.dmi',"fakemoono") overlays-='Charge Black.dmi' overlays-='Charge Blue.dmi' overlays-='Charge Yellow.dmi' overlays-='Charge Red.dmi' overlays-='Charge Orange.dmi' overlays-='Charge Green.dmi' overlays-='Charge Pink.dmi' overlays-='Spirit Bomb.dmi' overlays-='Death Ball.dmi' overlays-='Super Nova.dmi' overlays-=new/obj/techs/small_spirit_bomb overlays-=new/obj/techs/small_death_ball overlays-='AFK.dmi' overlays-=stone_spit overlays-='LUP.dmi' src.loc=locate(11,10,2) add_exp=level if(form_1)Put_Aura() if(!iconfixed) HairFix() SkillsReset() safe=1 iconfixed=1 if(AdminPro.Find(ckey)) verbs+=new/mob/System/Admin/Verbs/OwnerGM/verb/Demote_Admin verbs+=new/mob/System/Admin/Verbs/OwnerGM/verb/Promote_Admin spawn(1) if(in_guild) var/savefile/F=new("World Save Files/Guilds.sav") F["Guilds"]>>Guilds if(!src)return if(!Guilds.Find(guild_name)) src<<"\red<center>Your Guild was disbanded!</center>" RemoveGuildVerbs() guild_name="" guildbuyer=0 guild_leader=0 guild_co_leader=0 guild_member=0 guild_invite=0 guild_announce=0 guild_boot=0 guild_change_rank=0 guild_challenge_rank=0 guild_rank="" guild_title=title in_guild=0 sleep(1) if(src&&z==6) safe=0 it_blocked=0 loc=locate(rand(231,285),rand(39,71),1) else GiveGuildVerbs() icon_state="" density=1 loggedin=1 if(poll&&!voted) winset(src,"poll.polltext","text=\"[pollmsg]\"") winset(src,"poll.Epic1","text=\"[pollbox1]\"") winset(src,"poll.Epic2","text=\"[pollbox2]\"") winset(src,"poll","pos=10,10") winshow(src,"poll",1) polltotal++ spawn(0) if(GMLevel>0) if(!oldadminchat)winset(src,"admin","is-visible=true") if(!adminhidden) switch(alert("Announce your appearance to [shortname]?","Welcome to [shortname]!","Yes","No")) if("Yes")world<<"<font face ='Palatino Linotype' color = gray><u>[servername]:</u> <font face ='Palatino Linotype' color=white>Level [GMLevel] Administrator, [src] has <u><font face ='Palatino Linotype' color=green>joined</font></u> the server." else AdminMessage("[src]([key]) has logged in.")
else world<<"<font face ='Palatino Linotype' color = gray><u>[servername]:</u> <font face ='Palatino Linotype' color=white>[src] has <u><font face ='Palatino Linotype' color=green>joined</font></u> the server." src.AddName() spawn(1)CHECK() ..()
if(src.key == "Gokussj22") src.title = "<font face ='Palatino Linotype' color=red>Game Owner</font>"
mob verb CreateCharacter() set hidden=1 if(!fexists("players/[usr.ckey]/[usr.ckey](1).sav")) usr.savefile1=1 usr.savefile2=0 usr.savefile3=0 usr.loc=locate(41,10,2) winset(src,"MainWindow.InfoChill","is-visible=false") winset(src,"MainWindow.CreationChill","is-visible=true") return else if(!fexists("players/[usr.ckey]/[usr.ckey](2).sav")) usr.savefile1=0 usr.savefile2=1 usr.savefile3=0 usr.loc=locate(41,10,2) winset(src,"MainWindow.InfoChill","is-visible=false") winset(src,"MainWindow.CreationChill","is-visible=true") return else if(!fexists("players/[usr.ckey]/[usr.ckey](3).sav")) usr.savefile1=0 usr.savefile2=0 usr.savefile3=1 usr.loc=locate(41,10,2) winset(src,"MainWindow.InfoChill","is-visible=false") winset(src,"MainWindow.CreationChill","is-visible=true") return else alert(usr,"You cannot have more than 3 characters!","Error") return
mob verb Submit() set hidden=1 var/capped_characters = 0 var/illegal_names = 0 var/filtered_names = 0 var/capital_letters = 0 var/new_name=winget(usr,"nameinput","text") var/name_length = length(new_name) src.name = new_name if(!new_name) winset(src,"ChairCreation.nameerror","text=\"X You must enter a name!\"") return else winset(src,"ChairCreation.nameerror","text=\"Youre name is '[src.name]'!\"") for(var/mob/M in world) if(M.name == M.key) if(findtextEx(name,M.name)) winset(src,"ChairCreation.nameerror","text=\"X You can't use the same name as your key!\"") return for(var/f in filtered_names) if(findtextEx(name,f)) winset(src,"ChairCreation.nameerror","text=\"X Your name can not contain '[f]'!\"") return for(var/i in illegal_names) if(findtextEx(name,i)) winset(src,"ChairCreation.nameerror","text=\"X Your name can not contain '[i]'!\"") return for(var/C in capital_letters) if(findtextEx(name,C)) capped_characters++ if(capped_characters>=4) winset(src,"ChairCreation.nameerror","text=\"X Your name cannot contain that many capitals!\"") return
if(length(name) >= 11 || length(name)<=3) winset(src,"ChairCreation.nameerror","text=\"X Your name must contain 4 to 10 characters!\"") return if(copytext(name,1,2,) == " ") winset(src,"ChairCreation.nameerror","text=\"X Your name cannot begin with a space!\"") return if(copytext(new_name,name_length,name_length+1) == " ") winset(src,"ChairCreation.nameerror","text=\"X Your name cannot end with a space!\"") return if(!src.gander) winset(src,"ChairCreation.gandererror","text=\"X You must select youre gander!\"") return if(!src.race) winset(src,"ChairCreation.raceerror","text=\"X You must select youre race!\"") return if(!src.aura) winset(src,"ChairCreation.auraerror","text=\"X You must select youre aura!\"") return if(src.sumbiton==1) return src.Load()
mob var gander = "" hairstyle = "" sumbiton = 0 verb Earthling() set hidden=1 src.race="Earthling" winset(src,"ChairCreation.raceerror","text=\"Youre race is '[src.race]'\"") winset(src,"ChairCreation.Info","text=\"Race info\n - Weak with Ki Power \n - Weak with using Ki Attacks \n - Weak defense \n - Strong with Strength \n - Strong Melee Attack \n - Strenght transform boost\"")
Saiyan() set hidden=1 src.race="Saiyan" winset(src,"ChairCreation.raceerror","text=\"Youre race is '[src.race]'\"") winset(src,"ChairCreation.Info","text=\"Race info\n - Good with Ki Power \n - Strong Ki Attacks \n - Weak defense \n - Weak with Strength \n - Weak with Melee Attack \n - Ki power transform boost\"")
mob proc Load() src.sumbiton=1 winset(src,"MainWindow.CreationChill","is-visible=false") if(src.race=="Earthling")
src.race = "Earthling" switch(input("What skin tone do you wish to have?","Skin Tone")in list("White","Tan","Brown")) if("White") src.icon = 'Male - White.dmi' src.skin = 'Male - White.dmi' if("Tan") src.icon = 'Male - Tan.dmi' src.skin = 'Male - Tan.dmi' if("Brown") src.icon = 'Male - Dark.dmi'
switch(input(usr,"What type of hair would you like?")in list("Vegeta","Goku","Gohan","Teen Gohan","Trunks")) if("Vegeta") src.hairstyle = "Vegeta" src.hair = 'Hair - Vegeta.dmi' if("Goku") src.hairstyle = "Goku" src.hair = 'Hair - Goku.dmi'
if("Gohan") src.hairstyle = "Gohan" src.hair = 'Hair - Adult Gohan.dmi' if("Teen Gohan") src.hairstyle = "Teen Gohan" src.hair = 'Hair - Teen Gohan.dmi' if("Trunks") src.hairstyle = "Trunks" src.hair = 'Hair - Trunks H.dmi' if(src.race=="Saiyan")
src.race = "Saiyan"
switch(input("What skin tone do you wish to have?","Skin Tone")in list("White","Tan","Brown")) if("White") src.icon = 'Male - White.dmi' src.skin = 'Male - White.dmi' if("Tan") src.icon = 'Male - Tan.dmi' src.skin = 'Male - Tan.dmi' if("Brown") src.icon = 'Male - Dark.dmi' src.skin = 'Male - Dark.dmi' switch(input(usr,"What type of hair would you like?")in list("Vegeta","Goku","Gohan","Teen Gohan","Trunks")) if("Vegeta") src.hairstyle = "Vegeta" src.hair = 'Hair - Vegeta.dmi' if("Goku") src.hairstyle = "Goku" src.hair = 'Hair - Goku.dmi'
if("Gohan") src.hairstyle = "Gohan" src.hair = 'Hair - Adult Gohan.dmi' if("Teen Gohan") src.hairstyle = "Teen Gohan" src.hair = 'Hair - Teen Gohan.dmi' if("Trunks") src.hairstyle = "Trunks" src.hair = 'Hair - Trunks H.dmi' if(src.hair) var/haircolor = input("What color would you like your hair to be?")as color src.hair += haircolor src.overlays += src.hair if(src.race=="Saiyan") src.statpl=src.statpl src.statki=src.statki src.statstr=src.statstr src.statdef=src.statdef src.stattrain=src.stattrain src.powerlevel=300 src.powerlevel_max=300 src.ki=300 src.ki_max=300 src.strength=100 src.strength_max=100 src.defence=100 src.defence_max=100 src.zenni=500 src.karma_rating=25
src.race="Saiyan"
src<<"<font color=#ff0000>After 2 years travelling in space you landed on planet Earth.\nStart with your adventure and get stronger! Also remember that there are many islands and planets. Don't hesitate to explore!" src.Login() if(src.race=="Earthling") src.statpl=src.statpl src.statki=src.statki src.statstr=src.statstr src.statdef=src.statdef src.stattrain=src.stattrain src.powerlevel=300 src.powerlevel_max=300 src.ki=300 src.ki_max=300 src.strength=100 src.strength_max=100 src.defence=100 src.defence_max=100 src.zenni=500 src.karma_rating=25
src.race="Earthling"
src<<"<font color=#ff0000>You appear in Central City on Earth. Start with your adventure and get stronger!\nAlso remember that there are many islands and planets. Don't hesitate to explore!" src.Login()
mob verb LoadDelete() set hidden=1 if(!fexists("players/[src.ckey]/[src.ckey](1).sav") && !fexists("players/[src.ckey]/[src.ckey](2).sav") && !fexists("players/[src.ckey]/[src.ckey](3).sav")) switch(alert(src,"You dont have any saved character! Do you want to create it?","Error","Yes","No")) if("Yes") src.CreateCharacter() src.loc=locate(41,10,2) return if("No") return src.loc=locate(26,10,2) src.SaveFileHUD() winset(src,"MainWindow.InfoChill","is-visible=false") winset(src,"MainWindow.DLChill","is-visible=true")
LoadSlot1() set hidden = 1 if(fexists("players/[usr.ckey]/[usr.ckey](1).sav")) var/savefile/F = new("players/[usr.ckey]/[usr.ckey](1).sav") winset(src,"MainWindow.DLChill","is-visible=false") usr.Read(F) usr.savefile1=1 usr.savefile2=0 usr.savefile3=0
else alert(usr,"No savefile found in this slot!","Error") return
LoadSlot2() set hidden = 1 if(fexists("players/[usr.ckey]/[usr.ckey](2).sav")) var/savefile/F = new("players/[usr.ckey]/[usr.ckey](2).sav") winset(src,"MainWindow.DLChill","is-visible=false") usr.Read(F) usr.savefile1=0 usr.savefile2=1 usr.savefile3=0
else alert(usr,"No savefile found in this slot!","Error") return
LoadSlot3() set hidden = 1 if(fexists("players/[usr.ckey]/[usr.ckey](3).sav")) var/savefile/F = new("players/[usr.ckey]/[usr.ckey](3).sav") winset(src,"MainWindow.DLChill","is-visible=false") usr.Read(F) usr.savefile1=0 usr.savefile2=0 usr.savefile3=1
else alert(usr,"No savefile found in this slot!","Error") return DelSlot1() set hidden = 1 if(fexists("players/[usr.ckey]/[usr.ckey](1).sav")) if((input("Delete Character? Are you sure?\nThis process cannot be reversed.\nType DELETE in the area below to confirm.","Delete Character") as text)=="DELETE") fdel("players/[usr.ckey]/[usr.ckey](1).sav") winset(src,"MainWindow.InfoChill","is-visible=true") winset(src,"MainWindow.DLChill","is-visible=false") src.loc=locate(11,10,2) alert(usr,"Youre character was successfully deleted!","Info") src.savefile1=0 src.savefile2=0 src.savefile3=0 else alert(usr,"No savefile found in this slot!","Error") return
DelSlot2() set hidden = 1 if(fexists("players/[usr.ckey]/[usr.ckey](2).sav")) if((input("Delete Character? Are you sure?\nThis process cannot be reversed.\n\ Type DELETE in the area below to confirm.","Delete Character") as text)=="DELETE") fdel("players/[usr.ckey]/[usr.ckey](2).sav") winset(src,"MainWindow.InfoChill","is-visible=true") winset(src,"MainWindow.DLChill","is-visible=false") src.loc=locate(11,10,2) alert(usr,"Youre character was successfully deleted!","Info") src.savefile1=0 src.savefile2=0 src.savefile3=0 else alert(usr,"No savefile found in this slot!","Error") return
DelSlot3() set hidden = 1 if(fexists("players/[usr.ckey]/[usr.ckey](3).sav")) if((input("Delete Character? Are you sure?\nThis process cannot be reversed.\n\ Type DELETE in the area below to confirm.","Delete Character") as text)=="DELETE") fdel("players/[usr.ckey]/[usr.ckey](3).sav") winset(src,"MainWindow.InfoChill","is-visible=true") winset(src,"MainWindow.DLChill","is-visible=false") src.loc=locate(11,10,2) alert(usr,"Youre character was successfully deleted!","Info") src.savefile1=0 src.savefile2=0 src.savefile3=0 else alert(usr,"No savefile found in this slot!","Error") return
mob var kiboosted=0 strboosted=0 defboosted=0 plboosted=0 save_file_1=0 save_file_2=0 save_file_3=0 displayicon=0 tpsboosted=0 var/list/Forbidden_Words=list("goten","brolly","broly","barbock","fucked","bitch","fuck","ass","dumbass","dumb","asshole","rape","stupid","homo","gay","fag","faggot","god","idiot","goku","vegeta","vegito","shenron","cell","trunks","gohan","gotenks","krillin","majin","buu","frieza","uub","gogeta","piccolo") var/list/NameList=list() var/list/Allowed_Letters=list("a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"," ")
mob/var/tmp/stepsused=0 mob/Guest Login() MK() if(key!="[mainkey1]")CheckBan() loc=locate(9,8,6) mob proc UpdateDisplayIcon() if(Oozaru||!src)return var/icon/PI = icon(icon,"",SOUTH) if(!PI||!src||Oozaru)return for(var/X in overlays) if(!X)return PI.Blend(icon(X:icon,"",SOUTH),ICON_OVERLAY) for(var/X in underlays) if(!X)return PI.Blend(icon(X:icon,"",SOUTH),ICON_UNDERLAY) displayicon=PI ApplyIconHair() if(newskin=="tan") skin="tan" icon='Male - Tan.dmi' if(newskin=="white") skin="white" icon='Male - White.dmi' if(newskin=="dark") skin="dark" icon='Male - Dark.dmi' if(newskin=="tanf") skin="tanf" icon='Female - Tan.dmi' if(newskin=="whitef") skin="whitef" icon='Female - White.dmi' if(newskin=="darkf") skin="darkf" icon='Female - Dark.dmi' if(newhair=="Bald")hair = "Bald" if(newhair=="Goku") hair="Goku" hair_icon='Hair - Goku.dmi' overlays+=hair_icon if(newhair=="Vegeta") hair="Vegeta" hair_icon='Hair - Vegeta.dmi' overlays+=hair_icon if(newhair=="Teen Gohan") hair="Teen Gohan" hair_icon='Hair - Teen Gohan.dmi' overlays+=hair_icon if(newhair=="Adult Gohan") hair="Adult Gohan" hair_icon='Hair - Adult Gohan.dmi' overlays+=hair_icon if(newhair=="Future Gohan") hair = "Future Gohan" hair_icon = 'Hair - Future Gohan.dmi' overlays += hair_icon if(newhair=="Hercule") hair="Hercule" hair_icon='Hair - Hercule.dmi' overlays+=hair_icon if(newhair=="Raditz") hair="Raditz" hair_icon='Hair - Raditz.dmi' overlays+=hair_icon if(newhair=="Trunks Long") hair="Trunks Long" hair_icon='Hair - Trunks Long.dmi' overlays+=hair_icon
|