Advertisement
Guest User

Untitled

a guest
May 28th, 2016
56
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 7.44 KB | None | 0 0
  1. mysql:Connect("localhost", "root", "", "bleach", 3306);
  2.  
  3. local meta = FindMetaTable( "Player" )
  4.  
  5. net.Receive( "BleachRecieveCharacter", function( len, ply )
  6.     local name = net.ReadString()
  7.     local description = net.ReadString()
  8.     local division = net.ReadString()
  9.     local division = tonumber(division)
  10.     ply:CreateCharacter( name, description, division)
  11. end )
  12.  
  13. concommand.Add("hey", function(ply)
  14. --[[ --]]
  15.      queryObj = mysql:Create("characterinfo");
  16.         queryObj:Create("characterid", "INT NOT NULL");
  17.         queryObj:Create("division", "INT NOT NULL");
  18.         queryObj:Create("seat", "INT NOT NULL");
  19.         queryObj:Create("name", "VARCHAR(255) NOT NULL");
  20.         queryObj:Create("description", "VARCHAR(255) NOT NULL");
  21.         queryObj:Create("items", "VARCHAR(255) NOT NULL");
  22.         queryObj:Create("reiatsu", "INT NOT NULL");
  23.         queryObj:Create("ken", "INT NOT NULL");
  24.         queryObj:Create("steam_id", "VARCHAR(25) NOT NULL AUTO_INCREMENT");
  25.         queryObj:PrimaryKey("steam_id");
  26.         queryObj:Execute();
  27.         --[[
  28.         local insertObj = mysql:Insert("characterinfo");
  29.         insertObj:Insert("characterid", 1);
  30.         insertObj:Insert("name", "Ichigo");
  31.         insertObj:Insert("description", "Stronk");
  32.         insertObj:Insert("seat", 20);
  33.         insertObj:Insert("division", 1);
  34.         insertObj:Insert("reiatsu", 125000);
  35.         insertObj:Insert("ken", 350000);
  36.         insertObj:Insert("items", "another_zanpakto");
  37.         insertObj:Insert("steam_id", ply:SteamID());
  38.         insertObj:Execute();
  39.         --]]
  40.     PrintTable(Zanpakto)
  41. end)
  42.  
  43.  
  44.  
  45.  
  46.        
  47. function CreateSeat(ply)
  48.  
  49. local insertObj = mysql:Insert("characterinfo");
  50. insertObj:Insert("seat", 20);
  51. insertObj:Insert("steam_id", ply:SteamID());
  52. insertObj:Callback(function(result, status, lastID)
  53. print(string.format("Seat created for ", ply:Name()));
  54. end);
  55. insertObj:Execute();
  56.  
  57. end
  58.  
  59.  
  60. function UpdateSeat(ply)
  61. local insertObj = mysql:Update("characterinfo");
  62. insertObj:Update("seat", ply.CurrentSeat);
  63. insertObj:Where("steam_id", ply:SteamID());
  64. insertObj:Callback(function(result, status, lastID)
  65. print("is now updated in mysql for seat");
  66. end);
  67. insertObj:Execute();
  68.  
  69. end
  70.  
  71.  
  72. function Getseat(ply)
  73.  
  74.     local queryObj = mysql:Select("characterinfo");
  75.         queryObj:Select("seat")
  76.         queryObj:Where("steam_id", ply:SteamID());
  77.         queryObj:Callback(function(result, status, lastID)
  78.         if (type(result) == "table" and #result > 0) then
  79.         PrintTable(result)
  80.         ply.CurrentSeat = result[1].seat
  81.         if ply.CurrentSeat >= 2 then
  82.             if ply.CurrentSeat == 1 then
  83.                 Divisions[tonumber(ply.CurrentDivision)].Seat[ply.CurrentSeat].Captain = ply
  84.             else
  85.                 Divisions[tonumber(ply.CurrentDivision)].Seat[ply.CurrentSeat].Lieutenant = ply
  86.             end
  87.         else
  88.             table.insert(Divisions[tonumber(ply.CurrentDivision)].Seat[ply.CurrentSeat], ply)
  89.             end
  90.         else
  91.         CreateSeat(ply)
  92.         ply.CurrentSeat = 20
  93.         end;
  94.     end);
  95.         queryObj:Execute();
  96. end
  97.  
  98.  -- reiatsu
  99. function CreateReiatsu(ply)
  100.  
  101. local insertObj = mysql:Insert("characterinfo");
  102. insertObj:Insert("reiatsu", 10);
  103. insertObj:Insert("steam_id", ply:SteamID());
  104. insertObj:Callback(function(result, status, lastID)
  105. print(string.format("Reiatsu created for ", ply:Name()));
  106. end);
  107. insertObj:Execute();
  108.  
  109. end
  110.  
  111.  
  112. function UpdateReiatsu(ply)
  113.  
  114. local insertObj = mysql:Update("characterinfo");
  115. insertObj:Update("reiatsu", ply.reiatsu);
  116. insertObj:Where("steam_id", ply:SteamID());
  117. insertObj:Callback(function(result, status, lastID)
  118. print("is now updated in mysql for reiatsu");
  119. end);
  120. insertObj:Execute();
  121.  
  122. end
  123.  
  124.  
  125. function GetReiatsu(ply)
  126.     local queryObj = mysql:Select("characterinfo");
  127.         queryObj:Select("reiatsu")
  128.         queryObj:Where("steam_id", ply:SteamID());
  129.         queryObj:Callback(function(result, status, lastID)
  130.         if (type(result) == "table" and #result > 0) then
  131.         PrintTable(result)
  132.         local rei = result[1].reiatsu
  133.         ply.reiatsu = rei
  134.         else
  135.         CreateReiatsu(ply)
  136.         ply.CurrentReiatsu = 10
  137.         ply.reiatsu = 10
  138.         end;
  139.         end);
  140.         queryObj:Execute();
  141. end
  142.  
  143.  
  144.  -- kan
  145. function CreateKan(ply)
  146.  
  147. local insertObj = mysql:Insert("characterinfo");
  148. insertObj:Insert("kan", 100);
  149. insertObj:Insert("steam_id", ply:SteamID());
  150. insertObj:Callback(function(result, status, lastID)
  151. print(string.format("kan created for ", ply:Name()));
  152. end);
  153. insertObj:Execute();
  154.  
  155. end
  156.  
  157.  
  158. function UpdateKan(ply)
  159. local insertObj = mysql:Update("characterinfo");
  160. insertObj:Update("kan", ply.kan);
  161. insertObj:Where("steam_id", ply:SteamID());
  162. insertObj:Callback(function(result, status, lastID)
  163. print("is now updated in mysql for kan");
  164. end);
  165. insertObj:Execute();
  166.  
  167. end
  168.  
  169.  
  170. function GetKan(ply)
  171.     local queryObj = mysql:Select("characterinfo");
  172.         queryObj:Select("kan")
  173.         queryObj:Where("steam_id", ply:SteamID());
  174.         queryObj:Callback(function(result, status, lastID)
  175.         if (type(result) == "table" and #result > 0) then
  176.         PrintTable(result)
  177.         local currnen = result[1].kan
  178.         ply.kan = currnen
  179.         else
  180.         CreateKan(ply)
  181.         ply.kan = 100
  182.         end;
  183.         end);
  184.         queryObj:Execute();
  185. end
  186.  
  187.  
  188. function meta:CreateCharacter(name, description, division)
  189.     local insertObj = mysql:Insert("characterinfo");
  190.         insertObj:Insert("kan", 100);
  191.         insertObj:Insert("name", name);
  192.         insertObj:Insert("description", description);
  193.         insertObj:Insert("items", "none");
  194.         insertObj:Insert("reiatsu", 10);
  195.         insertObj:Insert("characterid", 1);
  196.         insertObj:Insert("division", division);
  197.         insertObj:Insert("seat", 20);
  198.         insertObj:Insert("steam_id", self:SteamID());
  199.         insertObj:Callback(function(result, status, lastID)
  200.             print("Character created for ".. tostring(self));
  201.             self.kan = 100
  202.             self.CurrentReiatsu = 10
  203.             self.reiatsu = 10
  204.             self.CurrentSeat = 20
  205.             self.CurrentDivision = division
  206.             table.insert(Divisions[tonumber(division)].Seat[20], self)
  207.         end);
  208.     insertObj:Execute();
  209. end
  210.  
  211.  
  212.  
  213. function meta:GetCharacter()
  214.     local queryObj = mysql:Select("characterinfo");
  215.         queryObj:Select("kan")
  216.         queryObj:Select("name")
  217.         queryObj:Select("description")
  218.         queryObj:Select("items")
  219.         queryObj:Select("reiatsu")
  220.         queryObj:Select("characterid")
  221.         queryObj:Select("division")
  222.         queryObj:Select("seat")
  223.         queryObj:Where("steam_id", self:SteamID());
  224.         queryObj:Callback(function(result, status, lastID)
  225.         if (type(result) == "table" and #result > 0) then
  226.         --if found do
  227.         self.characters = {}
  228.         self.characters[result[1].characterid] = {
  229.         name = result[1].name,
  230.         description = result[1].description,
  231.         kan = result[1].kan,
  232.         reiatsu = result[1].reiatsu,
  233.         characterid = result[1].characterid,
  234.         division = result[1].division,
  235.         items = result[1].items,
  236.         seat = result[1].seat
  237.         }
  238.         self.CurrentReiatsu = result[1].reiatsu
  239.         self.reiatsu = result[1].reiatsu
  240.         self.kan = result[1].kan
  241.         PrintTable(self.characters)
  242.         self.CurrentSeat = result[1].seat
  243.         self.CurrentDivision = result[1].division
  244.         print("Current Division" .. tostring(self.CurrentDivision))
  245.         print("Current Seat" .. tostring(self.CurrentSeat))
  246.         if self.CurrentSeat >= 2 then
  247.             if self.CurrentSeat == 1 then
  248.                 Divisions[tonumber(self.CurrentDivision)].Seat[self.CurrentSeat].Captain = self
  249.             end
  250.             if self.CurrentSeat == 2 then
  251.                 Divisions[tonumber(self.CurrentDivision)].Seat[self.CurrentSeat].Lieutenant = self
  252.             end
  253.         end
  254.         if self.CurrentSeat >= 3 then
  255.         print("YESAA")
  256.             table.insert(Divisions[tonumber(self.CurrentDivision)].Seat[self.CurrentSeat], self)
  257.         end
  258.        
  259.        
  260.        
  261.        
  262.         else
  263.         --if not found do
  264.         print("Character needs to be created for ".. tostring(self))
  265.         net.Start("BleachCreateCharacter")
  266.         net.WriteEntity(self)
  267.         net.Send(self)
  268.         end;
  269.         end);
  270.         queryObj:Execute();
  271. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement