[ Struja01 @ 12.04.2008. 18:33 ] @
Nikako mi ne uspeva da napravim HEX od ovoga programa radjenog u PIC Basic-u: 'Primer upotrebe 7-segmentnog drajvera sa '1064 kolom Symbol SCL = PORTC.3 Symbol SDA = PORTC.4 Cifra Var byte[11] 'Vrednosti heksa cifara 0 - 9 Vred77 var word Dig1 Var byte 'Cifra1 Dig2 Var byte 'Cifra2 Dig3 Var byte 'Cifra3 Dig4 Var byte 'Cifra4 Cif1P var word 'Pomocna promenljiva Adr var byte 'Adresni bajt kola i var byte 'Promenljiva za ciklus Konbajt Var byte 'Kontrolni bajt SAA1064 BajtIns Var byte 'Bajt instrukcije SAA1064 Adr = $70 'Vrednost adresnog bajta Bajtins = 0 'Vrednost instrukcijskog bajta Konbajt = $F7 'Vrednost kontrolnog bajta Cifra[0]= $3F 'Vrednosti cifara na 7-segmenata Cifra[1]= $06 Cifra[2]= $5B Cifra[3]= $4F Cifra[4]= $66 Cifra[5]= $6D Cifra[6]= $7D Cifra[7]= $07 Cifra[8]= $7F Cifra[9]= $6F CIfra[10]=$00 Pocetak: Vred77 = 1 For i = 0 To 1999 Call OdrediCifre Call PosaljiCifre Vred77 = Vred77 + 1 Next i Goto pocetak '------------Odredi pojedinacne cifre----------- OdrediCifre: Dig1 = Vred77 / 1000 Cif1p = Vred77 // 1000 Dig2 = Cif1p / 100 Cif1p = Vred77 // 100 dig3 = Cif1P / 10 dig4 = vred77 // 10 Return '------------Posalji cifre na displej----------- PosaljiCifre: I2CWrite SDA, SCL, ADR, 0, Konbajt, [CIFRA[dig1], Cifra[dig2], Cifra[dig3],_ Cifra[dig4]] pause 300 Return End Nadam se da ce neko da pokusa, jel kada hocu da ga compile pojavi mi se ovo: "The Microchip assembler (MPAS) only alows up to 62 characters to be used for path and filename. Current lenght is 65 characters." |