Just a quick look at it before I rush:
>
> (setq ki (-1.2 -12.2 -12.4 -8.9 -3.5 2.7 9.2 12.9 10.5 5.1 -1.5 -6.8 -10.1 0.83 0.82 0.77 0.71 0.64 0.61 0.68 0.72 0.77 0.81 0.85 0.85))
>......
All these lines should read:
(setq xx '(yyy yyy yyy....yyy))
~
You're missing the quote "'".
> ((= month 1) (setq klimat (nth 2 klimatlista) (nth 14
>.....
All these lines should read:
((= xxx y) (setq zzz (list (www......) (.....))))
~~~~~ ~
You're missing '(list' and one right paranthese.
This is my favourite :)
" Sa jag inte åt dig att välja en del av byggnaden du ville konstruera :
"
(princ " 8 - Stor risk för genomgående springor)
This line should read:
(princ " 8 - Stor risk för genomgående springor")
~
You're missing the quote '"'.
(this is the one that gives you exceeded string length, but I'm
surprised you get this far.)
I'm not sure if these are all, but if not notify me again.
Hope this helps,
Mortenw
"Malformed string at line 630".
I then right-clicked, and chose "Goto Error" from the
popup menu, and LispPad took me to the following Line:
(princ " 8 - Stor risk för genomgående springor) (terpri) (terpri)
Simply Amazing!
--
/*******************************************************/
/* Tony Tanzillo Design Automation Consulting */
/* Expert AutoCAD Programming and Customization */
/* --------------------------------------------------- */
/* Co-Author of Maximizing AutoCAD R13 and */
/* Maximizing AutoLISP for AutoCAD R13 */
/* --------------------------------------------------- */
/* Contributing Author, CADENCE Magazine */
/* --------------------------------------------------- */
/* 71241...@compuserve.com */
/* tony.t...@worldnet.att.net */
/* http://ourworld.compuserve.com/homepages/tonyt */
/*******************************************************/
Erik halvarsson <b95...@blg.du.se> wrote in article
<32AEF8...@blg.du.se>...
> ;;Intro till lispinlämningsuppgift i ByggCAD-Systemutveckling
> ;;Av Erik Halvarsson och Anders Hellman B2
>
> (defun c:run ()
> (textscr) (terpri) (terpri) (terpri) (terpri) (terpri)
> (write-line " Med hjalp av detta program kan du se ") (terpri)
> (write-line " vad din byggnad klara avseende värme och fukt.")
(terpri)
> (forutsattningar)
> )
> <<<<<<<<<<<<<<<<<snip>>>>>>>>>>>>>>>>>>>
Well, you do have un-matched double quotes. I simply did a change of
" to ", and the editor reported there were only 311 instances. It was
then a matter of searching through the file for each double quote and
seeing where the matching one was.
You will find the missing double quote on line 633.
What has happened is that with the double quote missing, just a
carriage return and linefeed in a string will cause AutoLISP to tell
you that the maximum length of a string has been exceeded.
Regards,
Ian A. White, CPEng
waiw...@zip.com.au
WAI Engineering
Sydney 2000
Australia
Junk e-mail will be returned, as is, to the sender or the sender's host system.
Erik halvarsson <b95...@blg.du.se> wrote in article
<32AEF8...@blg.du.se>...
The problem is probably an unclosed quote,
Your quite lucky for anyone to look though the chunk of code you have,
anyway there seems to be an unclose quote about 3/4 of the way thourgh the
code:
(princ " 7 - Takstolar bryter igenom isolering i vindsbjälklag ")
(terpri)
(princ " 8 - Stor risk för genomgående springor ;|should there be a
quote here?|; ) (terpri) (terpri)
(setq deltaU (getint " Välj en av de ovanstående parametrarna som kan
tänkas uppkomma i din konstruktion. ")) (terpri) (terpri)
There could well be more, (I'm not about to keep looking!). I can't think
of any utilities off the top of my head which could find them, maybe MS
Word's powerful search capabilities could find lines with only one quote?
Anyway good luck with the project,
Darryl