电风扇程序.docx

DATASEGMENTIOPORTEQU0D880H-280HIO8255A EQUIOPORT+280HIO0832AEQUIOPORT+2A0HIO8255CEQUIOPORT+282HIO8255TEQUIOPORT+283HBUF1DW0BUF2DW0CRTDBK0 IS LOWS PEED SWITCH,0DH,0AH DBK1 IS MIDS PEED,0DH,0AH DBK2 IS HIGH SPEED,0DH,0AHDBK3 IS NORMAL SPEED,0DH,0AHDBK4 IS NATURE SPEED,0DH,0AHDBK5 IS SLEEP SPEED,0DH,0AH DBSTIR ANY SWHITCH, VIEW ELECTRIC MORTOR SPEED, 0DH, 0AH DBENTER ANY KEY CAN EXIT TO DOS, 0DH, 0AH,$DATAENDSSTACKSSEGMENT DB 100 DUP(?)STACKS ENDSCODE SEGMENT ASSUME CS: CODE, DS: DATA, SS: STACKS,ES: DATASTART:MOVAX, DATA MOVDS,AX MOVES,AX MOVAX,STACKS MOVSS,AX MOVDX,OFFSET CRT MOVAH,09H INT21H MOVDX,IO8255T MOVAL,8BH OUTDX,ALJIANCE1:MOVAL,80HMOVDX,IO0832AOUTDX,ALJIANCE2:PUSHDXMOVAH,06h MOV DL,0FFH INT 21H POP DX JE INTK MOV AH,4CH INT 21H WAITP PROCPUSHAXXORAX,AXLOOP1:IN AL,61HANDAL,10HCMPAL,AHJELOOP1MOVAH,ALLOOPLOOP1POPAXRETWAITPENDPYANSHIPROCLOOP2:MOVCX,33144CALLWAITPDECBLJNZLOOP2 RETYANSHIENDPINTK:MOVDX,IO8255C INAL,DXTESTAL,01HJNZK0TESTAL,02HJNZK1TESTAL,04HJNZK2TESTAL,08HJNZK3TESTAL,10HJNZK4TESTAL,20HJNZK5 JMP JIANCE1 K0:MOVDX,IO8255AMOVAL,3FHOUTDX,ALMOVBUF1,0FFFFHMOVBUF2,9000HDELAY:MOVCX,BUF1DELAY1:LOOPDELAY1MOVAL,0FFHMOVDX,IO0832AOUTDX,ALMOVCX,BUF2DELAY2:LOOPDELAY2JMPJIANCE1OUTLVPROCMOVAL,80HMOVDX,IO0832AOUTDX,AL RETOUTLV ENDPOUTHV1PROCMOVAL,0CFHMOVDX,IO0832AOUTDX,ALRET OUTHV1 ENDPOUTHV2PROCMOVAL,0AFHMOVDX,IO0832AOUTDX,ALRET OUTHV2 ENDP K1:MOVBUF1,0FFFFHMOVBUF2,0E000HMOVDX,IO8255AMOVAL,06HOUTDX,ALJMPDELAY K2: MOV BUF1,0FFFFHMOVBUF2,0FFFFHMOVDX,IO8255AMOVAL,5BHOUTDX,ALJMP DELAYK3:MOVBUF1,0FFFFHMOVBUF2,0A000HMOVDX,IO8255AMOVAL,4FHOUTDX,ALJMPDELAYK4: MOVDX,IO8255AMOVAL,66H OUTDX,ALCALLOUTHV1MOVBL,128CALLYANSHICALL OUTLVMOVBL,128CALLYANSHIJMPJIANCE2K5:MOVDX,IO8255AMOVAL,6DHOU