Set, the card game: Difference between revisions
Content added Content deleted
m (→{{header|Wren}}: Changed to Wren S/H) |
|||
Line 304: | Line 304: | ||
=={{header|EasyLang}}== |
=={{header|EasyLang}}== |
||
<syntaxhighlight |
<syntaxhighlight> |
||
attr$[][] &= [ "one " "two " "three" ] |
attr$[][] &= [ "one " "two " "three" ] |
||
attr$[][] &= [ "solid " "striped" "open " ] |
attr$[][] &= [ "solid " "striped" "open " ] |
||
attr$[][] &= [ "red " "green " "purple" ] |
attr$[][] &= [ "red " "green " "purple" ] |
||
attr$[][] &= [ "diamond " "oval " "squiggle" ] |
attr$[][] &= [ "diamond " "oval " "squiggle" ] |
||
# |
# |
||
for card = 0 to 80 |
for card = 0 to 80 |
||
pack[] &= card |
pack[] &= card |
||
Line 330: | Line 330: | ||
print "" |
print "" |
||
. |
. |
||
ncards = |
ncards = randint 5 + 7 |
||
print "Take " & ncards & " cards:" |
print "Take " & ncards & " cards:" |
||
for i to ncards |
for i to ncards |
||
ind = |
ind = randint len pack[] |
||
cards[] &= pack[ind] |
cards[] &= pack[ind] |
||
pack[ind] = pack[len pack[]] |
pack[ind] = pack[len pack[]] |
||
Line 339: | Line 339: | ||
. |
. |
||
prcards cards[] |
prcards cards[] |
||
# |
# |
||
for i to len cards[] |
for i to len cards[] |
||
card2attr cards[i] a[] |
card2attr cards[i] a[] |