RCRPG/Tcl: Difference between revisions

This [[Tcl]] version of [[RCRPG]] was typed and tested on a cellphone, so pardon my brevity.

 

proc help args {

return "RosettaCode 3D single user dungeon in Tcl. Type a command:

}

 

 

==Alternative Version==

lappend [@ my items &] teacup ;#-- returns a reference

 

return "RosettaCode 3D single-user dungeon in Tcl. Type a command:

e(ast), s(outh), n(orth), w(est), u(p), d(own)

regsub {(.+),} [join $tmp ", "] {\1, and}

}