this works fine here, maybe some conflict in your code?
dim message$(10)
set text size 30
crude_debounce=200
for i=1 to 10
repeat
keypressed$=inkey$()
until keypressed$<>""
message$(i)=keypressed$
text 80+(i*20),200,keypressed$
wait crude_debounce
next i
do
for i=1 to 10
text i*20,100,message$(i)
next i
loop
try that and it it does work then you may have some kind of code error you overlooked or something.
Mentor.
PC1: P4 hyperthreading 3ghz, 1gig mem, 2x160gig hd`s, Nvidia FX5900 gfx, 6 way surround sound, PC2: AMD 1.2ghz, 512mb ram, FX5200 ultra gfx, stereo 16 bit soundblaster, ups.
