Jump to content
Countdown To Christmas!



charles256

Members
  • Content Count

    2
  • Joined

  • Last visited

2 Followers

About charles256

  • Rank
    New Member
  1. Hello I wrote the following script for Koach.com To install the script: Open mIRC.exe Press Alt+R to open the mIRC Scripts Editor Copy and paste the script Click OK To use the script: Please read the comments in the script for how to use :-) -------------------------------------------------------------------- /* { "birthday" by Charles "charles" M. (February 2012) # Prelude Koach (a hacker) put a list of birthdays (name month/day) on the Koach.com forum. # What does this script do? This script attempts to connect to the Koach.com forum to retrieve the list of birthdays. It then compares each birthday to today's date. If there is a comparison, it will notify you with the user's birthday. # How do I use this script? The script can be used in two ways: Alias: birthday or Popups: Status Window or Channel Window -> Birthday -> Check for Birthdays # How do I contact you? charles @ irc.koach.com # Version history 11/02/2012 First public release. } */ /* ** ** Aliases ** */ ; _echo [-eiw] <text> ; Prints text in the active window using the optional colour switch. ; ; The colour switches are as follows: ; ; -e -- error ; -i -- information ; -w -- warning alias _echo { if ($0) { var %colour, %switches if ($active == Status Window) { %switches = -cegs } else { %switches = -cga } if (-* iswm $1) { if (e isincs $1) { %colour = "ctcp text" } elseif (i isincs $1) { %colour = "info text" } else { if (w isincs $1) { %colour = "wallops text" } else { %colour = "info text" } } tokenize 32 $2- } else { %colour = "info text" } echo %switches %colour * $1- } } ; birthday ; alias birthday { if ($sock(birthday)) { sockclose birthday } set -e %birthdays 0 sockopen birthday www.koach.com 80 .timerbirthday -o 0 28800 birthday if ($show) { _echo -i Connecting to birthday server } } /* ** ** Popups ** */ menu status,channel { &Birthday .&Check for Birthdays: { birthday } } /* ** ** Events ** */ on *:START: { if ($version < 7.22) { _echo -e birthday is designed for mIRC 7.22. It should work on your $& mIRC version $+($chr(40), $version, $chr(41)) but it is untested $& and may act strange. } birthday } /* ** ** Socket events ** */ on *:SOCKOPEN:birthday: { if ($sockerr > 0) { _echo -e Error while connecting to birthday server return } var %% = sockwrite -n birthday %% GET /forum/index.php?/topic/328-current-birthday-list/ HTTP/1.1 %% Accept: */* %% Host: www.koach.com %% Connection: close %% } on *:SOCKCLOSE:birthday: { if ($sockerr > 0) { _echo -e Error while disconnecting from birthday server return } } on *:SOCKREAD:birthday: { if ($sockerr > 0) { _echo -e Error while reading data from birthday server return } var %data sockread %data while ($sockbr > 0) { tokenize 32 %data if (HTTP/1.?* iswm $1) { if ($2 != 200) { _echo -e Error while connecting to birthday server sockclose birthday } } elseif (*cached*Date Nick* iswm $1-) { sockmark birthday 1 } else { if ($sock(birthday).mark) { if ($regex(birthday, $1-, /0?(\d+)\/0?(\d+)\S*([^<]+)/)) { if ($+($regml(birthday, 1), /, $regml(birthday, 2)) == $asctime(m/d)) { beep inc %birthdays _echo -w It's $+($regml(birthday, 3), 's) birthday! } } else { if (*</div>* iswm $1-) { sockmark birthday _echo -i Finished checking for birthdays. Found: %birthdays unset %birthdays } } } } if ($sockname) { sockread %data } } } ; EOF
  2. February 8, 2012 Hello, World! I'm not much of a chef, but I gave it a go. :-) -------------------------------------------------------------------------------- This recipe serves one person. Ingredients: Half a dozen oysters (I recommend Sydney Rock) One piece rindless bacon 3 tablespoons tomato sauce 4 tablespoons worcestershire sauce 50 grams (~1.7 ounces) parmesan cheese One lime and/or lemon 50 grams (~1.7 ounces) parsley A few pieces of mint Salt and black peppercorn One bag rock sea salt Preparation: Preheat oven to 220 degrees celcius (428 degrees fahrenheit) Shuck oysters, if necessary Finely dice bacon Grate parmesan cheese, if necessary Chop parsley, if necessary Blend tomato and worcestershire sauce in bowl to create kilpatrick sauce Microwave lemon and/or lime for 20 seconds, roll and cut into wedges Line oven tray with rock salt, place oysters on top Sprinkle bacon on oysters Drizzle kilpatrick sauce on oysters, season with salt and black peppercorn Sprinkle parmesan cheese on oysters Cooking: Cook for 6 to 8 minutes until bacon is crisp and parmesan cheese is browned Final touches and plating: Sprinkle parsley on oysters Serve on a bed of rock sea salt, with lemon and/or lime wedges and mint Comments, flames, questions and suggestions welcome.
×
  • Create New...