時代週刊例子

時基勇敢圈


next_time:UInt32=0;

const
TICK_INTERVAL=30;

功能TimeLeft:UInt32;

現在:UInt32;
開始
現在:=SDL_GetTicks;
如果那時現在next_time<=
開始
現在next_time:=+TICK_INTERVAL;
隨之發生:=0;
出口;
末端;
隨之發生:=next_time-現在;
末端;


//主要勇敢圈

(game_running)的同時
開始
UpdateGameState;
SDL_Delay((TimeLeft);
末端;