--- /dev/null
+#!/usr/bin/python3
+# Copyright 2025 by Bdale Garbee <bdale@gag.com>. GPLv3
+#
+# Program to emit PCB footprint for Kingbright WP154A4AVS/RGB-CA RGB LED
+#
+
+# dimensions in mm from kingbright/WP154A4AVS_RGB_CA-3048671.pdf
+PinSpacing = 1.5
+PinDiam = 0.9
+BodyWidth = 7.5
+BodyLength = 11.0
+Setback = 7.65
+
+import sys
+
+# we're going to use the 1/100 of a mil fundamental unit form
+def mm2mils100( mm ):
+ return int( mm / 25.4 * 1000.0 * 100.0 + 0.5 )
+
+print('# author: Bdale Garbee')
+print('# email: bdale@gag.com')
+print('# dist-license: GPL 3')
+print('# use-license: unlimited')
+
+print('Element[0x0 "WP154A4AVS-RGB-CA" "" "" 0 0 0 0 0 100 0x0]')
+print("(")
+print(' Pin[',\
+ mm2mils100(-PinSpacing*1.5), \
+ mm2mils100(-PinSpacing), \
+ mm2mils100(PinDiam * 5/3), \
+ 1200, \
+ mm2mils100(PinDiam * 5/3), \
+ mm2mils100(PinDiam), \
+ '"pin4" "4" 0x0001]')
+
+print(' Pin[',\
+ mm2mils100(-PinSpacing*0.5), \
+ 0, \
+ mm2mils100(PinDiam * 5/3), \
+ 1200, \
+ mm2mils100(PinDiam * 5/3), \
+ mm2mils100(PinDiam), \
+ '"pin3" "3" 0x0001]')
+
+print(' Pin[',\
+ mm2mils100(PinSpacing*0.5), \
+ mm2mils100(-PinSpacing), \
+ mm2mils100(PinDiam * 5/3), \
+ 1200, \
+ mm2mils100(PinDiam * 5/3), \
+ mm2mils100(PinDiam), \
+ '"pin2" "2" 0x0001]')
+
+print(' Pin[',\
+ mm2mils100(PinSpacing*1.5), \
+ 0, \
+ mm2mils100(PinDiam * 5/3), \
+ 1200, \
+ mm2mils100(PinDiam * 5/3), \
+ mm2mils100(PinDiam), \
+ '"pin1" "1" 0x0101]')
+
+print(' ElementLine[',\
+ mm2mils100(-BodyWidth/2), \
+ mm2mils100(Setback-BodyLength), \
+ mm2mils100(BodyWidth/2), \
+ mm2mils100(Setback-BodyLength), \
+ 1000, \
+ ']')
+
+print(' ElementLine[',\
+ mm2mils100(-BodyWidth/2), \
+ mm2mils100(Setback), \
+ mm2mils100(BodyWidth/2), \
+ mm2mils100(Setback), \
+ 1000, \
+ ']')
+
+print(' ElementLine[',\
+ mm2mils100(BodyWidth/2), \
+ mm2mils100(Setback), \
+ mm2mils100(BodyWidth/2), \
+ mm2mils100(Setback-BodyLength), \
+ 1000, \
+ ']')
+
+print(' ElementLine[',\
+ mm2mils100(-BodyWidth/2), \
+ mm2mils100(Setback), \
+ mm2mils100(-BodyWidth/2), \
+ mm2mils100(Setback-BodyLength), \
+ 1000, \
+ ']')
+
+print(")")