Langage 4DCommandesEnvironnement systèmeVersion: 20 R7Environnement systèmeCount screens : IntegerCurrent client authentication {( domaine ; protocole )} : TextCurrent machine : TextCurrent system user : TextFont file ( famillePolice {; stylePolice} ) : any[FONT LIST ( polices {; typeListeFONT STYLE LIST ( famillePolice ; listeStylesPolice ; listeNomsPolice )GET SYSTEM FORMAT ( format ; valeur )Is macOS : BooleanIs Windows : BooleanLOG EVENT ( {typeSortie ;} message {; importance} )Menu bar height : IntegerMenu bar screen : IntegerOPEN COLOR PICKER {( texteOuFond )}OPEN FONT PICKERSCREEN COORDINATES ( gauche ; haut ; droite ; bas {; idEcran {; zoneEcran}} )SCREEN DEPTH ( profondeur ; couleur {; écran} )Screen height {( * )} : IntegerScreen width {( * )} : IntegerSelect RGB color {( coulDefaut {; message} )} : IntegerSET RECENT FONTS ( tabPolices )System folder {( type )} : TextSystem info : ObjectTemporary folder : Text