Mi primer tuerca con OPENSCAD..

Estoy impresionado con este programa OPENSCAD un lenguaje parametrico para CAD 2D y 3D con el cual podemos crear objetos e imprimirlos con nuestra impresora 3D existe blender, autocad y otros pero este soft es lo mas :) utiliza una libreria de geometria CGAL por lo cual es un lenguaje parametrico con funciones geometricas y matematicas...

Una tuerca autofrenante sin usar librerias es una prueba usando la matematica y geometria como corresponde se pueden lograr piezas mas complejas y animarlas :)

difference()

{

translate([1,1,0])cube([10,10,5]);

translate([4,4,1])cylinder(r=0.8,h=4,$fn=6,$fa=0.1,$fs=0.5);

translate([8,4,1])cylinder(r=0.8,h=4,$fn=6,$fa=0.1,$fs=0.5);

translate([4,8,1])cylinder(r=0.8,h=4,$fn=6,$fa=0.1,$fs=0.5);

translate([8,8,1])cylinder(r=0.8,h=4,$fn=6,$fa=0.1,$fs=0.5);

}

difference(){

translate([8,-10,8])cylinder(r=6,h=3,$fn=0,$fa=0.1,$fs=0.5);

translate([11.5,-10.2,8])cube([3,0.35,3.5]);

translate([1.5,-10.2,8])cube([3,0.35,3.5]);

rotate(118)translate([-9,-2.5,8])cube([3,0.35,3.5]);

rotate(60)translate([-1.5,-12,8])cube([3,0.35,3.5]);

rotate(60)translate([-11,-12,8])cube([3,0.35,3.5]);

rotate(118)translate([-19,-2.5,8])cube([3,0.35,3.5]);

translate([8,-10,-1])cylinder(r=4,h=15,$fn=0,$fa=0.1,$fs=0.5);

}

difference(){

translate([8,-10,1])cylinder(r=8,h=7,$fn=6,$fa=0.1,$fs=0.5);

translate([8,-10,-1])cylinder(r=4,h=15,$fn=0,$fa=0.1,$fs=0.5);

}

Y se puede exportar como un STL para usarlo con repetier-Host u otro...

Links varios de interes general.

cnlor -->http://cnlohr.net/

Openhardware y uC
rfwireless-->http://www.rfwireless-world.com/
arduino + PLC muy buen blog -->http://program-plc.blogspot.com.ar/2015/11/allen-bradley-plc-arduino-allen-bradley.html
Pinout ----> http://www.pighixxx.com/

Arduino --->  http://www.arduino.cc/

Raspberry PI ---> http://www.raspberrypi.org/

ladyada --> http://www.ladyada.net/

avrfreaks--> http://www.avrfreaks.net/
app inventor--> http://ai2.appinventor.mit.edu/

i2c --> http://victorbarcelo.net/comunicacion-basica-entre-un-raspberry-pi-y-un-arduino-usando-i2c/
prometec-->http://www.prometec.net/
esquemas-->http://www.electroschematics.com/10922/working-bootloaders-build-bootloader-2/
nicuflorica genio italiano amante de los LCD-->http://nicuflorica.blogspot.com.ar/2014/03/interfata-i2c-la-lcd-pentru-arduino-ii.html

Teoria de coheteria para satelites  http://www.nakka-rocketry.net/


Librerias ++
QR-CODE para arduino :) -->https://github.com/extrame/QR-Code-Generator
Arduino y base de datos :)-->http://playground.arduino.cc/Code/DatabaseLibrary
Arduino y base de datos extendida-->http://playground.arduino.cc/Code/ExtendedDatabaseLibrary
Sha256-->http://code.google.com/p/cryptosuite/
ARduino y smtp :)-->http://forum.arduino.cc/index.php?topic=279996.0

Criptografia - redes neuronales e IA:
SHA-1 SHA-2 SHA-3 Scrypt MD5 Base64
Algoritmo PID muy bien explicado
Perceptron para RNA

Fisica
Cientificos aficionados-->http://www.cientificosaficionados.com/

Tesla--->http://teslablog.iaa.es/tesla-y-la-witricidad-primera-parte
Patentes tesla--> https://es.wikipedia.org/wiki/Anexo:Patentes_de_Tesla
patentes de tesla en PDF -->rg/Biographies/TeslaBio-Patents.htm

Fisica-->http://isotopo-inestable.blogspot.com.ar/2007/02/radioistopos-para-baterias.html
Progress in electromagnetic researh --> http://www.jpier.org/PIERM/index.php

Imoresoras 3D
r-luis-->http://www.r-luis.com/?id=home

prusa i3-->http://www.reprap.org/wiki/Clone_wars:_Prusa_iteraci%C3%B3n_3_single_frame

thingiverse-->http://www.thingiverse.com/

Para compras instrumental, shields, electronica en argentina

http://www.mercadolibre.com.ar/
http://www.openhacks.com/

Electronica
http://www.amvelectronica.com/notas/ionduladores.htm
http://www.societyofrobots.com/

Varios - LPT.DLL

(Este proyecto esta desactualizado es para vbnet bajo windows lo deje a pedido)

 Esto es un pequeño driver DLL que te permite usar VBscript para automatizar el control de motores paso a paso unipolares para robotica y/o entretenimiento.

Este es mi pequeño lpt driver script LPT.DLL es un active x lo pueden descargar y probar...

Ejemplo para invocar el active x

**00.vbs*****************************************************************
'aqui se crea el objeto es la clase PAP de la libreria lpt.dll
set lpt = CreateObject("LPT.PAP")

lpt.cero 'pone a cero la salida del puerto paralelo registro de datos
lpt.cero_2 'pone a cero la salida del puerto paralelo registro de control


'se define la cantidad de pasos
lpt.cant_pasos=50
'se define la velocidad de giro en milisegundos
lpt.vel_mil=10

'se acciona el motor 1 hacia la derecha logica en hexadecimal pasada a long
'&HC, &H6, &H3, &H9) en decimal 12 - 6 - 3 - 9
'Matriz hexadecimal a mayor torque conmutndo dos bobinas usando la salida del LPT mas baja(low byte)

'1100 12 C
'0110 6 6
'0011 3 3
'1001 9 9

lpt.mot_1_der
'se pone a cero el puerto paralelo
lpt.cero

'se acciona el motor 1 hacia la izquierda &H3, &H6, &HC, &H9)
lpt.mot_1_izq
'se pone a cero el puerto paralelo
lpt.cero

'Matriz hexadecimal a mayor torque conmutndo dos bobinas usando la salida del LPT mas alta(high byte) &HC0, &H60, &H30, &H90

'D7 D6 D5 D4 D3 D2 D1 D0
' high low

'11000000 dec(192) hex(C0)
'01100000 96 60
'00110000 48 30
'10010000 144 90
' se pueden combinar para manejar dos motores a la ves jeje para otro dia lo hago....
lpt.mot_2_izq
lpt.cero



lpt.mot_2_der
lpt.cero


'esto es un chorrada que se me ocurrio la idea es manejar toda la cantida posible de motores con la menor cantidad de componentes
'una cuestion de ahorro(soy un rata) obio se puede multiplexar y comandar hasta 38 salidas (en teoria) usando el regstro de control el cual use
'sus cuatro bits para comandar un motor mas jeje y funciona perfecto si multiplexas usas los cuatro bits de control * los 8 de salida = 32
'este no es el casooooo.


lpt.mot_3_izq
lpt.cero_2



lpt.mot_3_der
lpt.cero_2
'jaja algo de credito lo pueden borrar y no aparece el mensaje payload
lpt.ban


*********************************************************************************************************

Estre es un video demo de la libreria LPT.DLL y el uso de Activex con VBscript / JScript o VBAplication(Word - Excel,etc)
Sldos...



**********************************************************************

Option Strict Off

Option Explicit On

Module InpOut32_Declarations

'Inp and Out declarations for port I/O using inpout32.dll.

Public Declare Function Inp Lib "inpout32.dll" Alias "Inp32" (ByVal PortAddress As Short) As Short

Public Declare Sub Out Lib "inpout32.dll" Alias "Out32" (ByVal PortAddress As Short, ByVal Value As Short)

End Module