STM32F4Pins

Const

A* = 0;

B* = 1;

C* = 2;

D* = 3;

E* = 4;

F* = 5;

G* = 6;

H* = 7;

I* = 8;

J* = 9;

K* = 10;

input* = 0;

output* = 1;

alt* = 2;

analog* = 3;

pushPull* = FALSE;

openDrain* = TRUE;

low* = 0;

medium* = 1;

fast* = 2;

veryHigh* = 3;

noPull* = 0;

pullUp* = 1;

pullDown* = 2;

AF0* = 0;

AF1* = 1;

AF2* = 2;

AF3* = 3;

AF4* = 4;

AF5* = 5;

AF6* = 6;

AF7* = 7;

AF8* = 8;

AF9* = 9;

AF10* = 10;

AF11* = 11;

AF12* = 12;

AF13* = 13;

AF14* = 14;

AF15* = 15;

Types

Pin* = RECORD (BasePin.Pin)
            BASE- : ADDRESS;
            port-, pin- : INTEGER;
        END;

Procedures

Pin.Init

PROCEDURE (VAR p : Pin) Init* (port, pin, mode: INTEGER; oType: BOOLEAN; oSpeed, pullType, af: INTEGER);

Pin.On

Set pin value to 1

PROCEDURE (VAR p : Pin) On*;

Pin.Off

Set pin value to 0

PROCEDURE (VAR p : Pin) Off*;

Pin.Value

Return current pin value

PROCEDURE (VAR p : Pin) Value*(): BOOLEAN;

Pin.Toggle

Toggle pin value

PROCEDURE (VAR p : Pin) Toggle*;