campo-sirio/cg/cg6900b.uml

#include "cg6900a.h"

PAGE "" -1 -1 52 8

LIST F_FLOPPY 1 5
BEGIN
  PROMPT 1 1 "Disco             "
  ITEM "A|A:" 
  MESSAGE HIDE,F_PATH
  MESSAGE ENABLE,F_DIM 
  MESSAGE RESET,F_PATH
  ITEM "B|B:"  
  MESSAGE HIDE,F_PATH 
  MESSAGE ENABLE,F_DIM
  MESSAGE RESET,F_PATH  
  ITEM "C|C:"        
  MESSAGE SHOW,F_PATH 
  MESSAGE DISABLE,F_DIM
  ITEM "D|D:"        
  MESSAGE SHOW,F_PATH
  MESSAGE DISABLE,F_DIM 
  ITEM "E|E:"        
  MESSAGE SHOW,F_PATH  
  MESSAGE DISABLE,F_DIM 
  ITEM "F|F:"        
  MESSAGE SHOW,F_PATH  
  MESSAGE DISABLE,F_DIM 
END

LIST F_DIM 7
BEGIN
  PROMPT 1 3 "Dimensione dischi "
  ITEM "1|1,4 Mb"
  ITEM "2|1,2 Mb"
  ITEM "3|720 Kb"
  ITEM "4|360 Kb"
  HELP "Indicare la dimensione dei dischi che si vogliono usare"
END

STRING F_PATH 30
BEGIN
  PROMPT 1 5 "Indirizzario      "
END

BUTTON DLG_OK 9 2
BEGIN 
  PROMPT -12 -1 ""
END

BUTTON DLG_QUIT 9 2
BEGIN
  PROMPT -22 -1 ""
END
       
ENDPAGE

ENDMASK