how can I launching external programs?

Discussion of Common Lisp

Re: how can I launching external programs?

Postby methusala » Mon Nov 09, 2009 9:08 pm

Here's another way to do it, create an svg image using something like this saved to an x.svg file, with the 'Hello out there' words replaced:

Code: Select all
(setf ss "<?xml version=\"1.0\" standalone=\"no\"?>
<!DOCTYPE svg PUBLIC \"-//W3C//DTD SVG 1.1//EN\"
  \"http://www.w3.org/Graphics/SVG/1.1/DTD/svg11.dtd\">
<svg width=\"10cm\" height=\"3cm\" viewBox=\"0 0 1000 300\"
     xmlns=\"http://www.w3.org/2000/svg\" version=\"1.1\">
  <desc>Example text01 - \"Hello out there\" in blue</desc>
  <text x=\"250\" y=\"150\"
        font-family=\"Verdana\" font-size=\"55\" fill=\"blue\" >
    Hello out there
  </text>
  <!-- Show outline of canvas using rect element -->
  <rect x=\"1\" y=\"1\" width=\"998\" height=\"298\"
        fill=\"none\" stroke=\"blue\" stroke-width=\"2\" />
</svg>")
methusala
 
Posts: 35
Joined: Fri Oct 03, 2008 6:35 pm

Re: how can I launching external programs?

Postby Wolfgang Tsafack » Wed Nov 11, 2009 6:09 am

@methusala

I really don't understand what you mean. You decsrible an xml-script. How can i put my Text inside the svg-image?

@others

1. That' perhaps the better thing to do: visiting an Imagemagick-forum. I will do it, but let talk about the problem again

2. I got it with this code last weekend:

Code: Select all
(system:call-system '("C:/Program Files/ImageMagick-6.5.7-Q16/convert"
                                         "D:/LispWorks/AA/Belege-ocr/20060623-11-48-23.txt"
                                         "+append"
                                         "D:/LispWorks/AA/Belege-ocr/20060623-11-48-23.jpg"))


I became an image created on the specify directory. with add "+append" beetwen the to files-pathes, i make sure that i become only one image.

So now to anther problem. When try to run the same peace of code like this:

Code: Select all
(defun test()
(setf txt "D:/LispWorks/AA/Belege-ocr/20060623-11-48-23.txt")
(setf jpg "D:/LispWorks/AA/Belege-ocr/20060623-11-48-23.jpg")
(system:call-system '("C:/Program Files/ImageMagick-6.5.7-Q16/convert"
                      txt
                      "+append"
                      jpg)))


It didn't work!!! I later want to create image files belong to many text files. That mean I will have this patch stored in a variable. that the reason I make a probe to check out if the code work! Why didn't it work??. I became the following error:
Each element of COMMAND must be of type STRING : (C:/Program
Files/ImageMagick-6.5.7-Q16/convert TXT +append JPG)
. Please note that the first code (editing at the top of this post worked!). Why didn't the second code work?

thank you for all help
Wolfgang Tsafack
 
Posts: 12
Joined: Thu Nov 05, 2009 11:09 am

Re: how can I launching external programs?

Postby Ramarren » Wed Nov 11, 2009 6:28 am

Wolfgang Tsafack wrote:Why didn't the second code work?


This is elementary Common Lisp. In:
Code: Select all
'("C:/Program Files/ImageMagick-6.5.7-Q16/convert"
  txt
  "+append"
  jpg)


you create a list with two strings and two symbols. You want to create a list with four string, two of which are values of variables:
Code: Select all
(list "C:/Program Files/ImageMagick-6.5.7-Q16/convert"
      txt
      "+append"
      jpg)


The character #\' is syntax for QUOTE, which does not evaluate its arguments.

EDIT: Also, using SETF this way is wrong. Use LET to establish local variable binding. I suggest that you read a text on Common Lisp written in this millenium, like PCL. Unfortunately, I know not of any comparable text in German.
Ramarren
 
Posts: 613
Joined: Sun Jun 29, 2008 4:02 am
Location: Warsaw, Poland

Re: how can I launching external programs?

Postby methusala » Wed Nov 11, 2009 6:54 am

The svg file format is an xml script. Just replace the words 'hello out there' with whatever words you want to display, and open it with any browser except internet explorer.

http://www.w3.org/TR/SVG11/text.html

Lisp related books in German:

http://books.google.com/books?ei=QMX6So ... arch+Books
methusala
 
Posts: 35
Joined: Fri Oct 03, 2008 6:35 pm

Previous

Return to Common Lisp

Who is online

Users browsing this forum: Bing [Bot] and 1 guest

cron