' Schnelles Signal-Display mit SerialComInstruments XY-Display

avr.device = atmega328p
avr.clock = 16000000         ' Quarzfrequenz
avr.stack = 100              ' Bytes Programmstack (Vorgabe: 16)

uart.baud = 115200           ' Baudrate
uart.Recv.enable             ' Senden aktivieren
uart.Send.enable             ' Empfangen aktivieren

dim x as integer
dim y as single

Do
  for x = 1 to 2000
    y = fsin(x/20)
    print "#58M";str(x);"<";		' send x-value
    print "#59M";str(y);"<";		' send y value
  next
  print "#58M-9999999<"			' clear display
Loop