Trojrozm%rn[ grafy¢ ------------------¢¢ Kdysi d*vno vy&el v ABC program pro konstrukci trojrozm%rn`ch graf+. Mo(n*, (e jej zn*te. Pokud ne, bylo by mysl)m na m)st% o n%m @)ci n%kolik slov.¢¢ Nejd@)ve: mus)te si vymyslet, odvodit 'i jinak zjistit p@)slu&nou funkci. Takovou funkc) m+(e b`t nap@ z=x⇩2✓y. Jedn* se vlastn% o p@edpis, jak vypo')tat prom%nnou z ze dvou prom%nn`ch x a y. Vezmeme-li x a y jako sou@adnice bod+ v rovin%, m+(eme z pova(ovat za v`&ku bodu nad rovinou ╱'i hloubku bodu pod rovinou$. V`sledkem je takov* n%jak* pok@iven*, nahnut* 'i zalomen* plocha, kterou lze na obrazovce nakreslit jako s)④.¢¢ Dosti teorie, p@ejd%me k ovl*d*n) programu.¢¢ Nejd@)ve zad*v*me nadhled nad rovinou a oto'en) roviny kolem osy z. Ob% hodnoty se zad*vaj) ve stupn)ch a pro ob% je nejtypi't%j&) hodnota 30 - 45 stup+.¢¢ D*le zad*me, zda chceme zobrazit sm%r os ╱1 je ano, O je ne$.¢¢ P@i zad*v*n) jednotek na os*ch je nutn[ si uv%domit, (e zobrazujeme obd[ln)kovou '*st roviny o rozm%rech 16 ╱ve sm%ru x$ x 12 ╱ve sm%ru y$ bod+. Pokud zad*me nap@. jednotku ve sm%ru x=1 a ve sm%ru y=2, budeme m)t na ose x 16 a na ose y 24 bod+ ve dvojn*sobn[ hustot%. Pokud pou()v*me ve funkci trigonometrick[ funkce ╱nap@. sin, cos$, je d+le(it[ v%d%t, (e v`po'ty prob)haj) ve stupn)ch a zvolit pat@i'n% velk[ jednotky. ╱Velikost z je ]m%rn* velikosti x a y.$¢¢ Posunut) po'*tku je ud*v*no bez ohledu na jednotky. Pokud chcete po'*tek posunout doprost@ed roviny, zadejte x=8, y=6 a z=0.¢¢ 'tvere'ek s)t% znamen* prost% hustotu s)t%. Hodnota 1 v*m zajist) s)④ 16x12, hodnota 0.5 s)④ 32x24 atd. Zmen&en) 'tvere'ku na polovinu znamen* ale 'ty@n*sobnou dobu v`po't+ a 'asto vede ke splynut) lini), tak(e ne v(dy plat) ')m jem%j&) s)④, t)m l[pe.¢¢ D*le jen zad*te, zda chcete ╱1$ 'i nechcete ╱0$ zm%nit funkci, kter* je definovan* na @. 490. P%kn[ funkce jsou mimo p+vodn) je&t% nap@.:¢¢ z=sin╱x⇩y$⇩cos╱x-y$ nebo¢¢ z=cos╱sqr╱x2⇩y2$$¢¢ kde x2 a y2 znamen* "na druhou" ╱neda@) se mi naj)t p@)slu&n` znak$ Tato druh* funkce je pou(ita v uk*zce.¢¢ Pokud budete cht)t obr*zek vytisknout - pro u(ivatele BT100 je v%c velmi jednoduch*, sta') pou()t TBASIC s modulem pro BT100 a stisknout pouze OPTION pro hardcopy obrazovky. Jinak si m+(ete obr*zek zapsat na disk, upravit ho nap@. v Designmasteru a vytisknout p@)slu&nou hardkop)rkou. Sta') pouze p@idat @*dek:¢¢525 IF PEEK ╱53279$=6 THEN CLOSE#1: OPEN#1,8,0,"D:TGRAF.PIC": BPUT#1,DPEEK╱88$,7680: CLOSE#1¢¢ Potom, pokud stisknete START, ulo() se VIDEORAM na disk D1 pod n*zvem TGRAF.PIC.¢¢ M+(ete rovn%( je&t% zm%nit @*dky 140, 250 a 370 na:¢¢140 INPUT "ctverecek, jemnost site";H,HH:CLS :INPUT "chces zadat funkci╱1/0$";RTL:CLS :IF RTL=0 THEN 170¢¢250 FOR B=0⇩SY TO 12⇩SY STEP HH¢¢370 FOR A=0⇩SX TO 16⇩SX STEP HH¢¢ T)m zachov*te hustotu ╱"ctverecek"$ s)t% a m+(ete sou'asn% zv`&it jemnost jednotliv`ch lini).¢¢ Na spoustu dal&)ch vylep&en) p@ijdete ur'it% sami. P@eji V*m kr*sn[ obr*zky...¢¢ JW¢
