Drek's recent activity
-
Comment on 'Grand Theft Auto' maker Take-Two to let go 5% of staff, scrap some projects in ~games
-
Comment on No, aliens haven’t visited the Earth. Why are so many smart people insisting otherwise? in ~space
Drek Link ParentI really want the "Non-Human origin" bit to be super advanced cephalopods that have been hiding from us deep in the ocean. It would fall in line with advanced craft, Non-Human biology, and take...I really want the "Non-Human origin" bit to be super advanced cephalopods that have been hiding from us deep in the ocean. It would fall in line with advanced craft, Non-Human biology, and take away the barrier of space travel being difficult.
Do I think it's likely? Absolutely not, but it would be the most plausible explanation if Gorsuch has good Intel.
-
Comment on The original "Common Lisp the Language, Second Edition" in high quality typesetting in ~comp
Drek Link ParentThank you! I just had a curiosity and figured it would be a good tool to have in the belt. I'd love to write efficiency/productivity scripts as a tech consultant one day.Thank you! I just had a curiosity and figured it would be a good tool to have in the belt. I'd love to write efficiency/productivity scripts as a tech consultant one day.
-
Comment on The original "Common Lisp the Language, Second Edition" in high quality typesetting in ~comp
Drek Link ParentBecause I taught myself and I don't even understand the question you're asking! :)Because I taught myself and I don't even understand the question you're asking! :)
-
Comment on The original "Common Lisp the Language, Second Edition" in high quality typesetting in ~comp
Drek Link ParentI have a background in Web Design and Python and took up AUTOlisp when I got a job using CAD as a Civil Drafter. I haven't really done anything special yet. I have a simple function that draws...I have a background in Web Design and Python and took up AUTOlisp when I got a job using CAD as a Civil Drafter. I haven't really done anything special yet. I have a simple function that draws pipes in model space with the user giving it a size, start, and end point. I also wrote a function that takes 2 or more multi leaders, determines the distance between thier point locations, and determine the slope using the text inside as elevation data. I use it to help check multiple spots on ADA ramps and parking grades!
Here's the function for the last one:
(defun c:sf( / input) ; Set-up Error Handling (setq old_error_msg *error*) (setq *error* new_error_msg) (setq old_color (getvar "cecolor")) (setq old_echo (getvar "cmdecho")) (setq old_layer (getvar "clayer")) (setq old_snap (getvar "osmode")) (defun as( / rise run slope mleader1 mleader2 pre_point1 pre_point2 pt1 pt2 dline dister rele1 rele2 ele1 ele2) ;; Load Visual Lisp Functions (vl-load-com) ;; Set active doc (Required for vlisp) (setq *doc* (vla-get-activedocument (vlax-get-acad-object))) ;; Prompt user to select distance line. (setq tflag t) (while (= t tflag) (setq user_input (vl-catch-all-apply 'car (list (entsel "\n Select a Polyline for Distance:")))) (if (/= user_input nil) (if (= "LWPOLYLINE" (cdr (nth 0 (cdr (entget user_input))))) (progn (setq dline user_input) (setq tflag nil) ) ;else re-select (princ "\n Bad Selection.... \n Select a Polyline for Distance:") ) (princ "\n BAD SELECTION... TRY AGAIN...") ) ) ;; Set the lenght of the user selected distance line to <run> (setq run (getpropertyvalue dline "length")) ;; Prompt user for the first mleader and save it as <mleader1> (setq tflag t) (while (= t tflag) (setq user_input (vl-catch-all-apply 'car (list (entsel "\n Select First Multileader:")))) (if (/= user_input nil) (if (= "MULTILEADER" (cdr (nth 0 (cdr (entget user_input))))) (progn (setq mleader1 (vlax-ename->vla-object user_input)) (setq tflag nil) ) ;else re-select (princ "\n Bad Selection.... \n Select First Multileader:") ) (princ "\n BAD SELECTION... TRY AGAIN...") ) ) ;; Extract text string from <mleader1> (setq ele1 (vlax-get-property mleader1 'TextString)) ;; Prompt user for the second mleader and save it as <mleader2> (setq tflag t) (while (= t tflag) (setq user_input (vl-catch-all-apply 'car (list (entsel "\n Select Second Multileader:")))) (if (/= user_input nil) (if (= "MULTILEADER" (cdr (nth 0 (cdr (entget user_input))))) (progn (setq mleader2 (vlax-ename->vla-object user_input)) (setq tflag nil) ) ;else re-select (princ "\n Bad Selection.... \n Select Second Multileader:") ) (princ "\n BAD SELECTION... TRY AGAIN...") ) ) ;; Extract text string from <mleader2> (setq ele2 (vlax-get-property mleader2 'TextString)) ;; Parse the mleader text strings to real numbers (setq rele1 (atof ele1)) (setq rele2 (atof ele2)) ;;Get Points from Mleaders (setq pre_point1 (vlax-invoke mleader1 'getleaderlinevertices 0)) (setq pt1 (strcat (rtos (nth 0 pre_point1)) "," (rtos (nth 1 pre_point1)) ",0")) (setq pre_point2 (vlax-invoke mleader2 'getleaderlinevertices 0)) (setq pt2 (strcat (rtos (nth 0 pre_point2)) "," (rtos (nth 1 pre_point2)))) ;; Set the rise variable to the absolute value of (<mleader1> - <mleader2>) (setq rise (abs (- rele1 rele2))) ;; Echo the Rise (princ (strcat "\n RISE: " (rtos rise) "' \n")) ;; Calculate the slope (setq slope (rtos (* 100 (/ rise run)) 2 2)) ;; Draw a dimaligned and replace the text with the slope (command "dimaligned" pt1 pt2 "t" (strcat "RISE: " (rtos rise 2 2) "' \n" "RUN: " (rtos run 2 4) "' \n SLOPE: " slope "%") pause) ; Echo Rise, Run, & Slope (princ "\n |==============================|") (princ "\n |=== RISE === RUN === SLOPE ===|") (princ "\n |==============================|") (princ (strcat "\n" "RISE: " (rtos rise 2 2) "' \n")) (princ (strcat "RUN: " (rtos run 2 4) "' \n")) (princ (strcat "SLOPE: " slope "% \n")) (princ) )I posted this on my phone if anything looks off
-
Comment on What is something that had far more variety than you expected once you looked into it? in ~talk
Drek Link ParentThat's wonderful to hear! I've been leaning towards getting a MFLB.That's wonderful to hear! I've been leaning towards getting a MFLB.
-
Comment on My wife's beautiful garden in ~hobbies
-
Comment on My wife's beautiful garden in ~hobbies
Drek Link ParentWe live where the tornados come from so I suppose we've just been fortunate so far. I have the frame cemented into the ground and it's dug down about 8" below grade. The top is just below the...We live where the tornados come from so I suppose we've just been fortunate so far. I have the frame cemented into the ground and it's dug down about 8" below grade. The top is just below the privacy fence.
We lost a panel to some wind a few months ago and never found it 😭.
-
Comment on My wife's beautiful garden in ~hobbies
Drek Link ParentShe planted early to mid April on the cantaloupe and the cucumber. Most of the other stuff of was started in March in a 2' x 4' grow tent. Finding the right watering schedule and how much to let...She planted early to mid April on the cantaloupe and the cucumber. Most of the other stuff of was started in March in a 2' x 4' grow tent.
Finding the right watering schedule and how much to let them dry back is an art, in my opinion!
-
Comment on The original "Common Lisp the Language, Second Edition" in high quality typesetting in ~comp
Drek LinkI just downloaded the PDF and plan on reading it soon! I use AUTOLisp for work on occasion and I enjoy the syntax.I just downloaded the PDF and plan on reading it soon! I use AUTOLisp for work on occasion and I enjoy the syntax.
-
Comment on My wife's beautiful garden in ~hobbies
Drek Link ParentThere's literally a propagation tent in our bedroom. 😭😭😭There's literally a propagation tent in our bedroom. 😭😭😭
-
Comment on My wife's beautiful garden in ~hobbies
Drek Link ParentOn the left are two cattle panels that were bent, tied to T-posts at the bottom, and zip tied together at the top. Here's a link to the greenhouse:...On the left are two cattle panels that were bent, tied to T-posts at the bottom, and zip tied together at the top.
Here's a link to the greenhouse: https://www.amazon.com/Upgraded-Greenhouse-Polycarbonate-Window-Outdoor/dp/B098TJGK5H?ref_=ast_sto_dp&th=1&psc=1
-
Comment on My wife's beautiful garden in ~hobbies
Drek Link ParentI appreciate the prompt! My wife has always had houseplants and loved horticulture. After the pandemic she decided to try and grow as much as she could for our home needs. My daughter eats a lot...- Exemplary
I appreciate the prompt!
My wife has always had houseplants and loved horticulture. After the pandemic she decided to try and grow as much as she could for our home needs. My daughter eats a lot of cantaloupe, my wife's mother and my wife make all sorts of things with the peppers, and I'm excited about using the dill she is growing to try and pickle the cucumbers! It's also why you see the chicken coop in the background. We would like to try and produce at home as much as we consume as reasonably possible.
-
Comment on My wife's beautiful garden in ~hobbies
Drek Link ParentThat's awesome! We have a couple tucked into the corner. 😂That's awesome! We have a couple tucked into the corner. 😂
-
My wife's beautiful garden
58 votes -
Comment on What is something that had far more variety than you expected once you looked into it? in ~talk
-
Comment on What is something that had far more variety than you expected once you looked into it? in ~talk
Drek Link ParentDo you have any suggestions for reading more about this?Do you have any suggestions for reading more about this?
-
Comment on What is something that had far more variety than you expected once you looked into it? in ~talk
Drek (edited )Link ParentHere's something specific to terpenes: https://takomawellness.com/what-is-a-cannabis-terpene/ Here's one for general consumption:...Here's something specific to terpenes: https://takomawellness.com/what-is-a-cannabis-terpene/
Here's one for general consumption: https://www.health.harvard.edu/blog/if-you-use-cannabis-do-it-safely-202301172876
Here's one saying TCH prevents coronavirus from entering human cells: https://today.oregonstate.edu/news/oregon-state-research-shows-hemp-compounds-prevent-coronavirus-entering-human-cells
-
Comment on What is something that had far more variety than you expected once you looked into it? in ~talk
Drek LinkCannabis strains. I thought terpenes were just a sales tactic until my wife started working in the industry. Turns out it really can taste and smell like oranges, lemons, pine, ect. It's quite...Cannabis strains. I thought terpenes were just a sales tactic until my wife started working in the industry. Turns out it really can taste and smell like oranges, lemons, pine, ect. It's quite incredible really!
-
Comment on Tildes predictions (a time capsule for 10 years from now) in ~talk
Drek Link ParentHere's to hoping you're wrong but planning for anything!Here's to hoping you're wrong but planning for anything!
This is really interesting to me. I had no clue Take-Two was associated with Rockstar or GTA. I used to be really plugged into the industry, to the point I wanted to go to full-sail and work at Rockstar when I was graduating High School. The title "Grand Theft Auto maker" had me really confused at first.
It's also staggering to me 5% of Take-Two is 600 employees. I'm honestly not sure if I should be impressed or disappointed of my ignorance here.