rock,paper,scissors game

mIRC Code

+ 0 likes

Please Register to submit score.

Average Score	4.0
Scores Submitted	1
Date Added	Aug 16, 2007
Last Updated	Aug 16, 2007
Tags	game paper rock scissors

Introduction

a simple script to play rock paper scissors :)

if you dont know how to play your a retard :)

Right click in any window and click Rock,paper,scissors to start :)

you need these 3 pics to play, save them in your $mircdir (//echo -ta $mircdir)

save them all as a .JPG file!!

This one should be saved as Rock

http://i14.tinypic.com/4y6rlgg.jpg

This one should be saved as Paper

http://i14.tinypic.com/4pls8k2.jpg

This one should be saved as Scissors

http://i15.tinypic.com/5y7xegg.jpg

So all as .JPG files!

A picture of the game:

http://i17.tinypic.com/67yxr95.jpg

Grab the Code

menu * {
  rock,paper,scissors:{ window -pk0 @rock,paper,scissors-game
  dialog -md � � }
}
menu @rock,paper,scissors-game {
  sclick:{
    if (!$dialog(�)) { dialog -md � � }
    else { dialog -v � � }
  }
}
on *:load:{
  set %wins 0
  set %ties 0
  set %losses 0
}
dialog � {
  title "What do you want to play?"
  size -1 -1 136 83
  option dbu
  button "Rock", 1, 14 8 37 12
  button "Paper", 2, 14 26 37 12
  button "Scissors", 3, 14 43 37 12
  button "Exit", 4, 14 61 37 12, cancel
  list 5, 65 8 59 66, size
}
on *:dialog:�:init:0:{
  did -a � 5 Wins: %wins
  did -a � 5 Ties: %ties
  did -a � 5 Losses: %losses
  did -a � 5 ________________+
  did -a � 5 Total games: $calc(%wins + %ties + %losses)
}
on *:dialog:�:sclick:*:{
  if $did == 4 window -c @rock,paper,scissors-game
  var %!b = $r(1,3)
  drawpics %!b $did
  if ($did == %!b) { inc %ties 
    drawtext @rock,paper,scissors-game 7 300 200 A tie! 
  }
  elseif ($did == 1 && %!b == 2) { inc %losses
    drawtext @rock,paper,scissors-game 7 300 200 Lost 
  }
  elseif ($did == 2 && %!b == 3) { inc %losses 
    drawtext @rock,paper,scissors-game 7 300 200 Lost 
  }
  elseif ($did == 3 && %!b == 1) { inc %losses
    drawtext @rock,paper,scissors-game 7 300 200 Lost 
  }
  else { inc %wins 
    drawtext @rock,paper,scissors-game 7 300 200 WON! :D 
  }
  did -r � 5
  did -a � 5 Wins: %wins
  did -a � 5 Ties: %ties
  did -a � 5 Losses: %losses
  did -a � 5 ________________+
  did -a � 5 Total games: $calc(%wins + %ties + %losses)
}
alias drawpics {
  clear @rock,paper,scissors-game
  if ($1 == 1) drawpic @rock,paper,scissors-game 400 100 rock.jpg
  if ($2 == 1) drawpic @rock,paper,scissors-game 50 100 rock.jpg
  if ($1 == 2) drawpic @rock,paper,scissors-game 400 100 paper.jpg
  if ($2 == 2) drawpic @rock,paper,scissors-game 50 100 paper.jpg
  if ($1 == 3) drawpic @rock,paper,scissors-game 400 100 scissors.jpg
  if ($2 == 3) drawpic @rock,paper,scissors-game 50 100 scissors.jpg
}

Comments

(3) RSS

Go to Bottom

Shadow Clash

Comments: 40

mIRC Snippet: rock,paper,scissors game
Posted on Aug 16, 2007 11:02 am

Haha cool

Godzilla

Comments: 91

mIRC Snippet: rock,paper,scissors game
Posted on Aug 16, 2007 11:27 am

Images are awesome o.o

kerstt

Comments: 64

mIRC Snippet: rock,paper,scissors game
Posted on Aug 17, 2007 10:28 am

ty :D

rock,paper,scissors game

Introduction

Grab the Code

Comments

kerstt

My Snippet Tags

Contact

Sponsors


Last seen: Jun 25, 2008 Profile Scripts (1) Snippets (18) Comments Received (73) Comments Submitted (64) Forum Posts (45)