Re: "No implicit type" error for init_window

null@example.com (jeff) — Tue, 17 Jan 2023 19:59:44 +0000

I think you meant to use initwindow.

"No implicit type" error for init_window

null@example.com (jackmitchener) — Tue, 17 Jan 2023 18:52:25 +0000

Thanks Jeff for solving my last problem.
Now, when I declare a graphics window, I get a compiler error: "No implicit type" on the init_screen line. It also says: Error: Keyword argument requires explicit interface for procedure 'init_screen'

program main
use appgraphics
implicit none
integer::screen
integer::x, y, r, i
x=10
y=10
r=1
screen = init_screen(800, 600, title="Draw Primitives")
call settextstyle(2,0,5)
do while(x <= 800)
call clearviewport
call circle(x,y,r)
call outtextxy(x,y,char(r),pt)
i=0
do while(i < 100000)
i=i+1
end do
x=x+25
y=y+15
r=r+12
end do
call delay(1)
call closewindow(screen)
end program main

Approximatrix Forums — "No implicit type" error for init_window

Re: "No implicit type" error for init_window

"No implicit type" error for init_window