; Copyright (c) 1995,  Microstar Laboratories, Inc.
; All rights reserved.

  RESET
  PIPES P1,P2
  VARIABLES SETP=1000, P=-100, I=-50, D=-50
  IDEF A 1
    SET IP0 S0 10
    TIME 10000
    END
  PDEF B
    AVERAGE (IP0, 100, P1)
    PID (P1, SETP, P,1000, I,1000, D,1000, P2)
    DACOUT (P2, 0)
    END
  START A, B
