这是源代码： .doc

这是源代码: /////////////////////////////////////////////////////////////////////////////// /?????????????????????????????????????????????????????????????????????????????/ /?用M8与LM2576制作可调数控开关电源????????????????????????????????????????????/ /?输出电压?0-30V??????????????????????????????????????????????????????????????/ /?最大输出电流?3.0A???????????????????????????????????????????????????????????/ /?截止型过电流保护?0-3.0A?连续调节????????????????????????????????????????????/ /?程序设计：吕军省????????????????????????????????????????????????????????????/ /?????????junsheng427@126.com?天津大港??????????????????????????????/ /////////////////////////////////////////////////////////////////////////////// $regfile?=?m8def.dat $crystal?=?8000000 Config?Lcdpin?=?Pin?,?Db4?=?Portb.2?,?Db5?=?Portb.3?,?Db6?=?Portb.4?,?Db7?=?Portb.5?,?E?=?Portb.0?,?Rs?=?Portd.2 Config?Lcd?=?16?*?2 定义LED是16字符，2行 Config?Adc?=?Single?,?Prescaler?=?Auto?,?Reference?=?Internal 定义ADC为单次运行模式,转换时钟-自动,内部参考电压 Config?Timer1?=?Pwm?,?Pwm?=?10?,?Compare?A?Pwm?=?Clear?Down?,?Prescale?=?1 PWM1A配置，用于数模转换, Ddrb.1?=?1??????????????????????????????????????????????????PWM1A输出端子 定义所需要变量?//////////////////////////////////////////////////////////////// Dim?V_dc?As?Long?,?V_dc1?As?Long?,?A_dc?As?Long?,?A_dc1?As?Long Dim?V1_dc?As?Word?,?V2_dc?As?Word Dim?A1_dc?As?Word?,?A2_dc?As?Word?,?A?As?Word?,?C?As?Word?,?A1?As?Word Dim?V1?As?String?*?5 Dim?V2?As?String?*?5 Dim?V3?As?String?*?5 Dim?V4?As?String?*?5 Dim?C1?As?String?*?4 Dim?Va1?As?Byte Dim?N?As?Byte?,?B2?As?Byte?,?B3?As?Byte?,?B4?As?Byte?,?B5?As?Byte 初始化设置///////////////////////////////////////////////////////////////////// ???Ddrd.3?=?0???????????????????????????????????????????????定义PD.3~PD.7为输入,上拉电阻有效?.按键初始化 ???Ddrd.4?=?0 ???Ddrd.5?=?0 ???Ddrd.6?=?0 ???Ddrd.7?=?0 ???Portd.3?=?1 ???Portd.4?=?1 ???Portd.5?=?1 ???Portd.6?=?1 ???Portd.7?=?1 ???Start?Timer1 ???Start?Adc ???Cls ???Cursor?Off ???Locate?1?,?14 ???Lcd?ON- ???A?=?0