D
GFKĆ1084B
DĆ13
Appendix D Sample L adder Programs
07—20—95 07:58 GE FANUC SERIES 90—30/90—20/MICRO (v6.01) Page 8
| << RUNG 14 STEP #0030 >>
|
|ALW_ON RD_ERR
|%S0007 +—————+ %T0003
+——] [———+ NE_ | +——————————————————————————————————————————(S)——
| | INT | |
| | | |
|RD_CRSW | | +—————+|
|%R0001 —+I1 Q+—————————+ NE_ ||
| | | | INT ||
| | | | ||
| | | RD_CRSW | ||
| CONST —+I2 | %R0001 —+I1 Q++
| +00000 +—————+ | |
| | |
| CONST —+I2 |
| +00001 +—————+
|
| (****************************************************************************)
| (* If WT_CRSW = 1, COMREQ complete without error. Set WRT_OK on one—shot t *)
| (* o *)
| (* issue Read Channel Command. *)
| (****************************************************************************)
|
| << RUNG 16 STEP #0035 >>
|
|ALW_ON WRT_OK
|%S0007 +—————+ %T0005
+——] [———+ EQ_ |+——————————————————————————————————————————————————————————(^)——
| | INT ||
| | ||
|WT_CRSW | ||
|%R0002 —+I1 Q++
| | |
| CONST —+I2 |
| +00001 +—————+
|
| (****************************************************************************)
| (* If WT_CRSW is not equal to 0 and not equal to 1, an error occurred *)
| (* processing the COMREQ. Set WRT_ERR to restart the write/read sequence. *)
| (* *)
| (* Note: The CRSW can assume a value that is represented as a negative *)
| (* integer. Therefore, you must check for not equal to 1 rather than *)
| (* greater than 1. *)
| (****************************************************************************)
|
Program: LANRDWT C:\LM90\LAN\LANRDWT Block: _MAIN