久久久久久久999_99精品久久精品一区二区爱城_成人欧美一区二区三区在线播放_国产精品日本一区二区不卡视频_国产午夜视频_欧美精品在线观看免费

 找回密碼
 立即注冊

QQ登錄

只需一步，快速開始

搜索
查看: 1991|回復: 0
收起左側

基于8086的電子琴程序Proteus仿真

[復制鏈接]
ID:567008 發表于 2023-6-9 18:51 | 顯示全部樓層 |閱讀模式
微機原理基礎電子琴，有8255，8253芯片
1686307648273.png

  1. ;;;===Create By XuHe 2018 1.10===;;;
  2. ;;;===電子琴設計===;;;
  3. DATAS SEGMENT
  4.    CTR EQU 0206H
  5.    T0 EQU 82H    ;10000010B
  6. DATAS ENDS
  7. STACKS SEGMENT STACK
  8.    DW 128 DUP(?)
  9.    TOP EQU $-STACKS
  10. STACKS ENDS
  11. CODE    SEGMENT PUBLIC 'CODE'
  12.         ASSUME CS:CODE,DS:DATAS,SS:STACKS

  14. START:   
  15.     ;===初始化===
  16.     MOV AX,DATAS
  17.     MOV DS,AX     
  18.     MOV AX,STACKS
  19.     MOV SS,AX  
  20.     MOV SP,TOP
  21.     MOV AL,T0
  22.     MOV DX,CTR
  23.     OUT DX,AL  
  24.     MOV DX,0200H
  25.     MOV AL,0FFH
  26.     OUT DX,AL
  27.     ;===按鍵掃描===
  28.    K1:
  29.     MOV DX,0202H
  30.     IN AL,DX   
  31.     CMP AL,0FEH
  32.     JNZ K2
  33.     MOV DI,247
  34.     JMP DDD
  35.    K2:
  36.    MOV DX,0202H
  37.     IN AL,DX     
  38.     CMP AL,0FDH
  39.     JNZ K3
  40.     MOV DI,277
  41.     JMP DDD
  42.    K3:  
  43.    MOV DX,0202H
  44.     IN AL,DX      
  45.     CMP AL,0FBH
  46.     JNZ K4
  47.     MOV DI,311
  48.     JMP DDD
  49.    K4:   
  50.    MOV DX,0202H
  51.     IN AL,DX      
  52.     CMP AL,0F7H
  53.     JNZ K5
  54.     MOV DI,330
  55.     JMP DDD
  56.    K5:   
  57.    MOV DX,0202H
  58.     IN AL,DX         
  59.     CMP AL,0EFH
  60.     JNZ K6
  61.     MOV DI,370
  62.     JMP DDD
  63.    K6:   
  64.    MOV DX,0202H
  65.     IN AL,DX         
  66.     CMP AL,0DFH
  67.     JNZ K7
  68.     MOV DI,415
  69.     JMP DDD
  70.     K7:  
  71.     MOV DX,0202H
  72.     IN AL,DX         
  73.     CMP AL,0BFH
  74.     JNZ K8
  75.     MOV DI,466
  76.     JMP DDD
  77.     K8:   
  78.     MOV DX,0202H
  79.     IN AL,DX            
  80.     CMP AL,07FH
  81.     JNZ K1
  82.     MOV DI,495
  83.     JMP DDD
  84.     ;有鍵按下
  85.    DDD:  
  86.     MOV DX,0200H
  87.     OUT DX,AL   
  88.     CALL OUTTONE  
  89.     ;是否彈起，按的時間長短決定拍長
  90.    DELAY:
  91.    MOV DX,0202H
  92.    IN AL,DX
  93.    CMP AL,0FFH
  94.    JNZ DELAY   
  95.    ;停止   
  96.    MOV DX,0200H
  97.    MOV AL,0FFH
  98.    OUT DX,AL
  99.     CALL STOP
  100.     JMP K1
  101.    ;發聲子程序
  102.    OUTTONE PROC NEAR
  103.     MOV DX,0406H
  104.     MOV AL,10010110B
  105.     OUT DX,AL
  106.     MOV DX,00H
  107.     MOV AX,5000
  108.     DIV DI
  109.     AND AX,00FFH
  110.     MOV DX,0404H
  111.     OUT DX,AL
  112.     RET
  113.    OUTTONE ENDP  
  114.    ;停止子程序
  115.    STOP PROC NEAR
  116.     MOV AL,10110001B
  117.     MOV DX,0406H
  118.     OUT DX,AL
  119.     MOV AX,5000
  120.     MOV DX,0404H
  121.     OUT DX,AL
  122.     MOV AL,AH
  123.     OUT DX,AL
  124.     RET
  125.     STOP ENDP
  126. CODE    ENDS
  127.         END START
復制代碼

Keil代碼與Proteus仿真下載: 8086設計--電子琴.7z (63.2 KB, 下載次數: 16)

評分

參與人數 1黑幣 +50 收起 理由
admin + 50 共享資料的黑幣獎勵！

查看全部評分

回復

使用道具 舉報

您需要登錄后才可以回帖 登錄 | 立即注冊

本版積分規則

手機版|小黑屋|51黑電子論壇 |51黑電子論壇6群 QQ 管理員QQ:125739409;技術交流QQ群281945664

Powered by 單片機教程網

快速回復 返回頂部 返回列表
主站蜘蛛池模板： 亚洲性人人天天夜夜摸 | 日韩一级二级片 | 天天色av| 国产亚洲精品久久久久久牛牛 | 国产精品久久久久久妇女6080 | 午夜电影合集 | 日本午夜网站 | caoporn地址| www97影院| 亚洲国产精品第一区二区 | 久久精品亚洲精品国产欧美 | 久久精品视频在线观看 | 日韩在线播放一区 | 狠狠的干狠狠的操 | 成人免费福利视频 | 欧美黄色一区 | 久久久一区二区 | 欧美视频在线一区 | 一级黄色毛片免费 | 最新免费av网站 | 亚洲激情自拍偷拍 | 中文字幕精品一区二区三区精品 | 亚洲免费三级 | 国产精品久久久 | 成人在线观看免费视频 | 国产精品资源在线 | 欧美阿v| 美女视频. | 亚洲精品888 | 久久精品高清视频 | 日韩在线观看一区 | aaa级片| av中文天堂| 手机看片1| 日韩欧美一级 | 美女一区二区在线观看 | 欧美激情精品久久久久 | 欧美一区二区视频 | 国产精品国产三级国产aⅴ中文 | 亚洲不卡在线观看 | 亚洲国产高清高潮精品美女 |