Итак, в проекте есть форма на весь экран и таких же размеров Буфер (BackBuffer). В массив Cur() заносятся нажатия мышки и используются Sub Main() в цикле Do...Loop. Также имеются две переменные OldX & OldY, в которые заносятся значения X & Y при нажатии ЛКМ, а в переменные MovX & MovY хранятся значения X & Y при перемещении курсора. CamX & CamY - переменные хранящие координаты, скажем так, абстрактной камеры. Так вот я написал в цикле формулу которая при нажатии ЛКМ и перемещении курсора должна сдвигать камеру в нужные X & Y, но очень как то неправильно работает. Для наглядности посередине экрана отрисовал спрайт, чтобы можно было узреть перемещение камеры. Может кто поможет с решением?
Формула находится в цикле Do...Loop:
- Код: Выделить всё
If Cur(1) = True Then
CamX = CamX + MovX * 0.01 - OldX * 0.01
CamY = CamY + MovY * 0.01 - OldY * 0.01
End If
Ниже предоставляю исходник, за корявость кода сильно не пинайте))
