proc trafficMultiplier { hops } {
for {set a 1} {$a <= $hops} {incr a} {
  set b [expr $a+1000]
  set c [expr $a/256]
  set d [expr $a%256]
  ios_config "interface gig0/0.$b" "enc dot1q $b" "ip addr 10.$c.$d.1 255.255.255.252"
  }
}

trafficMultiplier 1000