AM79C90PC datasheet(50/62 Pages) AMD

50 / 62 page

AMD

Am79C90

170

PRINT “ENTER ETHERNET ADDRESS AS 6 HEXADECIMAL NUMBERS SEPARATED ”

180

PRINT “BY BLANKS. EACH NUMBER REPRESENTS ONE BYTE. THE LEAST ”

190

PRINT “SIGNIFICANT BIT OF THE FIRST BYTE IS THE FIRST BIT TRANSMITTED.”

200

PRINT “”

210

PRINT “ENTER ETHERNET ADDRESS”;

220

INPUT A$(0), A$(1), A$(2), A$(3), A$(4), A$(5)

240

REM

250

REM UNPACK ETHERNET ADDRESS INTO ADDRESS ARRAY

260

REM

270

M=0

280

FOR I = 0 TO 47: A(I) = 0: NEXT I

290

FOR I = 0 TO 5

300

IF LEN(A$(I)) = 1 THEN A$(I) = “0” + A$(I)

310

A$(I) = UCASE$(A$(I))

320

FOR N = 2 TO 1 STEP –1

330

Y$ = MID$(A$(I), N, 1)

340

IF Y$ = “0” THEN 510

350

IF Y$ = “1” THEN A(M) = 1: GOTO 510

360

IF Y$ = “2” THEN A(M + 1) = 1: GOTO 510

370

IF Y$ = “3” THEN A(M + 1) = 1: A(M) = 1: GOTO 510

380

IF Y$ = “4” THEN A(M + 2) = 1: GOTO 510

390

IF Y$ = “5” THEN A(M + 2) = 1: A(M) = 1: GOTO 510

400

IF Y$ = “6” THEN A(M + 2) = 1: A(M + 1) = 1: GOTO 510

410

IF Y$ = “7” THEN A(M + 2) = 1: A(M + 1) = 1: A(M) = 1: GOTO 510

420

A(M + 3) = 1

430

IF Y$ = “8” THEN 510

440

IF Y$ = “9” THEN A(M) = 1: GOTO 510

450

IF Y$ = “A” THEN A(M + 1) = 1: GOTO 510

460

IF Y$ = “B” THEN A(M + 1) = 1: A(M) = 1: GOTO 510

470

IF Y$ = “C” THEN A(M + 2) = 1: GOTO 510

480

IF Y$ = “D” THEN A(M + 2) = 1: A(M) = 1: GOTO 510

490

IF Y$ = “E” THEN A(M + 2) = 1: A(M + 1) = 1: GOTO 510

500

IF Y$ = “F” THEN A(M + 2) = 1: A(M + 1) = 1: A(M) = 1

510

M=M+4

520

NEXT N

530

NEXT I

540

REM

550

REM PERFORM CRC ALGORITHM ON ARRAY A(0–47)

560

REM

570

FOR I = 0 TO 31: C(I) = 1: NEXT I

580

FOR N = 0 TO 47

590

REM SHIFT CRC REGISTER BY 1

600

FOR I = 32 TO 1 STEP –1: C(l) = C(I–1): NEXT I

610

C(0) = 0

620

T = C(32) XOR A(N): REM T = CONTROL BIT

630

IF T = 0 THEN 700: REM JUMP IF CONTROL BIT=0

AM79C90PC Datasheet(PDF) 50 Page - Advanced Micro Devices

AM79C90PC Datasheet(HTML) 50 Page - Advanced Micro Devices

Html Pages

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62

Datasheet Download

Link URL