main.f90

来自「Fortran 95程序设计&Code-彭国伦」· 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