RosettaCodeData/Task/Bitmap-Flood-fill/Fortran/bitmap-flood-fill-2.f

2 lines
68 B
FortranFixed
Raw Permalink Normal View History

2013-04-10 16:19:29 -07:00
call floodfill(animage, point(100,100), rgb(0,0,0), rgb(0,255,0))