Suite 3 du FB 110
0025
:L
=REST
0026
:L
KB 0
0027
:><F
0028
:SPB
=UEBT
0029
:
002A
:UN
=STAR
002B
:RB
=FLAM
002C
:ON
=STAR
002D
:O
=FLAM
002E
:SPB
=GUT
002F
:S
=FLAM
0030
:
0031
:L
=ANZB
0032
:T
=REST
0033
:L
=ERSB
0034
:T
=AKBN
0035
:
0036
:L
=REST
0038 SCHL:L
KF+0
0039
:!=F
003A
:SPB
=GUT
003B UEBT:L
=AKBN
003C
:T
MB 249
003D
:L
KB 246
003E
:SPA
OB 202
003F
:L
MB 250
0040
:SPM
=FEHL
0041
:SPP
=GUT
0042
:L
=AKBN
0043
:I
1
0044
:T
=AKBN
0045
:L
=REST
0046
:D
1
0047
:T
=REST
0048
:SPA
=SCHL
0049
:
004A GUT :U
M 0.0
004B
:UN
M 0.0
004C
:L
KB 0
004D
:T
=FEHL
004E
:BEA
004F
:
0050 FEHL:T
=FEHL
0051
:L
KB 0
0052
:T
=REST
:
0053
:BE
Programmation de la CPU 948
C79000-G8577-C848-04
Emission préalable éventuelle
de paquets encore présents
Front positif sur l'entrée START
Initialisation des mémentos
globaux après un front positif
sur l'entrée START
Tant que REST ><0,
poursuivre l'émission de paquets
de données
OB de fonction spéciale :
"Emission d'un paquet de données"
Arrêt sur erreur
Arrêt si capacité d'émission nulle
Incrémenter le numéro de paquet
Décrémenter le nombre de
paquets restants
Fin de programme sans erreur
RLG = 0, FEHL = 0
Fin de programme avec erreur
RLG = 1, FEHL contient le numéro
d'erreur
Applications
10 - 63