Mine

dialog grats {
  title "Grats Creator"
  size -1 -1 420 93
  option dbu
  icon C:\Documents and Settings\Owner\My Documents\My Pictures\New Folder\short and sweet.bmp, 0
  text "Multi-Colour Creator", 1, 0 0 419 9, center
  text "Preview", 5, 49 29 140 8, center
  text "Type", 4, 8 29 38 8, center
  text "Nick", 6, 197 29 53 8, center
  text "Skill", 7, 257 29 25 8, center
  text "Level", 8, 289 29 25 8, center
  text "Channel", 9, 325 29 45 8, center
  text "Colourful", 10, 10 41 35 8, center
  edit "", 11, 196 52 54 10
  edit "", 12, 256 41 26 10
  icon 13, 49 41 138 8, C:\Documents and Settings\Owner\My Documents\My Pictures\New Folder\colourful.bmp, 0
  edit "", 14, 289 41 26 10, limit 2
  edit "", 15, 322 41 50 10
  button "Submit", 16, 375 41 37 10, default
  button "Done", 17, 382 80 37 12, ok cancel
  edit "", 2, 196 41 54 10
  edit "", 3, 196 63 54 10
  button "Submit", 18, 375 52 37 10, default
  button "Submit", 19, 375 63 37 10, default
  edit "", 20, 322 52 50 10
  edit "", 21, 322 63 50 10
  edit "", 22, 289 52 26 10, limit 2
  edit "", 23, 289 63 26 10, limit 2
  edit "", 24, 256 52 26 10
  edit "", 25, 256 63 26 10
  text "Short + Sweet", 26, 9 52 37 8, center
  text "Cool dude", 27, 10 62 34 8, center
  icon 28, 48 52 139 8, C:\Documents and Settings\Owner\My Documents\My Pictures\New Folder\short and sweet.bmp, 0
  icon 29, 48 63 139 8, C:\Documents and Settings\Owner\My Documents\My Pictures\New Folder\cool dude.bmp, 0
}

on *:dialog:grats:sclick:*: {
  if ($did == 16) { msg $did(15) 4@2!14=D3><7*** Nice one $did(11) on $did(12) level $did(14) $+ !***3><14=D2!4@ }
  if ($did == 18) { msg $did(20) 4Congratulations on2 $did(22) $did(24) 4 $+ $did(11) $+ ! }
  if ($did == 19) { msg $did(21) 2Cool dude! Grats on4 $did(23) $did(25) $+ 2 $did(3) $+ ! Thats like, cooler than me! }
}
alias grats { /dialog -md grats grats }