A text library need adding a function. Thanks a lot

[pBe]

Jeez AIberto , you have to make up your mind. , with that dialog another set of questions will be gong your way. [mostly from me ]

[AIberto]

Jeez AIberto , you have to make up your mind. , with that dialog another set of questions will be gong your way. [mostly from me ]

 

,,, Hi pBe , I don't know, can you understand? can you help me?

[pBe]

But I am helping you. but please refrain from changing your requirements on every post you make. Believe me, modifying someone else's code is no walk in the park, specially DCL and Lisp codes of this kind. And add to that, an ever changing requirement.

 

Now having said that. please be very clear from this post onward. I will look into this later. And hopefully the conditions will be all set / frozen / locked / no more addition / final / This is what i want / This is it really / The sky is blue..... ]

 

And also, be patient

 

pBe

 

AND also , i saw you post the same request at another forum. Makes me think twice about modifying the code now

[AIberto]

But I am helping you. but please refrain from changing your requirements on every post you make. Believe me, modifying someone else's code is no walk in the park, specially DCL and Lisp codes of this kind. And add to that, an ever changing requirement.

 

Now having said that. please be very clear from this post onward. I will look into this later. And hopefully the conditions will be all set / frozen / locked / no more addition / final / This is what i want / This is it really / The sky is blue..... ]

 

And also, be patient

 

pBe

 

Hi pBe.

I'm very glad to have your help. Now, the request should be very clear ？

[pBe]

Hi pBe.

I'm very glad to have your help. Now, the request should be very clear ？

 

AND also , i saw you post the same request at another forum. Makes me think twice about modifying the code now

 

Listen, if by tomorrow no one else jumps in to help you here or at TheSwamp, then i will work on modifying the code.

 

Cheers

pBe

[AIberto]

Listen, if by tomorrow no one else jumps in to help you here or at TheSwamp, then i will work on modifying the code.

 

Cheers

pBe

 

Ok! I will wait for your good news . ,Thanks very much!

[pBe]

There is something very odd running the original program. Can you verify if its doing the same thing on your end

 

1. Modify button doesn't do anything

2. Add/Del button at Library panel goes haywire after a while.

The program should not accept duplicates but somehow it does

Deleting duplicates add more strings

3. Up and Down button adds more string to the list.

 

EDIT: Found the problem

[AIberto]

There is something very odd running the original program. Can you verify if its doing the same thing on your end

 

1. Modify button doesn't do anything

2. Add/Del button at Library panel goes haywire after a while.

The program should not accept duplicates but somehow it does

Deleting duplicates add more strings

3. Up and Down button adds more string to the list.

 

EDIT: Found the problem

 

Hello pBe.

 

But tests found no problem on my side.

[AIberto]

Hi pBe

Sorry. I have found a BUG

 

[pBe]

That's odd. Did you try to add a new string? say "banana" click add twice then try and delete the duplicates?

 

Also notice there are duplicates on the list shown on your gif attachment?

 

Hi pBe

Sorry. I have found a BUG

 

EXACTLY! and no worries, i found the bug and fixed it.

 

Hang in there. it almost done

[AIberto]

Hi pBe.

Sorry for that. Can you fix this BUG ?

[AIberto]

EXACTLY! and no worries, i found the bug and fixed it.

Hang in there. it almost done

 

You are great !

[pBe]

Wait for it.......

 

HYG

 

 

;;;	 START | New function to switch from one list to another	;;;

(defun repstringlist ( sname / clst)
       (setq crtlstS (subst (list curkey crtlst) (Assoc curkey crtlstS) crtlstS))
(setq crtlst (cadr (Assoc sname crtlstS)))
       (setq curkey  sname)
     	(do_list "itemlist")
       (updlst "itemlist" crtlst)
     )

;;;	  END | New function to switch from one list to another		;;;

 

;;;	This is where add Additional INI files, there are currently	;;;
;;;	3 spare names as shown on the Dialog box, You can add more	;;;
;;;	As needed.							;;;
;;;	Reminder:							;;;
;;;		tcf.DCL file should also be edited for additional 	;;;
;;;      	ini files & name change   				;;;
           
       (or crtlstS (setq ini_list '([b][color="blue"]"spare3" "spare2" "spare1" "cast" "sheet" "mech" "tcf"[/color][/b])
                              crtlstS (readfn ini_list)))
       
;;;	 								;;;

 

The rest of the code are modified to accommodate multiple string list

 

;;;	     START | Edited to [b][color="blue"]READ only once [/color][/b]per drawing session		;;;
.....
;;;    START | Edited to[b][color="blue"] WRITE only once [/color][/b]per command invoke & end	;;;
....

 

Cheers

pBe

 

Modified.#4... tcfv1.1.LSP

Modified.#2...tcf.dcl

INI files ................ Ini Files.rar

Edited April 9, 2015 by pBe

[AIberto]

Wait for it.......

 

HYG

 

[ATTACH=CONFIG]53663[/ATTACH]

 

Cheers

pBe

 

Hi pBe.

Thanks very much!

 

Only strings in the list can be inserted into the drawing .

So, I want insert the machine's technical requirements in the drawing, need one by one add to the list .

 

 

This is not quickly. I think need a " Add all" button. Do you think?

[pBe]

Hi pBe.

Thanks very much!

 

You are welcome AIberto. Dont forget to give credit to the original author [ cabinsummer ]

 

Only strings in the list can be inserted into the drawing .

So, I want insert the machine's technical requirements in the drawing, need one by one add to the list .

.... This is not quickly. I think need a " Add all" button. Do you think?[

 

I know its not, ASAICT that is the way the original code works.

 

What did i say about changing the requirements AIberto?

 

I think that part is easy [or maybe not ] BUT, this will be the last one, no more additional request / no more change this to that / no more i think need a ___ / Roses are red, violets are blue / Po-tay-to po-tah-to....

 

Now if you an tell me how to get 4 gallons of water using a 3 and a 5 gallon jug, [ that one is easy ] then maybe i'll modify the code.

 

EDIT: show the solution using math equation

Edited April 7, 2015 by pBe

[AIberto]

You are welcome AIberto. Dont forget to give credit to the original author [ cabinsummer ]

 

 

 

I know its not, ASAICT that is the way the original code works.

 

What did i say about changing the requirements AIberto?

 

I think that part is easy [or maybe not ] BUT, this will be the last one, no more additional request / no more change this to that / no more i think need a ___ / Roses are red, violets are blue / Po-tay-to po-tah-to....

 

Now if you an tell me how to get 4 gallons of water using a 3 and a 5 gallon jug, [ that one is easy ] then maybe i'll modify the code.

 

EDIT: show the solution using math equation

 

oh. you test my english ,no,no,no, my english is so bad.

 

[pBe]

oh. you test my english ,no,no,no, my english is so bad.

 

Isn't that fun AIberto That's one way of doing it. good enough Check the code at post#33 for updated LSP and DCL file

 

Cheers

 

pBe

[AIberto]

Isn't that fun AIberto That's one way of doing it. good enough Check the code at post#33 for updated LSP and DCL file

 

Cheers

 

pBe

 

Thank you.sincerely .

I have seen that your modified.

but I found a BUG, Can you verify if its doing the same thing on your end

 

when I choose the commonly used is "Machining parts", and add a new string "mech string 8" ,use "Down" button moving "mech string 8" to the last.

Then, change the commonly used to "Sheet Metal parts" What has happened ?

 

The dialog exit and display error.

[pBe]

Hang on. i'll have a look-see ..... still not happening on my end.. testing.......

 

Wait for it...... [pause | stepping out for Dinner ].. " I'll be back"

 

BUG squashed

 

I need you to find more bugs to squash

 

If i've known its going to be like this , I would have written the code from scratch.

 

CODE UPATED post#33

Edited April 7, 2015 by pBe

[AIberto]

Hang on. i'll have a look-see ..... still not happening on my end.. testing.......

 

Wait for it...... [pause | stepping out for Dinner ].. " I'll be back"

 

BUG squashed

Thank you. You are very enthusiastic and friendly.

 

If i've known its going to be like this , I would have written the code from scratch.

CODE UPATED post#33

I'm so sorry. the original program have many shortcomings. If can placed Strings dynamically, that will be perfect.

 

I need you to find more bugs to squash

 

I'dont know,Is this a BUG