Сообщение от Colossus
мне не нужна нанометрическая точность узнаваемого обьема)) мне нужна полоса загрузки аля Max Payne 2 или Postal 2 Элементарная полоска! никаких процентных долей мне не нужно))
|
While Progress#<100
Progress#=Progress+Rnd(100)*.01
Delay(Rnd(1000,10000))
;тут чето грузим
Cls()
DrawCube(loadX,loadY,Progress#,Height)
Flip()
Wend