Ok, I'm trying to create a console from scratch on a DirectDraw surface in VB. I've stared at this for hours on end and I can't seem to figure why this code isn't doing what it is suppose to. I could really use a fresh opinion on this if anyone would care to take a look. This is the routine I'm using to redraw and sort the text in the console. Like when one line goes in, it pushes the old one up a notch and so on, for each string in the history. Have a look, any advice is welcome! ------------------------------------------------------------ Public ScanHistory As Variant Public StrIndex As Integer Public StrHistory As New Collection Public ConStr As Variant Public iCount As Long ConStr = CoreSurface.OutputBuffer.Text StrHistory.Add ConStr StrIndex = StrHistory.Count For ScanHistory = StrHistory.Count To 1 If StrIndex = StrHistory.Count Then iCount = 120 End If DrawString 13, iCount, StrHistory.ITEM(StrIndex) iCount = iCount - 13 StrIndex = StrHistory.Count - 1 Next ScanHistory ------------------------------------------------------------ Edited by - CMatrix on 4/11/00 1:10:46 PM

Doh, wrong forum....