main.f90

来自「Fortran95的一些有用的源程序」· F90 代码 · 共 14 行

program main
  use GAME
  implicit none
  
  call sglDisplaySub(display)
  call sglKeyDownSub(keydown)
  call sglIdleSub(OnIdle)
  call Init()
  call sglCreateWindow(50,50,SX,SY,1)
  call sglMainLoop()

  stop
end program