View/Edit #6161:desc_cards

Switch to edit mode.

Name(s): desc_cards
1:  if (caller != this)
2:    raise(E_PERM)
3:  endif
4:  stats = this:gs(player)
5:  dealer = stats[4]
6:  args && args[1] == 1 && (dealer[1] = 0)
7:  person = stats[5]
8:  pc = this:draw_hand(person)
9:  dc = this:Draw_hand(dealer)
10: pic = #5730:new_picture(player:linelength() - 3, 6, " ")
11: td = tostr("Dealer      : ", args ? this:tv(dealer[2..$]) | this:tv(dealer))
12: tp = tostr(tostr(player.name, "            ")[1..12], ": ", this:tv(person))
13: tp = tostr(tp, "  ")[1..16]
14: td = tostr(td, "  ")[1..16]
15: space = "                "
16: td = {space, tp, td, space, space, space}
17: pic = #5730:superimpose(pic, pc, 1, 1)
18: pic = #5730:superimpose(pic, dc, -1, -1)
19: pic = #5730:superimpose(pic, td, player:linelength() / 2 - 6, 2)
20: return pic
21: "Last modified by James (#6397) on Mon Mar 12 22:42:53 2007 EDT."

Verb arguments: this none this
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: James (#6397)

You are not logged in.

[home | help | who | search | setup | code]