EZ Digital OS-3060D Specifiche Scaricare il pdf (Pagina 106)

(2) Progra m

exam

ple 2 "Ri" command

This

progra

m receives 50 words of

CHI

wav

eform

from

zero

ad

dress u

sin

g

"

Ri"

co mmand.

Program

exa

mple 2-1 : ASC II

co

de c

onver

si

on

; IBM co

mpa

tible

per

s

on

al

computer

10

**

••

Ri (mmmm, nnn

n.X)

CO

MM

AND

•••••

20

30 i

--

- - > 1: d

ls

p

la

y .memo

ry

c

hi

40 2:

di

sp

l ay me

mo

ry

ch2

50

3:

SA

VE

memor y A

60 4 : S

AVE

memor y B

70

mmmm

->

st

a

rt

a

dd

re

ss

80 n

nnn

- >

data

numbe r

90

OPEN "COM

2:

4800, N

,8,

I, CS, DS.

CD"

F

OR

RANDOM

AS #1

100 PRINT

#1.

"Rl (00

1l

0. 0050. A) "

110 LINE INPUT #1.

RTNS

120 PRI

NT

"RI

RUTIJRN

=" ;

RTNS

1

30

CLO

SE #1

140 E

ND

Pro

gr

am

example 2-2

Binary

c

ode

conversion. IBM

co

mpatible

pers

onal

computer

10

**.*

Ri(

mm

m

m,nnnn,X)

CO

MM

AND

• • *••

20

DR

AW

BINARY

DATA

FO

RM

3

~

••

••••••••

•••

••••••••••

•••

••••

•• • •

40 OPEN "COM2 :

4800.

N.

B.

I.

CS, DS. CD"

FOR

RANDOM

AS #1

50 PRI

NT

#1,

"Rl

(0000

,00

50.

B)"

60

RTNS

= INPUTS

04

. I )

70

F

OR

I = 1 TO 49

B0

WRKS

INPUTS0 , 1)

90

RTNS

=

RTNS

+ MIDS (STRS (ASC(WRKS) ) , 2) +

100

NEXT

I

110 PRINT "Rl

RU

TURN

=";

RTN

S

120

CLOS

E #1

1

30

END

IO

!>

1 2 ... 101 102 103 104 105 106 107 108 109 110 111 112 113 114

Commenti su questo manuale

Nessun commento