Author Topic: [original works] adds GOTO instruction to AutoLisp language  (Read 1281 times)

0 Members and 2 Guests are viewing this topic.

baitang36

  • Newt
  • Posts: 51
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #15 on: March 23, 2020, 10:20:58 PM »
Why do you say there is no GOTO you can use defun statements, I wrote a bubble sort that required dual defuns for the testing part and looping through the data set. Took a BASIC version and rewrote in lisp.

Ps here is my GOTO Autocad command.
thank you
You don't see what I mean. My GOTO is executed in the middle of one LSP function to the middle of another.

d2010

  • Newt
  • Posts: 42
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #16 on: March 24, 2020, 01:35:39 PM »
RE:Why do you say there is no GOTO you can use defun statements, I wrote a bubble sort that required dual defuns for the testing part and looping through the data set. Took a BASIC version and rewrote in lisp.
 :whistling:
Even today i keep this Qsort.lisp(after 25years). I think is very good-source. You can replace Bsort.Lsp with qsort.lsp

Code: [Select]
;Lisp2C
;AutoLISP to C (ADS) Translator User's Manual, Version 2.9, 1st revision
;(C) 1993, 1995 BASIC d.o.o Jesenkova 5, 61000 Ljubljana, Slovenia
;Tel: +386 1 314 069Fax: +386 1 318 211 e-mail: Jure Spiler jure @basic.si Joze Marincek
joze.marincek@mat.uni-lj.si CompuServe: [70541,1765]


;;implementat la (_lspfn_list_qsort)
(defun Qsort (lst / x l e g)
  (if lst
   (progn
    (setq x (nth (/ (length lst) 2) lst)
          l nil e nil g nil)

    (while (not (null lst))
      (cond ((= (car lst) x) (setq e (cons x e)))
            ((< (car lst) x) (setq l (cons (car lst) l)))
            (t (setq g (cons (car lst) g)))
      )
      (setq lst (cdr lst))
    )
    (setq l (Qsort l)
          g (Qsort g))
    (append l e g)
   )
   nil
  )
)

kozmos

  • Newt
  • Posts: 38
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #17 on: March 27, 2020, 02:22:30 AM »
Fas to LSP program is a commercial software written by my friend. It can be converted almost perfectly, and most of the LSP generated can be loaded and run normally. He sells the software for 200 dollars. You can provide an fas file and I will decompile it for you to see
a crack software can claim itself as "commecial" software! shame
KozMos Inc.

baitang36

  • Newt
  • Posts: 51
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #18 on: March 27, 2020, 04:14:19 AM »

a crack software can claim itself as "commecial" software! shame
Crack usually means to modify, the software just translates, it doesn't change the content of the program

baitang36

  • Newt
  • Posts: 51
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #19 on: March 27, 2020, 04:16:46 AM »
This approach has become a tool. See     http://bbs.mjtd.com/thread-181151-1-1.html

baitang36

  • Newt
  • Posts: 51
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #20 on: March 27, 2020, 04:19:26 AM »

Coder

  • Swamp Rat
  • Posts: 789
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #21 on: March 27, 2020, 04:35:06 AM »
a crack software can claim itself as "commecial" software! shame

Agree with you.

Crack usually means to modify, the software just translates, it doesn't change the content of the program

Crack means that you are violating people's rights, in other words crackers = hackers = thieves ( burglars ).

I don't know why the admins allow you to post such threads in this esteemed and professional forum that is full of great people !



baitang36

  • Newt
  • Posts: 51
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #22 on: March 27, 2020, 07:31:50 AM »
a crack software can claim itself as "commecial" software! shame

Agree with you.

Crack usually means to modify, the software just translates, it doesn't change the content of the program

Crack means that you are violating people's rights, in other words crackers = hackers = thieves ( burglars ).

I don't know why the admins allow you to post such threads in this esteemed and professional forum that is full of great people !

You don't understand me at all. I study conservation, not destruction. It is true that decompilation exists, and I want it to fail!

baitang36

  • Newt
  • Posts: 51
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #23 on: March 27, 2020, 07:46:05 AM »
According to the law, in order to learn and study the design ideas and principles contained in the software, users who use the software by means of installation, display, transmission, storage, etc., do not need to obtain the license of the software copyright owner, and do not need to pay compensation to the owner

MP

  • Seagull
  • Posts: 17577
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #24 on: March 27, 2020, 08:38:50 AM »
Crack means that you are violating people's rights, in other words crackers = hackers = thieves ( burglars ).

x 2

According to the law, in order to learn and study the design ideas and principles contained in the software, users who use the software by means of installation, display, transmission, storage, etc., do not need to obtain the license of the software copyright owner, and do not need to pay compensation to the owner

Citation needed.
\|// Set goal. Experiment tirelessly until
|Oo| practice has become expertise.  Loop.
|- | LinkedIn | Dropbox

John Kaul (Se7en)

  • Administrator
  • Needs a day job
  • Posts: 9380
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #25 on: March 27, 2020, 08:42:20 AM »
Ignoring the fact that decompilers exist will not make them go away. baltang36 is posting methods to improve compilations through the use of better programming methods and information. Meaning: use the knowledge (s)he is posting to improve your programs/methods/etc. so your compiled programs are harder to decompile.
TheSwamp.org (serving the CAD community since 2003)

Donate to TheSwamp.org

MP

  • Seagull
  • Posts: 17577
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #26 on: March 27, 2020, 08:50:05 AM »
Iím going to break into your house. I will lift some property while Iím there but worry not - Iím doing research - I will share with others how I was able to breach your security. In the end your house - and your friendís houses - will be much safer - the property I lifted was merely an education fee.
\|// Set goal. Experiment tirelessly until
|Oo| practice has become expertise.  Loop.
|- | LinkedIn | Dropbox

John Kaul (Se7en)

  • Administrator
  • Needs a day job
  • Posts: 9380
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #27 on: March 27, 2020, 09:10:59 AM »
If I had better locks then you couldn't.  ...Around and around we go.


I agree that people should be nice too--who wouldn't--but I don't ignore that there are bad people. If I used a stick as a door lock to my house; who should I then be angry at if my house gets broken into?
TheSwamp.org (serving the CAD community since 2003)

Donate to TheSwamp.org

MP

  • Seagull
  • Posts: 17577
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #28 on: March 27, 2020, 09:40:37 AM »
If I used a stick as a door lock to my house; who should I then be angry at if my house gets broken into?

Rationalizing burglary is _______ ______.
\|// Set goal. Experiment tirelessly until
|Oo| practice has become expertise.  Loop.
|- | LinkedIn | Dropbox

John Kaul (Se7en)

  • Administrator
  • Needs a day job
  • Posts: 9380
Re: [original works] adds GOTO instruction to AutoLisp language
« Reply #29 on: March 27, 2020, 09:59:34 AM »
Acknowledging that burglary exists, or studying how a lock works, or wanting a better lock in general is Ďrationalizing burglaryí? Donít be absurd.

I donít agree with compiling lisp code but I donít begrudge the people that want to protect their IP if they feel itís necessary.
TheSwamp.org (serving the CAD community since 2003)

Donate to TheSwamp.org