[Solved] Birthday Script

[mistAr]

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.

[Lenooox]

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

}