Specifications

Position Decoding IP 240
FB 24 LEN=97
NETWORK 1 0000 START RUN
FB24 : START RUN / TRANSFER TRACK LIMIT VALUES
FB 24 TRANSFERS THE TRACK LIMIT VALUES STORED IN DB10 (DW12 - DW28)
TO THE WORKING DATA BLOCK OF THE IP 240 AND THEN, USING FB170, TO THE
IP 240.
NAME :START
0005 :AN F 0.0 -ZERO SIGNAL
0006 :R Q 12.2 -ENABLED
0007 :S Q 12.1 -RUNNING
0008 :
0009 :L KF +15 PRESET FLAG WORDS
000B :T FW 4 -AUX WORD1
000C :L KF +36
000E :T FW 6 -AUX WORD2
000F :I 2
0010 :T FW 8 -AUX WORD3
0011 :L KB 0
0012 :T FY 2 -AUX BYTE1
0013 :
0014 :C DB 10
0015 :L DR 12 BITS FOR ZONES
0016 :SRW 1 ADAPTATION TO BITS FOR THE TRACKS
0017 :L KH 0080 SET BITS FOR TRACK 8 TO 1
0019 :OW
001A :C DB 12
001B :T DR 29
001C :
001D :C DB 10
001E :L DW 13 INITIAL VALUE ZONE 2 (4TH DECADE)
001F :C DB 12
0020 :T DW 34 -> INT. TRACK 1
0021 :C DB 10
0022 :L DW 14 INT.ZONE 2 (3RD 2ND AND 1ST DECADE)
0023 :C DB 12
0024 :T DW 35 -> INT. TRACK 1
0025 :
0026 BACK :C DB 10
0027 :DO FW 4 -AUX WORD1
0028 :L DW 0 INT. VALUE TRACK X
0029 :C DB 12
002A :DO FW 6 -AUX WORD2
002B :T DW 0 -> FINAL VALUE TRACK X-1
002C :DO FW 8 -AUX WORD3
002D :T DW 0 -> INT. VALUE TRACK X
002E :
002F :L FW 4 -AUX WORD1 INCREMENT COUNTER
0030 :I 1
0031 :T FW 4 -AUX WORD1
0032 :L FW 6 -AUX WORD2
0033 :I 1
0034 :T FW 6 -AUX WORD2
0035 :I 2
0036 :T FW 8 -AUX WORD3
0037 :
0038 :AN F 2.0
0039 := F 2.0
003A :A F 2.0 RUN TWICE ?
003B :JC =BACK IF NOT, RETURN
003C :
003D :L FW 4 -AUX WORD1
7-48 EWA 4NEB 811 6120-02a