[GML] Chaotic analog clock

////CREATE EVENT
x = room_width/2;
y = room_height/2;
numbers = makeList(0, 59); //script that makes a ds_list with certain range of numbers
ds_list_shuffle(numbers);
hLength = 100;
mLength = 200;
sLength = 200;

divBegin = 210;
divEnd = 250;
textDist = 270;


////DRAW GUI EVENT
var h = current_hour;
var m = current_minute;
var s = current_second;
draw_set_color(c_white);
setText(fa_center, fa_center, fnMain);
for (var i = 0; i < 12; i++)
{
    draw_line_width(x + lengthdir_x(divBegin, i*30), y + lengthdir_y(divBegin, i*30),
                    x + lengthdir_x(divEnd, i*30), y + lengthdir_y(divEnd, i*30), 4);
}

for (var i = 0; i < 60; i++)
{
    draw_set_color(c_white);
    draw_text(x + lengthdir_x(textDist, i*6), y + lengthdir_y(textDist, i*6), numbers[| i]);
    if (numbers[|i] == h)
        draw_line_width(x, y, x + lengthdir_x(hLength, i*6), y + lengthdir_y(hLength, i*6), 6);
    if (numbers[|i] == m)
        draw_line_width(x, y, x + lengthdir_x(mLength, i*6), y + lengthdir_y(mLength, i*6), 3);
    if (numbers[|i] == s)
    {
        draw_set_color(c_red);
        draw_line(x, y, x + lengthdir_x(sLength, i*6), y + lengthdir_y(sLength, i*6));
    }
}