Programma calcolo frequenze PLL ATS818 con Sharp Organizer IQ-7100M
===================================================================
1 DIM C$(17)
5 INPUT "PLL KHZ=";N
8 J=N
10 N=N+55837'10692 X FM
15 N=N+1
20 N$=""
25 FOR C=16 TO 1 STEP-1
(NOTA: NON VISUALIZZA IL BIT PIU' BASSO PER COMODITA'
DEL DISPLAY, COMPOSTO DA 16 COLONNE X 8 RIGHE)
30 IF N>(2^C) THEN C$(C)="1":N=N-2^C ELSE C$(C)="0"
35 N$=N$+C$(C)
38 NEXT
40 PRINT N$
42 PRINT"-^---^---^---^--
45 INPUT "CAMBIO BIT?";B
50 K=2^(B-1)
55 PRINT "V";K;"D";J-K
57 PRINT "S";J+K
60 GOTO 5
(Vai a pagina1)
30 IF N>(2^C) THEN C$(C)="1":N=N-2^C ELSE C$(C)="0"
35 N$=N$+C$(C)
38 NEXT
40 PRINT N$
42 PRINT"-^---^---^---^--
45 INPUT "CAMBIO BIT?";B
50 K=2^(B-1)
55 PRINT "V";K;"D";J-K
57 PRINT "S";J+K
60 GOTO 5
(Vai a pagina1)