ISaGRAF. Version 3.4

         

âîçâðàò åñëè ðàâíî


                         ANA

                         ADD           nb_written

                         LD                                                 (* ïèñàòü delta_tim *)

                         ANA                                             (* ïðåâðàòèòü â integer *)

                         ST              ana_delta_tim

                         LD              file_id

                         FA_WRITE  ana_delta_tim           

                         ANA

                         ADD           nb_written

                         ST              nb_written

                         F_CLOSE

                         ST              ok

                         LD              nb_written

                         EQ              4

                         RETC                                            (* âîçâðàò åñëè ðàâíî 4 *)

                         LD              ERR_FILE    (* èíà÷å îøèáêà *)

                         ST              ERROR


Ñîäåðæàíèå  Íàçàä  Âïåðåä