Sowas wie pseudocode

' ':'0' xlate alphafeld alphafeld
%scan nach einem komma nach I
bei gefunden
alphafeld='0'+alpha_vor_dem_komma + alpha_nach_dem_koma
movel alpha nach num (10,2)
schleife : i mal num = num / 10

Gruß
Robi