! Message('In Firstsetup')
  Global:CurrentPath = LongPath(Path())!
 WINAPI:OperatingSystem = SYSTEM{PROP:WindowsVersion} !; message(WINAPI:OperatingSystem) ! programme code
 WINAPI:ISTERMINALSERVER = ISTERMSERVER()
 If Sub(UPPER(WINAPI:OperatingSystem),1,10) = 'WINDOWS XP'
     WINAPI:iNIFILELOCATION = Clip(Global:CurrentPath)&'\communique.ini'
     GLOB:PostcodeFileLocation = Global:CurrentPath
 else
     CreateDirectory('C:\Users\Public\CMDMSettings')
     If Errorcode() = 5
         Message(Error() & ' ' & errorcode() &' Please create C:\Users\Public\CMDMSettings with access rights for everyone')
     end
    If Errorcode() = 3
         Message(Error() & ' ' & errorcode() &' A parent folder component was missing. Please create C:\Users\Public\CMDMSettings with access rights for everyone')     
    end
     WINAPI:iNIFILELOCATION = 'C:\Users\Public\CMDMSettings\communique.ini'
     GLOB:PostcodeFileLocation =  'C:\Users\Public\CMDMSettings'
 end
 GLOB:JSpelliniFile=WINAPI:iNIFILELOCATION
 ! JSpell:RohanExeName = 'Communique'
! Message('exiting first setup')