Appslike.site

Системы радиосвязи

Рабочая БСА

EE2C 22F0 387 bhi exitdav

EE2E CCEC39 388 jmp main

389

390 ;------------------------------------------------;

391

392

393

394

395

396 ;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

397

398

399 ADC_INT: ; обработчик прерывания от АЦП

EE31 8B 400 pshh

EE32 018913 401 brclr 0,bitf,adm1 ;если ав=0

то переход на adm1

EE35 038907 402 brclr 1,bitf,adm2 ;переход если ав1=0

тонометр.asm Assembled with CASM08Z 25.02.03 9:58:45 PAGE 10

EE38 1889 403 bset 4,bitf

EE3A 4E3D8A 404 mov ADR,upress1

EE3D 2004 405 bra zap

406 adm2:

EE3F 1589 407 bclr 2,bitf ;сброс ав2

EE41 1289 408 bset 1,bitf ;уст. ав1

409 zap:

EE43 6E413C 410 mov #$41,ADSCR ;команда

запуска АЦП вход PTB1

411

EE46 2011 412 bra exit

413 adm1:

EE48 058907 414 brclr 2,bitf,adm3 ;переход если ав2=0

EE4B 1689 415 bset 3,bitf

EE4D 4E3D8B 416 mov ADR,upress

EE50 2004 417 bra zap1

418 adm3:

EE52 1389 419 bclr 1,bitf ; сброс ав1

EE54 1489 420 bset 2,bitf ; уст. ав2

421 zap1:

EE56 6E403C 422 mov #$40,ADSCR ;команда

запуска АЦП вход PTB0

423 exit:

EE59 8A 424 pulh

EE5A 80 425 rti

426

427

428

429 ;!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

430

431 timer_int: ;Обработчи прерывания от таймера

EE5B 1F20 432 bclr 7,TSC ;Сброс TOF

EE5D 3C9A 433 inc sec10

EE5F B69A 434 lda sec10

EE61 A109 435 cmp #$9

EE63 250E 436 blo exittime ;Если sec10>9 то перхода нет

EE65 3F9A 437 clr sec10

EE67 3C99 438 inc sec

EE69 3C95 439 inc ovsec

EE6B B695 440 lda ovsec

EE6D A105 441 cmp #!5

EE6F 2502 442 blo exittime

EE71 1A89 443 bset 5,bitf

444 exittime:

EE73 80 445 rti

446

447

448 ;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

449

450

451 VOLTS_PRESSURE_RET: ;подпрограмма табличной перекодировки напр. в давление

452 ;число для перекодир

тонометр.asm Assembled with CASM08Z 25.02.03 9:58:45 PAGE 11

453 ;начало таблицы -TCP

EE74 87 454 psha

EE75 8B 455 pshh

EE76 89 456 pshx

457

EE77 B68C 458 lda udav

EE79 B08D 459 sub const ;const- напряжение

при нулевом давлении

EE7B 97 460 tax

EE7C D6EF14 461 lda TCP,x

EE7F B78E 462 sta dav ;перекодированное

число в dav

463

EE81 88 464 pulx

EE82 8A 465 pulh

EE83 86 466 pula

EE84 81 467 rts

468

469

470

471

472 ;\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\

473

474

475

476

477 BCD_RET: ;подпрограмма перевода числа в BCD формат

478 ;число для перевода находится в "y"

479 ;BCD100 - сотни

480 ;BCD10 - десятки

481 ;BCD1 - единицы

482

EE85 87 483 psha

EE86 8B 484 pshh

EE87 89 485 pshx

486

EE88 B68F 487 lda y ;Делимое в

аккумулятор

EE8A A163 488 cmp #!99

EE8C 2206 489 bhi bcd100m ;если y>99 то переход на bcd100m

EE8E A109 490 cmp #!9

EE90 2210 491 bhi bcd10m ;если y>9 то переход на bcd10m Перейти на страницу: 10 11 12 13 14 15 16 17 18 19

Советуем почитать:

Передатчик импульсный СВЧ диапазона Управление полетом современных летательных аппаратов (ЛА) - технически сложный процесс, который требует большого количества стабильной и достоверной информации о параметрах полета, режим ...

Проектирование системы передачи цифровых данных В настоящее время очень развиты различные системы передачи данных, разработаны основные стандарты, на основе которых строятся реальные системы. В настоящей работе была осуществлена попыт ...

Применение метода вейвлет-кодирования для сжатия и реконструкции физиологической информации, передаваемой по каналу радиотелеметрии Современная медицина неразрывно связана с применением различных диагностических и терапевтических приборов и тенденция к дальнейшему внедрению технических средств в медико-биологическую прак ...