I was wondering if that would actually work or not. This is my final line. Again thanks for all your help.
Code:
    for x = 0 to 8
    owin portb.7,0,[i]
    dq[x] = i
    next x