Try using Outpt, it'll take a few lines but I use this method all the time. :Outpt(1,1,A) :Outpt(1,4,"X") :Outpt(1,5,A(-Q)) :Outpt(1,8,"=") :Outpt(1,9,B) :Outpt(1,12,"Y") :Outpt(1,13,B(-Q)) This allows 3 digits (including a negative sign) for each number. -Joseph Have A :-) Nice Day