Voici un tableau de référence des différents procédures ou fonctions de «Apple Pascal» avec leurs prototypes :
| Procédures et fonctions | Syntaxe | Unité | Description |
|---|---|---|---|
| ABS | Function Abs(x:expression numérique):expression numérique; | SYSTEM | Cette fonction retourne la valeur absolue d'une expression numérique. |
| ATAN | Function ATan(r:Real):Real; | TRANSCEND | Cette fonction trigonométrique permet de calculer la «ArcTangente» en radians. |
| BLOCKREAD | Procedure BlockRead(fich:File; var x;enrs:Integer;var enrs_lus:Integer); | SYSTEM | Cette instruction permet d'effectuer la lecture d'enregistrement dans un fichier. |
| BLOCKWRITE | Procedure BlockWrite(fich:File; var x;enrs:Integer;Var enrs_ecrit:Integer); | SYSTEM | Cette instruction permet d'effectuer l'écriture d'enregistrement dans un fichier. |
| BOOLEAN | identv1,identv2,...:Boolean; identt2,identt2,...=Boolean; |
SYSTEM | Ce type d'identificateur permet de définir une variable de format Booléen (True ou False). |
| BYTESTREAM | Var ...:ByteStream; Type ...=ByteStream; |
SYSTEM | Ce type d'identificateur permet de définir une variable de tableau de «Char» indéfinie: «Array[0..?]of Char». |
| CHAR | identv1,identv2,...:Char; identt2,identt2,...=Char; |
SYSTEM | Ce type d'identificateur permet de définir une variable de format Char (n'importe quel caractère ASCII 0 à 255). |
| CHR | Function Chr(i:Integer):Char; | SYSTEM | Cette fonction permet de retourner le caractère correspondant au code ASCII numérique. |
| CLOSE | Procedure Close(fich:File); | SYSTEM | Cette procédure permet de fermer un fichier. |
| CONCAT | Function Concat(ch1,ch2, ...:STRING):STRING; | SYSTEM | Cette fonction permet de juxtaposer différentes chaîne de caractères et de la retourner comme argument. |
| COPY | Function Copy(ch:String;pos,nbre:Integer):String; | SYSTEM | Cette fonction permet d'extraire un sous-chaîne de caractères dans une chaîne de caractères. |
| COS | Function Cos(r:Real):Real; | TRANSCEND | Cette fonction trigonométrique retourne le «Cosinus». |
| DELETE | Procedure Delete(ch:String;Pos,nbre:Integer); | SYSTEM | Cette procédure permet de supprimer une partie des caractères contenu dans la chaîne de caractères spécifié. |
| EOF | Function Eof(f:file):Boolean; | SYSTEM | Cette fonction indique si la fin du fichier est atteinte. |
| EOLN | Function Eoln(fich:Text):Boolean; | SYSTEM | Cette fonction indique si la fin d'une ligne de fichier texte est atteinte. |
| EXIT | Procedure Exit[(code)]; | SYSTEM | Cette procédure permet de quitter la procédure ou fonction immédiatement. |
| FILLCHAR | Procedure FillChar(Var Tampon; nbre:Integer; Val:Integer|Char); | SYSTEM | Cette procédure permet d'effacer directement avec la valeur d'un octet une zone de mémoire. |
| FILLSCREEN | Procedure FillScreen(Color:Integer); | TURTLEGRAPHICS | Cette procédure permet de remplir la fenêtre de visualisation avec la couleur spécifié. |
| GET | Procedure Get(Var Fich:File;var1, var2,...); | SYSTEM | Cette procédure permet de lire un enregistrement dans un fichier. |
| GOTOXY | Procedure GotoXY(colonne,ligne:Integer); | SYSTEM | Cette procédure permet de fixer l'emplacement du curseur dans l'écran de texte. |
| GRAFMODE | Procedure GrafMode; | TURTLEGRAPHICS | Cette procédure permet de passer en mode graphique. |
| HALT | Procedure Halt; | SYSTEM | Cette procédure permet d'arrêter le programme ou le sous-programme actuellement en cours. |
| INITTURTLE | Procedure InitTurtle; | TURTLEGRAPHICS | Cette procédure permet d'initialiser la tortue. |
| INSERT | Procedure Insert(Var ch1:String; ch2:String;pos:Integer); | SYSTEM | Cette procédure permet d'insérer une chaine de caractères dans une autre chaine de caractères à l'endroit spécifié. |
| INT | Function Int(r:Real):Real; | SYSTEM | Cette fonction permet de retourner la partie entière d'un nombre réel. |
| INTEGER | identv1,identv2,...:Integer; identt1,identt2,...=Integer; |
SYSTEM | Ce type d'identificateur permet de définir une variable entière de format Integer (valeur entre -32768 et 32767). |
| IORESULT | Function IoResult:Integer; | SYSTEM | Cette fonction permet de connaitre le code d'erreur d'une opération effectué sur un fichier. |
| KEYPRESS | Function Keypress:Boolean; | APPLESTUFF | Cette fonction permet de vérifier si l'utilisateur appui actuellement sur une touche. |
| LENGTH | Function Length(ch:String):Integer; | SYSTEM | Cette fonction permet d'indiquer la longueur d'une chaine de caractères de format standard Pascal. |
| LN | Function Ln(r:Real):Real; | TRANSCEND | Cette fonction permet de calculer le logarithme népérien (Naturel). |
| LOG | Function Log(n:Real):Real; | TRANSCEND | Cette fonction permet de calculer le logarithme en base 10. |
| MARK | Procedure Mark(p:Pointer); | SYSTEM | Cette procédure permet de sauvegarder l'emplacement dans la mémoire de tas. |
| MAXINT | Const MaxInt=32767; | SYSTEM | Cette constante permet d'indiquer la limite positive d'un nombre entier. |
| MEMAVAIL | Function MemAvail:Integer; | SYSTEM | Cette fonction retourne la taille total en octet de mémoire dynamique allouable dans la mémoire de tas. |
| MOVELEFT | Procedure MoveLeft(Var Source,Dest;Count:Integer); | SYSTEM | Cette procédure permet d'effectuer une copie d'un tampon de mémoire dans une autre zone de mémoire de la longueur spécifié en octets en effectuant la copie du début vers la fin. |
| MOVERIGHT | Procedure MoveRight(Var Source,Dest; Count:Integer); | SYSTEM | Cette procédure permet d'effectuer une copie d'un tampon de mémoire dans une autre zone de mémoire de la longueur spécifié en octets en effectuant la copie de la fin vers le début. |
| NEW | Procedure New(p:Pointer); | SYSTEM | Cette procédure permet d'allouer de la mémoire dynamique pour une variable. |
| ODD | Function Odd(i:Integer):Boolean; | SYSTEM | Cette fonction indique si la valeur entière est un nombre impaire. |
| PAGE | Procedure Page(Var fich:File); | SYSTEM | Cette procédure permet d'envoyer un code de saut de page (le code ASCII 12: Form Feed) dans un fichier. |
| PENCOLOR | Procedure PenColor(Color:Integer); | TURTLEGRAPHICS | Cette procédure permet de définir la couleur des lignes tracé par la tortue. |
| POS | Function Pos(ch1,ch2:String):Integer; | SYSTEM | Cette fonction permet d'indiquer la position à laquelle se trouve une sous-chaîne de caractères dans une chaîne de caractères de format standard Pascal. |
| PRED | Function Pred(s:scalaire):scalaire; | SYSTEM | Cette fonction permet de retourner la valeur précédente de l'expression. |
| PUT | Procedure Put(Var fich:Fich;var1, var2,...); | SYSTEM | Cette procédure permet d'écrire un enregistrement dans un fichier. |
| PWROFTEN | Function PwrOfTen(n:Integer):Real; | TRANSCEND | Cette fonction permet de calcul 10 à la puissance spécifié. |
| RANDOM | Function Random(max:Integer):Integer; | APPLESTUFF | Cette fonction permet de générer un nombre aléatoire. |
| RANDOMIZE | Procedure Randomize; | APPLESTUFF | Cette procédure permet d'initialiser la générateur de nombre aléatoire. |
| READ | Procedure Read([var fich:Text;]var1, var2,...); | SYSTEM | Cette procédure permet de lire différentes données à partir d'une périphérique, d'un fichier ou de la console. |
| READLN | Procedure ReadLn([Var fich:Text;]var1,var2,...); | SYSTEM | Cette procédure permet de lire une ligne de texte à partir d'une périphérique, d'un fichier ou de la console. |
| REAL | identv1,identv2,...:Real; identt1,identt2,...=Real; |
SYSTEM | Ce type d'identificateur permet de définir une variable réel de format Real. |
| RELEASE | Procedure Release(p:Pointer); | SYSTEM | Cette procédure permet de restituer tous les zones mémoires supérieur à l'adresse pointeur spécifié. |
| RESET | Procedure Reset(Var fich:File); | SYSTEM | Cette procédure permet d'ouvrir un fichier à partir de la variable fichier spécifié. |
| REWRITE | Procedure Rewrite(Var fich:Text); | SYSTEM | Cette procédure permet de créer un nouveau fichier ou d'écraser le contenu d'un fichier existant. |
| ROUND | Function Round(r:Real):Integer; | SYSTEM | Cette fonction retourne la valeur arrondie d'un nombre réel. |
| SCAN | Function Scan(Limit:Integer; Target:Char;Var Start):Integer; | SYSTEM | Cette fonction permet d'effectuer la recherche d'un caractère dans un tampon. |
| SEEK | Procedure Seek(Var Fich:File; nbre:Word); | SYSTEM | Cette procédure permet de fixer la position du pointeur dans un fichier spécifier. |
| SETCHAIN | Procedure SetChain(NextFile:String[23]); | CHAINSTUFF | Cette procédure permet d'appeler des fichiers de chaine de code exécutable. |
| SETCVAL | Procedure SetCVal(Message:String[80]); | CHAINSTUFF | Cette procédure permet de sauvegarder un message dans une emplacement mémoire du système appelé par «CHAINVAL», où il peut être lancer par un autre programme. |
| SIN | Function Sin(r:Real):Real; | TRANSCEND | Cette fonction trigonométrique retourne le «Sinus». |
| SIZEOF | Function SizeOf(variable|type):Word; | SYSTEM | Cette fonction permet de connaître la taille en octet d'une variable ou d'un type. |
| SQR | Function Sqr(x:type numérique):type du paramètre; | SYSTEM | Cette fonction retourne le carré d'un nombre. |
| SQRT | Function Sqrt(r:Real):Real; | TRANSCEND | Cette fonction retourne la racine carré d'un nombre. |
| STR | Procedure Str(nbre:format;Var ch:String); | SYSTEM | Cette procédure permet de convertir un nombre en une chaînes de caractères ASCIZ. |
| STRING | identv1,identv2,...:String; identt1,identt2,...=String; identv1,identv2,...:String[n]; identv1,identv2,...:Stirng[n]; |
SYSTEM | Ce type d'identificateur permet de définir une variable de chaîne de caractères de format String. |
| SUCC | Function Succ(s:scalaire):scalaire; | SYSTEM | Cette fonction permet de retourner la valeur suivante de l'expression. |
| TEXT | Type nomtyp=Text; Var nomvar=Text; |
SYSTEM | Ce type d'identificateur permet de définir une variable de fichier de format Text. |
| TEXTMODE | Procedure TextMode; | TURTLEGRAPHICS | Cette procédure permet de passer en mode texte. |
| TRUNC | Function Trunc(r:Real):LongInt; | SYSTEM | Cette fonction retourne la partie entière d'un nombre réel. |
| UNITBUSY | Function UnitBusy:Boolean; | SYSTEM | Cette fonction indique si un périphérique est occupé. |
| UNITCLEAR | Procedure UnitClear(UnitNum:Integer); | SYSTEM | Cette procédure permet d'annuler toutes les opérations d'entrée/sortie d'un périphérique spécifié et la réinitialise à son état de démarrage. |
| UNITREAD | Procedure UnitRead(UnitNum:Integer; VarRef:File;Length,BlockNum,Mode:Integer); | SYSTEM | Cette procédure permet d'effectuer la lecture d'entrée/sortie des structures d'information de l'unité spécifié. |
| UNITSTATUS | Procedure UnitStatus(UnitNum:Integer; Var Result;1); Procedure UnitStatus(UnitNum:Integer; Result:Integer;1); |
SYSTEM | Cette procédure permet de déterminer si un périphérique externe est présent dans le système et s'il est actuellement opérationnel. |
| UNITWAIT | Procedure UnitWait; | SYSTEM | Cette procédure permet d'arrêter l'exécution du programme pendant que les opérations d'entrée/sortie en progression. |
| UNITWRITE | Procedure UnitWrite(UnitNum:Integer;VarRef:File;Length,BlockNum,Mode:Integer); Procedure UnitWrite(UmitNum:Integer;VarRef:File;Length,Mode:Integer); |
SYSTEM | Cette procédure permet d'effectuer l'écrire d'entrée/sortie des structures d'informations de l'unité spécifié. |
| VIEWPORT | Procedure ViewPort(Left,Right,Bottom,Top:Integer); | TURTLEGRAPHICS | Cette procédure permet de définir la fenêtre taille de la fenêtre de visualisation. Par défaut, les valeurs suivantes sont utilisés: «ViewPort(0,279,0,191);». |
| WORDSTREAM | WordStream=Array of Integer; | SYSTEM | Ce type d'identificateur permet de définir une variable de tableau de «Integer» indéfinie: «Array[0..?]of Integer». |
| WRITE | Procedure Write([var fich:File,]var1,var2,...); | SYSTEM | Cette procédure permet d'écrire différentes données sur un périphérique, dans un fichier ou sur la console. |
| WRITELN | Procedure WriteLn([var fich:File,]var1,var2,...); | SYSTEM | Cette procédure permet d'écrire différentes données avec un saut de ligne sur une périphérique, dans un fichier ou sur la console. |
Dernière mise à jour : Mardi, 23 juin 2015