Playing cards: Difference between revisions
Content added Content deleted
(Added BBC BASIC) |
|||
| Line 244: | Line 244: | ||
LOCAL N% |
LOCAL N% |
||
FOR N% = 51 TO 1 STEP -1 |
FOR N% = 51 TO 1 STEP -1 |
||
SWAP deck.card&(N%), deck.card&(RND(N%)-1) |
SWAP deck.card&(N%), deck.card&(RND(N%+1)-1) |
||
NEXT |
NEXT |
||
ENDPROC |
ENDPROC |
||