Procedure DB_DiretorioDoCartaoSD(LOCAL Diretorio)

DirCartaoSD is string = ""

//Verifica se existe o diretorio e cria se nao existir
DirCartaoSD = SysDirStorageCard() + ["/"] + Diretorio
StatusCartao is int = SysStatusStorageCard()
 
IF StatusCartao = sysCardAvailable THEN
IF NOT fDirectoryExist(DirCartaoSD) THEN
fMakeDir(DirCartaoSD)
END
ELSE
NextTitle("Atenção")
Info("Cartão SD não encontrado!")
END

RESULT DirCartaoSD