|
|
Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.
Mensajes - Enko
Páginas: 1 ... 43 44 [45] 46 47 ... 77
1101
« en: Miércoles 22 de Febrero de 2006, 00:21 »
¿escribieron la ejecutable del compilador en un heditor hexadecimal? totalmente factible, aunque no lo peudo asegurar pero seguramente (y lo mas obvio a mi parecer)el primer ensamblador fue hecho directamente en lenguaje de maquina. Pues esa era mi idea. Si, me olvide, "asm no compila ensabla". Pero hay que recordar que las ejecutables tienen una cabecera, por eso que solo con las instrucciones en lenguaje máquina no sería suficiente, habría que hacer la cabecera y supongo que se hizo a mano con un hexedit  . PD: Cuando decía "Primer compilador" me refería para un x86. Añadiendo mas, ¿los .com, tienen cabecera? Si no la tienen, simplimente escribieron las instrucciones en lenguaje máquina.
1102
« en: Martes 21 de Febrero de 2006, 23:06 »
¿escribieron la ejecutable del compilador en un heditor hexadecimal?
1103
« en: Martes 21 de Febrero de 2006, 23:03 »
en asm supongo  pero asm es un lenguaje de programación, como hicieron el compilador que compilo pro primera vez asm?
1104
« en: Martes 21 de Febrero de 2006, 01:54 »
Ya sabemos que con un compilador de algun lenguaje, podemos diseñar un nuevo compilador con un nuevo lenguaje pero.........
¿Y como hicieron para hacer el primer compilador que compiló las demás cosas?
1105
« en: Jueves 16 de Febrero de 2006, 01:21 »
En el procedimiento de cargar imágenes me queda una pequeña duda blink.gif y es sobre la ruta desde la cual se cargarán las imágenes. Recuerdo que en visual basic existe el app.path que retorna un string con la ruta en que se encuentra el programa, en Delphi existe algo parecido???
Directorio := ExtractFilePath(Application.ExeName);
Aunque deber'ia funcionar (suponiendo que tienes en la carpeta de la ejecutable una carpeta llamada imagenes: TBitMap.LoadFromFile('imagenes\nombre.bmp');
1106
« en: Lunes 13 de Febrero de 2006, 14:38 »
Lastima que Lazarus no posee el TDrawgrid ya que este posee un metodo que te devuelve en que celda el usuario hizo clic, algo indispensable para vos. Igualmente ese procedimiento lo podr'ias hacer vos mismo, es tan solo recalcular segun la X,Y del raton, en que imagen se hizo clic. Esto es proque en realidad la imagen es una sola compuesta de muchas imagenes. Deberia ser algo asi: procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin CeldaX := X div IMG_WIDTH; CeldaY : Y div IMG_WIDTH; end;
ahora que lo veo, no hay problema con eso.
1107
« en: Lunes 13 de Febrero de 2006, 14:33 »
La cosa es que no necesitas una matriz de imagenes para tu juego. Primero que tu matriz debería ser de byte o algo así: Matriz: array[0..3,0..3] of Byte;
Luego necesitarias un procedimieto que te inicialize la matriz, digamos, ponga todas las cadenas de las imagenes de a pares ordenadas de alguna forma, todavia sin mezclar. procedure InicializarMatriz; begin Matriz[0,0] := 1; Matriz[0,1] := 1; Matriz[0,2] := 2; Matriz[0,3] := 2; end;
Por supuesto que es mejor que lo hagas con un ciclo Luego necesitarias un procedimiento simple que te mezcle la matriz. Tambien necesitar'ias un procedimiento que te cargue todas las imagenes Pero para eso necesitar'ias un arreglo con todas las imagenes Imagenes: array[1..MAX_IMG] of TBitmap;
procedure cargarImagenes; var iCount : integer; begin for i:=1 to MAX_IMG do begin Imagenes[iCount] := TBitmap.Create; Imagenes[iCount].LoadFromFile('NombreImagen' + IntegerToString(i) + '.bmp'); end; end;
Tus imagenes deber'ian llamarse NombreImagen1.bmp, NOmbreImagen2.bmp, etc.... Supondr'e que las imagenes son cuadradas... Y finalmente, uno quien te la imprima que ser'ia algo asi: procedure ImprimirMatriz; var iCount, jCount: integer; begin for jCount := 1 to MAX_CELL do for iCount := 1 to MAX_CELL do PaintBox.Canvas.Draw(iCount*IMG_WIDTH, jCount*IMG_WIDTH, Imagenes[Matriz[iCount, jCount]]); end;
Por supuesto que te har'ia falta todo lo que es la jugada pero no necesariamente necesitas matriz de imagenes.
1108
« en: Domingo 12 de Febrero de 2006, 15:22 »
Para Enko:
Sobre el TDrawGrid, al menos con ese nombre no parece estar en Lazarus. Lo más perecido parece ser TDbGrid que está en la ficha Data Controls y tengo mis dudas de que sea lo mismo porque cuando coloco ese componente en el formulario queda algo parecido a una tabla en excel.
Tonces no está.
1109
« en: Domingo 12 de Febrero de 2006, 01:50 »
No se si en lazarus está el componente pero tambien es bueno para eso el TDrawGrid. Es una gradilla en la cual hay que dibujar usando directamente la propiedad TCanvas. Como parametro se recibe la recta de la celda que se va a dibujar y las coordenadas de la celda. El siguiente codigo dibujaria un bitmap en la primera celda del Grid. procedure TfrmEditor.DrawGrid1DrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState); begin if (aCol=0) and (aRow=0) DrawGrid1.Canvas.StretchDraw(Rect, Bitmap); end;
1110
« en: Viernes 10 de Febrero de 2006, 17:21 »
Deberías hacer una desinstalación más completa:
*Desinstalar
*Iniciar modo prueba de fallos
*Borrar todas las carpetas de Office
*Limpiar el registro de windows con algun programita tipo RegClean
*Iniciar Normalmente
*Instalar Office.
Con esto más que seguro que debería funcionar pero lleva tiempo, por ahí haya una solución mas facil y rápida.
1111
« en: Jueves 2 de Febrero de 2006, 23:40 »
int 21H posee 88 funciones. alguna de las cuales con
subfunciones, vamos que sera algo parecido a Reinventar el DOS desde
cero.
Solucionarías el problema escribiendo un compilador de Pascal para tu kernel 
1112
« en: Domingo 29 de Enero de 2006, 14:16 »
Muchas gracias por la Info.
Eso es bastante importante pero......
Fijate que te dice que tenes que sacar la informacion para el Debuger y después comprimirlo con UPX y te quedan 420 Kb.
Las aplicaciones GUIS hechas en delphi directamente ocupan 420 Kb. Y si las comprimis con un compresor de ejecutables (AsPack) ocupan de 250 Kb a 350 Kb. Todo depende.
Igualmente, eso es muy interesante.
1113
« en: Lunes 23 de Enero de 2006, 21:39 »
borland c++,
Si sabes usar Borland C++ Builder, armar el proyecto con Delphi te será mucho más familiar. C++Builder es la vercion con C++ de Delphi (Object Pascal con entorno visual como Visual Basic)
1114
« en: Lunes 23 de Enero de 2006, 21:37 »
borland c++,
Si sabes usar Borland C++ Builder, armar el proyecto con Delphi te será mucho más familiar. C++Builder es la vercion con C++ de Delphi (Object Pascal con entorno visual como Visual Basic)
1115
« en: Lunes 23 de Enero de 2006, 14:05 »
aaaaaaaaaaaaaa enko, vi tu page se ve buena y vi que hiciste un editor de mapas basado en tiles , generico  , bueno luego pongo el que yo haga , digo es buena la diversidad, por cierto lo quize bajar y no pude ...
yo tengo 3 uno en pascal, otro en c y otro en visual basic pero ninguno es generico, cada uno se basa al juego que hice... apenas voy a ahcer un generico a ver que tal me queda, si usaste dx y delphi seria bueno que me recomiendes tutoriales, o algun ejemplo gracias Es un editor de mapas de tiles "generico" entre comillas. Es decir, se puede adaptar a un monton de juegos pero no a todos. El formato del archivo es: Ancho, Alto, Matriz de Tiles. Es raro que la página siga funcionando. Igualmente el proyecto lo descontinue porque al escribirlo cometí varios errores que para corregir, hay que hacer todo de vuelta cosa que no tengo ganas. Sobre los tutoriales de DelphiX, (use UnDelphiX que es casi lo mismo) pero ahora no encuentro los vinculos.....  Estos son los vinculos: el Juego: http://free.hostdepartment.com/E/EugenioEn...paceShotter.zipel Editor: http://free.hostdepartment.com/E/EugenioEn...ldMapEditor.zipel Previsualizador del mapa: http://free.hostdepartment.com/E/EugenioEn...isualizador.zipel tutorial de delphiX de la pagina no estaba terminado y nunca lo subí. Coloqué el vinculo por equivocacion.
1116
« en: Domingo 22 de Enero de 2006, 23:45 »
A ver si te sirve, esta en ingles:
DelphiGamer El link que pasaste.....¿tiene algo que ver con el sitio "Pascal Game Programing" (PGD): http://www.pgd.netstarweb.com/forum_index.php.
Que ahora está caído. Es que los que participan son los mismos. No es que esten caidos, es que cambiaron de nombre 
1117
« en: Domingo 22 de Enero de 2006, 23:42 »
A ver si te sirve, esta en ingles:
DelphiGamer El link que pasaste.....¿tiene algo que ver con el sitio "Pascal Game Programing" (PGD): http://www.pgd.netstarweb.com/forum_index.php. Que ahora está caído. Es que los que participan son los mismos.
1118
« en: Jueves 19 de Enero de 2006, 11:31 »
WriteLn(Archivo, Cadena1, Cadena2, Cadena3, CadenaN....)
1119
« en: Miércoles 18 de Enero de 2006, 00:22 »
RAGNAROCK
ese nombre lo escuhce en algun lado  (creo que de un servidor de eMule  )
1120
« en: Miércoles 18 de Enero de 2006, 00:19 »
Con Turbo Pascal casi seguro que no se puede trabajar en RED.
Si necesitas hacer un programa que te lleve el stock de alguna empresa en RED, te conviene usar Delphi que posee un entorno "específico" para esa tarea, aunque tendrías que aprender un efoque diferente del lenguaje.
Estaría bueno que cuentes para que quieres trabajar en red.
1121
« en: Martes 17 de Enero de 2006, 01:08 »
Por sierto, para trabajar en grupo, sería bueno ESTANDARIZAR AL CÓDIGO. Es decir, aclarar donde van los comentarios, como poner las palabras reservadas (mayusculas, minusculas, Ambas), como nombrar a las variables, a las constantes...... Eso es muy importante, sino se complica leer el código. Propongo: ¿Cuantos caracteres para los tabs, digo hacer saltos de espacio entre bloque? aqui hay 3, (generamente trabajo con 2, no se que prefieren): Palabras reservadas todas en minusculas, es que ya se resaltan por el cambio de color, no hace falta poner mayusculas. Constantes: MAYUSCULAS variables: se me ocuren unas cuantas Tipo notacion Hungara var intNumero: Integer; strCadena: string; intNumeroAlpha: Integer;
Lo de antes sin Hungara var Numero: Integer; Cadena: string; NumeroAlpha: integer;
var numero:Integer; cadena: string; numero_alpha: Integer;
Para las funciones habria tambien varias: Primer en minusculas segunta Mahusculas procedure hacerAlgo; procedure putPixel(X,Y: Integer);
Ambas en mayusculas procedure HacerAlgo; procedure PutPixel(X,Y: Integer);
ambas minusculas con guiones en el medio precedure hacer_algo; procedure put_pixel(x,y: integer);
Para los ciclos, a mi me gusta la siguiente forma: while not EOF(File)do begin ... end;
es que he visto c'odigos que ponen el begin despues del do, o hacen un salto de linea y ponen el begin.... En los if multiples: if condicion then begin hacerAlgo; hacerOtro; end else if condicion 2 then begin hacerTercero; hacerCuarto; end;
if condicion then begin hacerAlgo; hacerOtro; end else if condicion 2 then begin hacerTercero; hacerCuarto; end;
TODO ES CUESTION DE GUSTOS, puse algunas cosas, solo falta elegir y tambien lo de comentarios.
1122
« en: Martes 17 de Enero de 2006, 00:51 »
- Enko - No ha contestado aún ,pero le incluimos dentro del
grupo ya que él solito participa sin que nadie se lo pida. cool.gif
Es que me matan con ASM...... han pegado en mi lado más debil. Ya llevo unos 4 intentos de aprenderlo y siempre fracazo..... 
1123
« en: Martes 17 de Enero de 2006, 00:44 »
¿que es tipo_celda? Postea más codigo.... type tipo_tablero=Array[1..75,1..22] of tipo_celda;
1124
« en: Lunes 16 de Enero de 2006, 16:43 »
K-2-S-O-4 : sulfato de potasio
Fe-''-Te-O-3: Teluriato de hierro
Na-''-Cl-O-'' : hipoclorito de sodio
No tengo el TPaintBox pero supongo que deberá ser similar al TImage. Deberías usar la propiedad TCanvas (como siempre) y hacer algo así para K2SO4: *Poner el tamaño de letra comun. *hacer un TextOut de la letra K, en una posicion supongamos (10,5) *poner el tamaño de letra más chico *hacer un TextOut del subindice 2 en una posicion "*Indicada*" eso lo tendrías qu eir probando, otra no queda......  *Asi susesivamente. el metodo TextWidth(cadena):integer te devuelve el ancho en pixeles de una cadena. Para el caso será útil la funcion. Otra forma más que ensayo y error no le veo, probar hasta que salgan las proporciones.
1125
« en: Domingo 15 de Enero de 2006, 16:26 »
es que se me ocurió lo de la diagonales ya cuando estaba terminando y bueno...... no lo quiería cambiar.
Páginas: 1 ... 43 44 [45] 46 47 ... 77
|
|
|
Mostrar Mensajes
