как убрать текст, созданный Print'ом

[АгниКай]

Сообщение от Dzirt

ставь очистку екрана перед тем как выводишь текст а не после него.

If pot Then
     While Not Eof(pot)
         Cls()
         Text 10,100,ReadLine$(pot)
         Flip()
     Wend
EndIf

Спасибо, но есть одно но, хотя и не значительное.
Вначале данные доходят быстро, но потом с каждым разом все медленнее и медленнее.
Почему? И что делать?=)
А если таких штучег будет 10? Это ж ужас будет.

[Dzirt]

Ну думаю тут не в блице дело, а скорее в том ресурсе с которого ты данные принимаешь.

[АгниКай]

Ты имеешь ввиду комп или прогу?
По идее данные должны доставляться мгновенно т.к. на этом же компе и сервер и клиент.

[Dzirt]

Значит напартачил в коде.....влюбом случае гдето ошибка таки есть.

[ABTOMAT]

eсть Flip?

Ты уверен, что именно в нём проблема? Когда убираешь, то не тормозит?
И что значит "комп тормозит" ?
То есть все остальные проги на компе медленней работают, когда это запущено?
Это потому что блиц зохавывает столько процессорного времени, сколько найдёт (хавает одно целое ядро если их несколько) даже если у него цикл, где ничего особо тяжёлого не делается (просто скорость повторов огромная). В тело цикла попробуй вставь
Delay 3
Тогда блиц будет гарантированно отдавать 3мс времени системе. Если не поможет, то вставь значение больше.

[АгниКай]

А как вывести 3 значения таким способом который вы показали. Например X,Y,Z координаты. По разному пробовал, ошибку пишет.
Еще один способ остался, но для этого мне надо в переменную ввести текст, не получается почему-то.

s="s"

А, вот так надо было

s$="s"

[Mickle_PES_fun]

есть такой код:

for i=1 to 50000
 text 200,100,i
next

при выводе на экран цифры накладываются друг на друга
как исправить?
P.S. пробовал поставить cls и перед, и после вывода на экран, не помогает

[Артем Валерьевич]

For i=1 To 50000
Cls 
 Text 200,100,i
Next

[Mickle_PES_fun]

Мигает... а хочется без миганий...

[SBJoker]

Cls
Flip

должно помочь.

[Reizel]

Сообщение от Mickle_PES_fun

Мигает... а хочется без миганий...

Graphics 800,600
SetBuffer BackBuffer()
for K=0 to 50000
   cls
   text 10,10,K
   flip
next 
waitkey()
end

Вот здесь точно мигать не будет

[Артем Валерьевич]

ну как бэ да