脕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 [...]
