Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- $${
- IFMATCHES(%CHATCLEAN%,^\[(.+)\] \*|me\] %PLAYER%|me\] %&prname%|me\] %&pname%|me\] %@&pplayer%|: %&prname%|: %&pname%|: %@&pplayer%|: \[)
- Stop()
- ENDIF
- IF(@&pplayer = "")
- @&pplayer = "Noob"
- ENDIF
- IF(&pname = "")
- &pname = "Noob"
- ENDIF
- IF(&prname = "")
- &prname = "Noob"
- ENDIF
- IF(&prizes = "")
- &prizes = "false"
- ENDIF
- IF(&firstopen = "")
- Log("I see this is your first time running RN-Guesser, type &a!help &bto view commands.")
- &firstopen = "false"
- ENDIF
- IF(#prizeamt = 0)
- Set(#prizeamt,10)
- ENDIF
- IFMATCHES(%CHATCLEAN%,prizes$)
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&tname,1,NUL)
- IF(%PLAYER% = %&tname%)
- IF(&prizes = "false")
- &prizes = "true"
- Echo("&bPrizes are now &aenabled&b.")
- ELSEIF(&prizes = "true")
- &prizes = "false"
- Echo("&bPrizes are now &cdisabled&b.")
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,spr$)
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&prname,1,NUL)
- IF(%PLAYER% = %&prname%)
- &prizeset = "false"
- Echo("&bDo you want the prize to be an &aID&b\, &aEmeralds &bor &aRandom&b?")
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&prname,1)
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&prizetype,2)
- IF(&prizeset = "false")
- IF(%PLAYER% = %&prname%)
- IF(&prizetype = "Emeralds")
- &ptype = "Emeralds"
- Echo("&bHow many &aEmeralds &bdo you want the base prize to be?")
- ELSEIF(&prizetype = "ID")
- &ptype = "ID"
- Echo("&bWhat item ID do you want the prize to be? Only &a1 &bwill be given as a reward.")
- Log("&eChoosable ID's: 1-158 and 256-408. Illegal items are already blocked.")
- ELSEIF(&prizetype = "Random")
- &ptype = "Random"
- &prizeset = "true"
- Echo("&bA random prize will be given as a reward.")
- Log("&eDon't worry\, all legal items.")
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- IF(&ptype = "Random")
- IF(&rmodify = "false")
- RANDOM(#picker,1,2)
- IF(#picker = 1)
- DO
- RANDOM(#items,1,158)
- IFMATCHES(%#items%,0|7|8|9|10|11|26|27|30|34|36|51|52|55|59|60|62|63|64|66|68|71|74|75|83|90|93|94|95|97|99|100|104|105|115|117|118|119|120|121|122|124|132|137|138|141|142|144|149|150|157)
- &legal = "false"
- Else
- &legal = "true"
- GetItemInfo(%#items%,&itemname2)
- &prizeset = "true"
- ENDIF
- WHILE(&legal = "false")
- ELSEIF(#picker = 2)
- DO
- RANDOM(#items,256,408)
- IFMATCHES(%#items%,302|303|304|305|326|328|327|342|343|383|385|397|399|403|407|408)
- &legal = "false"
- Else
- &legal = "true"
- GetItemInfo(%#items%,&itemname2)
- &prizeset = "true"
- ENDIF
- WHILE(&legal = "false")
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: ([0-9][0-9]?[0-9]?)$",&prname,1)
- IF(%PLAYER% = %&prname%)
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: ([0-9][0-9]?[0-9]?)$",&itemid,2)
- IF(&prizeset = "false")
- IF(&ptype = "ID")
- Set(#itemid,%&itemid%)
- GetItemInfo(%#itemid%,&itemname)
- IFMATCHES(%CHATCLEAN%,"([0-9]{1,3})$",&change,1)
- IFMATCHES(%&change%,"^(0|[7-9]|1[0-1]|26|27|28|3[046]|5[1-259]|6[02-468]|7[14-5]|83|9[03-579]|10[045]|11[57-9]|12[0-24]|13[278]|14[1249]|15[07]|32[6-8]|30[2-5]|34[23]|38[35]|39[79]|40[378])$")
- Echo("&cThat item is not allowed: %&itemname%.")
- Else
- Echo("&bItem chosen: &a%&itemname%&b.")
- &prizeset = "true"
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: ([0-9][0-9]?[0-9]?)$",&prname,1)
- IF(&prizeset = "false")
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: ([0-9][0-9]?[0-9]?)$",&prizeamt,2)
- IF(%PLAYER% = %&prname%)
- IF(&ptype = "Emeralds")
- &prizeset = "true"
- Set(#prizeamt,%&prizeamt%)
- Echo("&bBase prize amount set to &a%#prizeamt% Emeralds&b.")
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,sg$)
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&startname,1,NUL)
- IF(%PLAYER% = %&startname%)
- IF(&gamestarted = "")
- &gamestarted = "false"
- ELSEIF(&gamestarted = "false")
- #guesses = 0
- &gamestarted = "true"
- Echo("&bGame starting! To play, type &ajoin &bto play. One player at a time.")
- ELSEIF(&gamestarted = "true")
- Echo("&cGame is already in progress!")
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: join$")
- IF(&joined = "")
- &joined = "false"
- ENDIF
- IF(&joined = "false")
- IF(&gamestarted = "true")
- IF(&rmodify = "true")
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&pname,1,NUL)
- &joined = "true"
- Echo("&a%&pname% &bis the contestant! Choose: &aEasy &eMedium &cHard &4Extreme&b.")
- ENDIF
- ENDIF
- ELSEIF(&joined = "true")
- IF(&chosen = "false")
- Echo("&c%&pname% has already joined! &bChoose: &aEasy &eMedium &cHard &4Extreme&b.")
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: easy$")
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&pnamecomp,1,NUL)
- IF(&pname = %&pnamecomp%)
- IF(&rmodify = "")
- &rmodify = "true"
- ENDIF
- IF(&rmodify = "true")
- IF(&joined = "true")
- &rmodify = "false"
- Echo("&aEasy &bchosen. Guess a number between &a1 &band &a50&b.")
- RANDOM(#rnum,1,50)
- &difficulty = "&a[Easy]"
- &chosen = "true"
- #multiplier = 1
- #amount = 1
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: medium$")
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&pnamecomp,1,NUL)
- IF(&pname = %&pnamecomp%)
- IF(&rmodify = "")
- &rmodify = "true"
- ENDIF
- IF(&rmodify = "true")
- IF(&joined = "true")
- &rmodify = "false"
- Echo("&eMedium &bchosen. Guess a number between &a1 &band &a250&b.")
- RANDOM(#rnum,1,250)
- &difficulty = "&e[Medium]"
- &chosen = "true"
- #multiplier = 2
- #amount = 2
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: hard$")
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&pnamecomp,1,NUL)
- IF(&pname = %&pnamecomp%)
- IF(&rmodify = "")
- &rmodify = "true"
- ENDIF
- IF(&rmodify = "true")
- IF(&joined = "true")
- &rmodify = "false"
- Echo("&cHard &bchosen. Guess a number between &a1 &band &a500&b.")
- RANDOM(#rnum,1,500)
- &difficulty = "&c[Hard]"
- &chosen = "true"
- #multiplier = 4
- #amount = 3
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: extreme$")
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&pnamecomp,1,NUL)
- IF(&pname = %&pnamecomp%)
- IF(&rmodify = "")
- &rmodify = "true"
- ENDIF
- IF(&rmodify = "true")
- IF(&joined = "true")
- &rmodify = "false"
- Echo("&4Extreme &bchosen. Guess a number between &a1 &band &a1000&b.")
- RANDOM(#rnum,1,1000)
- &difficulty = "&4[Extreme]"
- &chosen = "true"
- #multiplier = 8
- #amount = 4
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: [0-9][0-9]?[0-9]?[0-9]?$")
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&pnamecomp,1,NUL)
- IF(&pname = %&pnamecomp%)
- IF(&joined = "true")
- IF(&rmodify = "false")
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&pguess,2)
- Set(#guess,%&pguess%)
- IF(#guess > #rnum)
- Inc(#guesses)
- IF(#guesses < 11)
- Echo("&cToo high! &e[%#guess%] &bGuesses: &a%#guesses%&b.")
- Else
- Echo("&cToo high! &e[%#guess%] &bGuesses: &c%#guesses%&b.")
- ENDIF
- ELSEIF(#guess < #rnum)
- Inc(#guesses)
- IF(#guesses < 11)
- Echo("&cToo low! &e[%#guess%] &bGuesses: &a%#guesses%&b.")
- Else
- Echo("&cToo low! &e[%#guess%] &bGuesses: &c%#guesses%&b.")
- ENDIF
- ELSEIF(#guess = #rnum)
- Inc(#guesses)
- IF(&prizes = "false")
- Echo("%&difficulty% &e[%#guess%] &a%&pname% &ewins! &eGuesses: &a%#guesses%&b.")
- &joined = "false"
- &gamestarted = "false"
- &rmodify = "true"
- &chosen = "false"
- ELSEIF(&prizes = "true")
- &joined = "false"
- &gamestarted = "false"
- &rmodify = "true"
- &chosen = "false"
- IF(#guesses = 1)
- IF(#multiplier = 8)
- Echo("&a%&pname% &e[%#guess%] &bwon on their very first guess! They are awarded with a special prize.")
- Echo(/give %&pname% 278 1 name:&3&lSuper_Pickaxe lore:&4&lRN_First-Guess_Winner unbreaking:3 eff:5)
- Echo(/give %&pname% 388 100)
- ENDIF
- ELSEIF(#guesses > 10)
- Echo("%&difficulty% &e[%#guess%] &a%&pname% &bwins but didn't get anything. Too many guesses. :c Guesses: &c%#guesses%&b")
- Echo(/m %&pname% Psst\, have a cookie)
- Echo(/give %&pname% cookie 1)
- ELSEIF(#guesses < 11)
- IF(&ptype = "Emeralds")
- #total = #multiplier * #prizeamt
- #total = #total / #guesses
- IF(#total > 0)
- Echo(/give %&pname% 388 %#total%)
- Echo("%&difficulty% &e[%#guess%] &a%&pname% &bwins and gets &a%#total%&bx &aEmeralds&b. Guesses: &a%#guesses%&b.")
- &joined = "false"
- &gamestarted = "false"
- &rmodify = "true"
- &chosen = "false"
- ELSEIF(#total = 0)
- Echo(/give %&pname% cookie 1)
- Echo("%&difficulty% &e[%#guess%] &a%&pname% &bwins and gets a &acookie&b. Guesses: &a%#guesses%&b")
- &joined = "false"
- &gamestarted = "false"
- &rmodify = "true"
- &chosen = "false"
- ENDIF
- ELSEIF(&ptype = "ID")
- Echo("%&difficulty% &e[%#guess%] &a%&pname% &bwins and gets &a%#amount%&bx &a%&itemname%&b. Guesses: &a%#guesses%&b.")
- Echo(/give %&pname% %#itemid% %#amount%)
- &joined = "false"
- &gamestarted = "false"
- &rmodify = "true"
- &chosen = "false"
- ELSEIF(&ptype = "Random")
- Echo("%&difficulty% &e[%#guess%] &a%&pname% &bwins and gets &a%#amount%&bx &a%&itemname2%&b. Guesses: &a%#guesses%&b.")
- Echo(/give %&pname% %#items% %#amount%)
- &joined = "false"
- &gamestarted = "false"
- &rmodify = "true"
- &chosen = "false"
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: quit$",&pnamecomp,1,NUL)
- IF(&pname = %&pnamecomp%)
- IF(&joined = "true")
- IF(&rmodify = "false")
- Echo("&cGame over. %&pname% quit.")
- &joined = "false"
- &gamestarted = "false"
- &rmodify = "true"
- &chosen = "false"
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,!reset$)
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&resetname,1,NUL)
- IF(%PLAYER% = %&resetname%)
- IF(@&ginprogress = "true")
- @&ginprogress = "false"
- Echo("/m %@&pplayer% &cOffer expired.")
- @&pnoreply = "true"
- Echo("/g &a%@&pplayer% &cwas not able to claim their %@&pitemname% prize.")
- Else
- &joined = "false"
- &gamestarted = "false"
- &rmodify = "true"
- &chosen = "false"
- Echo("&cGame reset.")
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,!rpg$)
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&prname,1,NUL)
- IF(%PLAYER% = %&prname%)
- IF(@&ginprogress = "")
- @&ginprogress = "false"
- ENDIF
- IF(@&ginprogress = "false")
- @&ginprogress = "true"
- Exec(RandomItem.txt,"Random Player Giver")
- Else
- Echo("&cAlready in progress.")
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,!rpgm$)
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&prname,1,NUL)
- IF(%PLAYER% = %&prname%)
- Echo("&bWhat is the maximum amount of items a player can get from the Random-Item giveaway?")
- &rpgmpicked = "false"
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: ([0-9][0-9]?[0-9]?)$",&prname,1)
- IF(%PLAYER% = %&prname%)
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: ([0-9][0-9]?[0-9]?)$",&maxmulti,2)
- IF(&rpgmpicked = "false")
- Set(@#maxmulti,%&maxmulti%)
- Echo("&bMax amount of items set to &a%@#maxmulti%&b.")
- &rpgmpicked = "true"
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?\-?\>? ?m?e?\]?:? yes$",&prname,1)
- IF(%&prname% = %@&pplayer%)
- IF(@&pnoreply = "false")
- Echo(/give %@&pplayer% %@#pitems% %@#pamnt%)
- Echo("/m %@&pplayer% &aEnjoy!")
- Echo("/g &a%@&pplayer% &bclaimed their %@&pitemname% prize.")
- @&pnoreply = "true"
- @&ginprogress = "false"
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?\-?\>? ?m?e?\]?:? no$",&prname,1)
- IF(%&prname% = %@&pplayer%)
- IF(@&pnoreply = "false")
- Echo("/m %@&pplayer% &aTry again next time!")
- @&pnoreply = "true"
- @&ginprogress = "false"
- Echo("/g &a%@&pplayer% &cdid not want their %@&pitemname% prize.")
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,"!spl (.+)$",&setplayer,1)
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: spl (.+)$",&pnamecomp,1,NUL)
- IF(%PLAYER% = %&pnamecomp%)
- Set(&pname,%&setplayer%)
- IF(&gamestarted = "false")
- IF(&joined = "false")
- #guesses = 0
- &gamestarted = "true"
- &joined = "true"
- &chosen = "false"
- &rmodify = "true"
- Echo("&bGame started. &a%&pname% &bis the contestant! Choose: &aEasy &eMedium &cHard &4Extreme&b.")
- ENDIF
- ELSEIF(&gamestarted = "true")
- IF(&joined = "true")
- Echo("&cContestant switched to %&pname%. &bChoose: &aEasy &eMedium &cHard &4Extreme&c.")
- #guesses = 0
- &gamestarted = "true"
- &joined = "true"
- &chosen = "false"
- &rmodify = "true"
- ENDIF
- ENDIF
- ENDIF
- ENDIF
- IFMATCHES(%CHATCLEAN%,!help$)
- MATCH(%CHATCLEAN%,"([a-z0-9\-_]{4,16}) ?: (.+)$",&hplayer,1,NUL)
- IF(%PLAYER% = %&hplayer%)
- Log("");Log("");Log("");Log("&d ---[Help]--------------------------------------")
- Log("&d |&d&o Made by xKevinn &d|")
- Log("&d | &eRandom Number Guesser:")
- Log("&d |&c - &3sg &a- starts the game.")
- Log("&d |&c - &3spr &a- sets a prize type.")
- Log("&d |&c - &3spl &b&oname &a- manually sets a player.")
- Log("&d |&c - &3prizes &a- toggles prizes on and off.")
- Log("&d |&c - &3reset &a- resets the game back to default settings.")
- Log("&d |&3 Base emerald prize: &a%#prizeamt%&3.")
- Log("&d |&3 ID prize: &a(%#itemid%) %&itemname%&3.")
- IF(&prizes = "true")
- Log("&d |&3 Prizes: &aon&3.")
- Else
- Log("&d |&3 Prizes: &coff&3.")
- ENDIF
- Log("&d | &eRandom Item Giveaway:")
- Log("&d |&c - &3rpg &a- gives a random player a random item.")
- Log("&d |&c - &3rpgm &a- sets max items won.")
- Log("&d |&c - &3reset &a- cancels current giveaway.")
- Log("&d |&3 Max amount of items: &a%@#maxmulti%&3.")
- Log("&d ----------------------------------------------");Log("")
- ENDIF
- ENDIF
- }$$
- =========================================================================================================================
- =========================================================================================================================
- =========================================================================================================================
- =========================================================================================================================
- =========================================================================================================================
- =========================================================================================================================
- =========================================================================================================================
- =========================================================================================================================
- =========================================================================================================================
- =========================================================================================================================
- Set(#rplayer,0)
- Set(#cplayers,0)
- @&otaken = "false"
- Echo("/g &c&k.&bPicking a random player for a draw... &c> &eGood luck!")
- Wait(7)
- RANDOM(#rplayer,1,%ONLINEPLAYERS%)
- ForEach(players)
- Inc(#cplayers)
- IF(#cplayers = #rplayer)
- Set(@&pplayer,%PLAYERNAME%)
- Break()
- ENDIF
- Next
- RANDOM(#picker,1,2)
- IF(#picker = 1)
- DO
- RANDOM(@#pitems,1,158)
- IFMATCHES(%@#pitems%,0|7|8|9|10|11|26|27|30|34|36|51|52|55|59|60|62|63|64|66|68|71|74|75|83|90|93|94|95|97|99|100|104|105|115117|118|119|120|121|122|124|132|137|138|141|142|144|149|150|157)
- &legal = "false"
- Else
- &legal = "true"
- GetItemInfo(%@#pitems%,@&pitemname)
- ENDIF
- WHILE(&legal = "false")
- ELSEIF(#picker = 2)
- DO
- RANDOM(@#pitems,256,408)
- IFMATCHES(%@#pitems%,302|303|304|305|326|328|327|342|343|383|385|397|399|403|407|408)
- &legal = "false"
- Else
- &legal = "true"
- GetItemInfo(%@#pitems%,@&pitemname)
- ENDIF
- WHILE(&legal = "false")
- ENDIF
- IF(@#maxmulti = 0)
- Set(@#maxmulti,3)
- ENDIF
- RANDOM(@#pamnt,1,%@#maxmulti%)
- Echo("/g &b...&a%@&pplayer% &bwins &a%@#pamnt%&bx &a%@&pitemname%&b!")
- Echo("/m %@&pplayer% &bWould you like to keep your prize? &bReply with &ayes &bor &cno&b.")
- @&pnoreply = "false"
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement