From 592608c2a6df70350dd376ce36370f5098d24471 Mon Sep 17 00:00:00 2001
From: bitomaxsp <bitomaxsp@gmail.com>
Date: Thu, 11 Jun 2020 14:18:01 +0200
Subject: [PATCH] Add 6AL5 twin diode tube

---
 Valve.dcm |  6 ++++++
 Valve.lib | 40 ++++++++++++++++++++++++++++++++++++++++
 2 files changed, 46 insertions(+)

diff --git a/Valve.dcm b/Valve.dcm
index 8e4a84ea31..ac6331e397 100644
--- a/Valve.dcm
+++ b/Valve.dcm
@@ -6,6 +6,12 @@ K diode triode valve
 F https://frank.pocnet.net/sheets/082/e/EABC80.pdf
 $ENDCMP
 #
+$CMP 6AL5
+D Twin diode
+K valve, diode
+F https://frank.pocnet.net/sheets/093/6/6AL5.pdf
+$ENDCMP
+#
 $CMP 9AK8
 D triple diode triode
 K diode triode valve
diff --git a/Valve.lib b/Valve.lib
index 15a9ec4b7f..90cba697a6 100644
--- a/Valve.lib
+++ b/Valve.lib
@@ -1,6 +1,46 @@
 EESchema-LIBRARY Version 2.4
 #encoding utf-8
 #
+# 6AL5
+#
+DEF 6AL5 U 0 40 Y Y 3 L N
+F0 "U" 0 50 50 H V C CNN
+F1 "6AL5" 0 -50 50 H V C CNN
+F2 "" 0 -50 50 H I C CNN
+F3 "" 0 -50 50 H I C CNN
+DRAW
+A 0 -225 103 142 1659 1 1 10 N 100 -200 -100 -200
+A 0 -100 200 -1799 -1 1 1 0 N -200 -100 200 -100
+A 0 100 200 1 1799 1 1 0 N 200 100 -200 100
+A 0 -225 103 142 1659 2 1 10 N 100 -200 -100 -200
+A 0 -100 200 -1799 -1 2 1 0 N -200 -100 200 -100
+A 0 100 200 1 1799 2 1 0 N 200 100 -200 100
+A 0 -100 200 -1799 -1 3 1 0 N -200 -100 200 -100
+A 0 100 200 1 1799 3 1 0 N 200 100 -200 100
+P 2 1 1 0 -100 -200 -100 -300 N
+P 2 1 1 0 0 300 0 200 N
+P 2 1 1 0 200 100 200 -100 N
+P 3 1 1 0 -200 100 -200 -100 -200 -100 N
+P 4 1 1 10 -100 200 100 200 100 200 100 200 N
+P 2 2 1 0 -100 -200 -100 -300 N
+P 2 2 1 0 0 200 0 300 N
+P 2 2 1 0 0 350 0 300 N
+P 2 2 1 0 200 100 200 -100 N
+P 3 2 1 0 -200 100 -200 -100 -200 -100 N
+P 4 2 1 10 -100 200 100 200 100 200 100 200 N
+P 2 3 1 0 200 -100 200 100 N
+P 3 3 1 0 -200 100 -200 -100 -200 -100 N
+P 3 3 1 20 100 -150 0 -100 -100 -150 N
+P 5 3 1 0 100 -350 100 -200 0 -150 -100 -200 -100 -350 N
+X K1 1 -100 -400 100 U 50 50 1 1 O
+X A1 7 0 400 100 D 50 50 1 1 I
+X A2 2 0 400 100 D 50 50 2 1 I
+X K2 5 -100 -400 100 U 50 50 2 1 O
+X H1 3 -100 -400 100 U 50 50 3 1 I
+X H2 4 100 -400 100 U 50 50 3 1 I
+ENDDRAW
+ENDDEF
+#
 # CK6418
 #
 DEF CK6418 U 0 0 Y Y 2 L N