// Step 1: storing the time as of VB1000

LD
SM0.0
TODR
VB1000
// read current date/time and store in VB1000..VB1007


// Step 2: creating a date string 'DD.MM.YY'

HTA VB1002, VB200, 2
// Day Hex->String

MOVB 46, VB202
// Point

HTA VB1001, VB203, 2
// Month Hex->String

MOVB 46, VB205
// Point

HTA VB1000, VB206, 2
// Year Hex->String


// Step 3: creating a time string 'HH:MM:SS'

HTA VB1003, VB208, 2
// Hour Hex->String

MOVB 58, VB210
// Colon

HTA VB1004, VB211, 2
// Minute Hex->String

MOVB 58, VB213
// Colon

HTA VB1005, VB214, 2
// Second Hex->String