Snake and ladder: Difference between revisions

m
→‎{{header|REXX}}: aligned a couple of comments.
m (→‎{{header|Perl}}: fixed <lang> tag)
m (→‎{{header|REXX}}: aligned a couple of comments.)
Line 1,072:
do k=1 for 100; @.k=k /*assign default values for board cells*/
end /*k*/ /* [↑] number when landing on a square*/
/* [↓] define ladder destinationdestinations. */
@.4=14; @.9=31; @.20=38; @.28=84; @.40=59; @.51=67; @.63=81; @.71=91; @.95=75
@.17=7; @.54=34; @.62=19; @.64=60; @.87=24; @.93=73; @.99=78
/* [↑] define snake destinationdestinations. */
player.= 1 /*start all players on the 1st square. */
do games=1 until $==100; say center(' turn ' games" ", 75, "─")