//-\ ]E i n d e x

notes on projects by m.d.
categories: arctic | cryptoart | radio | internet | art | crypto | debian | laser | physics | game | radioactive entropy | funk | ghostradio | hades | informationtheory | linux | linuxaudio | math | neuralnetworks noise | nonhuman | notes |particlephysics | rng |softwaredefinedradio | tools | underinfluence | vlf movie | book
search:



code_von_franzi:

code von franzi imagemagick #!/usr/bin/perl use Image::Magick; $zaehler = 2; $spalte = 0; $zeile = 0; $e = 1; for ($i = 0; $i <= 255; $i++) { my $image = Image::Magick->new; $image->Set(size=>'256x256'); $image->ReadImage('xc:white'); for ($sp = 0; $sp <= 256*256; $sp++) { if ($spalte == 256) { $spalte = 0; # AN DEN ANFANG ZURUECK $zeile = $zeile + 1; # EINE ZEILE RUNTER # print " Zeile $zeile / 256 \t Nr. $i / 255 \t $farbe \n"; } # $e1=1/$e; # $e=1/(1+$e1); $e=1/$zaehler; # print "$e\t1/$zaehler\n"; $rot=substr($e,8,2); $gruen=substr($e,10,2); $blau=substr($e,12,2); $farbe = "#".$rot.$gruen.$blau; $image->Draw(primitive=>'point', fill=>"$farbe", points=>"$zeile,$spalte"); $spalte = $spalte + 1; $zaehler = $zaehler + 1; # print ">>>$e>$rot--$gruen--$blau>$farbe>>$spalte,$zeile\n"; } $zeile = 0; #$image->display(); $image->Write("image_1n65k$i.jpg"); print "image_65k$i.jpg\n"; } ghostradio linux




ghostradio_antenna_layout:

[image] new antenna developed 11 2014 lambda1/4 antenna in the center (probably with black cable) ghostradio entropy cryptoart




ghostradio_python_script:

maex@:~/ghostradio/code$ more ghostradio.py 
import numpy as np
import cv2
import os, sys, struct, shutil, time



print "configuring video dev"
# 1 = composite 0 = tuner usw
os.system("v4l2-ctl -i 1")


cap = cv2.VideoCapture(0)

#resolution
ret = cap.set(3,720) 
ret = cap.set(4,576)



timestr = time.strftime("%Y%m%d-%H%M%S")

grname = "gr-random-bin"+timestr


fd = os.open(grname,os.O_RDWR|os.O_CREAT)


while(True):
    # Capture frame-by-frame
    ret, frame = cap.read()

    # Our operations on the frame come here
    gray = cv2.cvtColor(frame, cv2.COLOR_BGR2GRAY)

   
    for x in xrange(1, 12):  # zeilen anzahl und position 1 = start 2 =laenge (bei 640x480 ist das theoretisch 1, 479)
        for y in xrange(1, 18):  # scanrange 1 start 2 ende (zb fuer 640x480 ist das dann 1, 640)


                output = gray[x, y]
#               output = bin(gray[x ,y])[2:].zfill(8)
#               print bin(gray[x ,y])[2:].zfill(8)
                output = chr(output)
                os.write(fd, output)  

#               change to this to write down numbers:
#               output = str(output)
#               os.write(fd, output+';')


    # Display the resulting frame
    cv2.imshow('frame',gray)
    if cv2.waitKey(1) & 0xFF == ord('q'):
        break

    #checking filesize > 2gb close file open new filename+timestamp    
    statinfo = os.stat(grname)
    b = statinfo.st_size
    b = ((b /1024)/1024)

    if b > 2000:
        os.close(fd)
        shutil.move('gr-random-bin'+timestr,'random')
        timestr = time.strftime("%Y%m%d-%H%M%S")
        grname = "gr-random-bin"+timestr
        fd = os.open("gr-random-bin"+timestr,os.O_RDWR|os.O_CREAT)

# When everything done, release the capture
os.close(fd)
cap.release()
cv2.destroyAllWindows()
maex@:~/ghostradio/code$
ghostradio linux entropy cryptoart




gr_comment:

"Ghostradio sounded suitably mysterious and dark" regine debatty ghostradio cryptoart




graphics_magic:

  als lib fuer quantenkino/ghostradio -> laut oliver laeuft die lib effizienter als imagemagick http://www.graphicsmagick.org/perl.html   linux tools




neue_links_zur_psi_forschung:

http://vimeo.com/49872335 http://wwwu.uni-klu.ac.at/gsuess/bewusstseinpsy/RonaldWeigl.htm http://derstandard.at/1326504254251/Umfrage-Zufaelle-sind-nicht-immer-rein-zufaellig?_artikelIndex=4 http://derstandard.at/1326504250904/Zufall-Wenn-der-Wuerfel-rollt ghostradio




pentagram_test:

some pics klick [image] [image] [image] [image] ghostradio