API tools faq
paste
crsandu

Untitled

crsandu
Nov 3rd, 2013
273
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 23.49 KB | None | 0 0
raw download clone embed print report
  1. local version = "0.1"
  2. local servername = " "
  3. local gmname = "Server"
  4.  
  5. local MAX_PLAYERS = GetMaxPlayers();
  6. local MaxPlayers = 100;
  7. local Player = {};
  8.  
  9. function InitGamemode()
  10. for i = 0, MaxPlayers - 1 do
  11. Player[i] = {};
  12. Player[i].loggedIn = nil;
  13. end
  14.  
  15. print("Wolfram");
  16.  
  17. SetGamemodeName(string.format("%s %s",gmname,version));
  18. EnableChat(0);
  19.  
  20. end
  21. function guiCharacter(playerid)
  22. local servernmd = CreateDraw(5200,200 , string.format("%s" , "Server name: Wolfram") , "Font_Old_10_White_Hi.TGA" ,236 , 236 , 236);
  23. ShowDraw(playerid , servernmd);
  24. local testowyRysunek = CreateDraw(5200,400 , string.format("%s" , "Administrator: ") , "Font_Old_10_White_Hi.TGA" ,236 , 236 , 236);
  25. ShowDraw(playerid , testowyRysunek);
  26. name = GetPlayerName(playerid);
  27. end
  28.  
  29. function OnGamemodeInit()
  30. print("------------------------------------------------------");
  31. print("Wolfram");
  32. print("Wolfram by ChrystianSandu");
  33. print("------------------------------------------------------");
  34. InitGamemode();
  35. end
  36.  
  37. function OnPlayerSpawn(playerid)
  38. end
  39. function OnPlayerConnect(playerid)
  40. FreezePlayer(playerid,1);
  41. Player[playerid].name = GetPlayerName(playerid);
  42. local file = io.open(Player[playerid].name..".par","r+");
  43. if file then
  44. SendPlayerMessage(playerid,230,230,230,"There is saved data for your character. Enter your credentials please!");
  45. FreezePlayer(playerid,1);
  46. file:close();
  47. else
  48. SendPlayerMessage(playerid,230,230,230,"No data exists for this name. Please register!");
  49. end
  50. end
  51.  
  52. function OnPlayerChangeClass(playerid, classid)
  53. SpawnPlayer(playerid);
  54. end
  55.  
  56. function OnPlayerCommandText(playerid , cmdtext)
  57. local cmd , params = GetCommand(cmdtext);
  58.  
  59. if cmd == "/register" then
  60. if Player[playerid].loggedIn == nil then
  61. CMD_Register(playerid,params);
  62. else
  63. SendPlayerMessage(playerid,230,230,230,"You've already registered a character!");
  64. end
  65. elseif cmd == "/login" then
  66. if Player[playerid].loggedIn == nil then
  67. CMD_Login(playerid,params);
  68. else
  69. SendPlayerMessage(playerid,230,230,230,"You're logged in already!");
  70. end
  71. elseif cmd == "/changepw" then
  72. if Player[playerid].loggedIn == 1 then
  73. CMD_ChangePassword(playerid,params);
  74. else
  75. SendPlayerMessage(playerid,230,230,230,"You need to be logged in!");
  76. end
  77. end
  78.  
  79. if cmd == "/b" then
  80. CMD_OOC(playerid , params);
  81.  
  82. elseif cmd == "/w" then
  83. CMD_PM(playerid , params);
  84.  
  85. elseif cmd == "/k" then
  86. CMD_k(playerid , params);
  87.  
  88. elseif cmdtext == "/suicide" then
  89. CMD_suicide(playerid, cmdtext)
  90.  
  91. elseif cmdtext == "/save" then
  92. CMD_save(playerid, cmdtext)
  93.  
  94. elseif cmdtext == "/help" then
  95. CMD_help(playerid, cmdtext)
  96.  
  97. elseif cmdtext == "/en" then
  98. CMD_en(playerid, cmdtext)
  99.  
  100. elseif cmdtext == "/ro" then
  101. CMD_ro(playerid, cmdtext)
  102.  
  103. elseif cmdtext == "/ruler" then
  104. CMD_ruler(playerid, cmdtext)
  105.  
  106. elseif cmdtext == "/cmdr" then
  107. CMD_cmdr(playerid, cmdtext)
  108.  
  109. elseif cmdtext == "/rulee" then
  110. CMD_rulee(playerid, cmdtext)
  111.  
  112. elseif cmdtext == "/cmde" then
  113. CMD_cmde(playerid, cmdtext)
  114.  
  115. elseif cmdtext == "/class" then
  116. CMD_class(playerid, params)
  117.  
  118.  
  119. elseif cmdtext == "/trade" then
  120. Trade(playerid , cmdtext);
  121.  
  122. elseif cmdtext == "/g" then
  123. CMD_g(playerid, params);
  124. end
  125. end
  126.  
  127. ----------------------------------------------------------------
  128. function Trade(playerid, params)
  129. local result, slot, amount, price = sscanf(params, "ddd");
  130. if result == 1 then
  131. local focus_id = GetFocus(playerid);
  132. if focus_id ~= -1 then
  133. if IsNPC(focus_id) == 0 then
  134. local item, item_amount = checkPlayerSlot(playerid, slot);
  135. if item and item_amount >= amount then
  136. SendPlayerMessage(playerid, 0, 255, 0, "Send offer: "..item.." amount: "..amount);
  137. SendPlayerMessage(focus_id, 0, 255, 0, "Received offer: "..item.." amount: "..amount);
  138. else
  139. SendPlayerMessage(playerid, 255, 0, 0, "You don't have this item or you don't have enough amount!");
  140. end
  141. else
  142. SendPlayerMessage(playerid, 255, 0, 0, "You can't trade with bot!");
  143. end
  144. else
  145. SendPlayerMessage(playerid, 255, 0, 0, "You don't have any focus!");
  146. end
  147. else
  148. SendPlayerMessage(playerid, 255, 0, 0, "Type /trade slot amount price");
  149. end
  150. end
  151.  
  152. function CMD_suicide(playerid, cmdtext)
  153. SetPlayerHealth(playerid,0);
  154. SendPlayerMessage(playerid,255,250,200,"Te-ai sinucis");
  155. end
  156.  
  157. function CMD_help(playerid, cmdtext)
  158. SendPlayerMessage(playerid,119,61,200,"English or Romanian? (/en or /ro)");
  159. end
  160.  
  161. function CMD_save(playerid, cmdtext)
  162. WriteDatabase(playerid);
  163. SendPlayerMessage(playerid,10 , 255 , 0,"Salvare joc...");
  164. SendPlayerMessage(playerid,10 , 255 , 0,"Salvare completa");
  165.  
  166. end
  167.  
  168. function OnPlayerText(playerid , text)
  169. local name = GetPlayerName(playerid);
  170. for i = 0, MAX_PLAYERS - 1 do
  171.  
  172. if GetDistancePlayers(playerid , i) <= 100 then
  173. if IsPlayerAdmin(playerid) == 1
  174. then
  175. SendPlayerMessage(i , 153 , 0 , 77 , string.format("%s %s %s", name , "say:" , text));
  176. else
  177. SendPlayerMessage(i , 236 , 236 , 236 , string.format("%s %s %s" , name , "say:" , text));
  178. end
  179.  
  180. end
  181. end
  182. end
  183.  
  184. function CMD_k(playerid , params)
  185. local result , chattext = sscanf(params , "s")
  186. local name = GetPlayerName(playerid);
  187. for i = 0, MAX_PLAYERS - 1 do
  188.  
  189. if GetDistancePlayers(playerid , i) <= 350 then
  190.  
  191. SendPlayerMessage(i , 102 , 0 , 0 , string.format("%s %s %s" ,name , "shout:" , chattext));
  192. end
  193.  
  194. end
  195.  
  196. end
  197.  
  198. function CMD_g(playerid , params)
  199. if IsPlayerAdmin(playerid) == 1
  200. then
  201. local result, chattext = sscanf(params , "s");
  202. if result == 1 then
  203. for i = 0, MAX_PLAYERS - 1 do
  204. SendMessageToAll(i,156 , 78, 59 , string.format("%s %s %s" ,name , "global:" , chattext));
  205. end
  206. end
  207. else
  208. SendPlayerMessage(playerid,10 , 255 , 0,"Nu esti administrator!");
  209. end
  210. end
  211.  
  212. function CMD_OOC(playerid , params)
  213. local result , chattext = sscanf(params , "s")
  214. local name = GetPlayerName(playerid);
  215. for i = 0, MAX_PLAYERS - 1 do
  216.  
  217. if GetDistancePlayers(playerid , i) <= 100 then
  218.  
  219. SendPlayerMessage(i , 122, 255 , 228 , string.format("%s : (%s)" ,name , chattext));
  220. end
  221.  
  222. end
  223.  
  224. end
  225.  
  226. function CMD_PM(playerid , params)
  227. local name = GetPlayerName(playerid);
  228. local result , lid , msg = sscanf(params , "ds");
  229. if result == 1 then
  230. if IsPlayerConnected(lid) then
  231.  
  232. SendPlayerMessage(lid , 236 , 236 , 236 , string.format("%s : %s" , name , msg));
  233. GameTextForPlayer(lid , 3000 , 3000 , "You have got PM!" , "Font_Old_20_White_Hi.TGA" , 236 , 236 , 236 , 1000);
  234. GameTextForPlayer(playerid , 3000 , 3000 , "Message sended!" , "Font_Old_20_White_Hi.TGA" , 236 , 236 , 236 , 1000);
  235.  
  236. else
  237. GameTextForPlayer(playerid , 3000 , 3000 , "Player is not online!" , "Font_Old_20_White_Hi.TGA" , 236 , 236 , 236 , 1000);
  238. end
  239. else
  240.  
  241. SendPlayerMessage(playerid, 236 , 236 , 236 , "Bad message format!");
  242. SendPlayerMessage(playerid , 236 , 236 , 236 , "use : /pm id message");
  243.  
  244. end
  245.  
  246. end
  247.  
  248.  
  249. -------------------------------------------------------------{help}------------------------------------
  250. function CMD_ro(playerid, cmdtext)
  251. SendPlayerMessage(playerid,77,5,200," ");
  252. SendPlayerMessage(playerid,77,5,200,"Bine, esti Roman.");
  253. SendPlayerMessage(playerid,77,5,200,"Administratorul principal al server-ului este ChrystianSandu.");
  254. SendPlayerMessage(playerid,77,5,200,"Pentru comenzi: /cmdr.");
  255. SendPlayerMessage(playerid,77,5,200,"Pentru regulament: /ruler.");
  256. end
  257.  
  258. function CMD_en(playerid, cmdtext)
  259. SendPlayerMessage(playerid,77,5,200," ");
  260. SendPlayerMessage(playerid,77,5,200,"Ok... you are english");
  261. SendPlayerMessage(playerid,77,5,200,"Leader Admin is ChrystianSandu.");
  262. SendPlayerMessage(playerid,77,5,200,"For cmd (commands): /cmde.");
  263. SendPlayerMessage(playerid,77,5,200,"For rules: /rulee.");
  264. end
  265.  
  266. function CMD_cmdr(playerid, cmdtext)
  267. SendPlayerMessage(playerid,77,5,200," ");
  268. SendPlayerMessage(playerid,77,5,200,"Comenzi, in romana:");
  269. SendPlayerMessage(playerid,77,5,200,"/suicide - pentru a te sinucide");
  270. SendPlayerMessage(playerid,77,5,200,"/save - pentru a salva jocul (este necesar sa da-ti save)");
  271. SendPlayerMessage(playerid,77,5,200,"/k - urla, b - occ");
  272. end
  273.  
  274. function CMD_ruler(playerid, cmdtext)
  275. SendPlayerMessage(playerid,77,5,200," ");
  276. SendPlayerMessage(playerid,77,5,200,"Regulamantul, in romana:");
  277. SendPlayerMessage(playerid,77,5,200,"Este interzis: - reclama, - limbajul obscen");
  278. SendPlayerMessage(playerid,77,5,200,"- discutiile homofobe, xenofobe");
  279. SendPlayerMessage(playerid,77,5,200,"- spam");
  280. end
  281.  
  282. function CMD_rulee(playerid, cmdtext)
  283. SendPlayerMessage(playerid,77,5,200," ");
  284. SendPlayerMessage(playerid,77,5,200,"Rules, in english:");
  285. SendPlayerMessage(playerid,77,5,200,"Is strictly prohibited: - ad, - obscene language");
  286. SendPlayerMessage(playerid,77,5,200,"- discussions homophobic and xenophobic");
  287. SendPlayerMessage(playerid,77,5,200,"- spam");
  288. end
  289.  
  290. function CMD_cmde(playerid, cmdtext)
  291. SendPlayerMessage(playerid,77,5,200," ");
  292. SendPlayerMessage(playerid,77,5,200,"CMDS::");
  293. SendPlayerMessage(playerid,77,5,200,"/suicide; /save - to save status");
  294. SendPlayerMessage(playerid,77,5,200,"/k - shout");
  295. SendPlayerMessage(playerid,77,5,200,"/b - OCC");
  296. end
  297. --============================================================================================================
  298. function CMD_Register(playerid,params)
  299. local result, password = sscanf(params,"s");
  300. if result == 1 then
  301. local fileRead = io.open(Player[playerid].name..".par","r+");
  302. if fileRead then
  303. SendPlayerMessage(playerid,230,230,230,"An account with this name exists! Login or choose a different name!");
  304. fileRead:close();
  305. else
  306. Player[playerid].password = password;
  307. print(Player[playerid].name.." registered!");
  308. WriteDatabase(playerid);
  309. Player[playerid].loggedIn = 1;
  310. SendPlayerMessage(playerid,230,230,230,"You've completed your registration successfully!");
  311. FreezePlayer(playerid,0);
  312. guiCharacter(playerid);
  313.  
  314. end
  315. else
  316. SendPlayerMessage(playerid,230,230,230,"Use: /register (password)");
  317. end
  318. end
  319.  
  320. function CMD_Login(playerid,params)
  321. local result, password = sscanf(params,"s");
  322. if result == 1 then
  323. local file = io.open(Player[playerid].name..".par","r+");
  324. if file then
  325. FreezePlayer(playerid,1);
  326. local tempvar = file:read("*l");
  327. local result, trashName, pass = sscanf(tempvar,"ss");
  328. if result == 1 then
  329. if pass == password then
  330. FreezePlayer(playerid,0);
  331. Player[playerid].password = password;
  332. ReadDatabase(playerid);
  333. print(Player[playerid].name.." logged in!");
  334. SendPlayerMessage(playerid,230,230,230,"You've logged in successfully!");
  335. Player[playerid].loggedIn = 1;
  336. FreezePlayer(playerid,0);
  337. guiCharacter(playerid);
  338. else
  339. SendPlayerMessage(playerid,230,230,230,"The password is not correct!");
  340. end
  341. end
  342. file:close();
  343. else
  344. SendPlayerMessage(playerid,230,230,230,"No data exists for this name. Please register with /register!");
  345. end
  346. else
  347. SendPlayerMessage(playerid,230,230,230,"Use: /login (password)");
  348. end
  349. end
  350.  
  351. function CMD_ChangePassword(playerid,params)
  352. local result, oldpw, newpw = sscanf(params,"ss");
  353. if result == 1 then
  354. if oldpw == Player[playerid].password then
  355. Player[playerid].password = newpw;
  356. print(Player[playerid].name.." changed his password!");
  357. WriteDatabase(playerid);
  358. SendPlayerMessage(playerid,230,230,230,"You've changed your password!");
  359. else
  360. SendPlayerMessage(playerid,230,230,230,"You didn't enter your old password properly!");
  361. end
  362. else
  363. SendPlayerMessage(playerid,230,230,230,"Use: /changepw (oldpassword) (newpassword)");
  364. end
  365. end
  366.  
  367. function OnPlayerDisconnect(playerid, reason)
  368. if Player[playerid].loggedIn == 1 then
  369. print(Player[playerid].name.." logged off!");
  370. WriteDatabase(playerid);
  371. Player[playerid].loggedIn = nil;
  372. else
  373. Player[playerid].loggedIn = nil;
  374. end
  375. end
  376.  
  377. function WriteDatabase(playerid)
  378. local world = GetPlayerWorld(playerid);
  379. local x, y, z = GetPlayerPos(playerid);
  380. local angle = GetPlayerAngle(playerid);
  381. local fatness = GetPlayerFatness(playerid);
  382. local HP = GetPlayerHealth(playerid);
  383. local MaxHP = GetPlayerMaxHealth(playerid);
  384. local Mana = GetPlayerMana(playerid);
  385. local MaxMana = GetPlayerMaxMana(playerid);
  386. local Lvl = GetPlayerLevel(playerid);
  387. local MagLvl = GetPlayerMagicLevel(playerid);
  388. local LP = GetPlayerLearnPoints(playerid);
  389. local XP = GetPlayerExperience(playerid);
  390. local NextXP = GetPlayerExperienceNextLevel(playerid);
  391. local Str = GetPlayerStrength(playerid);
  392. local Dex = GetPlayerDexterity(playerid);
  393. local OneH = GetPlayerSkillWeapon(playerid, 0);
  394. local TwoH = GetPlayerSkillWeapon(playerid, 1);
  395. local Bow = GetPlayerSkillWeapon(playerid, 2);
  396. local Xbow = GetPlayerSkillWeapon(playerid, 3);
  397. local Acro = GetPlayerAcrobatic(playerid);
  398. local equippedMeleeWeapon = GetEquippedMeleeWeapon(playerid);
  399. local equippedRangedWeapon = GetEquippedRangedWeapon(playerid);
  400. local equippedArmor = GetEquippedArmor(playerid);
  401. local class = setPlayerClass(playerid, class);
  402. local fileWrite = io.open(Player[playerid].name..".par", "w+");
  403. fileWrite:write(Player[playerid].name.." "..Player[playerid].password.."\n");
  404. fileWrite:write(world," ",x," ",y," ",z," ",angle,"\n");
  405. fileWrite:write(fatness,"\n");
  406. fileWrite:write(HP," ",MaxHP," ",Mana," ",MaxMana,"\n");
  407. fileWrite:write(Lvl," ",MagLvl," ",LP," ",XP," ",NextXP,"\n");
  408. --fileWrite:write(Str," ",Dex," ",OneH," ",TwoH," ",Bow," ",Xbow," ",class,"\n");
  409. fileWrite:write(Str," ",Dex," ",OneH," ",TwoH," ",Bow," ",Xbow,"\n");
  410. fileWrite:write(Acro,"\n");
  411. fileWrite:write(equippedMeleeWeapon," ",equippedRangedWeapon," ",equippedArmor);
  412. fileWrite:close();
  413. end
  414.  
  415. function ReadDatabase(playerid)
  416. local fileRead = io.open(Player[playerid].name..".par","r+");
  417. tempvar = fileRead:read("*l"); --name and password, these are global -> unprocessed, this line is read just to jump to line two
  418. tempvar = fileRead:read("*l");
  419. local result, world, x, y, z, angle = sscanf(tempvar,"sdddd");
  420. if result == 1 then
  421. local currentWorld = GetPlayerWorld(playerid);
  422. if currentWorld ~= world then
  423. if world == "ADDON\\ADDONWORLD.ZEN" then
  424. SetPlayerWorld(playerid,"ADDON\\ADDONWORLD.ZEN","ADW_ENTRANCE");
  425. elseif world == "AETEROX_LAGERFEUER.ZEN" then
  426. SetPlayerWorld(playerid,"AETEROX_LAGERFEUER.ZEN","ADW_ENTRANCE");
  427. elseif world == "OLDWORLD\\OLDWORLD.ZEN" then
  428. SetPlayerWorld(playerid,"OLDWORLD\\OLDWORLD.ZEN","START");
  429. elseif world == "NEWWORLD\\NEWWORLD.ZEN" then
  430. SetPlayerWorld(playerid,"NEWWORLD\\NEWWORLD.ZEN","START");
  431. elseif world == "NEWWORLD\\DRAGONISLAND.ZEN" then
  432. SetPlayerWorld(playerid,"NEWWORLD\\DRAGONISLAND.ZEN","SHIP");
  433. end
  434. end
  435. SetPlayerPos(playerid, x, y, z);
  436. SetPlayerAngle(playerid,angle);
  437. end
  438. tempvar = fileRead:read("*l");
  439. local result, fatness = sscanf(tempvar,"d");
  440. if result == 1 then
  441. SetPlayerFatness(playerid,fatness);
  442. end
  443. tempvar = fileRead:read("*l");
  444. local result, HP, MaxHP, Mana, MaxMana = sscanf(tempvar,"dddd");
  445. if result == 1 then
  446. SetPlayerHealth(playerid, HP);
  447. SetPlayerMaxHealth(playerid,MaxHP);
  448. SetPlayerMana(playerid, Mana);
  449. SetPlayerMaxMana(playerid, MaxMana);
  450. end
  451. tempvar = fileRead:read("*l");
  452. local result, Lvl, MagLvl, LP, XP, NextXP = sscanf(tempvar,"ddddd");
  453. if result == 1 then
  454. SetPlayerLevel(playerid, Lvl);
  455. SetPlayerMagicLevel(playerid, MagLvl);
  456. SetPlayerLearnPoints(playerid, LP);
  457. SetPlayerExperience(playerid, XP);
  458. SetPlayerExperienceNextLevel(playerid, NextXP);
  459. end
  460. tempvar = fileRead:read("*l");
  461. local result, Str, Dex, OneH, TwoH, Bow, Xbow, class = sscanf(tempvar,"ddddddd");
  462. if result == 1 then
  463. SetPlayerStrength(playerid, Str);
  464. SetPlayerDexterity(playerid, Dex);
  465. SetPlayerSkillWeapon(playerid, 0, OneH);
  466. SetPlayerSkillWeapon(playerid, 1, TwoH);
  467. SetPlayerSkillWeapon(playerid, 2, Bow);
  468. SetPlayerSkillWeapon(playerid, 3, Xbow);
  469. setPlayerClass(playerid, class);
  470. end
  471. tempvar = fileRead:read("*l");
  472. local result, Acro = sscanf(tempvar,"d");
  473. if result == 1 then
  474. SetPlayerAcrobatic(playerid, Acro);
  475. end
  476. tempvar = fileRead:read("*l");
  477. local result, Melee, Ranged, Armor = sscanf(tempvar,"sss");
  478. if result == 1 then
  479. if MeleeWep ~= "NULL" then
  480. EquipMeleeWeapon(playerid, Melee);
  481. end
  482. if RangWep ~= "NULL" then
  483. EquipRangedWeapon(playerid, Ranged);
  484. end
  485. if Armor ~= "NULL" then
  486. EquipArmor(playerid, Armor);
  487. end
  488. end
  489. fileRead:close();
  490. end
  491. --Classes
  492. function GPlayerClass(playerid, class)
  493. --code
  494. end
  495.  
  496. function CMD_class(playerid, params)
  497. local result, ppid , clid = sscanf(params, "dd");
  498. if result == 1 then
  499. if IsPlayerAdmin(playerid) == 1 then
  500. if clid == 1 then
  501. Vagabond(ppid);
  502. Player[ppid].class = 1;
  503. SendPlayerMessage(ppid,255,205,0,"Felicitari! Ai fost promovat la: Vagabond!");
  504. elseif clid == 2 then
  505. Cetatean(ppid);
  506. Player[ppid].class = 2;
  507. SendPlayerMessage(ppid,255,205,0,"Felicitari! Ai fost promovat la: Cetatean!");
  508. elseif clid == 3 then
  509. Fire(ppid);
  510. Player[ppid].class = 3;
  511. SendPlayerMessage(ppid,255,205,0,"Felicitari! Ai fost promovat la: Magician de FoC (Fire Mage)");
  512. elseif clid == 4 then
  513. HFire(ppid);
  514. Player[ppid].class = 4;
  515. SendPlayerMessage(ppid,255,205,0,"Felicitari! Ai fost promovat la:Mare magician de FoC (High Fire Mage)");
  516. elseif clid == 4 then
  517. Paladin(ppid);
  518. Player[ppid].class = 4;
  519. SendPlayerMessage(ppid,255,205,0,"Felicitari! Ai fost promovat la: Paladin");
  520. end
  521. else
  522. SendPlayerMessage(ppid,255,205,0,"Nu esti ADMINISTRATOR!");
  523. end
  524. end
  525. end
  526. function setPlayerClass(playerid, class)
  527. if fire == 3 then
  528. Fire(playerid);
  529. elseif water == 2 then
  530. Water(playerid);
  531. elseif paladin == 3 then
  532. Paladin(playerid);
  533. elseif mpolice == 4 then
  534. MPolice(playerid);
  535. elseif king == 5 then
  536. king(playerid);
  537. end
  538. end
  539.  
  540. function Novice (ppid)
  541. GiveItem(playerid,"ItAr_NOV_L",1);
  542. GiveItem(playerid,"ItMw_RangerStaff_Addon",1);
  543. GiveItem(playerid,"ItRu_TeleportMonastery",1);
  544. GiveItem(playerid,"ItRu_FireBolt",1);
  545. GiveItem(playerid,"ItPo_Health_02",6);
  546. SetPlayerMaxHealth(playerid,350);
  547. SetPlayerHealth(playerid,350);
  548. SetPlayerMaxMana(playerid,450);
  549. SetPlayerMana(playerid,450);
  550. SetPlayerStrength(playerid,35);
  551. SetPlayerDexterity(playerid,35);
  552. SetPlayerSkillWeapon(playerid,15,15);
  553. end
  554.  
  555.  
  556. function Fire (ppid)
  557. GiveItem(playerid,"ItMw_1H_Common_01",1);
  558. GiveItem(playerid,"ItAr_KDF_L",1);
  559. GiveItem(playerid,"ITAR_Vlk_L",1);
  560. GiveItem(playerid,"ItRu_TeleportMonastery",1);
  561. GiveItem(playerid,"ItRu_PalHolyBolt",1);
  562. GiveItem(playerid,"ItRu_LightningFlash",1);
  563. GiveItem(playerid,"ItRu_IceCube",1);
  564. GiveItem(playerid,"ItRu_FireBolt",1);
  565. GiveItem(playerid,"ItPo_Health_03",5);
  566. SetPlayerMaxHealth(playerid,550);
  567. SetPlayerHealth(playerid,550);
  568. SetPlayerMaxMana(playerid,750);
  569. SetPlayerMana(playerid,750);
  570. SetPlayerStrength(playerid,35);
  571. SetPlayerDexterity(playerid,35);
  572. SetPlayerSkillWeapon(playerid,15,15);
  573. end
  574.  
  575. function HFire (ppid)
  576. SetPlayerStrength(playerid,200);
  577. end
  578.  
  579. function Paladin (ppid)
  580. GiveItem(playerid,"ItRu_PalHolyBolt",1);
  581. GiveItem(playerid,"ItAr_PAl_H",1);
  582. GiveItem(playerid,"ITAR_Vlk_L",1);
  583. GiveItem(playerid,"ItMw_1h_Pal_Sword",1);
  584. GiveItem(playerid,"ItMw_2h_Pal_Sword",1);
  585. GiveItem(playerid,"ItPo_Health_03",5);
  586. SetPlayerMaxHealth(playerid,1050);
  587. SetPlayerHealth(playerid,1000);
  588. SetPlayerMaxMana(playerid,250);
  589. SetPlayerMana(playerid,250);
  590. SetPlayerStrength(playerid,90);
  591. SetPlayerDexterity(playerid,90);
  592. SetPlayerSkillWeapon(playerid,85,85);
  593. end
  594.  
  595. function MPolice (playerid)
  596. GiveItem(playerid,"ITAR_Mil_L",1);
  597. GiveItem(playerid,"ItMw_ShortSword1",1);
  598. GiveItem(playerid,"ItPo_Health_02",5);
  599. SetPlayerMaxHealth(playerid,650);
  600. SetPlayerHealth(playerid,625);
  601. SetPlayerMaxMana(playerid,45);
  602. SetPlayerMana(playerid,45);
  603. SetPlayerStrength(playerid,50);
  604. SetPlayerDexterity(playerid,50);
  605. SetPlayerSkillWeapon(playerid,65,65);
  606. end
  607.  
  608. function king (playerid)
  609. GiveItem(playerid,"ItMw_1h_Vlk_Mace",1);
  610. GiveItem(playerid,"ITAR_Governor",1);
  611. GiveItem(playerid,"ITAR_Vlk_M",1);
  612. GiveItem(playerid,"ITAR_Diego",1);
  613. GiveItem(playerid,"ItMw_1h_Vlk_Sword",1);
  614. GiveItem(playerid,"ItPo_Health_03",5);
  615. SetPlayerMaxHealth(playerid,200);
  616. SetPlayerHealth(playerid,200);
  617. SetPlayerMaxMana(playerid,35);
  618. SetPlayerMana(playerid,150);
  619. SetPlayerStrength(playerid,30);
  620. SetPlayerDexterity(playerid,30);
  621. SetPlayerSkillWeapon(playerid,35,35);
  622. end
Advertisement
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!