Gladir.com - Apple Pascal - Référence de procédures et fonctions


Vue par description   Vue par prototype   Rechercher

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.

ADDR Function Addr(x:variable, fonction ou procédure):Pointer; SYSTEM

Cette fonction retourne le pointeur d'une adresse de variable, fonction ou procédure.

AND boolean AND boolean
entier AND entier
 

Cet opérateur permet d'effectuer un Et logique sur des booléens ou Et binaire sur des valeurs numériques.

ARRAY Array of type_de_base  

Ce mot réservé permet de définir des tableaux avec des valeurs scalaires.

ATAN Function ATan(r:Real):Real; TRANSCEND

Cette fonction trigonométrique permet de calculer la «ArcTangente» en radians.

BEGIN Begin  

Cette instruction permet de définir le début d'un bloc d'instruction.

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».

CASE OF CASE select OF
etiquette1: instruction1;
etiquette2: instruction2;
...
etn: instructionn;
OTHERWISE instructionautre;
END;
 

Cette instruction permet de définir le début d'un bloc d'instruction.

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 de justaxposé différentes de chaine de caractères et de retourne comme argument.

CONST Const
ident1=val1;
ident2=val2;

Const
ident3:type3=val3;
ident4:type4=val4;
 

Ce mot réservé permet de définir une constante ou de définir une variable avec une valeur constante au lancement du programme.

COPY Function Copy(ch:String;pos,nbre:Integer):String; SYSTEM

Cette fonction permet d'extraire un sous-chaine de caractères dans une chaine 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 chaine de caractères spécifié.

DIV entier1 DIV entier2  

Cette opérateur permet d'effectuer la division entière de nombre entier par un second.

END End  

Cette instruction permet de définir la fin d'un bloc d'instruction, d'un enregistrement (RECORD) ou d'une évaluation de cas (CASE OF).

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.

EXTERNAL Procedure idp(par); External; {$L nomfich}
Function idf(par); External; {$L nomfich}
 

Ce mot réservé permet d'inclure des sous-programmes externe (n'étant pas compiler avec le Apple Pascal).

FILE TYPE nomtyp=FILE;
VAR nomtype=FILE;
SYSTEM

Ce type d'identificateur permet de définir une variable de format fichier.

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é.

FOR FOR cont := init TO fin DO inst;
FOR cont := init DownTo fin DO inst;
 

Ce mot réservé permet de produire un compteur de boucle.

FORWARD Procedure identp(param); Forward;
Function identf(param):typefomnc; Forward;
 

Ce mot réservé permet de définir l'entête d'une procédure et fonction sans définir immédiatement le corps.

FUNCTION Function identf(param):typef; corps de la fonction;  

Ce mot réservé permet de définir une fonction utilisateur.

GET Procedure Get(Var Fich:File;var1, var2,...); SYSTEM

Cette procédure permet de lire un enregistrement dans un fichier.

GOTO Goto etiquette;  

Ce mot réservé permet d'effectuer un branchement à une instruction correspondant à l'emplacement de l'étiquette.

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.

IF If exp_bool Then inst1;
If exp_bool Then inst1 else Inst2;
 

Ce mot réservé permet d'effectuer des branchements d'instruction ou de bloc d'instruction en fonction de certaines conditions.

IMPLEMENTATION Implementation SYSTEM

Ce mot réservé permet de spécifier la zone privé où sont décrits le code de l'unité.

IN elem In ensemble;  

Ce mot réservé permet d'indiquer une correspondance avec l'ensemble spécifié.

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).

INTERFACE Interface  

Ce mot réservé permet de définir la zone publique et les entêtes dans une unité.

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.

LABEL Label etiq1,etiq2,...;  

Ce mot réservé permet de définir des étiquettes utilisable habituellement par l'instruction «GOTO» ou comme adressage dans le code assembleur.

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 un 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 un 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 fonction permet d'allouer de la mémoire dynamique pour une variable.

NIL NIL  

Cette constante permet d'indiquer que le pointeur pointe sur une valeur nulle ou sur rien.

NOT NOT exp  

Cet opérateur permet d'effectuer un Non logique sur des booléens ou Non binaire sur des valeurs numériques.

ODD Function Odd(i:Integer):Boolean; SYSTEM

Cette fonction indique si la valeur entière est un nombre impaire.

OR boolean OR boolean
entier OR entier
 

Cet opérateur permet d'effectuer un Ou logique sur des booléens ou Ou binaire sur des valeurs numériques.

PACKED Type identyp=Packed typestruct;
Var identvar:Packed typestruct;
SYSTEM

Ce mot réservé permet d'indiquer au compilateur d'utiliser le moins de mémoire possible pour la définition de la structure.

PAGE Procedure Page(Var fich:File); SYSTEM

Cette procédure 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 traçé par la tortue.

POS Function Pos(ch1,ch2:String):Integer; SYSTEM

Cette fonction permet d'indiquer la position à laquelle se trouve une sous-chaine de caractères dans une chaine 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.

PROCEDURE Procedure identproc(param);
corps de la procédure;
 

Ce mot réservé permet de définir une procédure.

PROGRAM Program identproc;
corps du programme.
 

Ce mot réservé permet le nom du programme Pascal.

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.

RECORD Type identtype=Record
partie_fixe
partie_variable
End;
Var identvar:Record
partie_fixe
partie_variable
End;
 

Ce mot réservé permet de définir des structures d'enregistrement contenu des variables.

RELEASE Procedure Release(p:Pointer); SYSTEM

Cette procédure permet de restituer tous les zones mémoires supérieur à l'adresse pointeur spécifié.

REPEAT Repeat
instr1;
instr2;
...
instrn
Until expbool;
 

Ce mot réservé permet d'effectuer des boucles d'instructions à répétition tant que la condition n'est pas vrai.

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.

SEGMENT SEGMENT Procedure...;
SEGMENT Function...;
 

Ce mot réservé permet de convertir une procédure ou fonction en recouvrement.

SET Type identype=Set of typbase;
Var identvar:Set of typbase;
 

Ce mot réservé permet de définir des ensembles.

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;  

Ce mot réservé permet de connaitre 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 chaines 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 chaine 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.

TYPE Type l'identificateur de type=sa description;  

Ce mot réservé permet de définir des types utilisateur.

UNIT Unit l'identificateur d'unité;  

Ce mot réservé permet de définir l'entête d'une unité.

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é.

USES Uses unit1,unit2,...;  

Ce mot réservé permet d'indiquer les unités devant être utilisé par le programme, l'unité ou «Library» courante.

VAR Var ident11,ident12,...:type1;
ident21,ident22,...:type2;
 

Ce mot réservé permet de définir des variables.

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);».

WHILE While expression de valeur booléenne Do instruction simple ou composée  

Ce mot réservé permet de produire une boucle exécuté tant et aussi longueur que la condition est vrai.

WITH With identificateur d'enregistrement Do instruction simple ou composée  

Ce mot réservé permet de définir la structure d'enregistrement courante devant être utilisé pour les variables.

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: Vendredi, le 30 juin 2006