/////////////////////////
//       clock         //
//  by stuart haidon   //
// place in a 200 x 144//
//     size room       //
/////////////////////////

show_score = 0{
year = current_year;
month = current_month;
wd = current_weekday;
date = current_day;
hour = current_hour;
minute = current_minute;
second = current_second;

background_color = c_black;
font_name = "verdana";
font_size = 14;
font_color = c_white;
font_style = fs_bold
pen_color = c_yellow
brush_color = c_black

draw_rectangle(0,32,200,144)
draw_ellipse(0,0,200,31)

draw_text(30,3,"Current Time");

font_size = 8

draw_text(5,32,"Year:  " + string(year));
draw_text(5,48,"Month:  ");
draw_text(5,64,"Date:  " + string(date));
draw_text(5,80,"Week Day:  ");
draw_text(5,96,"Hour:  " + string(hour));
draw_text(5,112,"Minute:  " + string(minute));
draw_text(5,128,"Second:  " + string(second));

if current_day = 1
then
draw_text(55,64,"st")

if current_day = 2
then
draw_text(55,64,"nd")

if current_day = 3
then
draw_text(55,64,"rd")

if current_day = 4
then
draw_text(55,64,"th")

if current_day = 5
then
draw_text(55,64,"th")

if current_day = 6
then
draw_text(55,64,"th")

if current_day = 7
then
draw_text(55,64,"th")

if current_day = 8
then
draw_text(55,64,"th")

if current_day = 9
then
draw_text(55,64,"th")

if current_day = 10
then
draw_text(63,64,"th")

if current_day = 11
then
draw_text(63,64,"th")

if current_day = 12
then
draw_text(63,64,"th")

if current_day = 13
then
draw_text(63,64,"th")

if current_day = 14
then
draw_text(63,64,"th")

if current_day = 15
then
draw_text(63,64,"th")

if current_day = 16
then
draw_text(63,64,"th")

if current_day = 17
then
draw_text(63,64,"th")

if current_day = 18
then
draw_text(63,64,"th")

if current_day = 19
then
draw_text(63,64,"th")

if current_day = 20
then
draw_text(63,64,"th")

if current_day = 21
then
draw_text(63,64,"st")

if current_day = 22
then
draw_text(63,64,"nd")

if current_day = 23
then
draw_text(63,64,"rd")

if current_day = 24
then
draw_text(63,64,"th")

if current_day = 25
then
draw_text(63,64,"th")

if current_day = 26
then
draw_text(63,64,"th")

if current_day = 27
then
draw_text(63,64,"th")

if current_day = 28
then
draw_text(63,64,"th")

if current_day = 29
then
draw_text(63,64,"th")

if current_day = 30
then
draw_text(63,64,"th")

if current_day = 31
then
draw_text(63,64,"st")

if current_weekday = 1
then
draw_text(80,80,"Sunday")

if current_weekday = 2
then
draw_text(80,80,"Monday")

if current_weekday = 3
then
draw_text(80,80,"Tuesday")

if current_weekday = 4
then
draw_text(80,80,"Wednesday")

if current_weekday = 5
then
draw_text(80,80,"Thursday")

if current_weekday = 6
then
draw_text(80,80,"Friday")

if current_weekday = 7
then
draw_text(80,80,"Saturday")

if current_month = 1
then
draw_text(56,48,"January")

if current_month = 2
then
draw_text(56,48,"Febuary")

if current_month = 3
then
draw_text(56,48,"March")

if current_month = 4
then
draw_text(56,48,"April")

if current_month = 5
then
draw_text(56,48,"May")

if current_month = 6
then
draw_text(56,48,"June")

if current_month = 7
then
draw_text(56,48,"July")

if current_month = 8
then
draw_text(56,48,"August")

if current_month = 9
then
draw_text(56,48,"September")

if current_month = 10
then
draw_text(56,48,"October")

if current_month = 11
then
draw_text(56,48,"November")

if current_month = 12
then
draw_text(56,48,"December")
}