Not sure how you're going to get a 1,000,000 element array with a PIC ...
Even with PBP 2.50

Code:
For index =0 to big_number
    Hserout [record(index),13,10]
    Pause 100
Next
Not enough RAM.
<br>