Index: trunk/footprint/thru-hole/TO264.fp
===================================================================
--- trunk/footprint/thru-hole/TO264.fp	(revision 37483)
+++ trunk/footprint/thru-hole/TO264.fp	(revision 37484)
@@ -2,6 +2,7 @@
  ha:subc.5 {
   ha:attributes {
    footprint = TO264 diode in TO220
+   openscad = TO264.scad
   }
   ha:data {
    li:padstack_prototypes {
Index: trunk/footprint/thru-hole/TO264.scad
===================================================================
--- trunk/footprint/thru-hole/TO264.scad	(nonexistent)
+++ trunk/footprint/thru-hole/TO264.scad	(revision 37484)
@@ -0,0 +1,117 @@
+// Model for vertical TO264 package 2 and 3 pin variants
+//
+// Copyright (C) 2017,2020 Tibor 'Igor2' Palinkas
+// Copyright (C) 2023 Erich Heinzle
+//
+// File distribution license:
+//  This library is free software; you can redistribute it and/or
+//  modify it under the terms of the GNU Lesser General Public
+//  License as published by the Free Software Foundation; either
+//  version 2.1 of the License, or (at your option) any later version.
+//
+//  This library is distributed in the hope that it will be useful,
+//  but WITHOUT ANY WARRANTY; without even the implied warranty of
+//  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+//  Lesser General Public License for more details.
+//
+//  You should have received a copy of the GNU Lesser General Public
+//  License along with this library; if not, write to the Free Software
+//  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
+//
+// The above distribution license applies when the file is distributed as a
+// stand alone model file or as part of a library, in both cases intended
+// for reuse combined by the user with other openscad scripts.
+//
+// Use license:
+//  as a special exception, the content of the file may be
+//  embedded in an openscad script that represents a printed circuit board,
+//  for example when a board is exported by pcb-rnd. In such use case,
+//  the content of this file may be copied into the resulting board file
+//  with or without modifications, without affecting the board file's license
+//  in any way.
+//
+
+module to264(pins=3)
+{
+    pin_thickness = 0.6;
+    pin_width1 = 2.9;
+    pin_width2 = 1.25;
+    pin_neck = 2.45;
+    pin_spacing = 5.56;
+
+    tab_thickness = 0.5;
+    tab_width = 18;
+    tab_height = 24;
+    tab_overhang = -1.0;
+    tab_bevel = 1.5;
+    
+    device_height = 26;
+    device_width = 20;
+    body_thickness = 5;
+    body_offset = body_thickness/2;
+
+    hole_dia = 3.3;
+    hole_height = 6.0;
+    notch_size = 4.0;
+    notch_height = 6.0;
+    notch2_height = 15.0;
+
+    $fn = 30;
+    
+    module pin() {
+        pin_descent = 2.5;
+        linear_extrude(height=pin_thickness)
+            polygon([[-pin_width1/2,0],[pin_width1/2,0],[pin_width1/2,pin_width1-pin_width2-pin_neck],[pin_width2/2,-pin_neck],[pin_width2/2,-pin_neck-0.01-pin_descent ],[-pin_width2/2,-pin_neck-0.01-pin_descent],[-pin_width2/2,-pin_neck],[-pin_width1/2,pin_width1-pin_width2-pin_neck]]);
+    }
+
+    module body() {
+        union() {
+            color([0.3,0.3,0.3]) {
+                difference() {
+                    translate([0,hole_height,-body_offset])
+                        linear_extrude(height=body_thickness)
+                            polygon([[-device_width/2,-device_height],[device_width/2,-device_height],[device_width/2,0],[-device_width/2,0]]);
+                    translate([0,0,-body_thickness])
+                        cylinder(r=hole_dia/2, h=body_thickness*3);
+                    translate([-device_width/2,hole_height-notch_height,0])
+                        cylinder(r=notch_size/2, h=body_thickness*2);
+                    translate([device_width/2,hole_height-notch_height,0])
+                        cylinder(r=notch_size/2, h=body_thickness*2);
+                    translate([-device_width/2,hole_height-notch2_height,0])
+                        cylinder(r=notch_size/4, h=body_thickness*2);
+                    translate([device_width/2,hole_height-notch2_height,0])
+                        cylinder(r=notch_size/4, h=body_thickness*2);
+                }
+            }
+            color([0.8,0.8,0.8])
+                translate([0,hole_height+tab_overhang,-body_thickness/2-0.01])
+                    difference() {
+                        linear_extrude(height=tab_thickness)
+                            polygon([[-tab_width/2,-tab_height],[tab_width/2,-tab_height],[tab_width/2,-tab_bevel],[tab_width/2-tab_bevel,0],[-tab_width/2+tab_bevel,0],[-tab_width/2,-tab_bevel]]);
+                    translate([0,-hole_height-tab_overhang,-body_thickness])
+                        cylinder(r=hole_dia, h=body_thickness*3);
+                    }
+        }
+    }
+
+    translate([-3.556,0,0]) {
+        rotate([90,0,90]) {
+            translate([pin_spacing,0,0]) {
+                union() {
+                    color([0.9, 0.9, 0.9]) {
+                        if (pins==3) {
+                            translate([0,pin_neck+0.05,-pin_thickness/2])
+                                pin();
+                        }
+                        translate([-pin_spacing,pin_neck+0.05,-pin_thickness/2])
+                            pin();
+                        translate([pin_spacing,pin_neck+0.05,-pin_thickness/2])
+                            pin();
+                    }
+                    translate([0,pin_neck+device_height-hole_height,0])
+                        body();
+                }
+            }
+        }
+    }
+}