Сообщение от Данил
После такого срока времени уже почти нереально возвратится к проекту. Если, конечно, у тебя все подробно откамментировано, и у тя память хорошая. )))))))))
|
Не волнуйся. Я по работе программирую микроконтроллеры на ассемблере. Причем не по принципу написал/забыл, а довольно часто приходится возвращаться к старым программам с перерывом от 6 месяцев и больше. Такой подход дисциплинирует моментально. Буквально после второго возврата стал писать коментарии к каждой строчке + описание функций + гибкая структура кода + еще куча всего. (легко учиться на своих ошибках). Так что к бейсиковому коду смогу вернуться хоть через 10 лет.
Кстати основной цикл программы:
;===========================Основной цикл======================
Repeat
CurTime=MilliSecs();---записывается время начала текущего цикла
dTime=CurTime-OldTime;---вычисляется разница с предыдущим
GetControl(plaer);---получить информацию о нажатых клавишах
UpdatePlaer(plaer)
UpdateMonster()
UpdateBomb()
UpdateBoom()
UpdateTree()
UpdateCamera(plaer)
;If KeyHit(2)
; mapindex=mapindex+1
; reloadmap(mapindex,78,2,1,1,0)
;EndIf
UpdateWorld
RenderWorld
SetFont font1
sredn#=sredn-sredn/50+dTime/50
Text 10,10,"FPS: "+Str(1000/sredn);mapindex);1000/sredn)
Text 10,20,"Level: "+Str(level)
Text 10,30,"Live: "+Str(plaer\live)
Flip
OldTime=CurTime;---сохраняется время начала пройденого цикла
Until (KeyHit(1))Or(plaer\live<0)
;==============================================================
Ну что тут можно забыть?