2009-04-02 17:44:28 +00:00
|
|
|
#
|
2010-01-21 11:08:19 +00:00
|
|
|
# Parallel port wiggler (many clones available) on port 0x378
|
2009-04-02 17:44:28 +00:00
|
|
|
#
|
2010-01-21 11:08:19 +00:00
|
|
|
# Addresses: 0x378/LPT1 or 0x278/LPT2 ...
|
2011-10-29 23:45:11 +00:00
|
|
|
#
|
2009-04-02 17:44:28 +00:00
|
|
|
|
2010-03-16 09:59:05 +00:00
|
|
|
if { [info exists PARPORTADDR] } {
|
2011-10-29 23:45:11 +00:00
|
|
|
set _PARPORTADDR $PARPORTADDR
|
2010-03-16 09:59:05 +00:00
|
|
|
} else {
|
2015-03-02 14:52:47 +00:00
|
|
|
if {$tcl_platform(platform) eq "windows"} {
|
|
|
|
|
set _PARPORTADDR 0x378
|
|
|
|
|
} {
|
|
|
|
|
set _PARPORTADDR 0
|
|
|
|
|
}
|
2010-03-16 09:59:05 +00:00
|
|
|
}
|
|
|
|
|
|
2008-04-10 11:45:54 +00:00
|
|
|
interface parport
|
2010-03-16 09:59:05 +00:00
|
|
|
parport_port $_PARPORTADDR
|
2008-04-10 11:45:54 +00:00
|
|
|
parport_cable wiggler
|
