2012年7月24日火曜日

色々な直線

前のmoduleを使用して色々な直線を引いてみました
本当は方程式を解いて直線ぴーん。がいいんですけど(笑)
本当はそうするつもりなんですけど
一般化がよくわかりません(笑)

そんな訳で今後の展開に期待!です

#include "FILE_draw_graph_sub.hsp"
 graph_init
 
; y=x
 color $ff,0,0
 graph_line 300,300,-300,-300
; y=-x
 color $80,0,0
 graph_line -300,300,300,-300
; y=10(%)
 color 0,$ff,0
 graph_line 300,30,-300,30
; x=-10(%)
 color 0,$80,0
 graph_line -30,300,-30,-300
; y=2x
 color 0,0,$ff
 graph_line 150,300,-150,-300
; y=0.5x
 color 0,0,$80
 graph_line 300,150,-300,-150
; y=0.5x+20(%)
 color 0,$ff,$ff
 graph_line 300,150+60,-300,-150+60
; y=0.5(x+20(%))
 color $ff,0,$ff
 graph_line 300,150-30,-300,-150-30
 draw_zahyoujiku
 stop

0 件のコメント:

コメントを投稿