grid(80,25)
failure_color(red,white)
diagram_font("Arial",15)
dialog_font("Arial",12)

dialog "ListOfInstruments" (
          "Cooking battery",white,blue,default,
          centered,centered,default)
     vbox(center)
          listbox['Sort'](instruments,3000,20,9,[],[])
          button(close,"&Close")
     end_of_vbox
end_of_dialog

dialog "ChooseFruits" (
          "Choose berries and fruits",white,blue,default,
          centered,centered,default)
     vbox(center)
          listbox(1000,value_o1,20,4,
               [
               "Black rowan",
               "The \"Antonovka\" apples",
               "Strawberry"
               ],
               [
               "Black rowan"
               ])
          ok(close,"&Close")
     end_of_vbox
end_of_dialog

dialog "HeatUpMixture" (
          "Heat the mixture",blue,default,default,
          centered,centered,default)
     vbox(center)
          "For selected berries and fruits "
          text['AlignCenter','MultiLine'](fruits,15,1)
          "you should heat sugar mixture "
          hbox
               "about"
               text['AlignCenter','MultiLine'](time,3,1)
               "minutes"
          end_of_hbox
          ok(close,"&Close")
     end_of_vbox
end_of_dialog