Sokoban: Difference between revisions
Sokoban en Befunge
(Sokoban en Befunge) |
|||
Line 16:
For more information, see [http://www.sokobano.de/wiki/index.php?title=Main_Page the Sokoban wiki].
=={{header|Befunge}}==
El código no es mío, sólo lo reproduzco.
<lang befunge>
589*+0g"0"-25**689*+0g"0"-+50p v # Sokoban - (c) Matthew Westcott 2000 # 03
83*>10p99*2->:00p10gg"x"-#v_v p01g<> ## # # # # # # # # # # # # # # # # # # #
<< ^ -1g01_^#!: -1g00< > v # # # # # # # # # # # # # # # # # # # # #
|-"8"_v#-"2":_v#-"6":_v#-"4":~< <0 #
> 1 0>$1+2 0>$2+3%\0>$1+3%40v $4<#
v -"0"gp04:-1+g<v:-1+g00p03:p < $p #
>#v_"X">30g40gv0>40g10g+1-g:"#"-!|0 #
0>"x" ^v1g00p<^1g04p03:_v#`\ "9"<0 #
v:g-2++<>0gg"X"-#v_"0">00 g10gp30g^ #
4# ^g04g04g0<>" " ^v3< #
>8*-#v_$"o" v ^1-1+g0< >00g30g30v #
# >"0"-#v_v> ^v01-2++g< #
^>#$" " 0#<v>"@"50g1-50p^>g40g40gv #
v_^#!-"@"g-1+g04g01:-1+g03g00p-2++< #
>"0"50g1+50p>\10g40g+1-p30g02050g |#
>,#-:#3_@#"a\rx#glg#lw$Zhoo#Grqh$"0<#
#####################################
########
# #
# o@0o #
# #
# o#
### ###
#0 x 0#
########
</lang>
=={{header|C}}==
| |||