ntg-context - mailing list for ConTeXt users
 help / color / mirror / Atom feed
From: Hans Hagen <pragma@wxs.nl>
To: mailing list for ConTeXt users <ntg-context@ntg.nl>
Subject: Re: drops module (draft)
Date: Thu, 06 Dec 2012 20:44:12 +0100	[thread overview]
Message-ID: <50C0F58C.3020204@wxs.nl> (raw)
In-Reply-To: <alpine.LNX.2.02.1212061254240.11206@ybpnyubfg.ybpnyqbznva>

On 12/6/2012 7:05 PM, Aditya Mahajan wrote:

> I always thought that shadows were possible to do in PDF (after all TikZ
> does it using some type of PDF primitives). Since you are the PDF
> expert, I am interested in knowing why you choose to go the ImageMagic
> route.

not so efficient but it shows a bit what bitmaps can do

\starttext

\startluacode
     local format = string.format
     local concat = table.concat
     function document.TestBitmap(nx,ny)
         nx = math.round(nx/65536)
         ny = math.round(ny/65536)
         nx = 2 * math.round(nx/2)
         ny = 2 * math.round(ny/2)
         local r = { }
         local dx = 255/nx
         local dy = 255/ny
         for i=1,ny/2 do
             local n = i*dy
             local c = { }
             for j=1,nx/2 do
                 c[#c+1] = format("%02x",j*dx+n)
             end
             for j=nx/2,1,-1 do
                 c[#c+1] = format("%02x",j*dx+n)
             end
             c = concat(c,"",1,nx)
             r[#r+1] = c
         end
         for i=ny/2,1,-1 do
             local n = i*dy
             local c = { }
             for j=1,nx/2 do
                 c[#c+1] = format("%02x",j*dx+n)
             end
             for j=nx/2,1,-1 do
                 c[#c+1] = format("%02x",j*dx+n)
             end
             c = concat(c,"",1,nx)
             r[#r+1] = c
         end
         r = concat(r,"\r",1,ny)
         figures.bitmapimage {
             data        = r,
             xresolution = nx,
             yresolution = ny,
         }
     end
\stopluacode

\defineoverlay
   [BitMess]
   [{\scale
       [width=\dimexpr\overlaywidth+2ex,height=\dimexpr\overlayheight+2ex]
 
{\ctxlua{document.TestBitmap(\number\dimexpr\overlaywidth,\number\dimexpr\overlayheight)}}}]

\framed
   [width=10cm,
    height=10cm,
    frame=off,
    background={BitMess,color},
    backgroundcolor=white]
   {test}

\stoptext

-----------------------------------------------------------------
                                           Hans Hagen | PRAGMA ADE
               Ridderstraat 27 | 8061 GH Hasselt | The Netherlands
     tel: 038 477 53 69 | voip: 087 875 68 74 | www.pragma-ade.com
                                              | www.pragma-pod.nl
-----------------------------------------------------------------
___________________________________________________________________________________
If your question is of interest to others as well, please add an entry to the Wiki!

maillist : ntg-context@ntg.nl / http://www.ntg.nl/mailman/listinfo/ntg-context
webpage  : http://www.pragma-ade.nl / http://tex.aanhet.net
archive  : http://foundry.supelec.fr/projects/contextrev/
wiki     : http://contextgarden.net
___________________________________________________________________________________


  parent reply	other threads:[~2012-12-06 19:44 UTC|newest]

Thread overview: 16+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2012-12-06 17:08 Peter Rolf
2012-12-06 18:05 ` Aditya Mahajan
2012-12-06 18:18   ` Wolfgang Schuster
2012-12-07 12:01     ` Peter Rolf
2012-12-07 12:57       ` Wolfgang Schuster
2012-12-06 18:35   ` Marco
2012-12-06 19:46     ` Hans Hagen
2012-12-07 12:04     ` Peter Rolf
2012-12-07 12:49       ` Marco Patzer
2012-12-07 13:27         ` Peter Rolf
2012-12-06 19:05   ` Hans Hagen
2012-12-06 19:44   ` Hans Hagen [this message]
2012-12-07 11:59   ` Peter Rolf
2012-12-07 18:02 ` Otared Kavian
2012-12-07 20:53   ` Hans Hagen
2012-12-08 13:03   ` Peter Rolf

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=50C0F58C.3020204@wxs.nl \
    --to=pragma@wxs.nl \
    --cc=ntg-context@ntg.nl \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).