view src/testdir/color_ramp.vim @ 17952:4754339d9aee v8.1.1972

patch 8.1.1972: no proper test for getchar() Commit: https://github.com/vim/vim/commit/5d712e4672c6c8cf7f35cfb7d8eb7e8aa24062ac Author: Bram Moolenaar <Bram@vim.org> Date: Tue Sep 3 23:37:01 2019 +0200 patch 8.1.1972: no proper test for getchar() Problem: No proper test for getchar(). Solution: Add a test with special characters.
author Bram Moolenaar <Bram@vim.org>
date Tue, 03 Sep 2019 23:45:04 +0200
parents 2d54f1e7ba0f
children 89364104be93
line wrap: on
line source

" Script to generate a file that shows al 256 xterm colors

new
call setline(1, 'ANSI')

" ANSI colors
let s = ''
for nr in range(0, 7)
  let s .= "\033[4" . nr . "m    "
endfor
for nr in range(8, 15)
  let s .= "\033[10" . (nr - 8) . "m    "
endfor
" Add | in original color pair to see white background.
let s .= "\033[m|"
call setline(2, s)

" 6 x 6 x 6 color cube
call setline(3, 'color cube')
for high in range(0, 5)
  let s = ''
  for low in range(0, 35)
    let nr = low + high * 36
    let s .= "\033[48;5;" . (nr + 16) . "m  "
  endfor
  let s .= "\033[m|"
  call setline(high + 4, s)
endfor

" 24 shades of grey
call setline(10, 'grey ramp')
let s = ''
for nr in range(0, 23)
    let s .= "\033[48;5;" . (nr + 232) . "m   "
endfor
let s .= "\033[m|"
call setline(11, s)

set binary
write! <sfile>:h/color_ramp.txt
quit