Mercurial > vim

view src/testdir/color_ramp.vim @ 18346:5b12fd0c39c3 v8.1.2167

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
patch 8.1.2167: mapping test fails on MS-Windows Commit: https://github.com/vim/vim/commit/2559a47823a6a7827631f2e6a0176d7afce2721c Author: Bram Moolenaar <Bram@vim.org> Date: Wed Oct 16 23:33:12 2019 +0200 patch 8.1.2167: mapping test fails on MS-Windows Problem: Mapping test fails on MS-Windows. Solution: Remove all the existing Insert-mode mappings.
author Bram Moolenaar <Bram@vim.org>
date Wed, 16 Oct 2019 23:45:03 +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