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

dialog "ListOfInstruments" (
          "Посуда и инструменты",white,blue,default,
          centered,centered,default)
     vbox(center)
          listbox['Sort'](instruments,3000,30,9,[],[])
          button(close,"&Close")
     end_of_vbox
end_of_dialog

dialog "ChooseFruits" (
          "Выбрать ягоды и фрукты",white,blue,default,
          centered,centered,default)
     vbox(center)
          listbox(1000,value_o1,30,4,
               [
               "Черная рябина",
               "Яблоки \"Антоновка\"",
               "Земляника"
               ],
               [
               "Черная рябина"
               ])
          ok(close,"&Close")
     end_of_vbox
end_of_dialog

dialog "HeatUpMixture" (
          "Нагреть смесь",blue,default,default,
          centered,centered,default)
     vbox(center)
          "Для выбранных ягод и фруктов "
          text['AlignCenter','MultiLine'](fruits,15,1)
          "время нагрева сахарной смеси "
          hbox
               "составляет"
               text['AlignCenter','MultiLine'](time,3,1)
               "мин"
          end_of_hbox
          ok(close,"&Close")
     end_of_vbox
end_of_dialog