@verb #5189:":get_display" this none this rxdo #8934
@program #5189:":get_display" this none this
data = {}
data = {@data, tostr("+", $su:space(7, "-"), "+", $su:space(7, "-"), "+", $su:space(7, "-"), "+")}
cell1 = this:create_cell(this.board[1])
cell2 = this:create_cell(this.board[2])
cell3 = this:create_cell(this.board[3])
data = {@data, tostr("| ", cell1[1], " | ", cell2[1], " | ", cell3[1], " |")}
data = {@data, tostr("| ", cell1[2], " | ", cell2[2], " | ", cell3[2], " |")}
data = {@data, tostr("| ", cell1[3], " | ", cell2[3], " | ", cell3[3], " |")}
data = {@data, tostr("+", $su:space(7, "-"), "+", $su:space(7, "-"), "+", $su:space(7, "-"), "+")}
cell1 = this:create_cell(this.board[4])
cell2 = this:create_cell(this.board[5])
cell3 = this:create_cell(this.board[6])
data = {@data, tostr("| ", cell1[1], " | ", cell2[1], " | ", cell3[1], " |")}
data = {@data, tostr("| ", cell1[2], " | ", cell2[2], " | ", cell3[2], " |")}
data = {@data, tostr("| ", cell1[3], " | ", cell2[3], " | ", cell3[3], " |")}
data = {@data, tostr("+", $su:space(7, "-"), "+", $su:space(7, "-"), "+", $su:space(7, "-"), "+")}
cell1 = this:create_cell(this.board[7])
cell2 = this:create_cell(this.board[8])
cell3 = this:create_cell(this.board[9])
data = {@data, tostr("| ", cell1[1], " | ", cell2[1], " | ", cell3[1], " |")}
data = {@data, tostr("| ", cell1[2], " | ", cell2[2], " | ", cell3[2], " |")}
data = {@data, tostr("| ", cell1[3], " | ", cell2[3], " | ", cell3[3], " |")}
data = {@data, tostr("+", $su:space(7, "-"), "+", $su:space(7, "-"), "+", $su:space(7, "-"), "+")}
return data
"Last modified by Floyd (#7788) on Fri Dec  7 06:57:29 2001 MST."
.