!!!Listing 11


include "palmsky.h"

form id FormMAIN at (0 0 160 160)
menuid MenuMAIN
begin
  title "PalmSky"
  formbitmap at (62 17) bitmap BitmapNORTH
  formbitmap at (1 84) bitmap BitmapWEST
  formbitmap at (62 141) bitmap BitmapSOUTH
  formbitmap at (125 84) bitmap BitmapEAST
  label "N" autoid at (73 16)
  label "E" autoid at (2 72)
  label "S" autoid at (73 140)
  label "W" autoid at (126 72)

  popuptrigger "jan" id PopTrigMON at (100 16 auto auto)
  list "jan" "feb" "mar" "apr" "may" "jun" "jul" "aug" "sep" "oct" "nov" "dec"
	  id ListMON at (prevleft prevtop prevwidth auto) nonusable visibleitems 4
  popuplist PopTrigMON ListMON
  popuptrigger "01" id PopTrigDAY at (135 16 auto auto)
  list "01" "02" "03" "04" "05" "06" "07" "08" "09"
	  "10" "11" "12" "13" "14" "15" "16" "17" "18" "19"
	  "20" "21" "22" "23" "24" "25" "26" "27" "28" "29"
	  "30" "31"
	  id ListDAY at (prevleft prevtop prevwidth auto) nonusable visibleitems 8
  popuplist PopTrigDAY ListDAY
  popuptrigger "00" id PopTrigHOUR at (100 28 auto auto)
  list "00" "01" "02" "03" "04" "05" "06" "07" "08" "09"
	  "10" "11" "12" "13" "14" "15" "16" "17" "18" "19"
	  "20" "21" "22" "23"
	  id ListHOUR at (prevleft prevtop prevwidth auto) nonusable visibleitems 8
  popuplist PopTrigHOUR ListHOUR
  popuptrigger "00" id PopTrigMIN at (135 28 auto auto)
  list "00" "01" "02" "03" "04" "05" "06" "07" "08" "09"
	  "10" "11" "12" "13" "14" "15" "16" "17" "18" "19"
	  "20" "21" "22" "23" "24" "25" "26" "27" "28" "29"
	  "30" "31" "32" "33" "34" "35" "36" "37" "38" "39"
	  "40" "41" "42" "43" "44" "45" "46" "47" "48" "49"
	  "50" "51" "52" "53" "54" "55" "56" "57" "58" "59"
	  id ListMIN at (prevleft prevtop prevwidth auto) nonusable visibleitems 8
  popuplist PopTrigMIN ListMIN
  label ":" autoid at (132 28)

  button "X" id BtnOkMAIN at (140 1 AUTO AUTO)
end
