Luo kaksi paneelit tallentaaX-ja Y koordinoida tiedotliikkuvan kohteen , käyttäenjulistaa lausuma " DIM x ( n ) , DIM y (n ) " jossa n viittaamittauspisteiden lukumäärä tarvitaan, jottatäydelliset tiedot . Osoittaa selviä taipumakulma ,vähimmäiskokopitäisi voida olla on 10 data-arvoja .
2
Inputkoordinoida tiedottaulukoihin käyttäentehtävän ( = ) operaattori , muodossa " , x ( 1) = 2,3 , y ( 1) = 4,5 , x ( 2 ) = 2,5 ... " koko joukko tietoja voidaan käyttää . Tarkista, ettätiedot on syötetty oikein käyttämällä ilmaisua TULOSTA . Esimerkiksi " TULOSTA y ( 1 ) " tulee palauttaa arvo 4,5 lähtöpuskuriin ruudulla .
3
alustus kaksi muuttujaa - DX, dY - tallentaamuutosnopeus välillä X ja Y arvot , kuten sekä muuttujien dF, theta tallentaakäyrän gradientti jakulma lasketaanrinteessä.
4
Laskemuutos erilaiset arvot X ja Y käyttämällämuuttujia dX ja dY pitää tuloksia . Laskea muutos välillä x ( 1) ja x ( 2 ) , luoda kaavan seuraavasti : dx = x ( 2 ) - x ( 1) . Kaava dY noudattaa samaa kaavaa , jossa pv = y ( 2 ) - y ( 1) .
5
Laskekäyrän gradientti kaavalla DF = dy /dx . Muuttujat dY ja dX on omaksuttavasamat tiedot pisteitä tai dF on virheellinen .
6
Laskekallistuskulma ottamalla 180 astetta miinuskaaren tangentinkaltevuus. QBASIC syntaksi tämä on muodossa " theta = 180 - atn ( DF) ", jossa atn onarkustangentin funktio ja theta palauttaa arvon asteina . Toista tämä prosessi muuttamallavalikoiman tietojen laskennassa käytettävät muuttujat DX ja dY saadaerilaisia taipuma kulmassa käytetään analyysiin .