L effet de la commande PARENT est de charger dans le repertoire courant le dossier parent du dossier actuellement utilise. En repetant cette commande, vous pouvez revenir simplement et rapidement au repertoire racine. Exemple :
X> Dir$="AMOSPro_Examples:Objects/" Dir Parent Dir
ASSIGN
instruction : assigner un nom a un fichier ou un peripherique
Assign "Nom:" To "Nouveau_Chemin"
Assign "Nom:" To "Peripherique"
Dans le systeme AMOS d origine, il fallait retourner sous AmigaDOS a chaque fois que vous vouliez changer un repertoire particulier, par exemple pour les polices de caracteres. La commande ASSIGN permet de regler ce probleme et elle est entierement expliquee dans le Chapitre 11.1.
Verifier l existence d un fichier
Il est possible d avoir un bureau bien range et des disques bien organises. Mais vous etes peut-etre
une personne normale. AMOS Professional offre trois moyens de verifier l existence de fichiers introuvables.
EXIST
fonction : verifier si un fichier specifique existe
valeur=Exist("nom_du_fichier")
EXIST examine le repertoire courant et cherche si le nom de fichier correspond a la chaine indiquee. Si le fichier est trouve, la fonction retourne -1 (vrai), sinon elle retourne 0 (faux).
EXIST peut aussi verifier l existence de disques et de peripheriques, meme si le nom donne est ridicule. Par exemple :
E> Print Exist("Un nom ridicule")
Print Exist("DEMO:") : Rem Verifie si un disque nomme DEMO est disponible
Print Exist("Df1:") : Rem Verifie si le second lecteur de disquette est connecte
Il est conseille de tester les chaines vides ("") separement, comme ceci :
E> F$=Fsel$("*.IFF"," ","Charger un fichier IFF")
If F$="" Then Edit : Rem retour a l editeur si aucun fichier choisi
If Exist(F$) Then Load Iff F$,0