Continue to Site

Welcome to EDAboard.com

Welcome to our site! EDAboard.com is an international Electronics Discussion Forum focused on EDA software, circuits, schematics, books, theory, papers, asic, pld, 8051, DSP, Network, RF, Analog Design, PCB, Service Manuals... and a whole lot more! To participate you need to register. Registration is free. Click here to register now.

Register Log in

Pic16f84 7 segment voltmeter picbasic pro need help!!!!!

Status
Not open for further replies.
A

Antorbd04

Junior Member level 3
Joined
Sep 11, 2012
Messages
25
Helped
2
Reputation
4
Reaction score
2
Trophy points
1,283
Location
Dhaka, Bangladesh, Bangladesh
Activity points
1,408
HERE IS CODE:
FONT Var Byte
Value2 VAR BYTE
Value1 Var Byte
Value Var Word
TRISA = 0 : TRISB = %10000000

mainloop:
FOR VALUE = 0 TO 9
FOR Value1 = 0 TO 9
FOR VALUE2 = 0 TO 9
PORTA.0 = 0 : PORTA.1 = 1 : PORTA.2 = 1
PORTB = FONT[VALUE2]
GOSUB DIS
Pause 100
NEXT VALUE2
PORTA.0 = 1 : PORTA.1 = 0 : PORTA.2 = 1
PORTB = FONT[VALUE1]
GOSUB DIS
NEXT VALUE1
PORTA.0 = 1 : PORTA.1 = 1 : PORTA.2 = 0
PORTB = FONT[VALUE]
GOSUB DIS
NEXT VALUE
goto mainloop

DIS:
FONT[0] = %1000000
FONT[1] = %1111001
FONT[2] = %0100100
FONT[3] = %0110000
FONT[4] = %0011001
FONT[5] = %0010010
FONT[6] = %0000010
FONT[7] = %1111000
FONT[8] = %0000000
FONT[9] = %0010000
RETURN

HERE IS PROTEUS FILE:
 

Attachments

  • test.zip
    15.7 KB · Views: 55

Status
Not open for further replies.

Similar threads

Part and Inventory Search

Welcome to EDABoard.com

Sponsor

Back
Top