1 # SPDX-License-Identifier: GPL-2.0-or-later
4 # Parallel port wiggler (many clones available) on port 0x378
6 # Addresses: 0x378/LPT1 or 0x278/LPT2 ...
9 if { [info exists PARPORTADDR] } {
10 set _PARPORTADDR $PARPORTADDR
12 if {$tcl_platform(platform) eq "windows"} {
13 set _PARPORTADDR 0x378
19 adapter driver parport
20 parport port $_PARPORTADDR