Jump to content

Featured Replies

Posted
;;; ...an idea

;;; how to import some TEXT and translate it to integer-sequences to use this data
;;; for LIVE-CODING. also possible without .txt, but i tried to IMPORT it. perhaps
;;; in your live-coding session a friend of you is writing the text in a different
;;; location and you could share it (the path) via CLOUD :-D
;;; i know, this kind of data... is not very smart, but a little bit steam-punky :-)


(defparameter *map-integer1*
  '(((a à á â ã ä å æ ą) 0)
    (b 1)
    ((c ç ć) 2)
    (d 3)
    ((e è é ê ë ę) 4)
    (f 5)
    (g 6)
    (h 7)
    ((i ì î ï) 8)
    (j 9)
    (k 10)
    ((l ł) 11)
    (m 12)
    ((n ñ ń) 13)
    ((o ò ó ô õ ö) 14)
    (p 15)
    (q 16)
    (r 17)
    ((s ś ß) 18)
    (t 19)
    ((u ù ú û ü) 20)
    (v 21)
    (w 22)
    (x 23)
    ((y ý ÿ) 24)
    ((z ż ź) 25)))


;;; 1) open/write a .txt-file
;;; 2) define your path (inside the loop)
;;; 3) start the loop 
;;; 4) write/change your .txt, and SAVE it
;;; => every 2 seconds it will be read by the code


(loop repeat 60
  do (progn
       (print (progn
                (setf x (string-to-list (let ((in (open "/Users/meierandre/Desktop/test.txt"))) ;; use your own path!!
                                          (read-line in))))
                (text-map *map-integer1* (loop for i in x append (explode i)))))
       (print x))

  do (sleep 2)) ;;; every 2 seconds the loop is reading your .txt, change variable x and PRINT it

 

for this example i used PRINT (so you see what is happening), but you could also "rewrite" a variable inside your sound-live-coding-CODE/FUNCTION

 

 

 

Create an account or sign in to comment


Copyright © 2014-2025 Opusmodus™ Ltd. All rights reserved.
Product features, specifications, system requirements and availability are subject to change without notice.
Opusmodus, the Opusmodus logo, and other Opusmodus trademarks are either registered trademarks or trademarks of Opusmodus Ltd.
All other trademarks contained herein are the property of their respective owners.

Powered by Invision Community

Important Information

Terms of Use Privacy Policy