
Assuming thismins is required, the following result was found.
ThisHours:=(Mod(val, 86400)/3600) IfInString, ThisHours, . ThisHours:=SubStr(ThisHours, 1, InStr(ThisHours, ".")-1) ThisMins:=(Mod(val, 3600)/60) IfInString, ThisMins, . ThisMins:=SubStr(ThisMins, 1, InStr(ThisMins, ".")-1) ThisSecs:=Mod(val, 60)...

bc1qf6elrdxc968h0k673l2djc9wrpazhqtxw8qqp4
0xb038962F3809b425D661EF5D22294Cf45E02FebF