home *** CD-ROM | disk | FTP | other *** search
/ Chip 2005 June / ccd0605.iso / Software / Shareware / Comunicatii / nat32 / script / direct < prev    next >
Text File  |  2002-02-21  |  439b  |  19 lines
  1. #!tcl 
  2.  
  3. # 
  4. # Microsoft Direct Play mappings 
  5. # 
  6. if {$argc == 0} { 
  7.     error {Usage: direct IPaddress|off} 
  8. } 
  9. set addr [lindex $argv 0] 
  10. if {$addr == "off"} { 
  11.     exec "ppmaps delete tcp 47624"
  12.     exec "ppmaps delete tcp 2300:2400"
  13.     exec "ppmaps delete udp 2300:2400"
  14. } else { 
  15.     exec "ppmap add tcp 47624 $addr 47624"
  16.     exec "ppmap add tcp 2300:2400 $addr 2300"
  17.     exec "ppmap add udp 2300:2400 $addr 2300"
  18. }
  19.