Hi,
I made this snippet as a request and it turned out good so im now useing it and thought id share too (arnt I good :D).
Anyways this is a time dialog that shows u all times,dates,uptimes,connected time and idle time in edit boxes with an option to msg the active channel.
Some credit must go to RusselB for helping with parts of this code.
To use copy and paste into remotes (alt+r).
Enjoy :D
dialog atime {
title "Time/date System"
size -1 -1 161 232
option dbu
text "Time/date System by Gemster", 1, 56 8 46 13, center
text "Time is --", 2, 8 32 40 8
text "Today is -- ", 3, 8 48 41 8
text "This Month is --", 4, 8 64 41 8
text "This Year is --", 5, 8 80 41 8
text "Full Date is --", 7, 8 96 42 8
edit "", 8, 56 32 50 10, read autohs
edit "", 10, 56 48 50 10, read autohs
edit "", 11, 56 64 50 10, read autohs
edit "", 12, 56 80 50 10, read autohs
edit "", 13, 56 96 50 10, read autohs
text "All --", 14, 8 112 42 8
edit "", 15, 56 112 73 10, read autohs
button "Say", 16, 112 32 17 9
button "Say", 18, 112 48 17 9
button "Say", 19, 112 64 17 9
button "Say", 20, 112 80 17 9
button "Say", 21, 112 96 17 9
button "Say", 22, 136 112 17 9
button "Done", 23, 64 216 37 12, ok cancel
text "Extra times", 6, 64 136 40 8, center
text "Mirc uptime --", 9, 8 152 42 8
text "System uptime --", 17, 8 168 43 8
text "Connected --", 24, 8 184 44 8
text "Idle Time --", 25, 8 200 44 8
edit "", 26, 56 152 50 10, read autohs
edit "", 27, 56 168 50 10, read autohs
edit "", 28, 56 184 50 10, read autohs
edit "", 29, 56 200 50 10, read autohs
button "Say", 30, 112 152 17 9
button "Say", 31, 112 168 17 9
button "Say", 32, 112 184 17 9
button "Say", 33, 112 200 17 9
box "", 34, 3 24 154 102
box "", 35, 4 145 129 69
}
On *:DIALOG:atime:INIT:*:{
.timertabletime 0 1 dt $dname
}
on *:dialog:atime:close:*:{
.timertabletime off
}
alias -l dt {
did -ra $1 8 $time
did -ra $1 10 $asctime(dddd ddoo)
did -ra $1 11 $asctime(mmmm)
did -ra $1 12 $asctime(yyyy)
did -ra $1 13 $asctime(dd/mm/yyyy)
did -ra $1 15 My Time is now $time on $asctime(dddd ddoo) of $asctime(mmmm yyyy)
did -ra $1 26 $uptime(mirc, 1)
did -ra $1 27 $uptime(system, 1)
did -ra $1 28 Seconds Connected $online
did -ra $1 29 $idle
}
on *:DIALOG:atime:sclick:16:{ /msg $active My time is now $did(8) }
on *:DIALOG:atime:sclick:18:{ /msg $active Today it is $did(10) }
on *:DIALOG:atime:sclick:19:{ /msg $active This Month is $did(11) }
on *:DIALOG:atime:sclick:20:{ /msg $active Can you guess it, this Year is $did(12) }
on *:DIALOG:atime:sclick:21:{ /msg $active Full Date is $did(13) }
on *:DIALOG:atime:sclick:22:{ /msg $active $did(15) }
on *:DIALOG:atime:sclick:30:{ /msg $active My mirc Uptime is $did(26) }
on *:DIALOG:atime:sclick:31:{ /msg $active My system Uptime is $did(27) }
on *:DIALOG:atime:sclick:32:{ /msg $active Number of $did(28) ,since I conected to mirc }
on *:DIALOG:atime:sclick:33:{ /msg $active My idle time is $did(29) seconds }
alias atime {
dialog $iif(!$dialog(atime),-md,-ev) atime atime
}
Menu Channel {
Times:/atime
}
/msg $active Can you guest it, this Year is $did(12) }
The guest I think should be guess??? Otherwise I am lost, I like it any chance you could add a working calender to it were you could set stuff up I know there are others around but with the timer I think you could maybe add a count down timer to up coming dates and it wouldn\'t be to difficult although I am not sure so thats why I am asking here good luck and I like the code its nice and short as it can be its nice 8/10 keep it up!!
/msg $active Number of $did(28) ,since i conected to mirc }
Also shouldn\'t the i be capitalized I just a guess :)