Please Disable Ad-Block To View This Website.

If you block ads, this site can not survive!

Ads are very minimal for registered users. If you don't have an account please register now!

DOWNLOAD
 Full Scripts
 Addons
 Snippets
 DLLs
 MTS Themes
 Tutorials
 Misc.
 File Queue
 Download mIRC
INTERACT
 Screenshots
 Challenge
 Top Downloads
 Submit Form
 Forums

SEARCH
Site Search

FRIENDS
Link to us!
PhotoShelf

Top Challenge Entrants

  # User Points
  1 jaytea 587
  2 [Znork] 303
  3 urza 297
  4 Ag2X 288
  5 dr_Eamer 255
  6 Albie 199
  7 Chessnut 197
  8 A Noniem 194
  9 zzattack 186
  10 Kol 185
  11 m910q 168
  12 Sephiroth 115
  13 Auron956 114
  14 patje 114
  15 chid 110
  16 Ohad2121 92
  17 SkorpSSS 87
  18 DixrouE 84
  19 Suchorski 83
  20 ^Vampire^ 74
Challenge:Smallest $rps - Rock, Paper, Scissors
Start:July 17th 2009
End:July 23rd 2009
Results:

The challenge was a phenomenal success. In fact, we have set a record number of entries not only for the ones I've set on mircscripts.org, but ever!

There was a total of 45 entries, 18 valid and 27 invalid!



Winner! jaytea (76 bytes!)
alias rps return $calc($iif(? ? iswm $1-,$pos(rrsrsspspprp,$1 $+ $2-))% 4-1)


Runner-up! Kol (78 bytes!)
alias rps return $calc($iif(? ? iswm $1-,$pos($mid(rsprs,$pos(rsp,$1)),$2))-1)


Most creative!* visionz (78 bytes!)
alias rps return $ceil($calc($pos(<ÀFG@½¿AD,$chr($base($1c $+ $2-,9,8)))/3-1))

* although not validating input, I awarded this for the shear thought and work gone into this entry



Thank you all for taking part! I hope to see you all in the next challenge which will be set in the upcoming days.


Winner:

  • jaytea    76 bytes!  

  • Top Entries
  •  Kol
  • 78 bytes
  •  urza
  • 83 bytes
  •  ohad
  • 84 bytes
  •  Saturn
  • 90 bytes
  •  Cail
  • 91 bytes
  •  Albie
  • 93 bytes
  •  bindi
  • 98 bytes
  •  user007
  • 120 bytes
  •  Daveoh
  • 121 bytes
  •  DixrouE
  • 125 bytes
  •  Auron956
  • 128 bytes
  •  bbz
  • 146 bytes
  •  pratez
  • 152 bytes
  •  OzJD
  • 155 bytes
  •  SniperMS
  • 157 bytes
  •  Timi
  • 163 bytes
  •  Fenrirz0r
  • 208 bytes
  •  vliedel
  • 714084 bytes

    Invalid Entries
  •  Chessnut
  • 77 bytes* Failed on test: $rps(r,,) returned 0 should of returned -1
  •  visionz
  • 78 bytes* Failed on test: $rps(rspr,rp) returned 1 should of returned -1
  •  OokMP3
  • 94 bytes* Failed on test: $rps(R R) returned 0 should of returned -1
  •  therealkerst
  • 96 bytes* Failed on test: $rps(,rs) returned 1 should of returned -1
  •  m910q
  • 96 bytes* Failed on test: $rps(R R) returned 0 should of returned -1
  •  Nighthawk
  • 100 bytes* Failed on test: $rps(+,1) returned +1 should of returned -1
  •  chid
  • 109 bytes* Failed on test: $rps(r,,) returned 2 should of returned -1
  •  Imk0tter
  • 114 bytes* Failed on test: $rps($chr(44) $+ s,p) * /goto: ',sp' not found (line 3) should of returned -1
  •  spyro
  • 115 bytes* Failed on test: $rps(,rs) returned 1 should of returned -1
  •  ancientlord6
  • 139 bytes* Failed on test: $rps(p,rps) returned 2 should of returned -1
  •  Natdhib
  • 142 bytes* Failed on test: $rps(r,r) returned 2 should of returned 0
  •  entropy
  • 146 bytes* Failed on test: $rps(R R) returned 0 should of returned -1
  •  URJD
  • 147 bytes* Failed on test: $rps(p,rps) returned 12 should of returned -1
  •  unrealnet
  • 167 bytes* Failed on test: $rps(r,p,) returned 2 should of returned -1
  •  Jos-hR
  • 175 bytes* Failed on test: $rps(p,pp) returned 2 should of returned -1
  •  Jigsy
  • 177 bytes* Failed on test: $rps(rs,p) returned 2 should of returned -1
  •  Andy
  • 180 bytes* Failed on test: $rps(r p s,r p s) returned 0 should of returned -1
  •  v_lz
  • 182 bytes* Failed on test: $rps(Z,Z) returned 0 should of returned -1
  •  asdx
  • 211 bytes* Failed on test: $rps(p,rps) returned 1 should of returned -1
  •  Firstmate
  • 221 bytes* Failed on test: $rps(r,p,) returned 2 should of returned -1
  •  Nen
  • 229 bytes*Failed on test: $rps(r,p) returned p should of returned 2
  •  Shinigami
  • 244 bytes* Failed on test: $rps(p,s,,rppr) returned 2 should of returned -1
  •  vithor
  • 245 bytes* Failed on test: $rps(r,$chr(44)) returned 2 should of returned -1
  •  DM-MaSTeR
  • 251 bytes* Failed on test: $rps(P,P) returned 1 should of returned 0
  •  mcm2
  • 349 bytes* Failed on test: $rps(r,p) returned 1 should of returned 2
  •  He3F
  • 402 bytes* Failed on test: $rps(r,p,0) returned 2 should of returned -1

    Description:


    In this challenge you are asked to create an alias that will return the winner of the game Rock, Paper, Scissors.

    Two parameters will be passed to the alias;

    r = Rock
    p = Paper
    s = Scissors

    The alias must return the winner of the game;

    -1 if $1- is invalid input i.e. not r/p/s
    0 if its a draw
    1 if $1 wins
    2 if $2 wins

    Your alias must be case in-sensitive. You must assume any values of any length can be passed as either $1 or $2. In any event of an invalid input (i.e. anything other than purely r/p/s, your alias should return -1). You should return -1 if $3- is supplied i.e. $rps(r,p,r) should return -1

    Example:

    $rps(r,p) = 2
    $rps(p,r) = 1
    $rps(s,s) = 0
    $rps(s,p) = 1
    $rps(s,r) = 2
    $rps(R,s) = 1
    $rps(rr,s) = -1
    $rps(1,s) = -1
    $rps(;,) = -1
    $rps(r,pp) = -1
    $rps(p1,s2) = -1
    $rps(ppr,s) = -1
    $rps(r,r,p) = -1
    $rps(r,p,0) = -1
    $rps(r,s,$false) = -1

    Rules:

  • Alias name must be 'rps'
  • No dlls, coms, sockets or regular expressions
  • One submission per user.
  • Script must give correct results after consecutive runs.


  • Testing conditions:

  • Alias will be run on mIRC v6.35 and loaded into the remotes section.
  • Your code will be taken for EXACTLY as-is.
  • Alias will be run on a mIRC with no variables set - a clean mIRC.


  • Countcode:
    (coded by garreh)