Time and timemeasures to present on a VGA screen !

Johan1968

Is there any one that have a sample of to present time and measuerd time at a VGA Screan on a Propeller ?
Regards Johan ( Novice in Propeller )

Rayman

Do you mean real time from a real-time clock like the DS1307? Or, elapsed time from some event?

Johan1968

Hello !
i mean processtime. from two Inputs .
Have you some sample ?
Regards Johan

Johan1968

Oh sorry !

i meant elapsed time from some event, from two inputs . for eg. P5, P6


·

Rayman

Well, I have a complex example that shows charge time that I'll try to wittle down a bit:

 
OBJ
  snum :  "simple_Numbers"  'for 0 padded numbers
 
Var
  long Charging_tinit
  long Charging_tsecs
  
PUB Start_Charging
  tinit:=cnt  'record counter at start
  tsecs:=0    'init seconds 
  repeat
    CalculateAndShowTime
 
PRI CalculateAndShowTime
  'update charge seconds
    repeat until (cnt-charging_tinit)<clkfreq
      charging_tsecs++
      charging_tinit+=clkfreq
    ttenths:=10*(cnt-charging_tinit)/clkfreq  
    
  'show seconds
    row:=20
    col:=10
    print_string(string("  Charge Time: "))
    print_string(snum.decf(charging_tsecs,3))
    print(".")
    print_string(snum.decx(ttenths,1))
    print_string(string(" sec"))

This is the core of it...