mirror of
https://github.com/rfivet/uemacs.git
synced 2024-06-10 05:50:42 +00:00
Use lines instead of block Unicode characters.(poor rendering in some environments).
This commit is contained in:
parent
64eb0d5deb
commit
60a56b74b0
|
@ -2,7 +2,8 @@
|
||||||
|
|
||||||
#7 set $seed
|
#7 set $seed
|
||||||
#execute-file maze.cmd
|
#execute-file maze.cmd
|
||||||
execute-file floodmaz.cmd
|
#execute-file floodmaz.cmd
|
||||||
|
execute-file sharpmaz.cmd
|
||||||
set %x 2
|
set %x 2
|
||||||
set %y $curline
|
set %y $curline
|
||||||
end-of-line
|
end-of-line
|
||||||
|
|
51
sharpmaz.cmd
Normal file
51
sharpmaz.cmd
Normal file
|
@ -0,0 +1,51 @@
|
||||||
|
execute-file maze.cmd
|
||||||
|
|
||||||
|
end-of-line
|
||||||
|
set %ec &sub $curcol 1
|
||||||
|
end-of-file
|
||||||
|
set %el &sub $curline 1
|
||||||
|
set $curline %el
|
||||||
|
set %spaces $line
|
||||||
|
set $curline 1
|
||||||
|
set %old $line
|
||||||
|
set $line %spaces
|
||||||
|
set %l 2
|
||||||
|
!while &less %l %el
|
||||||
|
set $curline %l
|
||||||
|
set %c 1
|
||||||
|
!while &less %c %ec
|
||||||
|
set $curcol %c
|
||||||
|
!if ¬ &equ $curchar 32
|
||||||
|
set %v 0
|
||||||
|
set $curline &sub %l 1
|
||||||
|
set $curcol %c
|
||||||
|
!if ¬ &equ $curchar 32
|
||||||
|
set %v &add %v 1
|
||||||
|
!endif
|
||||||
|
set $curline %l
|
||||||
|
set $curcol &sub %c 1
|
||||||
|
!if ¬ &equ $curchar 32
|
||||||
|
set %v &add %v 2
|
||||||
|
!endif
|
||||||
|
set $curcol &add %c 1
|
||||||
|
!if ¬ &equ $curchar 32
|
||||||
|
set %v &add %v 4
|
||||||
|
!endif
|
||||||
|
set $curline &add %l 1
|
||||||
|
set $curcol %c
|
||||||
|
!if ¬ &equ $curchar 32
|
||||||
|
set %v &add %v 8
|
||||||
|
!endif
|
||||||
|
|
||||||
|
set $curline %l
|
||||||
|
set $curcol %c
|
||||||
|
set $curchar &asc &mid "╳╵╴┘╶└─┴╷│┐┤┌├┬┼" &add %v 1 1
|
||||||
|
!endif
|
||||||
|
set %c &add %c 1
|
||||||
|
!endwhile
|
||||||
|
set %l &add %l 1
|
||||||
|
!endwhile
|
||||||
|
set $curline 1
|
||||||
|
set $line %old
|
||||||
|
set $curline 3
|
||||||
|
set $curcol 1
|
Loading…
Reference in New Issue
Block a user