home *** CD-ROM | disk | FTP | other *** search
/ The World of Computer Software / World_Of_Computer_Software-02-385-Vol-1of3.iso / x / xcu16.zip / clients / xhearts / hand.wl < prev    next >
Text File  |  1991-10-03  |  6KB  |  216 lines
  1.  
  2. XcuDeck
  3.   {
  4.   name "table"
  5.   facetWidth "0"
  6.   XcuTbl
  7.     {
  8.     name "exchange"
  9.     formatString "c\nc c c."
  10.     resizeParticipants "children"
  11.     *Tbl.background "gray90"
  12.     background "gray90"
  13.     *Tbl.borderColor "gray90"
  14.     internalHeight "20"
  15.     internalWidth "20"
  16.     interWidth "10"
  17.     interHeight "5"
  18.     equalColumns "True"
  19.     facetWidth "5"
  20.  
  21.     *Command.borderColor "Black"
  22.     *Command.background "gray90"
  23.     *biggestLabel "W"
  24.     *facetWidth "0"
  25.     XcuDeck
  26.       {
  27.       name "exchange"
  28.       *facetWidth "3"
  29.       *biggestLabel "(Click to get)\nx\nx"
  30.       XcuLabel { name "discard" label "To Discard" }
  31.       XcuLabel { name "waiting" label  "Waiting for\nfoobar's\ndiscards" }
  32.       XcuCommand { name "confirm_discard" label "Click\nto\nConfirm" }
  33.       XcuCommand { name "confirm_receipt"
  34.          label "Received from\nfoobar\n(Click to get)" }
  35.       }
  36.     XcuTbl
  37.     {
  38.     XcuCommand { name "discard0"  gravity "e" label " " }
  39.     XcuDeck
  40.         {
  41.         name "discard0"
  42.         Label { gravity "w" name "Spades0"
  43.                foreground "Black" bitmap "spade.xbm" }
  44.         Label { gravity "w" name "Hearts0"
  45.                foreground "Red" bitmap "heart.xbm" }
  46.         Label { gravity "w" name "Diamonds0"
  47.                foreground "Red" bitmap "diamond.xbm" }
  48.         Label { gravity "w" name "Clubs0"
  49.                foreground "Black" bitmap "club.xbm" }
  50.         XcuLabel { gravity "w" name "Blank0" label " " }
  51.         }
  52.     }
  53.     XcuTbl
  54.     {
  55.     XcuCommand { name "discard1"  gravity "e" label " " }
  56.     XcuDeck
  57.         {
  58.         name "discard1"
  59.         Label { gravity "w" name "Spades1"
  60.                foreground "Black" bitmap "spade.xbm" }
  61.         Label { gravity "w" name "Hearts1"
  62.                foreground "Red" bitmap "heart.xbm" }
  63.         Label { gravity "w" name "Diamonds1"
  64.                foreground "Red" bitmap "diamond.xbm" }
  65.         Label { gravity "w" name "Clubs1"
  66.                foreground "Black" bitmap "club.xbm" }
  67.         XcuLabel { gravity "w" name "Blank1" label " " }
  68.         }
  69.     }
  70.     XcuTbl
  71.     {
  72.     XcuCommand { name "discard2"  gravity "e" label " " }
  73.     XcuDeck
  74.         {
  75.         name "discard2"
  76.         Label { gravity "w" name "Spades2"
  77.                foreground "Black" bitmap "spade.xbm" }
  78.         Label { gravity "w" name "Hearts2"
  79.                foreground "Red" bitmap "heart.xbm" }
  80.         Label { gravity "w" name "Diamonds2"
  81.                foreground "Red" bitmap "diamond.xbm" }
  82.         Label { gravity "w" name "Clubs2"
  83.                foreground "Black" bitmap "club.xbm" }
  84.         XcuLabel { gravity "w" name "Blank2" label " " }
  85.         }
  86.     }
  87.     /***
  88.     XcuCommand { name "discard0"  label " " }
  89.     XcuCommand { name "discard1"  label " " }
  90.     XcuCommand { name "discard2"  label " " }
  91.     ***/
  92.     }
  93.   XcuTbl
  94.     {
  95.     name "play"
  96.     formatString "c\nc c c\nc."
  97.     resizeParticipants "children"
  98.     background "PaleGreen"
  99.     *Tbl.borderColor "PaleGreen"
  100.     *Tbl.equalColumns "True"
  101.     equalColumns "True"
  102.     internalHeight "20"
  103.     internalWidth "20"
  104.     *facetWidth "0"
  105.     facetWidth "5"
  106.  
  107.     *borderColor "PaleGreen"
  108.     *background "PaleGreen"
  109.     *Label.gravity "w"
  110.     /*****
  111.     *resizeParticipants "internals"
  112.     ****/
  113.     XcuTbl
  114.     {
  115.     XcuLabel { gravity "e" label " " }
  116.     XcuLabel { gravity "e" label " " }
  117.     XcuLabel { gravity "e" name "north_card"  label " " }
  118.     XcuDeck
  119.         {
  120.         name "north"
  121.         XcuLabel { gravity "w" name "north_Blank"  label "  " }
  122.         Label { gravity "w" name "north_Spades"
  123.                foreground "Black" bitmap "spade.xbm" }
  124.         Label { gravity "w" name "north_Hearts"
  125.                foreground "Red" bitmap "heart.xbm" }
  126.         Label { gravity "w" name "north_Diamonds"
  127.                foreground "Red" bitmap "diamond.xbm" }
  128.         Label { gravity "w" name "north_Clubs"
  129.                foreground "Black" bitmap "club.xbm" }
  130.         }
  131.     XcuLabel { gravity "e" label " " }
  132.     XcuLabel { gravity "e" label " " }
  133.     }
  134.     XcuTbl
  135.     {
  136.     XcuLabel { gravity "e" name "west_card"  label "  " }
  137.     XcuDeck
  138.         {
  139.         name "west"
  140.         XcuLabel { gravity "w" name "west_Blank"  label " " }
  141.         Label { gravity "w" name "west_Spades"
  142.                foreground "Black" bitmap "spade.xbm" }
  143.         Label { gravity "w" name "west_Hearts"
  144.                foreground "Red" bitmap "heart.xbm" }
  145.         Label { gravity "w" name "west_Diamonds"
  146.                foreground "Red" bitmap "diamond.xbm" }
  147.         Label { gravity "w" name "west_Clubs"
  148.                foreground "Black" bitmap "club.xbm" }
  149.         }
  150.     }
  151.     XcuLabel { name "middle" label "  " }
  152.     XcuTbl
  153.     {
  154.     XcuLabel { gravity "e" name "east_card"  label " " }
  155.     XcuDeck
  156.         {
  157.         name "east"
  158.         XcuLabel { gravity "w" name "east_Blank"  label " " }
  159.         Label { gravity "w" name "east_Spades"
  160.                foreground "Black" bitmap "spade.xbm" }
  161.         Label { gravity "w" name "east_Hearts"
  162.                foreground "Red" bitmap "heart.xbm" }
  163.         Label { gravity "w" name "east_Diamonds"
  164.                foreground "Red" bitmap "diamond.xbm" }
  165.         Label { gravity "w" name "east_Clubs"
  166.                foreground "Black" bitmap "club.xbm" }
  167.         }
  168.     }
  169.     XcuTbl
  170.     {
  171.     XcuLabel { gravity "e" label " " }
  172.     XcuLabel { gravity "e" label " " }
  173.     XcuLabel { gravity "e" name "south_card"  label " " }
  174.     XcuDeck
  175.         {
  176.         name "south"
  177.         XcuLabel { gravity "w" name "south_Blank"  label " " }
  178.         Label { gravity "w" name "south_Spades"
  179.                foreground "Black" bitmap "spade.xbm" }
  180.         Label { gravity "w" name "south_Hearts"
  181.                foreground "Red" bitmap "heart.xbm" }
  182.         Label { gravity "w" name "south_Diamonds"
  183.                foreground "Red" bitmap "diamond.xbm" }
  184.         Label { gravity "w" name "south_Clubs"
  185.                foreground "Black" bitmap "club.xbm" }
  186.         }
  187.     XcuLabel { gravity "e" label " " }
  188.     XcuLabel { gravity "e" label " " }
  189.     }
  190.     /****
  191.     XcuLabel { gravity "c" name "north_card"  label " " }
  192.     XcuLabel { gravity "w" name "west_card"  label " " }
  193.     XcuLabel { gravity "e" name "east_card"  label " " }
  194.     XcuLabel { gravity "c" name "south_card"  label " " }
  195.     ****/
  196.     }
  197.   XcuTbl
  198.     {
  199.     name "moon_decision"
  200.     formatString "c."
  201.     *facetWidth "5"
  202.     XcuCommand { name "lower_me"      label "Reduce my score" }
  203.     XcuCommand { name "raise_others"  label "Increase others" }
  204.     }
  205.   XcuTbl
  206.     {
  207.     name "hand_decision"
  208.     formatString "c."
  209.     *facetWidth "5"
  210.     XcuCommand { name "another_hand"    label "Another Hand" }
  211.     XcuCommand { name "no_more"      label "I Quit" }
  212.     }
  213.   }
  214.  
  215.  
  216.