alias ips {
  var %a 1
  while (%a <= 255) {
    var %b 0
    while (%b <= 255) {
      var %c 0
      while (%c <= 255) {
        var %d 0
        while (%d <= 255) {
          write Ips.txt $+(%a,.,%b,.,%c,.,%d)
          inc %d 1
        }
        inc %c 1
      }
      inc %b 1
    }
    inc %a 1
  }
}