[FV5 Data] ver 592 memot ‚l‚r –¾’© 11 1 macro 176 Onload ƒŠƒZƒbƒg sub “_“”()#1 showgraph p14 s1 s2 s3 s4 B end sub sub Á“”()#2 hidegraph p14 s1 s2 s3 s4 B end sub sub ‰~‚ª‰•œ() for j=1 to n o=o+(pi/8n) draw wait w next j for j=1 to n o=o-(pi/8n) draw wait w next j end sub sub ‰~C‚ð“®‚©‚·()#3 calc afimageoff locusoff cls n=5 w=0 draw wait 500 call ‰~‚ª‰•œ end sub sub ‰~‚ª1Žü() for j=1 to n o=o+(2*pi/n) draw wait w next j end sub sub ‰~C‚ð1Žü()#4 calc afimageoff locusoff cls n=20 w=20 draw wait 500 call ‰~‚ª1Žü end sub sub “_‚ª1Žü() for j=1 to n r=r+(2*pi/n) draw wait w next j end sub sub “®“_A‚ð1Žü()#5 calc afimageoff locusoff cls n=20 w=20 draw wait 500 call “_‚ª1Žü end sub Sub ƒŠƒZƒbƒg()#6 call Á“” a=1 b=0 c=1 d=0.5 p=3 h=2 o=-0.5pi r=0 draw end sub sub DEMO()#8 calc afimageoff locusoff cls call ƒŠƒZƒbƒg draw wait 1000 call “_“” draw wait 1000 n=5 w=0 call ‰~‚ª‰•œ wait 1000 for p=3 to 4 step 0.1 draw wait 40 next p wait 500 call ‰~‚ª‰•œ wait 1000 for d=0.5 to 1 step 0.1pi draw wait 40 next d wait 500 call ‰~‚ª‰•œ wait 1000 for c=1 to 0 step -0.1 draw wait 40 next c wait 500 call ‰~‚ª‰•œ wait 1000 for a=1 to 2 step 0.1 draw wait 40 next a wait 500 call ‰~‚ª‰•œ wait 1000 for p=4 to 3 step -0.1 draw wait 40 next p wait 500 call ‰~‚ª‰•œ wait 1000 for d=1 to 0.5 step -0.1pi draw wait 40 next d wait 500 call ‰~‚ª‰•œ wait 1000 for a=2 to 1 step -0.1 draw wait 40 next a wait 500 call ‰~‚ª‰•œ wait 1000 for c=0 to 1 step 0.1 draw wait 40 next c wait 500 call ‰~‚ª‰•œ wait 1000 call Á“” end sub zan false zanC 0 locus false ckind 0 cowidth 1 0 lattice 12632256 1 false 1 scale true true xcoodi false ycoodi false x y xmemori 1 ymemori 1 0 1 1 scrl 0 font 0 Times New Roman 12 0 pfont 0 Times New Roman 12 1 -6.758 6.758 -0.38 4.688 1 0 1 0.5 0 pq 3 0.899999976158142 sw 0 5.65486669540405 ks 2 0.250000011548399 0.5 0.1 syousai 2 0.249999996647239 0.250000000372529 0.250000004097819 0.250000013038516 0 0.100000001490116 0.0500000063329931 0.250000004097819 0.1 0.1 0.1 0.100000001490116 5 0 1.79999995231628 labeldata 1 T 7 sƒpƒ‰ƒ[ƒ^t ( a, b, c ) c‰~‚Ì’†S‚ÌÀ•W dc‰~‚Ì”¼Œa hcŽ‹“_‚Ì‚‚³ pcŒõŒ¹i“_Pj‚Ì‚‚³ ƒÖc’¼üOP‚ðŽ²‚Æ‚·‚é‰~‚̉ñ“]Šp ƒÆc“®“_P‚̉~Žüã‚̉ñ“]Šp 0 3 3 0 F3(a,0,c) F4(a,0,c) 0 12 0 0 1 0 1 16777215 4 5 graphmode 2 800 600 starting 5 end deffunc 10 b+d*sin(x) c+d*cos(x) -2(x*sin(ƒÖ)+y*cos(ƒÖ))/(x*cos(ƒÖ)-y*sin(ƒÖ)+Max(2,sqrt((a)^2+(abs(b)+abs(d))^2)+1)) (z-h)/(x*cos(ƒÖ)-y*sin(ƒÖ)+Max(2,sqrt((a)^2+(abs(b)+abs(d))^2)+1))+h px/(p-z) py/(p-z) (a(x*cos(ƒÖ)+2sin(ƒÖ))+x*Max(2,sqrt((a)^2+(abs(b)+abs(d))^2)+1))/(x*sin(ƒÖ)-2*cos(ƒÖ)) (y-h)*(a*cos(ƒÖ)-F7(x,y)*sin(ƒÖ)+Max(2,sqrt((a)^2+(abs(b)+abs(d))^2)+1))+h F3(F5(x,y,z),F6(x,y,z),0) F4(F5(x,y,z),F6(x,y,z),0) defconst 0 Interval false true intevalcl 65535 1 0 41 1 h True True 12632256 3 1 5 F3(a,b-d,c+t) F4(a,b-d,c+t) -d +d False True 4227327 2 0.1 1 5 F3(a,b,c+t) F4(a,b,c+t) -d +d False True 4227327 2 0.1 1 5 F3(a,b+d,c+t) F4(a,b+d,c+t) -d +d False True 4227327 2 0.1 1 5 F3(a,b+t,c-d) F4(a,b+t,c-d) -d d False True 4227327 2 0.1 1 5 F3(a,b+t,c) F4(a,b+t,c) -d +d False True 4227327 2 0.1 1 5 F3(a,b+t,c+d) F4(a,b+t,c+d) -d +d False True 4227327 2 0.1 1 5 F9(a,b-d,c+t) F10(a,b-d,c+t) -d +d False True false 16512 2 0.01 1 5 F9(a,b,c+t) F10(a,b,c+t) -d +d False True false 16512 2 0.01 1 5 F9(a,b+d,c+t) F10(a,b+d,c+t) -d +d False True false 16512 2 0.01 1 5 F9(a,b+t,c-d) F10(a,b+t,c-d) -d +d False True false 4210816 2 0.01 1 5 F9(a,b+t,c) F10(a,b+t,c) -d +d False True false 4210816 2 0.01 1 5 F9(a,b+t,c+d) F10(a,b+t,c+d) -d +d False True false 4210816 2 0.01 1 5 F3(a,F1(t),F2(t)) F4(a,F1(t),F2(t)) -ƒÎ ƒÎ False True 4227327 3 0.01 1 5 F9(a,F1(t),F2(t)) F10(a,F1(t),F2(t)) -ƒÎ ƒÎ False True 4210816 3 0.01 1 5 F3(-2,tan(t),0) Min(h,F4(-2,tan(t),0)) -ƒÎ/2 ƒÎ/2 False True 12632256 1 0.01 1 5 F3(-1,tan(t),0) Min(h,F4(-1,tan(t),0)) -ƒÎ/2 ƒÎ/2 False True 12632256 1 0.01 1 5 F3(0,tan(t),0) Min(h,F4(0,tan(t),0)) -ƒÎ/2 ƒÎ/2 False True 12632256 2 0.01 1 5 F3(1,tan(t),0) Min(h,F4(1,tan(t),0)) -ƒÎ/2 ƒÎ/2 False True 12632256 1 0.01 1 5 F3(2,tan(t),0) Min(h,F4(2,tan(t),0)) -ƒÎ/2 +ƒÎ/2 False True 12632256 1 0.01 1 5 F3(tan(t),-2,0) Min(h,F4(tan(t),-2,0)) -ƒÎ/2 ƒÎ/2 False True 12632256 1 0.01 1 5 F3(tan(t),-1,0) Min(h,F4(tan(t),-1,0)) -ƒÎ/2 ƒÎ/2 False True 12632256 1 0.01 1 5 F3(tan(t),0,0) Min(h,F4(tan(t),0,0)) -ƒÎ/2 ƒÎ/2 False True 12632256 2 0.01 1 5 F3(tan(t),1,0) Min(h,F4(tan(t),1,0)) -ƒÎ/2 ƒÎ/2 False True 12632256 1 0.01 1 5 F3(tan(t),2,0) Min(h,F4(tan(t),2,0)) -ƒÎ/2 ƒÎ/2 False True 12632256 1 0.01 1 5 F3(a,b+t,0) F4(a,b+t,0) -d +d False True 128 2 0.1 1 5 F3(a,b-d,t) F4(a,b-d,t) 0 c False True dash 4227327 1 0.1 1 5 F3(a,b+d,t) F4(a,b+d,t) 0 c False True dash 4227327 1 0.1 1 5 F9(a,b-d,t) F10(a,b-d,t) 0 c False True false dash 16512 1 0.1 1 5 F9(a,b+d,t) F10(a,b+d,t) 0 c False True false dash 16512 1 0.1 1 7 P A False True dash 255 1 2 false 19 1 7 P A False True 255 2 3 1 false 19 1 7 P B False True 255 2 3 1 false 19 2 7 A B False True 255 2 3 1 false 1 2 7 O P False True 0 3 3 1 false 23 19 7 O P False True dash 0 2 2 false 23 19 8 F3(0,0,p) F4(0,0,p) P(0, 0, {p}) False True 255 3 lk -1 19 4 1 8 F3(a,F1(ƒÆ),F2(ƒÆ)) F4(a,F1(ƒÆ),F2(ƒÆ)) A False True 16711680 3 lk -1 1 7 1 8 F9(a,F7(Ax,Ay),F8(Ax,Ay)) F10(a,F7(Ax,Ay),F8(Ax,Ay)) A' False True 16711680 3 lk -1 2 8 1 8 F3(a,b,c) F4(a,b,c) ({a}, {b}, {c}) False True 0 1 lk -1 25 4 1 8 F3(0,0,0) F4(0,0,0) O False True 0 2 lk -1 23 6 1