#/***********************************************************
#    ccurve.rb -- C¶ÊÀþ
#***********************************************************/
require "plotter.rb"

def c(i,  dx,  dy)
    if (i == 0); draw_rel(dx, dy)
    else 
        c(i - 1, (dx + dy) / 2.0, (dy - dx) / 2.0)
        c(i - 1, (dx - dy) / 2.0, (dy + dx) / 2.0)
    end
end

printf("°Ì¿ô = ");  order = gets.to_i
gr_on
move(1, 2);  c(order, 2, 0)
gr_off

exit 0