Brontoforumus Archive

Please login or register.

Login with username, password and session length
Advanced search  

News:


This board has been fossilized.
You are reading an archive of Brontoforumus, a.k.a. The Worst Forums Ever, from 2008 to early 2014.  Registration and posting (for most members) has been disabled here to discourage spambots from taking over.  Old members can still log in to view boards, PMs, etc.

The new message board is at http://brontoforum.us.

Author Topic: #casino  (Read 1838 times)

0 Members and 1 Guest are viewing this topic.

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
#casino
« on: July 28, 2009, 05:38:01 PM »

Bot's status: Working!

Suggestions are more than welcome. The bot is only like 52% streamlined right now, so if you think of something you'd like added/removed/changed/deleted, say something here or with "memo: <suggestion>" in [bot]'s hearing distance.

Say !lobby to see the command list. Say !welfare to get some cash.
Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
Re: #casino
« Reply #1 on: July 28, 2009, 06:21:51 PM »

This is what happens when infinite draws is turned on:

<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !play y S
<Niku> !play WD4 b
<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !draw
<Yeoz> !draw
<Joxam> yeoz fuck you
<Yeoz> !draw
<Yeoz> !draw
* Joxam (James@98-125-101-30.dyn.centurytel.net) has left #casino (Leaving)
<Yeoz> !play w r
<@[bot]> pfft
<Niku> !play r 3
<Yeoz> lol.......
<Niku> :D oh joxam
Logged

JDigital

  • Tested
  • Karma: 32
  • Posts: 2786
    • View Profile
Re: #casino
« Reply #2 on: July 30, 2009, 08:20:21 PM »

I did a game which works like so: Bet on a number, and roll three dice. For each time your number comes up on each d6, you win your stake. If it doesn't come up on any you lose your original stake.

I only have one guy who played it regularly, and he would bet one each on 1,2,3,4,5.

Any time all three numbers were different and none were a six he'd win 3 and lose 2, net profit 1. If one number came up twice he'd break even. Since these seem like the most common results and nobody else played, I declared him the winner with a million bars of latinum.

As it turns out, it was a little premature. Only 28% of the time are the dice all different with no sixes.

More maths. We have seven possible results:

All different, no sixes: Player gains 3, loses 2. Profit 1.
All same, no sixes: Player gains 3, loses 4. Loss 1.
Two same, no sixes: Player gains 3, loses 3. Breaks even.
Two same, one six: Player gains 2, loses 4. Loss 2.
Two different, one six: Player gains 2, loses 3. Loss 1.
Two sixes: Player gains 1, loses 4. Loss 3.
Three sixes: Player loses 5.

Therefore, he wins 1 credit 28% of the time, and makes nothing or loses one to five credits 72% of the time.
Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
Re: #casino
« Reply #3 on: July 30, 2009, 09:47:13 PM »

Fascinating. Can I steal this concept?

<@[bot]> 4Guild has fallen to the might of the Tower of Baron!
<@[bot]> 4Guild has fallen to the might of the Tower of Baron!
<@[bot]> 4Guild has fallen to the might of the Tower of Baron!
<@[bot]> 4Guild has fallen to the might of the Tower of Baron!
<@[bot]> 4Guild has fallen to the might of the Tower of Baron!
<@[bot]> 4Guild has fallen to the might of the Tower of Baron!
<@[bot]> 4Guild has fallen to the might of the Tower of Baron!
<Guild> Jesus fuck. I think I made this too hard.
Logged

Beat Bandit

  • be entranced by my sexy rhythm
  • High-Bullshit
  • Tested
  • Karma: -65418
  • Posts: 4293
    • View Profile
Re: #casino
« Reply #4 on: August 01, 2009, 05:16:22 PM »

<Rygaron> !chargen
<[bot]> "You enter the halls of DungeonMaster Guild's tower. Your stats are: Attack: 14 / Defense: 7 / Intelligence: 11 / Luck: 5 / HP: 5. Say !explore to seek the prize, and good luck!"
<Rygaron> !explore
<[bot]> You enter a room with a chest. Better still, it's unguarded!
<[bot]> You can open a chest at any time. You have 1 chest(s) unopened.
<Rygaron> !open
<Rygaron> !open chest
<Rygaron> !explore
<[bot]> You enter a room full of ghosts that flicker in and out of sight. They seem to be tempting you toward the far wall. Curious, you walk toward the spot, triggering a magical trap. Lightning arcs from the wall and strikes you in the chest, but your powerful spells repel the blast. You find a treasure chest hidden behind some crates.
<[bot]> You can open a chest at any time. You have 2 chest(s) unopened.
<Rygaron> !open
<Rygaron> !chest
<[bot]> You open the chest and find a health potion. Sweet! Your health increases by 1.
<[bot]> You have gained 1 HP. Your HP is now 6.
<Rygaron> !chest
<[bot]> You open the chest and find a health potion. Sweet! Your health increases by 1.
<[bot]> You have gained 1 HP. Your HP is now 7.
<Rygaron> !explore
<[bot]> You enter a room and immidately hold your breath as the most vile stench imaginable strikes your nostrils. A disgusting swamp beast rises from the cracks in the floor to assault you. It manages to get a blow in before you kill it.
<[bot]> You have lost 1 HP. Your HP is now 6.
<Rygaron> !explore
<[bot]> You smell ichor heavy in the air. Here the walls are soaked with blood and draped with viscera. The Butcher steps out of the shadows and walks toward you, his hammer held high above his head. You flip your blade flatwise and insert it between his ribs, cutting his heart. "Freak." The Butcher's treasure chests are buried beneath many skinned heads.
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<[bot]> You can open a chest at any time with !chest. You have 2 chest(s) unopened.
<Rygaron> !chest
<[bot]> You open the chest and find better armor. Nice! You secure it in place and your Def increases by 1.
<[bot]> You have gained 1 defense. Your defense is now 8.
<Rygaron> !chest
<[bot]> You open the chest and find a health potion. Sweet! Your health increases by 1.
<[bot]> You have gained 1 HP. Your HP is now 7.
<Rygaron> !explore
<[bot]> You enter a room with a vaulted ceiling. Giant vampire bats swarm from the ceiling and attack your face!
<[bot]> You have lost 1 HP. Your HP is now 6.
<Rygaron> !explore
<[bot]> You enter a room with a chest guarded by a medusa. You shield your eyes and look instead into the mirrored surface of your blade, cutting the mindless beast from breast to hips and spilling her green blood onto the flagstones.
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Rygaron> !chest
<Rygaron> !explore
<[bot]> As you are leaving the last room a snake slithers from beneath the door and bites your ankle. You crush its head but feel poison seeping into your veins.
<[bot]> You have lost 1 HP. Your HP is now 5.
<Rygaron> !chest
<Rygaron> !chest
<Rygaron> !explore
<[bot]> You enter a dry, inviting cavern with a staircase leading upwards. You can smell fresh cinnamon bread baking somewhere nearby. As you climb the stairs you're reminded of home...
<[bot]> You've ascended to the next floor. You are now on floor 2 of 8 of the tower of Guild.
<Rygaron> !explore
<[bot]> You smell the ocean and taste misted brine in the air. A metal door seems to be locked from the other side, but you swear you can hear seagulls and waves from beyond it. After several precious minutes of effort, you admit defeat and take another way.
<Rygaron> !explore
<[bot]> You feel an intense pain in your head. A Mind Flayer! Forcing yourself to react without thinking, you slam the hilt of your sword into its soft brain and the pain immediately disburses. He was guarding a chest!
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Rygaron> !chest
<[bot]> You open the chest and find a Pseltor Stone. Wonderful! You say the spell and imbue yourself, increasing your Lck by 1.
<[bot]> You have gained 1 luck. Your luck is now 6.
<Rygaron> !chest
<Rygaron> !explore
<[bot]> You step on a thunder trap and your counterspells activate, protecting you from a vicious sonic assault.
<Rygaron> !explore
<[bot]> You find a chalice filled with blood. A voice behind you speaks and you feel yourself compelled to listen with all of your being. "Why have you disturbed my chamber?" You whirl about to confront the Vampire, but he snatches you up, trying to bite your neck. You stab it through the heart with your blessed sword.
<Rygaron> !explore
<[bot]> You enter a dry, inviting cavern with a staircase leading upwards. You can smell fresh cinnamon bread baking somewhere nearby. As you climb the stairs you're reminded of home...
<[bot]> You've ascended to the next floor. You are now on floor 3 of 8 of the tower of Guild.
<Rygaron> !explore
<[bot]> You enter a room with a vaulted ceiling. Giant vampire bats swarm from the ceiling and attack your face! You fight them off with no problems.
<Rygaron> !explore
<[bot]> You enter a room made of candy. Sick of the mazes, you walk to the nearest wall and bash stright through into a treasure room. "What a strange tower," you mutter.
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Rygaron> !chest
<Rygaron> !explore
<[bot]> You stalk down a long hall, wary of the rows of armor meticulously arranged in battle poses every six feet. Just as you reach the far side, one attacks. You disassemble the magic construct with a word of power.
<Rygaron> !explore
<[bot]> You enter a room and immidately hold your breath as the most vile stench imaginable strikes your nostrils. A disgusting swamp beast rises from the cracks in the floor to assault you. The stench is doubled after the thing lies dead.
<Rygaron> !explore
<[bot]> You find a chalice filled with blood. A voice behind you speaks and you feel yourself compelled to listen with all of your being. "Why have you disturbed my chamber?" You whirl about to confront the Vampire, but he snatches you up, trying to bite your neck. You stab it through the heart with your blessed sword. Beneath his coffin you find two chests!
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<[bot]> You can open a chest at any time with !chest. You have 2 chest(s) unopened.
<Rygaron> !chest
<[bot]> You open the chest and find a book of spells. Perfect! You read the book and your Int goes up by 1.
<[bot]> You have gained 1 intelligence. Your intelligence is now 12.
<Rygaron> !chest
<Rygaron> !explore
<[bot]> You enter a room with a chest. It's seemingly unguarded.
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Rygaron> !chest
<[bot]> You open the chest and find a health potion. Sweet! Your health increases by 1.
<[bot]> You have gained 1 HP. Your HP is now 6.
<Rygaron> !explore
<[bot]> You enter a room and a spike sinks deep into the flesh of your heel, striking the bone painfully.
<[bot]> You have lost 1 HP. Your HP is now 5.
<Rygaron> !explore
<[bot]> You are ambushed by kobolds! They swarm from behind the furniture and drop from the chandelier, fighting as if a single organism. You begin to slay the pack expertly, and when you have killed four they retreat, licking their wounds. "You'll not find an easy meal here, mongrels."
<Rygaron> !explore
<[bot]> You step on a thunder trap and your counterspells activate, protecting you from a vicious lightning assault.
<Rygaron> !explore
<[bot]> You enter a room and an ogre attacks! You roll to dodge but take a grazing blow. As you rise to your feet again you stab it in the ribcage, piercing its heart! Victory! It had a treasure chest in its room.
<[bot]> You have lost 1 HP. Your HP is now 4.
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Rygaron> !chest
<Rygaron> !explore
<[bot]> You enter a room and immidately hold your breath as the most foul stench imaginable strikes your nostrils. A vile swamp beast rises from the cracks in the floor to assault you. With a vague sense of nausea, you lop its head off and take its treasure.
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Rygaron> !chest
<[bot]> You open the chest and find a better weapon. Excellent! You arm yourself and your Atk goes up by 1.
<[bot]> You have gained 1 attack. Your attack is now 15.
<Rygaron> !explore
<[bot]> You find a pile of mothballs and an old wizard's robe inside a box. Unfurling it, something drops out. It's a warpstone! Excellent! You activate it and warp to the next level.
<[bot]> You've ascended to the next floor. You are now on floor 4 of 8 of the tower of Guild.
<Rygaron> !explore
<[bot]> You enter a room and a Werewolf bum-rushes you! It manages to take a painful slice out of your chest and shoulder before you escape the room and slam the door.
<[bot]> You have lost 1 HP. Your HP is now 3.
<Rygaron> !explore
<[bot]> You enter a room and find a robe! You try it on... tiny spines stick into your neck. It's been booby-trapped! You drop the wretched cloth and stumble on.
<[bot]> You have lost 1 HP. Your HP is now 2.
<Rygaron> !explore
<[bot]> You enter a room and the walls begin to shrink by magic! You flee for the door but it's too small to fit through! The walls are closing in rapidly... just when it seems it is the end for sure you manage to pop free and the door shrinks behind you to a mousehole.
<Rygaron> !explore
<[bot]> You enter a room and a Minotaur bum-rushes you! It manages to give you a nasty cut to the upper arm before you escape the room and slam the door in its face.
<[bot]> You have lost 1 HP. Your HP is now 1.
<Rygaron> !explore
<[bot]> You enter a hall. There are a plethora of doors on either wall, and as you walk along, peeking into each, you see some of the most terrifying sights imaginable. The things you see you will never tell another living soul. It's enough to drive a man insane.
<Rygaron> !explore
<[bot]> You enter a room with a chest guarded by a medusa. You shield your eyes and look instead into the mirrored surface of your blade, cutting the mindless beast from breast to hips and spilling her green blood onto the flagstones.
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Rygaron> !chest
<[bot]> You open the chest and find a health potion. Sweet! Your health increases by 1.
<[bot]> You have gained 1 HP. Your HP is now 2.
<Rygaron> !explore
<[bot]> You enter a room with windows looking out onto your beloved countryside. "I will rescue you from this tyrant, countrymen." Your squire sleeps beside your horses along the gentle river you crossed to enter the tower.
<Rygaron> !explore
<[bot]> You enter a room full of ghosts that flicker in and out of sight. They seem to be tempting you toward the far wall. Curious, you walk toward the spot, triggering a magical trap. Lightning arcs from the wall and strikes you in the chest, but your powerful spells repel the blast. You find a treasure chest hidden behind some crates.
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Rygaron> !chest
<Rygaron> !explore
<[bot]> You enter a patio. Above you, a shaft leading from the roof lets sunlight fall onto a beautifully maintained garden. You hear a rustling sound and a fat, creeping vine entangles you. You cut yourself free but the plant's sticky poison is hard to remove.
<[bot]> You have lost 1 HP. Your HP is now 1.
<Rygaron> !explore
<[bot]> You enter a room and a man wearing a priest's robe greets you. "Welcome, my son. Take a rest. May the gods bless your path!" You catch a sparkle of evil in his eye just before he lunges toward you with a knife. You disarm and bind him and leave him for the monsters.
<Rygaron> !explore
<[bot]> You find the elevator! It takes you up three flights!
<[bot]> You've ascended to the next floor. You are now on floor 5 of 8 of the tower of Guild.
<[bot]> You've ascended to the next floor. You are now on floor 6 of 8 of the tower of Guild.
<[bot]> You've ascended to the next floor. You are now on floor 7 of 8 of the tower of Guild.
<Rygaron> !explore
<[bot]> You enter a patio. Above you, a shaft leading from the roof lets sunlight fall onto a beautifully maintained garden. You hear a rustling sound and bring your sword to bear just in time to slice a fat, creeping vine in twain. Mindful of the foliage, you continue on.
<Rygaron> !explore
<[bot]> You enter the foyer of a church. An offering box nearby sounds like it has some treasure in it...
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Rygaron> !chest
<[bot]> You open the chest and find a health potion. Sweet! Your health increases by 1.
<[bot]> You have gained 1 HP. Your HP is now 2.
<Rygaron> !explore
<[bot]> You enter a room with a chest. It's blessedly unguarded.
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Rygaron> !chest
<[bot]> You open the chest and find a Pseltor Stone. Wonderful! You say the spell and imbue yourself, increasing your Lck by 1.
<[bot]> You have gained 1 luck. Your luck is now 7.
<Rygaron> !explore
<[bot]> You find a chalice filled with blood. A voice behind you speaks and you feel yourself compelled to listen with all of your being. "Why have you disturbed my chamber?" You whirl about to confront the Vampire, but he snatches you up, trying to bite your neck. You stab it through the heart with your blessed sword. Beneath his coffin you find two chests!
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<[bot]> You can open a chest at any time with !chest. You have 2 chest(s) unopened.
<Rygaron> !chest
<Rygaron> !chest
<[bot]> You open the chest and find better armor. Nice! You secure it in place and your Def increases by 1.
<[bot]> You have gained 1 defense. Your defense is now 9.
<Rygaron> !explore
<[bot]> You enter a room with a vaulted ceiling. Giant vampire bats swarm from the ceiling and attack your face! You fight them off with no problems.
<Rygaron> !explore
<[bot]> You find a pile of mothballs and an old wizard's robe inside a box. Unfurling it, something drops out. It's a warpstone! Excellent! You activate it and warp to the next level.
<[bot]> You've ascended to the next floor. You are now on floor 8 of 8 of the tower of Guild.
<Rygaron> !explore
<[bot]> The Dark Emperor of the Dungeon, Guild, awaits you, his dark helm glowing from within. "Welcome to my domain, Rygaron. Now die!" Guild smites you with the force of a god. You try to avoid the assault...
<[bot]> You have lost 1 HP. Your HP is now 1.
<[bot]> You mutter a spell and send Guild flying against the far wall. With the power of your many magic items you push past his protective barriers, slicing through his armor with your holy sword.
<[bot]> You have slain the evil Guild! Congratulations. As you stand over his rapidly rotting corpse, a new thought pops into your head. "This Dungeon needs a master. Someone to contain the evil within. I will make this sacrifice, in the name of the gods."
<[bot]> Long may you reign.
Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
Re: #casino
« Reply #5 on: August 01, 2009, 06:51:26 PM »

Want to add to the Tower? Use this code and change all the red parts. I'll rate your floor, set level requirements and put it in the tower if I like it. The bits in blue are not necessary to mess with.

alias XXXXX {
  set %room $rand(1,5) {
    if %room = 1 {
      msg %dgnplayer You find an extra chest! Your luck must be very high.
      givechest
    }
    if %room = 2 {
      msg %dgnplayer What luck! This monster is already dead! And it had a potion!
      givehealth
    }
    if %room = 3 {
      msg %dgnplayer What fortune! A massive chest of Emeralds! There's €10000 inside!
      moneygive %dgnplayer 10000
      msg #casino 2 $+ %dgnplayer has found a fabulous treasure in the Tower!
    }
    if %room = 4 {
      msg %dgnplayer What fortune! A massive chest of Emeralds! There's €5000 inside!
      moneygive %dgnplayer 5000
      msg #casino 2 $+ %dgnplayer has found a fabulous treasure in the Tower!

    }
    if %room = 5 {
      msg %dgnplayer The greater gods smile upon your journey.
      giveint
      givelck
      giveatk
      givedef
      givehealth
      givechest
      givechest
      givechest
   
    }
  }
}





Logged

yeoz

  • Tested
  • Karma: 4
  • Posts: 72
    • View Profile
    • youtuuuube
Re: #casino
« Reply #6 on: August 01, 2009, 06:59:13 PM »

<Yeoz> !chargen
<[bot]> "You enter the halls of DungeonMaster Rygaron's tower. Your stats are: Attack: 15 / Defense: 11 / Intelligence: 3 / Luck: 3 / HP: 5. Say !explore to seek the prize, and good luck!"
<Yeoz> !explore
<[bot]> You enter a room made of candy. Sick of the mazes, you walk to the nearest wall and bash stright through into a treasure room. "What a strange tower," you mutter.
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Yeoz> !chest
<[bot]> You open the chest and find a warpstone. Cool! It warps you up a floor.
<[bot]> You've ascended to the next floor. You are now on floor 2 of 9 of the tower of Rygaron.
<Yeoz> !chest
<Yeoz> !explore
<[bot]> You feel an intense pain in your head. A Mind Flayer! Forcing yourself to react without thinking, you slam the hilt of your sword into its soft brain and the pain immediately disburses. He was guarding a chest!
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Yeoz> !chest
<[bot]> You open the chest and find a better weapon. Excellent! You arm yourself and your Atk goes up by 1.
<[bot]> You have gained 1 attack. Your attack is now 16.
<Yeoz> !explore
<[bot]> You enter a room with a vaulted ceiling. Giant vampire bats swarm from the ceiling and attack your face!
<[bot]> You have lost 1 HP. Your HP is now 4.
<Yeoz> !explore
<[bot]> You enter a room well furnished and inviting. Some benevolent wizard has cast runes of protection upon this room, protecting it from Rygaron's tainted touch. A full banquet is ready and waiting. You eat and rest and recover your strength.
<[bot]> You have gained 1 HP. Your HP is now 5.
<Yeoz> !explore
<[bot]> You enter a room with a tall staircase leading upwards. It's made of marble and the bannister is gold-plated. The most beautiful of songs can faintly be heard, as if some angel were singing a song of rapture and redemption...
<[bot]> You've ascended to the next floor. You are now on floor 3 of 9 of the tower of Rygaron.
<Yeoz> !explore
<[bot]> You enter a room with a tall staircase leading upwards. It's made of glass and the bannister is polished platinum. The most wonderful of songs is booming from every corner, as if some angel were singing a song of victory...
<[bot]> You've ascended to the next floor. You are now on floor 4 of 9 of the tower of Rygaron.
<Yeoz> !explore
<[bot]> You enter a room with windows looking out onto a pristine countryside. "I will rescue you from this tyrant, countrymen." Your squire is tending the horses dilligently along the gentle river you crossed to enter the tower.
<Yeoz> !explore
<[bot]> You enter a room guarded by an Une. You wade through her tangled mass, cutting a swath to her flower. You stab her in the breast, spilling her clear blood onto the flagstones.
<Yeoz> !explore
<[bot]> You feel an intense pain in your head. A Mind Flayer! Forcing yourself to react without thinking, you slam the hilt of your sword into its soft brain and the pain immediately disburses. He was guarding a chest!
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Yeoz> !chest
<[bot]> You open the chest and find better armor. Nice! You secure it in place and your Def increases by 1.
<[bot]> You have gained 1 defense. Your defense is now 12.
<Yeoz> !explore
<[bot]> You smell the ocean and taste misted brine in the air. A metal door seems to be locked from the other side, but you swear you can hear seagulls and waves from beyond it. After several precious minutes of effort, you admit defeat. There is something here, but you simply can't figure out what.
<Yeoz> !explore
<[bot]> You enter a room and a man wearing a priest's robe greets you. "Welcome, my son. Take a rest. May the gods bless your path!"
<[bot]> You have gained 1 HP. Your HP is now 6.
<Yeoz> !explore
<[bot]> You enter a room with a tall staircase leading upwards. It's made of glass and the bannister is polished platinum. The most wonderful of songs is booming from every corner, as if some angel were singing a song of victory...
<[bot]> You've ascended to the next floor. You are now on floor 5 of 9 of the tower of Rygaron.
<Yeoz> !explore
<[bot]> You enter a dry, inviting cavern with a staircase leading upwards. You can smell fresh cinnamon bread baking somewhere nearby. As you climb the stairs you're reminded of home...
<[bot]> You've ascended to the next floor. You are now on floor 6 of 9 of the tower of Rygaron.
<Yeoz> !explore
<[bot]> You enter the foyer of a church. An offering box nearby sounds like it has some treasure in it...
<[bot]> You can open a chest at any time with !chest. You have 1 chest(s) unopened.
<Yeoz> !chest
<[bot]> You open the chest and find a warpstone. Cool! It warps you up a floor.
<[bot]> You've ascended to the next floor. You are now on floor 7 of 9 of the tower of Rygaron.
<Yeoz> !explore
<[bot]> You enter a room and find a robe! You try it on... it's a cloaker! Tricky creatures! As it strangles you you muster your strength and pry its teeth out of your neck, snapping its spine with your bare hands. Luckily it didn't hit a vein, thank the gods.
<[bot]> You have lost 1 HP. Your HP is now 5.
<Yeoz> !explore
<[bot]> You enter a patio. Above you, a shaft leading from the roof lets sunlight fall onto a beautifully maintained garden. You hear a rustling sound and a fat, creeping vine entangles you. You cut yourself free but the plant's sticky poison is hard to remove.
<[bot]> You have lost 1 HP. Your HP is now 4.
<Yeoz> !explore
<[bot]> You enter a dry, inviting cavern with a staircase leading upwards. You can smell fresh cinnamon bread baking somewhere nearby. As you climb the stairs you're reminded of home...
<[bot]> You've ascended to the next floor. You are now on floor 8 of 9 of the tower of Rygaron.
<Yeoz> !explore
<[bot]> You find yourself in an Egyptian tomb. Whether it is a replica or you have been somehow transported, you cannot determine. A mummified cat meows at you as you walk past.
<Yeoz> !explore
<[bot]> As you are leaving the last room a snake slithers from beneath the door and tries to bite your ankle. You crush its head with your bootheel.
<Yeoz> !explore
<[bot]> You enter a room filled with hanging cages full of birds... a stairwell leading up calls you onwards to more difficult challenges. Praise be, your journey is that much closer to an end!
<[bot]> You've ascended to the next floor. You are now on floor 9 of 9 of the tower of Rygaron.
<Yeoz> !explore
<[bot]> The Dark Emperor of the Dungeon, Rygaron, awaits you, his dark helm glowing from within. "Welcome to my domain, Yeoz. Now die!" Rygaron smites you with the force of a god. You try to avoid the assault...
<[bot]> You have lost 1 HP. Your HP is now 3.
<[bot]> You mutter a spell and send Rygaron flying against the far wall. With the power of your many magic items you push past his protective barriers, slicing through his armor with your holy sword.
<[bot]> You have slain the evil Rygaron! Congratulations. As you stand over his rapidly rotting corpse, a new thought pops into your head. "This Dungeon needs a master. Someone to contain the evil within. I will make this sacrifice, in the name of the gods."
<[bot]> Long may you reign.
<Yeoz> !explore
<[bot]> The tower is currently unoccupied. Say !chargen to enter and do battle with the evil Yeoz!
Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
Re: #casino
« Reply #7 on: August 02, 2009, 12:03:27 PM »

The Tower: Hints and Secrets

The taller it is, the higher stats you'll have and therefore the more likely you'll find awesome treasure (€) and beat the Tower Master. I've therefore given the Tower Master the power to lower the Tower by 1 floor for €1000. Keeping it around 15 floors seems to be the magic number, but your results may vary.

Everytime the Tower is beaten, it grows one floor and becomes €10 more expensive to !chargen. Having a high Def and Lck stats are vital, so don't be shy about !chargening several times before exploring. The Tower Master gets 50% of all proceeds from !chargen.

If your Atk, Def or Int gets over 20, you'll start getting Statstrike events. Statstrike events often yield high treasure or elevators. The higher your stat climbs, the more of these you'll get. Luck has a similar feature, though the mechanics are slightly different. High luck tends to yield warpstones. High int tends to yield more int and prevent magic trap damage. High def tends to give bonuses of all stats and prevent damage. High atk tends to find more treasure. High lck increases the amount of gold found in chests.

The Tower Master can now change his title at will, pillage another player's bank account (once per time beating the tower) and attack with his/her minions.

Envy's newest floor has been added as a high level floor. It has a trap, a pitfall, some thieves, a major stat bonus and a chance to lose money by being robbed. Thanks Envy.
Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
The Rise and Fall and Rise and Fall of Guildenstern
« Reply #8 on: August 02, 2009, 02:55:40 PM »

<Guild> you guys
<Guild> you guys
<Guild> !worth
<@[bot]> Guild has 21137 emeralds and owes 0 emeralds.
<Guild> !flip 20000
<[bot]> 4TAILS! You lose €20000. (22 left)
<Guild> !worth
<@[bot]> Guild has 1137 emeralds and owes 0 emeralds.
<Guild> :(


<@[bot]> 6ULTRA JACKPOT!!!!! Guild has won 3€10,000!!!
-[bot]- you are not eligible for a welfare loan.
<Ki-tan> god damnit
<Ki-tan> YOU LUCKY BASTARD
<Ki-tan> guild try to win the tower
<Ki-tan> i bet you can
<@[bot]> 6ULTRA JACKPOT!!!!! Guild has won 3€10,000!!!
<Guild> !transfer Ki-tan 1000
<@[bot]> Successfully transferred €1000 from Guild to Ki-tan.
<Guild> you try
<@[bot]> 6ULTRA JACKPOT!!!!! Guild has won 3€10,000!!!
<@[bot]> 6ULTRA JACKPOT!!!!! Guild has won 3€10,000!!!
<Guild> oh man
<Guild> i'm on fire
<Guild> !worth
<@[bot]> Guild has 17399 emeralds and owes 1542 emeralds.
<Guild> !payback 1542
<@[bot]> Paid back €1542.
<@[bot]> 6ULTRA JACKPOT!!!!! Guild has won 3€10,000!!!
<Guild> :D



<Guild> !worth
<@[bot]> Guild has 19856 emeralds and owes 0 emeralds.
<Guild> !worth
<@[bot]> Guild has 9856 emeralds and owes 0 emeralds.
<Guild> D: D: D:


<[bot]> Guild has 57797 emeralds and owes 0 emeralds.
<Guild> !flip 50000
<[bot]> 3HEADS! You get €50000. (24 left)
<[bot]> Yeoz has rolled a character. You get 3€500 as an entrance fee.

<Guild> !flip 20000
<[bot]> 3HEADS! You get €20000. (49 left)
<Guild> !flip 20000
<[bot]> 4TAILS! You lose €20000. (48 left)
<Guild> !flip 40000
<[bot]> 4TAILS! You lose €40000. (47 left)
<Guild> !flip 80000
<[bot]> 4TAILS! You lose €80000. (46 left)
<Guild> !flip 160000
<[bot]> 4TAILS! You lose €160000. (45 left)
<Guild> !flip 320000
<[bot]> Insufficient funds, Guild.
Logged

Envy

  • Tested
  • Karma: -8
  • Posts: 2286
    • View Profile
Re: #casino
« Reply #9 on: August 02, 2009, 03:58:47 PM »

You're welcome Guild.

:Thad: Happy now?
Logged

Mongrel

  • Emoticon Knight-Errant
  • kodePunc Team
  • Tested
  • *
  • Karma: -65340
  • Posts: 17029
    • View Profile
Re: #casino
« Reply #10 on: August 02, 2009, 04:10:24 PM »

Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
Re: #casino
« Reply #11 on: August 02, 2009, 07:25:38 PM »

tanks envy <3
Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
Re: #casino
« Reply #12 on: August 03, 2009, 01:00:39 PM »

Out of beta: The Tower
Out of beta: Zombie Panic (again)
Out of beta: Better's Dice
Now in beta: 5mm (Five Man Mafia)
Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
Re: #casino
« Reply #13 on: August 05, 2009, 12:28:41 PM »

<@[bot]> 12Say !pray to wish Guild good health!
<Guild> can i get a pray
<Guild> 3k for a prayer
<Guild> you guys are heartless.
<@[bot]> 2Guild has fallen while trying to climb the Tower. Died on floor 4.
Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
Re: #casino
« Reply #14 on: August 05, 2009, 08:09:23 PM »

* Yeoz changes topic to 'a game of 5 man mafia is in progress.'
* Ki-tan changes topic to 'a game of 5 man mafia is in progress. | game broke i think. or i died.'
* Yeoz changes topic to 'a game of 5 man mafia is in progress. | game broke i think. or i died. | i was able to take my action'
* Cait changes topic to 'a game of 5 man mafia is in progress. | game broke i think. or i died. | i was able to take my action | you died.'
* Ki-tan changes topic to 'a game of 5 man mafia is in progress. | game broke i think. or i died. | i was able to take my action | you died. | cait is mafia'
* Yeoz changes topic to 'a game of 5 man mafia is in progress. | game broke i think. or i died. | i was able to take my action | you died. | i did? i did get the you are not playing thing though'
* Yeoz changes topic to 'a game of 5 man mafia is in progress. | game broke i think. or i died. | i was able to take my action | you died. | i did? i did get the you are not playing thing though | crap does that mean the mafia killed me'
* Yeoz changes topic to 'a game of 5 man mafia is in progress. | Guild: the game is broken again please fix it'
* Cait changes topic to 'a game of 5 man mafia is in progress. | game broke i think. or i died. | i was able to take my action | you died. | i did? i did get the you are not playing thing though | crap does that mean the mafia killed me | everyone gets "you are not playing" on night 2.'
* Newbie changes topic to 'Talk about possibility of cheating.'
* Yeoz changes topic to 'Talk about possibility of cheating. | the game is broken anyway. GUILD: FIX IT'
* Newbie changes topic to 'Talk about possibility of cheating. | the game is broken anyway. GUILD: FIX IT | back in a bit'
* Yeoz changes topic to 'Talk about possibility of cheating. | the game is broken anyway. GUILD: FIX IT | EVEN IF YOU ARE DEAD TAKE YOUR TURN'
* Newbie (Mibbit@ip98-186-174-230.ks.ks.cox.net) Quit (Quit: http://www.mibbit.com ajax IRC Client)
* Zaratustra (Zaratustra@201.21.155.82) has left #casino
* Newbie (Mibbit@ip98-186-174-230.ks.ks.cox.net) has joined #casino
* [bot] sets mode: -m
Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
[bot] fixit log
« Reply #15 on: August 06, 2009, 03:15:20 PM »

[17:58] <lol> memo: change Jackpot message to include name of winner <-done

[19:46] <lol> memo: force <user> and !help <-ted's suggestion

[22:03] <lol> memo: period inside !word quotes <-bad grammar - yeoz caught this

[12:21] <@[bot]> memo: !kick asfd <-disable the ability to kick nobody - zara's catch

[12:22] <testaccount> memo: !lobby spam <-fixed - zara's catch

[12:23] <testaccount> memo: catch any word with !pokeball <- zara's catch

[13:42] <Guild> memo: make !flip useable in a pvtmsg <-done

[17:01] <Guild> memo: <Yeoz> !buy 50flip <-done

[17:34] <Guild> memo: 5mm <-in progress <-cait's suggestion, then later kazz reminded me <-nearly complete

[17:46] <Guild> memo: timer for ghost: optional <-not viable at this time, sorry

[17:47] <Guild> memo: !gadmin clear destroys money <-use !ghost off instead <-ergo fixed

[21:13] <Guild> memo: !turn is borked <-this command was failing under certain circumstances <-fixed

[21:22] <Guild> memo: ultraflip borked too <-fixed

[21:56] <Guild> memo: elimination ghost <-ghost is fine as is - i'm laz

[22:36] <Guild> memo: freecash needs calcorg mod <-fixed <-irrelevant now, emerald bank is out of beta

[15:36] <Yeoz> [18:36:02] -[bot]- You've ascended to the next floor. You are now on floor ($+(%,dungeon,level,%dgnplayer),2) of of the tower of Baron.
[15:36] <Guild> memo: see Yeoz's line above <-fixed


[15:43] <Guild> It seems the last chest won't open.
[15:43] <Guild> memo: see above line <-fixed


[17:09] <Yeoz> memo: change DungeonMaster Baron to Guild, etc. <-and thus was born the beast we call the Tower

[14:51] <Guild> memo: !panic timer check <-fixed

[21:01] <Yeoz> Guild: memo: fix msg when !explore/!chest in privmsg <-fixed? i assume so

[16:39] <Guild> memo: put welfare in the lobby notice <-this was a good suggestion

[17:30] <Guild> memo: unwelcoming is a word <-still not fixed yet

[18:06] <Rygaron> Memo: Are chests empty sometimes on purpose, or is that a bug? <-bongo and yeoz pointed out the error almost simultaneously after i posted the code: thans
[18:30] <Guild> memo: see the last few lines <-fixed - thanks bongo/yeoz


[18:32] <Guild> memo: shotty starting increased to 2 <-fixed, also gave players 1 'nade to start - thanks bongo and meikai

[17:14] <Newbie> The game should be open to any number of players, and scale automatically
[17:14] <Newbie> Between one and (1.5 x number of players) zombies
01[17:15] <@[bot]> Good idea.
[17:15] <Newbie> Round up
01[17:15] <@[bot]> memo: see above line <-this really should be looked into - keep it on the shelf

[17:42] <Newbie> Is there some sort of !players command
[17:42] <Guild> For what?
[17:42] <Newbie> To list the current players in the current game you're in
[17:42] <Guild> Ah. Good idea.
[17:42] <Yeoz> in fact
[17:42] <Guild> memo: See newbie's last line. <-wouldn't be that hard to make - keep it shelved for a rainy day


[17:43] <Yeoz> memo: start a web game based on the tower game
[17:43] <Guild> don't memo me things I don't care about prs
[17:43] <Guild> it increases my workload
[17:43] <Yeoz> !status
[17:44] <Yeoz> hehe
[17:44] <Newbie> memo: Take some time for yourself. Have a drink.
[17:44] <Yeoz> memo: find true love
[17:44] <Yeoz> memo: send flowers to that cute chick i sat next to in class that one time
[17:44] <Newbie> You shouldn't have opened this bottle, Guild
[17:44] <Newbie> The thing you've unleashed can never be put back in <-i hate you guys


[19:08] <Guild> memo: holdem <-perhaps after exploring 24 a bit - definite maybe



TOWER RELATED:

[19:36] <Rygaron> The current master should be able to sink funds into adding floors or traps or something.
01[19:37] <@[bot]> memo: see Rygaron's last note. <-still kicking this idea around

[13:58] <+Yeoz> add traps to chests not replacing but in addition to chests with treasure so a chest can both be trapped and have something in it at the same time
[13:59] <+Guild> memo: see yeoz's last line <-still a viable suggestion

[14:12] <+Yeoz> hurry up and win
[14:12] <+Yeoz> so i can reclimb
[14:12] <+Guild> you can reclimb
[14:12] <+Guild> and kill yourself
[14:13] <+Yeoz> that is dumb and i won't do it :P
[14:13] <+Guild> and you'd save 50% of your money
[14:13] <+Yeoz> ..
[14:13] <+Yeoz> have you thought about preventing that?
[14:13] <+Yeoz> because otherwise
[14:13] <+Yeoz> i would just camp
[14:13] <+Yeoz> and no one would be able to take over
[14:13] <+Guild> i have an override switch
[14:13] <+Guild> to take out campers
[14:13] <+Yeoz> wait
[14:13] <+Yeoz> how about
[14:14] <+Yeoz> killing them automatically
[14:14] <+Yeoz> after x number of minutes have passed
[14:14] <+Yeoz> x number of minutes of idle that is
[14:14] <+Yeoz> dunno how hard it is to program that though
[14:14] <+Guild> memo: see above suggestion
[14:14] <Cait> Let multiple people explore the tower at the same time. If you catch up to someone ahead of you, you can kill them
[14:14] <+Guild> the problem with that is i'm not sure how to code it
[14:14] <+Guild> i'd have to study things
[14:14] <+Yeoz> [17:14:07] <Cait> Let multiple people explore the tower at the same time. If you catch up to someone ahead of you, you can kill them
[14:14] <+Yeoz> ^^ this
[14:14] <+Yeoz> not kill
[14:14] <+Yeoz> but FIGHT
[14:14] <Cait> Well yeah
[14:14] <+Yeoz> with stats determining the winner
[14:14] <Cait> kill comes from fight
[14:14] <+Guild> hmm
[14:15] <+Guild> i think i could actually do that
[14:15] <+Yeoz> it would be funny if
[14:15] <+Yeoz> someone elevators past someone, reaches the top
[14:15] <+Yeoz> and then gets immediately killed right after
[14:15] <+Yeoz> by someone already in the tower, that they elevatored past
[14:15] <+Guild> memo: everything between this one and the last one <-i'm not going to do any of this - reasoning: i've already sunk massive time into the tower and it's fine as-is, imho. i'd rather add content to #casino rather than turning it into #tower: the-game-room <-i will keep this suggestion in mind and see if i feel inspired later

[19:46] <Guild> memo: after 30 seconds, allow !curses [in The Tower]
[19:46] <Yeoz> 111 twice, 222 six times, 666 four times
[19:46] <Guild> <Newbie> And successive uses increase cost x10
[19:46] <Guild> <Newbie> Resets when they explore again <-more tower-related stuff ... i might just save this one, it's viable



Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
Calling All Internets
« Reply #16 on: August 06, 2009, 09:09:42 PM »

I figure, since I keep running into problems with this, I'd open source the damn thing and see if anyone can get it running more smoothly. PM me with any questions but keep your comments about how dumb I am at programming to a minimum, nerds.

Code: [Select]
;       -----------------------------------------------
;      -------------------------------------------------
;     ------                                       ------
;     -----                                         -----
;     -----             Five Man Mafia              -----
;     -----                                         -----
;     ------                                       ------
;      -------------------------------------------------
;       -----------------------------------------------

on 5:text:@5mmreset*:#casino: {
  unset %5mm*
}

on *:text:!5mm*:#casino: {
  if %5mmison = $null {
    if $floor($2) >= 1 {
      if $funds($nick) >= $2 {
        moneygive $nick - $+ $2
        set %5mmpot $2
        set %5mmison 1
        set %5mmp1 $nick
        msg #casino 12Beginning a game of 5 man mafia. Ante: 3€ $+ $2 $+ .
        msg #casino 4 $+ $nick might be the mafia!
        halt
      }
      else insufficientfunds $nick $2
    }
    else notice $nick That's an invalid ante. Syntax: !5mm <amount>.
  }
  if %5mmison = 1 {
    if $funds($nick) >= %5mmpot && $nick !isin %5mmp1 {
      moneygive $nick - $+ %5mmpot
      set %5mmison 2
      set %5mmp2 $nick
      msg #casino 4 $+ $nick might be the mafia!
      halt
    }
    else insufficientfunds $nick %5mmpot
  }    
  if %5mmison = 2 {
    if $funds($nick) >= %5mmpot && $nick !isin %5mmp1 && $nick !isin %5mmp2 {
      moneygive $nick - $+ %5mmpot
      set %5mmison 3
      set %5mmp3 $nick
      msg #casino 4 $+ $nick might be the mafia!
      halt
    }
    else insufficientfunds $nick %5mmpot
  }    
  if %5mmison = 3 {
    if $funds($nick) >= %5mmpot && $nick !isin %5mmp1 && $nick !isin %5mmp2 && $nick !isin %5mmp3 {
      moneygive $nick - $+ %5mmpot
      set %5mmison 4
      set %5mmp4 $nick
      msg #casino 4 $+ $nick might be the mafia!
      halt
    }
    else insufficientfunds $nick %5mmpot
  }    
  if %5mmison = 4 {
    if $funds($nick) >= %5mmpot && $nick !isin %5mmp1 && $nick !isin %5mmp2 && $nick !isin %5mmp3 && $nick !isin %5mmp4 {
      moneygive $nick - $+ %5mmpot
      set %5mmison 5
      set %5mmp5 $nick
      msg #casino 4 $+ $nick might be the mafia!
      msg #casino Rolling roles.
      mode #casino +m
      goto gameon
    }
    else insufficientfunds $nick %5mmpot
  }
  else 5mmcurrentphase
  halt
  :gameon
  ;make the role list MSCPN
  set %5mmr MSCPN
  ;set the 1st role determine variable 1-5
  set %5mm1rd $rand(1,5) {
    if %5mm1rd = 1 {
      set %5mmp1r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp1 You are the Mafia.
      goto p2determine
    }
    if %5mm1rd = 2 {
      set %5mmp1r Sane
      set %5mmr $remove(%5mmr,S)  
      msg %5mmp1 You are a Cop.
      goto p2determine
    }
    if %5mm1rd = 3 {
      set %5mmp1r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp1 You are a Cop.
      goto p2determine
    }
    if %5mm1rd = 4 {
      set %5mmp1r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp1 You are a Cop.
      goto p2determine
    }
    if %5mm1rd = 5 {
      set %5mmp1r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp1 You are a Cop.
      goto p2determine
    }
  }
  :p2determine
  set %5mm2rd $rand(1,4)
  if M !isin %5mmr {
    if %5mm2rd = 1 {
      set %5mmp2r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
    if %5mm2rd = 2 {
      set %5mmp2r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
    if %5mm2rd = 3 {
      set %5mmp2r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
    if %5mm2rd = 4 {
      set %5mmp2r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
  }
  if S !isin %5mmr {
    if %5mm2rd = 1 {
      set %5mmp2r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp2 You are the Mafia.
      goto p3determine
    }
    if %5mm2rd = 2 {
      set %5mmp2r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
    if %5mm2rd = 3 {
      set %5mmp2r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
    if %5mm2rd = 4 {
      set %5mmp2r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
  }
  if C !isin %5mmr {
    if %5mm2rd = 1 {
      set %5mmp2r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp2 You are the Mafia.
      goto p3determine
    }
    if %5mm2rd = 2 {
      set %5mmp2r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
    if %5mm2rd = 3 {
      set %5mmp2r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
    if %5mm2rd = 4 {
      set %5mmp2r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
  }
  if P !isin %5mmr {
    if %5mm2rd = 1 {
      set %5mmp2r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp2 You are the Mafia.
      goto p3determine
    }
    if %5mm2rd = 2 {
      set %5mmp2r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
    if %5mm2rd = 3 {
      set %5mmp2r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
    if %5mm2rd = 4 {
      set %5mmp2r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
  }
  if N !isin %5mmr {
    if %5mm2rd = 1 {
      set %5mmp2r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp2 You are the Mafia.
      goto p3determine
    }
    if %5mm2rd = 2 {
      set %5mmp2r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
    if %5mm2rd = 3 {
      set %5mmp2r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
    if %5mm2rd = 4 {
      set %5mmp2r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp2 You are a Cop.
      goto p3determine
    }
  }
  :p3determine
  set %5mm3rd $rand(1,3)
  if M !isin %5mmr && S !isin %5mmr {
    if %5mm3rd = 1 {
      set %5mmp3r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 2 {
      set %5mmp3r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 3 {
      set %5mmp3r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
  }
  if M !isin %5mmr && C !isin %5mmr {
    if %5mm3rd = 1 {
      set %5mmp3r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 2 {
      set %5mmp3r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 3 {
      set %5mmp3r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
  }
  if M !isin %5mmr && P !isin %5mmr {
    if %5mm3rd = 1 {
      set %5mmp3r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 2 {
      set %5mmp3r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 3 {
      set %5mmp3r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
  }
  if M !isin %5mmr && N !isin %5mmr {
    if %5mm3rd = 1 {
      set %5mmp3r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 2 {
      set %5mmp3r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 3 {
      set %5mmp3r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
  }
  if S !isin %5mmr && C !isin %5mmr {
    if %5mm3rd = 1 {
      set %5mmp3r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp3 You are the Mafia.
      goto p4determine
    }
    if %5mm3rd = 2 {
      set %5mmp3r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 3 {
      set %5mmp3r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
  }
  if S !isin %5mmr && P !isin %5mmr {
    if %5mm3rd = 1 {
      set %5mmp3r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp3 You are the Mafia.
      goto p4determine
    }
    if %5mm3rd = 2 {
      set %5mmp3r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 3 {
      set %5mmp3r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
  }
  if S !isin %5mmr && N !isin %5mmr {
    if %5mm3rd = 1 {
      set %5mmp3r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp3 You are the Mafia.
      goto p4determine
    }
    if %5mm3rd = 2 {
      set %5mmp3r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 3 {
      set %5mmp3r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
  }
  if C !isin %5mmr && P !isin %5mmr {
    if %5mm3rd = 1 {
      set %5mmp3r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp3 You are the Mafia.
      goto p4determine
    }
    if %5mm3rd = 2 {
      set %5mmp3r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 3 {
      set %5mmp3r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
  }
  if C !isin %5mmr && N !isin %5mmr {
    if %5mm3rd = 1 {
      set %5mmp3r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp3 You are the Mafia.
      goto p4determine
    }
    if %5mm3rd = 2 {
      set %5mmp3r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 3 {
      set %5mmp3r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
  }
  if P !isin %5mmr && N !isin %5mmr {
    if %5mm3rd = 1 {
      set %5mmp3r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp3 You are the Mafia.
      goto p4determine
    }
    if %5mm3rd = 2 {
      set %5mmp3r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
    if %5mm3rd = 3 {
      set %5mmp3r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp3 You are a Cop.
      goto p4determine
    }
  }
  :p4determine
  set %5mm4rd $rand(1,2)
  if M !isin %5mmr && S !isin %5mmr && C !isin %5mmr {
    if %5mm4rd = 1 {
      set %5mmp4r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
    if %5mm4rd = 2 {
      set %5mmp4r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
  }

  if M !isin %5mmr && S !isin %5mmr && P !isin %5mmr {
    if %5mm4rd = 1 {
      set %5mmp4r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
    if %5mm4rd = 2 {
      set %5mmp4r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
  }
  if M !isin %5mmr && S !isin %5mmr && N !isin %5mmr {
    if %5mm4rd = 1 {
      set %5mmp4r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
    if %5mm4rd = 2 {
      set %5mmp4r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
  }
  if M !isin %5mmr && C !isin %5mmr && P !isin %5mmr {
    if %5mm4rd = 1 {
      set %5mmp4r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
    if %5mm4rd = 2 {
      set %5mmp4r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
  }
  if M !isin %5mmr && C !isin %5mmr && N !isin %5mmr {
    if %5mm4rd = 1 {
      set %5mmp4r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
    if %5mm4rd = 2 {
      set %5mmp4r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
  }
  if M !isin %5mmr && P !isin %5mmr && N !isin %5mmr {
    if %5mm4rd = 1 {
      set %5mmp4r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
    if %5mm4rd = 2 {
      set %5mmp4r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
  }
  if S !isin %5mmr && C !isin %5mmr && P !isin %5mmr {
    if %5mm4rd = 1 {
      set %5mmp4r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp4 You are the Mafia.
      goto p5determine
    }
    if %5mm4rd = 2 {
      set %5mmp4r Naive
      set %5mmr $remove(%5mmr,N)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
  }

  if S !isin %5mmr && C !isin %5mmr && N !isin %5mmr {
    if %5mm4rd = 1 {
      set %5mmp4r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp4 You are the Mafia.
      goto p5determine
    }
    if %5mm4rd = 2 {
      set %5mmp4r Paranoid
      set %5mmr $remove(%5mmr,P)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
  }
  if S !isin %5mmr && P !isin %5mmr && N !isin %5mmr {
    if %5mm4rd = 1 {
      set %5mmp4r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp4 You are the Mafia.
      goto p5determine
    }
    if %5mm4rd = 2 {
      set %5mmp4r Crazy
      set %5mmr $remove(%5mmr,C)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
  }
  if C !isin %5mmr && P !isin %5mmr && N !isin %5mmr {
    if %5mm4rd = 1 {
      set %5mmp4r Mafia
      set %5mmr $remove(%5mmr,M)
      msg %5mmp4 You are the Mafia.
      goto p5determine
    }
    if %5mm4rd = 2 {
      set %5mmp4r Sane
      set %5mmr $remove(%5mmr,S)
      msg %5mmp4 You are a Cop.
      goto p5determine
    }
  }
  :p5determine
  if M !isin %5mmr && S !isin %5mmr && C !isin %5mmr && P !isin %5mmr {
    set %5mmp5r Naive
    msg %5mmp5 You are a Cop.
  }
  if M !isin %5mmr && S !isin %5mmr && C !isin %5mmr && N !isin %5mmr {
    set %5mmp5r Paranoid
    msg %5mmp5 You are a Cop.
  }
  if M !isin %5mmr && S !isin %5mmr && P !isin %5mmr && N !isin %5mmr {
    set %5mmp5r Crazy
    msg %5mmp5 You are a Cop.
  }
  if M !isin %5mmr && C !isin %5mmr && P !isin %5mmr && N !isin %5mmr {
    set %5mmp5r Sane
    msg %5mmp5 You are a Cop.
  }
  if S !isin %5mmr && C !isin %5mmr && P !isin %5mmr && N !isin %5mmr {
    set %5mmp5r Mafia
    msg %5mmp5 You are the Mafia.
  }
  set %5mmn1a 0
  set %5mmphase nightone
  set %5mmp1na 0
  set %5mmp2na 0
  set %5mmp3na 0
  set %5mmp4na 0
  set %5mmp5na 0
  msg #casino Send me your choices for investigation or kills. Say !n1 <name> in a private message to me.
}

Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
CAI: Continued.
« Reply #17 on: August 06, 2009, 09:10:30 PM »

Code: [Select]
on *:text:!n1*:?: {
  if %5mmn1a < 4 && %5mmphase = nightone {
    if ($nick = %5mmp1 || $nick = %5mmp2 ||  $nick = %5mmp3 ||  $nick = %5mmp4 || $nick = %5mmp5) && ($2 = %5mmp1 || $2 = %5mmp2 ||  $2 = %5mmp3 ||  $2 = %5mmp4 || $2 = %5mmp5) {
      if $nick = %5mmp1 {
        if %5mmp1na = 0 {
          if %5mmp1r = Mafia {
            msg $nick You don't have an action on night 1.
            goto mafia
          }
          if %5mmp1r = Sane {
            if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
              msg $nick $2 appears to be the Mafia.
            }
            else msg $nick $2 appears to be a Cop.
          }
          if %5mmp1r = Crazy {
            if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
              msg $nick $2 appears to be a Cop.
            }
            else msg $nick $2 appears to be the Mafia.
          }
          if %5mmp1r = Paranoid {
            msg $nick $2 appears to be the Mafia.
          }
          if %5mmp1r = Naive {
            msg $nick $2 appears to be a Cop.
          }
          set %5mmp1na 1
          inc %5mmn1a 1
          if %5mmn1a = 4 { goto day }
        }
        else msg $nick You've already submitted a night action.
      }
      if $nick = %5mmp2 {
        if %5mmp2na = 0 {
          if %5mmp2r = Mafia {
            msg $nick You don't have an action on night 1.
            goto mafia
          }
          if %5mmp2r = Sane {
            if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
              msg $nick $2 appears to be the Mafia.
            }
            else msg $nick $2 appears to be a Cop.
          }
          if %5mmp2r = Crazy {
            if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
              msg $nick $2 appears to be a Cop.
            }
            else msg $nick $2 appears to be the Mafia.
          }
          if %5mmp2r = Paranoid {
            msg $nick $2 appears to be the Mafia.
          }
          if %5mmp2r = Naive {
            msg $nick $2 appears to be a Cop.
          }
          set %5mmp2na 1
          inc %5mmn1a 1
          if %5mmn1a = 4 { goto day }
        }
        else msg $nick You've already submitted a night action.
      }
      if $nick = %5mmp3 {
        if %5mmp3na = 0 {
          if %5mmp3r = Mafia {
            msg $nick You don't have an action on night 1.
            goto mafia
          }
          if %5mmp3r = Sane {
            if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
              msg $nick $2 appears to be the Mafia.
            }
            else msg $nick $2 appears to be a Cop.
          }
          if %5mmp3r = Crazy {
            if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
              msg $nick $2 appears to be a Cop.
            }
            else msg $nick $2 appears to be the Mafia.
          }
          if %5mmp3r = Paranoid {
            msg $nick $2 appears to be the Mafia.
          }
          if %5mmp3r = Naive {
            msg $nick $2 appears to be a Cop.
          }
          set %5mmp3na 1
          inc %5mmn1a 1
          if %5mmn1a = 4 { goto day }
        }
        else msg $nick You've already submitted a night action.
      }
      if $nick = %5mmp4 {
        if %5mmp4na = 0 {
          if %5mmp4r = Mafia {
            msg $nick You don't have an action on night 1.
            goto mafia
          }
          if %5mmp4r = Sane {
            if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
              msg $nick $2 appears to be the Mafia.
            }
            else msg $nick $2 appears to be a Cop.
          }
          if %5mmp4r = Crazy {
            if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
              msg $nick $2 appears to be a Cop.
            }
            else msg $nick $2 appears to be the Mafia.
          }
          if %5mmp4r = Paranoid {
            msg $nick $2 appears to be the Mafia.
          }
          if %5mmp4r = Naive {
            msg $nick $2 appears to be a Cop.
          }
          set %5mmp4na 1
          inc %5mmn1a 1
          if %5mmn1a = 4 { goto day }
        }
        else msg $nick You've already submitted a night action.
      }
      if $nick = %5mmp5 {
        if %5mmp5na = 0 {
          if %5mmp5r = Mafia {
            msg $nick You don't have an action on night 1.
            goto mafia
          }
          if %5mmp5r = Sane {
            if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
              msg $nick $2 appears to be the Mafia.
            }
            else msg $nick $2 appears to be a Cop.
          }
          if %5mmp5r = Crazy {
            if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
              msg $nick $2 appears to be a Cop.
            }
            else msg $nick $2 appears to be the Mafia.
          }
          if %5mmp5r = Paranoid {
            msg $nick $2 appears to be the Mafia.
          }
          if %5mmp5r = Naive {
            msg $nick $2 appears to be a Cop.
          }
          set %5mmp5na 1
          inc %5mmn1a 1
          if %5mmn1a = 4 { goto day }
        }
        else msg $nick You've already submitted a night action.
      }
    }
    else msg $nick The syntax is !n1 <player name>.
  }
  else 5mmcurrentphase
  halt
  :day
  set %5mmn1on 0
  set %5mmphase dayone
  set %5mmp1vp 0
  set %5mmp2vp 0
  set %5mmp3vp 0
  set %5mmp4vp 0
  set %5mmp5vp 0
  set %5mmp1v 0
  set %5mmp2v 0
  set %5mmp3v 0
  set %5mmp4v 0
  set %5mmp5v 0
  timer 1 10 {
    if %5mmp1 !isin %5mmdead {
      mode #casino +v %5mmp1
    }
    if %5mmp2 !isin %5mmdead {
      mode #casino +v %5mmp2
    }
    if %5mmp3 !isin %5mmdead {
      mode #casino +v %5mmp3
    }
    if %5mmp4 !isin %5mmdead {
      mode #casino +v %5mmp4
    }
    if %5mmp5 !isin %5mmdead {
      mode #casino +v %5mmp5
    }
    msg #casino It is now day 1. When a majority is reached, night will fall. Vote with !d1 <name>.
  }
  :mafia
  halt
}


on *:text:!d1*:#casino: {
  if %5mmphase = dayone {
    if $nick = %5mmp1 {
      if %5mmp1vp = 0 {
        if $2 = %5mmp2 {
          ;set player1's 'vote placed' variable on
          set %5mmp1vp 1
          inc %5mmp2v 1
          if %5mmp2v = 3 { set %5mmdead %5mmdead %5mmp2 | goto night }
        }
        if $2 = %5mmp3 {
          set %5mmp1vp 1
          inc %5mmp3v 1
          if %5mmp3v = 3 { set %5mmdead %5mmdead %5mmp3 | goto night }
        }
        if $2 = %5mmp4 {
          set %5mmp1vp 1
          inc %5mmp4v 1
          if %5mmp4v = 3 { set %5mmdead %5mmdead %5mmp4 | goto night }
        }
        if $2 = %5mmp5 {
          set %5mmp1vp 1
          inc %5mmp5v 1
          if %5mmp5v = 3 { set %5mmdead %5mmdead %5mmp5 | goto night }
        }
      }
      else msg #casino %5mmp1 $+ , you've already voted. Say !voteclear to reset the votes.
    }
    if $nick = %5mmp2 {
      if %5mmp2vp = 0 {
        if $2 = %5mmp1 {
          set %5mmp2vp 1
          inc %5mmp1v 1
          if %5mmp1v = 3 { set %5mmdead %5mmdead %5mmp1 | goto night }
        }
        if $2 = %5mmp3 {
          set %5mmp2vp 1
          inc %5mmp3v 1
          if %5mmp3v = 3 { set %5mmdead %5mmdead %5mmp3 | goto night }
        }
        if $2 = %5mmp4 {
          set %5mmp2vp 1
          inc %5mmp4v 1
          if %5mmp4v = 3 { set %5mmdead %5mmdead %5mmp4 | goto night }
        }
        if $2 = %5mmp5 {
          set %5mmp2vp 1
          inc %5mmp5v 1
          if %5mmp5v = 3 { set %5mmdead %5mmdead %5mmp5 | goto night }
        }
      }
      else msg #casino %5mmp1 $+ , you've already voted. Say !voteclear to reset the votes.
    }
    if $nick = %5mmp3 {
      if %5mmp3vp = 0 {
        if $2 = %5mmp1 {
          set %5mmp3vp 1
          inc %5mmp1v 1
          if %5mmp1v = 3 { set %5mmdead %5mmdead %5mmp1 | goto night }
        }
        if $2 = %5mmp2 {
          set %5mmp3vp 1
          inc %5mmp2v 1
          if %5mmp2v = 3 { set %5mmdead %5mmdead %5mmp2 | goto night }
        }
        if $2 = %5mmp4 {
          set %5mmp3vp 1
          inc %5mmp4v 1
          if %5mmp4v = 3 { set %5mmdead %5mmdead %5mmp4 | goto night }
        }
        if $2 = %5mmp5 {
          set %5mmp3vp 1
          inc %5mmp5v 1
          if %5mmp5v = 3 { set %5mmdead %5mmdead %5mmp5 | goto night }
        }
      }
      else msg #casino %5mmp1 $+ , you've already voted. Say !voteclear to reset the votes.
    }
    if $nick = %5mmp4 {
      if %5mmp4vp = 0 {
        if $2 = %5mmp1 {
          set %5mmp4vp 1
          inc %5mmp1v 1
          if %5mmp1v = 3 { set %5mmdead %5mmdead %5mmp1 | goto night }
        }
        if $2 = %5mmp2 {
          set %5mmp4vp 1
          inc %5mmp2v 1
          if %5mmp2v = 3 { set %5mmdead %5mmdead %5mmp2 | goto night }
        }
        if $2 = %5mmp3 {
          set %5mmp4vp 1
          inc %5mmp3v 1
          if %5mmp3v = 3 { set %5mmdead %5mmdead %5mmp3 | goto night }
        }
        if $2 = %5mmp5 {
          set %5mmp4vp 1
          inc %5mmp5v 1
          if %5mmp5v = 3 { set %5mmdead %5mmdead %5mmp5 | goto night }
        }
      }
      else msg #casino %5mmp1 $+ , you've already voted. Say !voteclear to reset the votes.
    }
    if $nick = %5mmp5 {
      if %5mmp5vp = 0 {
        if $2 = %5mmp1 {
          set %5mmp5vp 1
          inc %5mmp1v 1
          if %5mmp1v = 3 { set %5mmdead %5mmdead %5mmp1 | goto night }
        }
        if $2 = %5mmp2 {
          set %5mmp5vp 1
          inc %5mmp2v 1
          if %5mmp2v = 3 { set %5mmdead %5mmdead %5mmp2 | goto night }
        }
        if $2 = %5mmp3 {
          set %5mmp5vp 1
          inc %5mmp3v 1
          if %5mmp3v = 3 { set %5mmdead %5mmdead %5mmp3 | goto night }
        }
        if $2 = %5mmp4 {
          set %5mmp5vp 1
          inc %5mmp4v 1
          if %5mmp4v = 3 { set %5mmdead %5mmdead %5mmp4 | goto night }
        }
      }
      else msg #casino %5mmp1 $+ , you've already voted. Say !voteclear to reset the votes.
    }
  }
  else 5mmcurrentphase
  halt
  :night
  mode #casino -v %5mmp1
  mode #casino -v %5mmp2
  mode #casino -v %5mmp3
  mode #casino -v %5mmp4
  mode #casino -v %5mmp5
  set %5mmd1on 0
  set %5mmphase nighttwo
  set %5mmn2a 0
  set %5mmp1na 0
  set %5mmp2na 0
  set %5mmp3na 0
  set %5mmp4na 0
  set %5mmp5na 0
  5mmcheckendgame
}

on *:text:!voteclear:#casino: {
  if (%5mmphase = dayone || %5mmphase = daytwo) {
    set %5mmp1vp 0
    set %5mmp1v 0
    set %5mmp2vp 0
    set %5mmp2v 0
    set %5mmp3vp 0
    set %5mmp3v 0
    set %5mmp4vp 0
    set %5mmp4v 0
    set %5mmp5vp 0
    set %5mmp5v 0
    msg #casino All player's votes have been reset. When a majority is reached, day will end.
  }
  else 5mmcurrentphase
}

on *:text:!n2*:?: {
  if %5mmn2a < 4 && %5mmphase = nighttwo {
    if $nick isin %5mmdead {
      msg $nick You are dead.
      goto dead
    }
    if $nick !isin %5mmdead {
      if ($nick = %5mmp1 || $nick = %5mmp2 ||  $nick = %5mmp3 ||  $nick = %5mmp4 || $nick = %5mmp5) && ($2 = %5mmp1 || $2 = %5mmp2 ||  $2 = %5mmp3 ||  $2 = %5mmp4 || $2 = %5mmp5) {
        if $nick = %5mmp1 {
          if %5mmp1na = 0 {
            if %5mmp1r = Mafia {
              set %5mmdying $2
              msg $nick You've killed $2.
            }
            if %5mmp1r = Sane {
              if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
                msg $nick $2 appears to be the Mafia.
              }
              else msg $nick $2 appears to be a Cop.
            }
            if %5mmp1r = Crazy {
              if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
                msg $nick $2 appears to be a Cop.
              }
              else msg $nick $2 appears to be the Mafia.
            }
            if %5mmp1r = Paranoid {
              msg $nick $2 appears to be the Mafia.
            }
            if %5mmp1r = Naive {
              msg $nick $2 appears to be a Cop.
            }
            set %5mmp1na 1
            inc %5mmn2a 1
            if %5mmn2a = 4 { goto day }
          }
          else msg $nick You've already submitted a night action.
        }
        if $nick = %5mmp2 {
          if %5mmp2na = 0 {
            if %5mmp2r = Mafia {
              set %5mmdead %5mmdead $+ $2
              msg $nick You've killed $2.
            }
            if %5mmp2r = Sane {
              if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
                msg $nick $2 appears to be the Mafia.
              }
              else msg $nick $2 appears to be a Cop.
            }
            if %5mmp2r = Crazy {
              if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
                msg $nick $2 appears to be a Cop.
              }
              else msg $nick $2 appears to be the Mafia.
            }
            if %5mmp2r = Paranoid {
              msg $nick $2 appears to be the Mafia.
            }
            if %5mmp2r = Naive {
              msg $nick $2 appears to be a Cop.
            }
            set %5mmp2na 1
            inc %5mmn2a 1
            if %5mmn2a = 4 { goto day }
          }
          else msg $nick You've already submitted a night action.
        }
        if $nick = %5mmp3 {
          if %5mmp3na = 0 {
            if %5mmp3r = Mafia {
              set %5mmdead %5mmdead $+ $2
              msg $nick You've killed $2.
            }
            if %5mmp3r = Sane {
              if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
                msg $nick $2 appears to be the Mafia.
              }
              else msg $nick $2 appears to be a Cop.
            }
            if %5mmp3r = Crazy {
              if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
                msg $nick $2 appears to be a Cop.
              }
              else msg $nick $2 appears to be the Mafia.
            }
            if %5mmp3r = Paranoid {
              msg $nick $2 appears to be the Mafia.
            }
            if %5mmp3r = Naive {
              msg $nick $2 appears to be a Cop.
            }
            set %5mmp3na 1
            inc %5mmn2a 1
            if %5mmn2a = 4 { goto day }
          }
          else msg $nick You've already submitted a night action.
        }
        if $nick = %5mmp4 {
          if %5mmp4na = 0 {
            if %5mmp4r = Mafia {
              set %5mmdead %5mmdead $+ $2
              msg $nick You've killed $2.
            }
            if %5mmp4r = Sane {
              if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
                msg $nick $2 appears to be the Mafia.
              }
              else msg $nick $2 appears to be a Cop.
            }
            if %5mmp4r = Crazy {
              if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
                msg $nick $2 appears to be a Cop.
              }
              else msg $nick $2 appears to be the Mafia.
            }
            if %5mmp4r = Paranoid {
              msg $nick $2 appears to be the Mafia.
            }
            if %5mmp4r = Naive {
              msg $nick $2 appears to be a Cop.
            }
            set %5mmp4na 1
            inc %5mmn2a 1
            if %5mmn2a = 4 { goto day }
          }
          else msg $nick You've already submitted a night action.
        }
        if $nick = %5mmp5 {
          if %5mmp5na = 0 {
            if %5mmp5r = Mafia {
              set %5mmdead %5mmdead $+ $2
              msg $nick You've killed $2.
            }
            if %5mmp5r = Sane {
              if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
                msg $nick $2 appears to be the Mafia.
              }
              else msg $nick $2 appears to be a Cop.
            }
            if %5mmp5r = Crazy {
              if (($2 = %5mmp1) && (%5mmp1r = Mafia)) || (($2 = %5mmp3) && (%5mmp3r = Mafia)) || (($2 = %5mmp4) && (%5mmp4r = Mafia)) || (($2 = %5mmp5) && (%5mmp5r = Mafia)) {
                msg $nick $2 appears to be a Cop.
              }
              else msg $nick $2 appears to be the Mafia.
            }
            if %5mmp5r = Paranoid {
              msg $nick $2 appears to be the Mafia.
            }
            if %5mmp5r = Naive {
              msg $nick $2 appears to be a Cop.
            }
            set %5mmp5na 1
            inc %5mmn2a 1
            if %5mmn2a = 4 { goto day }
          }
          else msg $nick You've already submitted a night action.
        }
        else msg $nick You're not playing.
      }
      else msg $nick The syntax is !investigate <name>.
    }
  }
  else 5mmcurrentphase
  halt
  :day
  set %5mmdead %5mmdead $+ $2
  set %5mmphase daytwo
  if %5mmp1 !isin %5mmdead {
    mode #casino +v %5mmp1
  }
  if %5mmp2 !isin %5mmdead {
    mode #casino +v %5mmp2
  }
  if %5mmp3 !isin %5mmdead {
    mode #casino +v %5mmp3
  }
  if %5mmp4 !isin %5mmdead {
    mode #casino +v %5mmp4
  }
  if %5mmp5 !isin %5mmdead {
    mode #casino +v %5mmp5
  }
  set %5mmp1vp 0
  set %5mmp2vp 0
  set %5mmp3vp 0
  set %5mmp4vp 0
  set %5mmp5vp 0
  set %5mmp1v 0
  set %5mmp2v 0
  set %5mmp3v 0
  set %5mmp4v 0
  set %5mmp5v 0
  msg #casino It is now day 2. When a majority is reached, night will fall. Vote with !d2 <name>.
  :dead
  halt
}

on *:text:!d2*:#casino: {
  if %5mmphase = daytwo {
    if $nick = %5mmp1 {
      if %5mmp1vp = 0 {
        if $2 = %5mmp2 {
          set %5mmp1vp 1
          inc %5mmp2v 1
          if %5mmp2v = 2 { set %5mmdead %5mmdead %5mmp2 | goto night }
        }
        if $2 = %5mmp3 {
          set %5mmp1vp 1
          inc %5mmp3v 1
          if %5mmp3v = 2 { set %5mmdead %5mmdead %5mmp3 | goto night }
        }
        if $2 = %5mmp4 {
          set %5mmp1vp 1
          inc %5mmp4v 1
          if %5mmp4v = 2 { set %5mmdead %5mmdead %5mmp4 | goto night }
        }
        if $2 = %5mmp5 {
          set %5mmp1vp 1
          inc %5mmp5v 1
          if %5mmp5v = 2 { set %5mmdead %5mmdead %5mmp5 | goto night }
        }
      }
      else msg #casino %5mmp1 $+ , you've already voted. Say !voteclear to reset the votes.
    }
    if $nick = %5mmp2 {
      if %5mmp2vp = 0 {
        if $2 = %5mmp1 {
          set %5mmp2vp 1
          inc %5mmp1v 1
          if %5mmp1v = 2 { set %5mmdead %5mmdead %5mmp1 | goto night }
        }
        if $2 = %5mmp3 {
          set %5mmp2vp 1
          inc %5mmp3v 1
          if %5mmp3v = 2 { set %5mmdead %5mmdead %5mmp3 | goto night }
        }
        if $2 = %5mmp4 {
          set %5mmp2vp 1
          inc %5mmp4v 1
          if %5mmp4v = 2 { set %5mmdead %5mmdead %5mmp4 | goto night }
        }
        if $2 = %5mmp5 {
          set %5mmp2vp 1
          inc %5mmp5v 1
          if %5mmp5v = 2 { set %5mmdead %5mmdead %5mmp5 | goto night }
        }
      }
      else msg #casino %5mmp2 $+ , you've already voted. Say !voteclear to reset the votes.
    }
    if $nick = %5mmp3 {
      if %5mmp3vp = 0 {
        if $2 = %5mmp1 {
          set %5mmp3vp 1
          inc %5mmp1v 1
          if %5mmp1v = 2 { set %5mmdead %5mmdead %5mmp1 | goto night }
        }
        if $2 = %5mmp2 {
          set %5mmp3vp 1
          inc %5mmp2v 1
          if %5mmp2v = 2 { set %5mmdead %5mmdead %5mmp2 | goto night }
        }
        if $2 = %5mmp4 {
          set %5mmp3vp 1
          inc %5mmp4v 1
          if %5mmp4v = 2 { set %5mmdead %5mmdead %5mmp4 | goto night }
        }
        if $2 = %5mmp5 {
          set %5mmp3vp 1
          inc %5mmp5v 1
          if %5mmp5v = 2 { set %5mmdead %5mmdead %5mmp5 | goto night }
        }
      }
      else msg #casino %5mmp3 $+ , you've already voted. Say !voteclear to reset the votes.
    }
    if $nick = %5mmp4 {
      if %5mmp4vp = 0 {
        if $2 = %5mmp1 {
          set %5mmp4vp 1
          inc %5mmp1v 1
          if %5mmp1v = 2 { set %5mmdead %5mmdead %5mmp1 | goto night }
        }
        if $2 = %5mmp2 {
          set %5mmp4vp 1
          inc %5mmp2v 1
          if %5mmp2v = 2 { set %5mmdead %5mmdead %5mmp2 | goto night }
        }
        if $2 = %5mmp3 {
          set %5mmp4vp 1
          inc %5mmp3v 1
          if %5mmp3v = 2 { set %5mmdead %5mmdead %5mmp3 | goto night }
        }
        if $2 = %5mmp5 {
          set %5mmp4vp 1
          inc %5mmp5v 1
          if %5mmp5v = 2 { set %5mmdead %5mmdead %5mmp5 | goto night }
        }
      }
      else msg #casino %5mmp4 $+ , you've already voted. Say !voteclear to reset the votes.
    }
    if $nick = %5mmp5 {
      if %5mmp5vp = 0 {
        if $2 = %5mmp1 {
          set %5mmp5vp 1
          inc %5mmp1v 1
          if %5mmp1v = 2 { set %5mmdead %5mmdead %5mmp1 | goto night }
        }
        if $2 = %5mmp2 {
          set %5mmp5vp 1
          inc %5mmp2v 1
          if %5mmp2v = 2 { set %5mmdead %5mmdead %5mmp2 | goto night }
        }
        if $2 = %5mmp3 {
          set %5mmp5vp 1
          inc %5mmp3v 1
          if %5mmp3v = 2 { set %5mmdead %5mmdead %5mmp3 | goto night }
        }
        if $2 = %5mmp4 {
          set %5mmp5vp 1
          inc %5mmp4v 1
          if %5mmp4v = 2 { set %5mmdead %5mmdead %5mmp4 | goto night }
        }
      }
      else msg #casino %5mmp5 $+ , you've already voted. Say !voteclear to reset the votes.
    }
  }
  else 5mmcurrentphase
  halt
  :night
  5mmcheckendgame
}


on 5:text:!5mmendgame*:#casino: {
  /5mmcheckendgame
}

Logged

Guild

  • High-Bullshit
  • Tested
  • Karma: -2
  • Posts: 5136
    • View Profile
Re: #casino
« Reply #18 on: August 06, 2009, 09:10:45 PM »

Code: [Select]
alias 5mmcheckendgame {
  if (%5mmp1 isin %5mmdead && %5mmp1r = Mafia) { goto goodend }
  if (%5mmp2 isin %5mmdead && %5mmp2r = Mafia) { goto goodend }
  if (%5mmp3 isin %5mmdead && %5mmp3r = Mafia) { goto goodend }
  if (%5mmp4 isin %5mmdead && %5mmp4r = Mafia) { goto goodend }
  if (%5mmp5 isin %5mmdead && %5mmp5r = Mafia) { goto goodend }
  else goto checkmafiawin
  :goodend
  msg #casino Game Over! Cops win!
  msg #casino Player 1: %5mmp1 %5mmp1r
  msg #casino Player 2: %5mmp2 %5mmp2r
  msg #casino Player 3: %5mmp3 %5mmp3r
  msg #casino Player 4: %5mmp4 %5mmp4r
  msg #casino Player 5: %5mmp5 %5mmp5r
  if %5mmp1r != Mafia { moneygive %5mmp1 $ceil($calc(%5mmpot * 6 / 4)) | msg #casino %5mmp1 gets $ceil($calc(%5mmpot * 6 / 4)) }
  if %5mmp2r != Mafia { moneygive %5mmp2 $ceil($calc(%5mmpot * 6 / 4)) | msg #casino %5mmp2 gets $ceil($calc(%5mmpot * 6 / 4)) }
  if %5mmp3r != Mafia { moneygive %5mmp3 $ceil($calc(%5mmpot * 6 / 4)) | msg #casino %5mmp3 gets $ceil($calc(%5mmpot * 6 / 4)) }
  if %5mmp4r != Mafia { moneygive %5mmp4 $ceil($calc(%5mmpot * 6 / 4)) | msg #casino %5mmp4 gets $ceil($calc(%5mmpot * 6 / 4)) }
  if %5mmp5r != Mafia { moneygive %5mmp5 $ceil($calc(%5mmpot * 6 / 4)) | msg #casino %5mmp5 gets $ceil($calc(%5mmpot * 6 / 4)) }
  mode #casino -v %5mmp1
  mode #casino -v %5mmp2
  mode #casino -v %5mmp3
  mode #casino -v %5mmp4
  mode #casino -v %5mmp5
  mode #casino -m
  unset -s %5mm*
  :checkmafiawin
  if %5mmphase = daytwo {
    msg #casino Game Over! Mafia wins!
    msg #casino %5mmp1 %5mmp1r
    msg #casino %5mmp2 %5mmp2r
    msg #casino %5mmp3 %5mmp3r
    msg #casino %5mmp4 %5mmp4r
    msg #casino %5mmp5 %5mmp5r
    if %5mmp1r = Mafia { moneygive %5mmp1 $calc(%5mmpot * 6) | msg #casino %5mmp1 gets $calc(%5mmpot * 6) }
    if %5mmp2r = Mafia { moneygive %5mmp2 $calc(%5mmpot * 6) | msg #casino %5mmp2 gets $calc(%5mmpot * 6) }
    if %5mmp3r = Mafia { moneygive %5mmp3 $calc(%5mmpot * 6) | msg #casino %5mmp3 gets $calc(%5mmpot * 6) }
    if %5mmp4r = Mafia { moneygive %5mmp4 $calc(%5mmpot * 6) | msg #casino %5mmp4 gets $calc(%5mmpot * 6) }
    if %5mmp5r = Mafia { moneygive %5mmp5 $calc(%5mmpot * 6) | msg #casino %5mmp5 gets $calc(%5mmpot * 6) }
    mode #casino -v %5mmp1
    mode #casino -v %5mmp2
    mode #casino -v %5mmp3
    mode #casino -v %5mmp4
    mode #casino -v %5mmp5
    mode #casino -m
    unset %5mm*
  }
  if %5mmphase = nighttwo {
    msg #casino Send me your choices for investigation or kills. Say !n2 <name> in a private message to me.
  }
}

alias 5endgame {
  unset %5mm*
}

alias 5mmcurrentphase {
  if %5mmphase = nightone {
    msg $nick It's currently night 1. Say !n1 <name> to submit an action.
  }
  if %5mmphase = dayone {
    msg #casino It's currently day 1. Say !d1 <name> to vote for someone.
  }
  if %5mmphase = nighttwo {
    msg $nick It's currently night 2. Say !n2 <name> to submit an action.
  }
  if %5mmphase = daytwo {
    msg #casino It's currently day 2. Say !d2 <name> to vote for someone.
  }
  if %5mmphase = $null {
    msg #casino A game of 5 Man Mafia is not currently being played. Say !5mm <wager> to begin a game.
  }
}
Logged