Árbol fractal en BorlandC para DOS
/*arbol3*/
/*Fernando Galindo Soria*/
#include <graphics.h>
#include <math.h>
void arbol(int,int,int,int);
void arbolb(int,int,int,int);
int ind;
void main()
{
int gd=DETECT,gm;
initgraph(&gd,&gm,"");
ind=1;
arbol(300,300,70,90);
getch();
closegraph();
}
void arbol(int x0,int y0,int l,int an)
{
int x1,y1;
if(bioskey(2)!=0×04)
if (l > ind )
{
x1=x0-(l*cos(an/57.29578));
y1=y0-(l*sin(an/57.29578));
[...]
#include <stdio.h>
#include <string.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <netdb.h>
#include <errno.h>
#include <stdlib.h>
#include <unistd.h>
#include <arpa/inet.h>
unsigned short port = 8000; //Número de puerto predeterminado del servidor
#define DEBUG 1
char * error_return = "<HTML>\n<BODY>Archivo no encontrado\n</BODY>\n</HTML>";
char ret_buf[32768];
char * read_file(char * buf, int num_buf){
int i;
char *cp, *cp2;
FILE *f;
cp = buf + 5;
cp2 = strstr(cp, " HTTP");
if(cp2 != NULL) *cp2 = ‘\0′;
if(DEBUG) printf("file: |%s|\n",cp);
//fetch file:
f [...]
#include <stdio.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <netdb.h>
#include <string.h>
#include <stdlib.h>
#include <unistd.h>
char host_name[256] ;
char file_name[256];
int port = 80;
int main (int argc, char *argv[]) {
char buf[8192];
char message[256];
int sd;
struct sockaddr_in pin;
struct hostent *nip_host;
//int i = 0;
/* for (i = 0 ; i <8192; i ++)
buf[i]= ‘ ‘;
for (i = 0 ; i <256; i ++)
message[i]= ‘ ‘;*/
printf("Host:");
scanf("%s",host_name);
if ((nip_host [...]
Estas presentaciones son tutoriales básicos sobre Java.
Una presentación sobre la definición de informática.
Algo de humor, la eterna batalla entre los departamentos de ventas y tecnología en una empresa.
Nos mandan una presentación del modelo OSI para redes.
Este es un ejemplo de como usar assert con Prolog.
% Author: Daniel Alejandro Doctor Soriano
% Date: 23/02/2006
:-dynamic progenitor/2.
progenitor(juan, pedro).
progenitor(luis, ernesto).
padre(X,Y):-progenitor(X,Y),write(X),write(’ es el padre de ‘), writeln(Y), fail.
agrega_progenitor(X,Y):-assert(progenitor(X,Y)).
agrega_progenitor(marcos,andres).
% assert agrega un nuevo hecho a la base de conocimiento
% si escribimos asserta lo agrega al "inicio de la base"
% si escribimos assertz lo agrega "al final de [...]
En este vídeo, se hace una comparación práctica entre diferentes tecnologías de desarrollo web.
Archaeopteryx un Generador de MIDI en Ruby
Revisando los proyectos presentados en la conferencia Ruby Hoedown 2008, encontré este proyecto, que me parece muy interesante.
La página web de este proyecto es: http://archaeopteryx.rubyforge.org/
Fue desarrollado a partir del código del libro Practical Ruby Projects para crear un sistema de auto-generación y que auto-modifica la música.
Los screencasts anteriores de [...]
