Hello!! Many many thanks for all the info and all the help!!!!!!!!
You have a very good english!!!!
I have tried it and it´s better....now the two displays lights
But display two act a little strange. I will try to attach a file showing how it looks like.
The program i´m running in the film is this code...
program Disp7s;
{ $NOSHADOW}
{ $W+ Warnings} {Warnings off}
Device = mega168;
Import SysTick, Disp7sPort;
From System Import ;
Define
ProcClock = 16000000; {Hertz}
SysTick = 10; {msec}
StackSize = $0020, iData;
FrameSize = $0020, iData;
Disp7sPort = PortC, nonmux;
DispDigits = 2, iData;
DispMode = shiftLeft;
Implementation
{$IDATA}
{--------------------------------------------------------------}
{ Type Declarations }
type
{--------------------------------------------------------------}
{ Const Declarations }
{--------------------------------------------------------------}
{ Var Declarations }
{$IDATA}
var
i : byte;
{--------------------------------------------------------------}
{ functions }
{--------------------------------------------------------------}
{ Main Program }
{$IDATA}
begin
EnableInts;
DDRC:=%00001111;
mDelay(1000);
loop
for i:=10 to 20 do
write (DispOut, ByteToStr(i:2));
mDelay(1000);
endfor;
endloop;
end Disp7s.
Kindest regards
Thomas