
Position Decoding IP 240
FB 23 LEN=75
NETWORK 1 0000 TRANSFER OF INITIAL POINT
FB23 : TRANSFER INITIAL POINT
WHEN INPUT ”ON INTPNT” IS ACTIVATED, THE ACTUAL VALUE IS READ
AND SET TO ZERO BY A ZERO OFFSET
NAME :OFFSET
0005 :ON I 4.2 -ON INTPNT
0006 :O F 12.1 -EDGE EDGE FLAG
0007 :JC =END
0008 :C DB 12
0009 :L KB 0 REVOKE OLD
000A :T DW 66 ZERO OFFSET
000B :T DW 67
000C :JU FB 170
000D NAME :STEU.WEG
000E DBNR : KF +12
000F FKT : KF +5 WRITE ZERO OFFSET
0010 PAFE : FB 2 -AUX BYTE1
0011 :L KH 0000
0013 :L FB 2 -AUX BYTE1
0014 :><F
0015 := F 11.5 -PAFE ZERO
0016 :JU FB 170
0017 NAME :STEU.WEG
0018 DBNR : KF +12
0019 FKT : KF +1 READ ACTUAL VALUE AND STATUS BITS
001A PAFE : FY 2 -AUX BYTE1
001B :L KH 0000
001D :L FY 2 -AUX BYTE1
001E :><F
001F := F 11.1 -PAFE ACT1 READ ERROR IN ACTUAL VALUE
0020 :
0021 :C DB 12
0022 :L DR 19 STATUS BITS (SIGN)
0023 :L KH 0001
0025 :AW
0026 :T FY 2 -AUX BYTE1
0027 :AN F 2.0 INVERT SIGN
0028 := F 2.0
0029 :L FY 2 -AUX BYTE1
002A :T DL 66 SG ZERO OFFSET
002B :L DR 30 ACTUAL VALUE 4TH DECADE
002C :T DR 66 4TH DECADE ZERO OFFSET
002D :L DW 31 ACTUAL VALUE 3D, 2ND, 1ST AND 0 DECADES
002E :T DW 67 ZERO OFFSET
002F :
0030 :JU FB 170
0031 NAME :STEU.WEG
0032 DBNR : KF +12
0033 FKT : KF +5 WRITE ZERO OFFSET
0034 PAFE : FB 2 -AUX BYTE1
0035 :L KH 0000
0037 :L FY 2 -AUX BYTE1
0038 :><F
0039 := F 11.5 -PAFE ZERO WRITE ERROR ON ZERO OFFSET
003A :
003B :L KH 0000 RESET PROGRAM FLAGS
003D :T FY 12
003E :AN F 0.0 -ZERO SIGNAL
003F :R Q 12.3 -RET INTPNT
0040 :S Q 12.2 -ENABLED
7-46
EWA 4NEB 811 6120-02a
Comentarios a estos manuales