[Solved] Birthday Script

Do you have script in mind but no ability to make it, type in what it should do, and you might be lucky.

[Solved] Birthday Script

Postby mistAr » Mon Nov 29, 2010 1:48 am

Hey, i'm requesting a birthday script.

Following Commands should be there:

!date 'nick'
!mydate
!date list

.. The !date nick should write the date of the nick.
When doing "!mydate 20/06/1995" it would say, "mistAr would be 16 in xx(x) days(20/06/2011)"
If nothing is wroten after !mydate, it would just say it like if i used !date mistAr.
!date list should show a list, of all who are added in the date list.

Hopes that enough info. Thanks.
mistAr
 

Re: Birthday Script

Postby Lenooox » Mon May 30, 2011 8:38 am

Code: Select all
;Usage: !addbday [nickname] [day] [month] [year] 
; !bday <name> 
; !bdaylist

on *:TEXT:!addbday *:#: {
  if ($2) && ($read(bday.txt,s,$2)) {
    /msg $chan This name is already on the birthday list.
    halt
  }
  if ($2 != $read(bday.txt,s,$2)) && ($2) {
    write bday.txt $2,$3-
    /msg $chan Your birthday has been recorded under the name $2 $+ . type !bday <name> to see how long you have until your birthday
    halt 
  }

on *:TEXT:!bday *:#: {
  if ($2) && ($read(bday.txt,s,$2)) && ( $calc($ctime($read(bday.txt,s,$2) $asctime(yyyy) 00:00:00) - $ctime) > 0 ) {
    /msg $chan There are $duration( $calc( $ctime($read(bday.txt,s,$2) $asctime(yyyy) 00:00:00) - $ctime)) left until $read(bday.txt,s,$2) and $2 $+ 's birthday!!!
    halt 
  }

  elseif ($2) && ($read(bday.txt,s,$2)) { 
    /msg $chan There are $duration($calc($ctime($read(bday.txt,s,$2) $calc($asctime(yyyy)+1) 00:00:00) - $ctime)) left until $read(bday.txt,s,$2) or $2 $+ 's birthday
    halt 
  }
  if ($2 != $read(bday.txt,s,$2)) {
    /msg $chan I'm sorry $nick $+ . This name is not in my list of birthdays.
  }
}

on *:TEXT:!bdaylist *:#: { msg $chan
  /play $nick bday.txt 1000

}

Lenooox
 


Return to Mirc Scripting Request

Who is online

Users browsing this forum: No registered users and 1 guest

cron