BASICð€ãªã€ãããªãð
å
æ¥äŒç€Ÿã§ç©æ¢ããããŠããæã«ãå¶ç¶CASIOã®é¢æ°é»åãçºæããŠæãåºããã®ããããã°ã©ã ãçµããã»ã»ã»ãç§ã®PC-E550ã¯ä»ã©ãã ããïŒ
ä¹
ãæ¯ãã«ç°¡åãªããã°ã©ã ã§ããšæãPlayStoreããç¡æã®ãè©ŠãããŒãžã§ã³ãå
¥ããŠã¿ãŸããð
ãµã¯ããšã»ã»ã»ïŒ
100 c=1
110 cls
120 print "step= ";c
130 input"step=";c
140 if c=0 then end
150 cls 2
160 for x=-100 to 100 step c
170 y=(x*x)
180 for z=-100 to 100 step c
190 px=((x*z*z)/3300+570)+x
200 py=200+(z*z*x/16500+z*5+y/10)/2.6+80
210 pr=137-x
220 pg=133-z
230 pb=255-(x*z)/200
240 pset (px,py),rgb(pr,pg,pb)
250 nextãïœ
260 nextãïœ
270 goto 110
2次å
ã°ã©ãã3次å
颚ã«è¡šç€ºããåŒãæãåºãããèšç®åŒãã°ãã°ãã§ããã¹ã«ãŒããŠãð
ðŠ
çµæã¯ã¹ã¯ã·ã§ã®æ§ã«ãªããŸãããïŒæç®ã¯ç¹°ãè¿ãèšç®ãïŒïŒïŒäžåå¿
èŠã§å®äºè¿ïŒæé以äžð°æãããããªã®ã§éäžã§stopãããŠãŸãðµ
ïŒæç®ã¯å¯åºŠãäžããŠïŒïŒäžåã®èšç®ãªã®ã§æ°åã§å®æã§ãð
ç¡æã®ãè©ŠãããŒãžã§ã³ãªã®ã§ãã€ã³ã¿ãŒããªã¿ã®çºã«äœéã§ãããããå°ãéãã§ã¿ãŠè¯ããã°éå®è§£é€ã®ææçã«ç§»è¡ããŠãè¯ãããç¥ããŸãããðšâð»ð
BASICð€ãªã€ãããªãð
å
æ¥äŒç€Ÿã§ç©æ¢ããããŠããæã«ãå¶ç¶CASIOã®é¢æ°é»åãçºæããŠæãåºããã®ããããã°ã©ã ãçµããã»ã»ã»ãç§ã®PC-E550ã¯ä»ã©ãã ããïŒ
ä¹
ãæ¯ãã«ç°¡åãªããã°ã©ã ã§ããšæãPlayStoreããç¡æã®ãè©ŠãããŒãžã§ã³ãå
¥ããŠã¿ãŸããð
ãµã¯ããšã»ã»ã»ïŒ
100 c=1
110 cls
120 print "step= ";c
130 input"step=";c
140 if c=0 then end
150 cls 2
160 for x=-100 to 100 step c
170 y=(x*x)
180 for z=-100 to 100 step c
190 px=((x*z*z)/3300+570)+x
200 py=200+(z*z*x/16500+z*5+y/10)/2.6+80
210 pr=137-x
220 pg=133-z
230 pb=255-(x*z)/200
240 pset (px,py),rgb(pr,pg,pb)
250 nextãïœ
260 nextãïœ
270 goto 110
2次å
ã°ã©ãã3次å
颚ã«è¡šç€ºããåŒãæãåºãããèšç®åŒãã°ãã°ãã§ããã¹ã«ãŒããŠãð
ðŠ
çµæã¯ã¹ã¯ã·ã§ã®æ§ã«ãªããŸãããïŒæç®ã¯ç¹°ãè¿ãèšç®ãïŒïŒïŒäžåå¿
èŠã§å®äºè¿ïŒæé以äžð°æãããããªã®ã§éäžã§stopãããŠãŸãðµ
ïŒæç®ã¯å¯åºŠãäžããŠïŒïŒäžåã®èšç®ãªã®ã§æ°åã§å®æã§ãð
ç¡æã®ãè©ŠãããŒãžã§ã³ãªã®ã§ãã€ã³ã¿ãŒããªã¿ã®çºã«äœéã§ãããããå°ãéãã§ã¿ãŠè¯ããã°éå®è§£é€ã®ææçã«ç§»è¡ããŠãè¯ãããç¥ããŸãããðšâð»ð
15
21
ãã£ãµããµ
|
03/29
|
ããäŒç»