|
Ответ: Vivo
Вы это, бросайте там перемножать =) зачем эти коды выкладывать, у тебя массив в минуса уходит =))
For i=0 To Int((R1/2-cx+R1/2+32)/32)
For j=0 To Int((R2/2-cy+R2/2+16)/16)
For i=Int((R1/2-cx-R1/2-32)/32) To Int((R1/2-cx+R1/2+32)/32)
For j=Int((R2/2-cy-R2/2-16)/16) To Int((R2/2-cy+R2/2+16)/16)
If KeyDown( 2 )=True Then x#=x#-0.1
If KeyDown( 3 )=True Then x#=x#+0.1
Text 10,10*i+(x#),"i:"+i*32
Text 50,10*j+(x#),"j:"+j*16
Next
Next
Проверь Text 10,10,TileImg(-1)
Блин ни как кодек подобрать не могу =))
__________________
Острый психоз- это когда вы разговариваете с кошкой.
Острый галлюцинаторный психоз - вы говорите с кошкой, которой не существует.
Паранойя - вы боитесь ляпнуть лишнего при кошке.
Шизофрения - иногда у вас появляется кошка, которая разговаривает.
Неврастения - вы жалуетесь кошке, она молчит, игнорирует вас и это для вас невыносимо!!!
Навязчивый невроз - вы уверены, что кошка не одна и они что-то замышляют!
Последний раз редактировалось Markova, 17.03.2012 в 08:40.
|