#!/usr/bin/gawk -f

BEGIN {
    ORS = "\r\n"
    adservice = "/inet/tcp/0/bitreich.org/70"
    print "/adc/random" |& adservice
    while ((adservice |& getline) > 0)
        print
    close(adservice)
}