home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er Special 13
/
64er_Magazin_Sonderheft_13_19xx_Markt__Technik_de_Side_A.d64
/
dreieck-d_a
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
559b
|
21 lines
1 rem**********************************
2 rem* *
3 rem* erzeugen einer dreieckspannung *
4 rem* mit hilfe eines d/a-wandlers *
5 rem* *
8 rem**********************************
9 :
10 poke56579,15:rem datenrichtungsregister
20 for i = 0 to 15 :rem hier wird eine
30 poke 56577,i :rem ansteigende
40 for x = 0 to 50 :rem spannung
45 next x :rem erzeugt
50 nexti
55 :
60 fori = 15 to 0 step -1:rem hier
70 poke 56577,i :rem faellt die
80 for x = 0 to 50 :rem spannung
90 nextx :rem wieder ab
100 nexti
110 goto20