@verb #2686:"describe_card" this none this rxdo #8934
@program #2686:"describe_card" this none this
top = this.values[1] == 10 ? "A" | tostr(this.values[1])
right = this.values[2] == 10 ? "A" | tostr(this.values[2])
bottom = this.values[3] == 10 ? "A" | tostr(this.values[3])
left = this.values[4] == 10 ? "A" | tostr(this.values[4])
return {tostr($su:space(2), top), tostr(left, $su:space(3), right), tostr($su:space(2), bottom)}
"Last modified by Floyd (#7788) on Fri Dec  7 06:51:55 2001 MST."
.