mIRC Home    About    Download    Register    News    Help

Forums Active Threads Search Who's Online Help
Print Thread
Russian roulette Roll the dice and currency
#250121 03/01/15 05:03 PM
M
michaelukz
michaelukz
M
I can't think of any way to do a 'Randomizer' when the twitch user does !rr or !rtd it says 'Rolling a dice!' then picks out a random text that has a chance to add a "Currency" and with the currency they be called "MarioCoins" And mods and the owner has the ability to type !5coins <name> and it keeps track of everyones coins. Is this possible?
Re: Russian roulette Roll the dice and currency
#250122 03/01/15 06:08 PM
H
HappyFappy
HappyFappy
H
here: I got this together for you, allows OPs to give coins/Dice (craps style)/Russian Roulette/ and added !balance so users can see what they have in Mariocoins

Code:
ON *:TEXT:*!5coins*:#:{ 
  if ($nick isop $chan) { 
    if ($2 == $null) {
      msg # please supply nick to send to
    }
    msg # $2 has been given 5 Mariocoins
    set %money.withdraw $calc( $readini( mariocoin.ini, $2 , Money ) + 5 )
    writeini mariocoin.ini $2 Money %money.withdraw
    unset %money.withdraw
  }
}

;MONEY MANAGMENT
on *:TEXT:!balance*:#:{
  if ($readini( mariocoin.ini, $nick, Money ) == $null) {
    /notice $nick , You have no coins
    halt
  }
  if ($2 != $null) {
    if ($readini( mariocoin.ini, $2, Money ) == $null) {
      /msg $chan $2 has no coins
      halt
    }
    else /msg $chan $2 has $readini(mariocoin.ini, $2, Money) MarioCoins
  }
  if ($2 == $null) /msg $chan $nick has $readini(mariocoin.ini, $nick, Money) Mariocoins
}
;DICE
on *:TEXT:!rtd*:#: {
  if ($readini( mariocoin.ini, $nick, Money ) == $null) {
    /notice $nick $+ , You have no coins
    halt
  }
  if ($2 == $null) {
    /notice $nick Please type a credit ammount. ex: !rtd (money)
    halt
  }
  if ($readini( mariocoin.ini, $nick, Money ) < $2) {
    /notice $nick Sorry but you don't have $2 credits to spend.
    halt
  }
  if ($2 < 1) {
    /notice $nick Please bet with 1 credit or more.
    halt
  }
  var %R = $rand(1,6) | var %C = $rand(1,6)
  var %T = $Calc(%R + %C)
  /msg $chan $nick Rolls the dice......... 4 %R  & 4 %C  
  /msg $chan Dice Total= %T
  if (%T = 7) {
    var %M = $calc($2 * 3)
    /msg $chan $nick GOT SEVENS.. You Win %m MarioCoins
    /set %money.temp $calc( $readini( mariocoin.ini, $nick, Money ) + %m)
    /writeini mariocoin.ini $nick Money %money.temp
    /unset %money.temp
    /unset %R
    /unset %C
    /unset %T
    /unset %M  
    /halt
  }
  if  (%T = 11) {
    var %M = $calc($2 * 4)
    /msg $chan $nick GOT ELEVEN.. You Win %m MarioCoins
    /set %money.temp $calc( $readini( mariocoin.ini, $nick, Money ) + %m)
    /writeini mariocoin.ini $nick Money %money.temp
    /unset %money.temp
    /unset %R
    /unset %C
    /unset %T
    /unset %M
    /halt
  }
  else {
    /msg $chan $Nick Crapped out. You Lose $2 MarioCredits
    /set %money.temp $calc( $readini( mariocoin.ini, $nick, Money ) - $2)
    /writeini mariocoin.ini $nick Money %money.temp
    /unset %money.temp
    /unset %R
    /unset %C
    /unset %T
    /unset %M
  }
  else return
  set -eu60 $+(%,flood.,$network,.,$chan,.,action) ON
}
on *:text:!roulette*:#: {  
  if ($readini( mariocoin.ini, $nick, Money ) == $null) {
    /notice $nick $+ , You have no coins
    halt
  }
  if ($2 == $null) {
    /notice $nick Please type a credit ammount. ex: !rtd (money)
    halt
  }
  if ($readini( mariocoin.ini, $nick, Money ) < $2) {
    /notice $nick Sorry but you don't have $2 credits to spend.
    halt
  }
  if ($2 < 1) {
    /notice $nick Please bet with 1 credit or more.
    halt
  }
  if ($rand(1,6) != 1) {
    msg $chan *CLICK!* :I | halt
    /set %money.reset $calc( $readini( mariocoin.ini, $nick , Money ) - 1)
    /writeini mariocoin.ini $nick Money %money.reset
    /unset %money.reset
  }
  if ($rand(1,6) != 2) {
    msg $chan *CLICK!* Lucky... | halt
    /set %money.reset $calc( $readini( mariocoin.ini, $nick , Money ) - 1)
    /writeini mariocoin.ini $nick Money %money.reset
    /unset %money.reset
  }
  if ($rand(1,6) != 3) {  
    msg $chan Well..
    /me BANG!
    /set %money.reset $calc( $readini( mariocoin.ini, $nick , Money ) + 1)
    /writeini mariocoin.ini $nick Money %money.reset
    /unset %money.reset
  }
  if ($rand(1,6) != 4 {
    msg $chan *CLICK!* (-_-) | halt
    /set %money.reset $calc( $readini( mariocoin.ini, $nick , Money ) - 1)
    /writeini mariocoin.ini $nick Money %money.reset
    /unset %money.reset
  }
  if ($rand(1,6) != 5 {
    msg $chan *CLICK* damnit
    /set %money.reset $calc( $readini( mariocoin.ini, $nick , Money ) - 1)
    /writeini mariocoin.ini $nick Money %money.reset
    /unset %money.reset
  }
  if ($rand(1,6) != 6 {
    /me BANG!
    /set %money.reset $calc( $readini( mariocoin.ini, $nick , Money ) + 1)
    /writeini mariocoin.ini $nick Money %money.reset
    /unset %money.reset
  }
}


Last edited by HappyFappy; 03/01/15 06:46 PM.
Re: Russian roulette Roll the dice and currency
#250136 04/01/15 12:33 AM
M
michaelukz
michaelukz
M
How would I remove ie 5 coins tho? I tried replacing + with - and changing the command to !M5coins and changing the msg

It also doesn't remove any or add any for roulette either
Re: Russian roulette Roll the dice and currency
#250140 04/01/15 02:04 AM
H
HappyFappy
HappyFappy
H
oh yea i see what you mean about the roulette. sorry i slapped together in a rush, im fixing now

added in the remove and fixed roulette

Code:
ON *:TEXT:*!5coins*:#:{ 
  if ($nick isop $chan) { 
    if ($2 == $null) {
      msg # please supply nick to send to
    }
    msg # $2 has been given 5 Mariocoins
    set %money.withdraw $calc( $readini( mariocoin.ini, $2 , Money ) + 5 )
    writeini mariocoin.ini $2 Money %money.withdraw
    unset %money.withdraw
  }
}
ON *:TEXT:*!r5coins*:#:{ 
  if ($nick isop $chan) { 
    if ($2 == $null) {
      msg # please supply nick to send to
    }
    msg # $2 had 5 Mariocoins removed
    set %money.withdraw $calc( $readini( mariocoin.ini, $2 , Money ) - 5 )
    writeini mariocoin.ini $2 Money %money.withdraw
    unset %money.withdraw
  }
}

;MONEY MANAGMENT
on *:TEXT:!balance*:#:{
  if ($readini( mariocoin.ini, $nick, Money ) == $null) {
    /notice $nick , You have no coins
    halt
  }
  if ($2 != $null) {
    if ($readini( mariocoin.ini, $2, Money ) == $null) {
      /msg $chan $2 has no coins
      halt
    }
    else /msg $chan $2 has $readini(mariocoin.ini, $2, Money) MarioCoins
  }
  if ($2 == $null) /msg $chan $nick has $readini(mariocoin.ini, $nick, Money) Mariocoins
}
;DICE
on *:TEXT:!rtd*:#: {
  if ($readini( mariocoin.ini, $nick, Money ) == $null) {
    /notice $nick $+ , You have no coins
    halt
  }
  if ($2 == $null) {
    /notice $nick Please type a credit ammount. ex: !rtd (money)
    halt
  }
  if ($readini( mariocoin.ini, $nick, Money ) < $2) {
    /notice $nick Sorry but you don't have $2 credits to spend.
    halt
  }
  if ($2 < 1) {
    /notice $nick Please bet with 1 credit or more.
    halt
  }
  var %R = $rand(1,6) | var %C = $rand(1,6)
  var %T = $Calc(%R + %C)
  /msg $chan $nick Rolls the dice......... 4 %R  & 4 %C  
  /msg $chan Dice Total= %T
  if (%T = 7) {
    var %M = $calc($2 * 3)
    /msg $chan $nick GOT SEVENS.. You Win %m MarioCoins
    /set %money.temp $calc( $readini( mariocoin.ini, $nick, Money ) + %m)
    /writeini mariocoin.ini $nick Money %money.temp
    /unset %money.temp
    /unset %R
    /unset %C
    /unset %T
    /unset %M  
    /halt
  }
  if  (%T = 11) {
    var %M = $calc($2 * 4)
    /msg $chan $nick GOT ELEVEN.. You Win %m MarioCoins
    /set %money.temp $calc( $readini( mariocoin.ini, $nick, Money ) + %m)
    /writeini mariocoin.ini $nick Money %money.temp
    /unset %money.temp
    /unset %R
    /unset %C
    /unset %T
    /unset %M
    /halt
  }
  else {
    /msg $chan $Nick Crapped out. You Lose $2 MarioCredits
    /set %money.temp $calc( $readini( mariocoin.ini, $nick, Money ) - $2)
    /writeini mariocoin.ini $nick Money %money.temp
    /unset %money.temp
    /unset %R
    /unset %C
    /unset %T
    /unset %M
  }
  else return
  set -eu60 $+(%,flood.,$network,.,$chan,.,action) ON
}
on *:text:!roulette*:#: {  
  if ($readini( mariocoin.ini, $nick, Money ) == $null) {
    /notice $nick $+ , You have no coins
    halt
  }
  if ($2 == $null) {
    /notice $nick Please type a credit ammount. ex: !rtd (money)
    halt
  }
  if ($readini( mariocoin.ini, $nick, Money ) < $2) {
    /notice $nick Sorry but you don't have $2 credits to spend.
    halt
  }
  if ($rand(1,6) != 1) {
    msg $chan *CLICK!* :I | halt
    /set %money.reset $calc( $readini( mariocoin.ini, $nick , Money ) - $2 )
    /writeini mariocoin.ini $nick Money %money.reset
    /unset %money.reset
  }
  if ($rand(1,6) != 2) {
    msg $chan *CLICK!* Lucky... | halt
    /set %money.reset $calc( $readini( mariocoin.ini, $nick , Money ) - $2 )
    /writeini mariocoin.ini $nick Money %money.reset
    /unset %money.reset
  }
  if ($rand(1,6) != 3) {  
    msg $chan Well..
    /me BANG!
    /set %m $2 * 2
    /set %money.reset $calc( $readini( mariocoin.ini, $nick , Money ) + %m )
    /writeini mariocoin.ini $nick Money %money.reset
    /unset %money.reset
    /unset %m
  }
  if ($rand(1,6) != 4 {
    msg $chan *CLICK!* (-_-) | halt
    /set %money.reset $calc( $readini( mariocoin.ini, $nick , Money ) -  $2 )
    /writeini mariocoin.ini $nick Money %money.reset
    /unset %money.reset
  }
  if ($rand(1,6) != 5 {
    msg $chan *CLICK* damnit
    /set %money.reset $calc( $readini( mariocoin.ini, $nick , Money ) - $2 )
    /writeini mariocoin.ini $nick Money %money.reset
    /unset %money.reset
  }
  if ($rand(1,6) != 6 {
    /me BANG!
    /set %d $2 * 2
    /set %money.reset $calc( $readini( mariocoin.ini, $nick , Money ) + %d )
    /writeini mariocoin.ini $nick Money %money.reset
    /unset %money.reset
    /unset %d
  }
}

Last edited by HappyFappy; 04/01/15 02:09 AM.
Re: Russian roulette Roll the dice and currency
#250142 04/01/15 02:22 AM
M
michaelukz
michaelukz
M
Recently I have noticed something with my auto response and am wondering if you know a fix..

Here is the current code

on *:TEXT:hey:#: { msg $chan Welcome to the stream $nick
}

However If someone says hey im here It doesn't respond
??
Re: Russian roulette Roll the dice and currency
#250144 04/01/15 02:29 AM
H
HappyFappy
HappyFappy
H
Code:
on *:TEXT:hey:#: {
  msg $chan Welcome to the stream $nick 
}


I just tested that and it works fine

if you want it to AUTO say it when they join:

Code:
on *:JOIN:#: {
  msg $chan Welcome to the stream $nick 
}

Last edited by HappyFappy; 04/01/15 02:30 AM.
Re: Russian roulette Roll the dice and currency
#250145 04/01/15 02:31 AM
M
michaelukz
michaelukz
M
It doesn't work if there any text after, not for me atleast?
Re: Russian roulette Roll the dice and currency
#250146 04/01/15 02:33 AM
H
HappyFappy
HappyFappy
H
try adding it to a new script page by itself

also i've had times where it wanted to be channel specific

so like where # is make it #nameofchannel
Re: Russian roulette Roll the dice and currency
#250147 04/01/15 02:46 AM
M
michaelukz
michaelukz
M
What is the cmd for disconnect

on *:EXIT:#: {
msg $chan $nick Has left the stream
}

?
Re: Russian roulette Roll the dice and currency
#250148 04/01/15 02:49 AM
H
HappyFappy
HappyFappy
H
there is two types:

on *:DISCONNECT:{

and

on *:EXIT:{
Re: Russian roulette Roll the dice and currency
#250149 04/01/15 02:54 AM
M
michaelukz
michaelukz
M
I have this, It's not doing anything

on *:EXIT:#: {
msg $chan $nick Has left the stream
}
on *:DISCONNECT:#: {
msg $chan $nick Has left the stream
}
Re: Russian roulette Roll the dice and currency
#250154 04/01/15 03:22 AM
H
HappyFappy
HappyFappy
H
whats the IRC channel? is it Freenode?
Re: Russian roulette Roll the dice and currency
#250156 04/01/15 06:03 AM
B
Belhifet
Belhifet
B
on part
on *:TEXT:hey*:#: {
also 'notice' doesn't function on twitch


Last edited by Belhifet; 04/01/15 06:06 AM.
Re: Russian roulette Roll the dice and currency
#250169 04/01/15 08:39 PM
M
michaelukz
michaelukz
M
The IRC channel is irc.twitch.tv
Re: Russian roulette Roll the dice and currency
#250185 05/01/15 02:58 AM
Joined: Feb 2003
Posts: 2,737
Raccoon Offline
Hoopy frood
Offline
Raccoon
Hoopy frood
Joined: Feb 2003
Posts: 2,737
Originally Posted By: HappyFappy
whats the IRC channel? is it Freenode?

Originally Posted By: michaelukz
The IRC channel is irc.twitch.tv
Ok you frustrating twitchy kiddies. Basic lesson time.
Just FYI, the correct terminology is "Network" and "Server". Examples:

IRC channels: #mirc #irchelp #mycoolgame

IRC servers: irc.twitch.tv , orwell.freenode.net , 205.209.5.1

IRC networks: Twitch , Freenode , EFNet

There are other words in the IRC lexicon that you should learn. Here's a glossary.

Last edited by Raccoon; 05/01/15 05:38 AM. Reason: Sounding like less of a jerk.
Well. At least I won lunch.
Good philosophy, see good in bad, I like!
Re: Russian roulette Roll the dice and currency
Raccoon #250189 05/01/15 03:40 AM
M
michaelukz
michaelukz
M
Dude it's ok to correct us, In fact I appreciate that, Just don't be a snob about it.
Re: Russian roulette Roll the dice and currency
#250193 05/01/15 05:30 AM
Joined: Feb 2003
Posts: 2,737
Raccoon Offline
Hoopy frood
Offline
Raccoon
Hoopy frood
Joined: Feb 2003
Posts: 2,737
smile Sorry. It's just AOL all over again. I'm getting old.

Well. At least I won lunch.
Good philosophy, see good in bad, I like!
Re: Russian roulette Roll the dice and currency
Raccoon #250195 05/01/15 06:09 AM
M
michaelukz
michaelukz
M
Honestly, I didn't even read the whole thing, I just stopped at IRC, and replied smirk This needs to be a lesson for kids, haha.

Link Copied to Clipboard
Forum Rules · Mark All Read Contact Us · Help · mIRC Homepage