begin process at 2012 02 10 20:20:26
  Trouver un code source :
 
dans
 

31 commentaire(s) de balgrim sur des sources sur tout CodeS-SourceS

Déposé sur Calculer une operation presente dans une string (gestion des ...

A propos de l'autre source, je m'été renseigné, mais si tu faisait un petit peu plus attention, tu verrai qu'elle ne gere pas les nombre a virgules, mais seulement les integer.
En plus elle est beaucoup plus lente à l'execution, et ça aller pas pour ce que je voulais faire :)

Donc non tu casse pas la baraque, c'est meme deux sources complementaires...
Posté le : 28/10/2003 14:18:55

Déposé sur Calculer une operation presente dans une string (gestion des ...

Oui j'avais pensé à la fin de ligne, mais le probleme est toujours le meme ;) 8+3*2+4 ==> on revien au meme pb... La meilleur solution c de gerée la multiplication et la division comme une parenthese, sa doit pas etre trop difficile :)

Sinon j'ai remarquer une erreur, si on dans la chaine ...)+... comme (2*5)+3  renvoi 7. c'est du au fait d'une erreur dans le code:


//-------------Le signe Plus-----------------
                        (...)
      if not fstOp then if StringTemp[I-1]=')' then //Si le dernier caractere été un ')' alors...
        LastOperande  :=  loSub; <<--Modifier par loAdd
//---------------------------------------------

J'ameliore tout ça, et je v mettre un zip tout de meme, avec des jolie exemples :)
Posté le : 27/10/2003 16:54:28

Déposé sur Double buffering simple.

Heu... le fait est que j'ai pas vu de double buffering dans cette source (avrai dire je sais pas c'est quoi lol) enfin si tu expliquer ce que c'est... Sinon c'est une source tres simple, nivo 1 sa doit etre assez, non?
Posté le : 12/09/2003 23:08:35

Déposé sur Ecrire un texte rapidement (nasm) avec l'int 10h

Heu... =) vi c'est pas ske j'ai fait de mieux now que je revoir ça
Posté le : 08/08/2003 03:01:01

Déposé sur Plus précis que gettickcount

avec une unité bien plus précise ke la milliseconde  ==> quel unité? J'ai tenter de trouver, apparament c'est GetTickCount * 3579 Mais je suis pas sur!
Posté le : 02/08/2003 14:41:08

Déposé sur Asm/delphi dessiner un pixel en assembleur

Ta source ne dessine pas un pixel, elle appelle l'api windows setpixel, et c'est elle qui le dessine... Bon voila un petit truc que j'ai fait, qui est bcp plus rapide que le pixel[x,y]:

procedure MXPoint(Bitmap:TBitmap;X,Y:dword;color:dword);
var
p1:pointer;
begin
if (X>Bitmap.Height-1) or (Y>Bitmap.Width-1) then exit;
p1:=Bitmap.ScanLine[X-1];
case Bitmap.PixelFormat of
pf32bit:
  asm
  push edi
  mov edi,p1
  mov eax,y
  shl eax,2
  add edi,eax
  mov eax,color
  mov [edi],eax
  pop edi
  end;
pf24bit:
  asm
  push edi
  mov edi,p1
  mov eax,y
  imul eax,3
  add edi,eax
  mov eax,color
  mov ecx,eax
  shr ecx,16
  mov [edi],ax
  mov [edi+2],cl
  pop edi
  end;
else
bitmap.Canvas.Pixels[X,Y]:=Color;
end;

Elle est pas toute a fait au point, il doit y avoir qque bug :) enfin vala la ça ecrit directement 1 pixel dans le bitmap ;)
Posté le : 25/06/2003 12:15:59

Déposé sur Hackme part two (hackers et mot de passe)

J'ai rien pigé, moi g deja   passw    : String='La pipe du pape Pi pue';... c pas bien compliquée si c sa... enfin sa doit etre parceque qqun a deja trouvé :P

c dommage, j'été chaud manchy :D
Posté le : 17/01/2003 20:41:13

Déposé sur Fondu entre 2 bitmap(tuto scanline)

version optimizé (sans virgule flottante...):

function semitrans(Bmp1,Bmp2:TBitmap;nivo:byte):TBitmap;
var
ATB,ATB2,ATB3:pRGBTripleArray;I,J:integer;
Lvl,invLvl:integer;
begin
//on creer les classes...
result:=TBitmap.Create;
bmp1.PixelFormat:=pf24bit; //format 3byte (rgb). cela permet de synchroniser avec le pTATripleByte;
bmp2.PixelFormat:=pf24bit;
result.PixelFormat:=pf24bit;

result.Height:=bmp1.Height;
result.width:=bmp1.width;

//le niveau sur une echelle de 0 a 1:
lvl := nivo ;
invLvl:= 255-lvl;//sont inverse sur la meme echelle tels que lvl+invlvl=1;


for I:=0 to bmp1.Height-1 do begin
//on fait pointer les tableau de TripleBytes sur la ligne I
ATB:=bmp1.ScanLine[I];
ATB2:=bmp2.ScanLine[I];
ATB3:=result.ScanLine[I];
  for J:=0 to bmp1.Width-1 do begin
  (*
  Pour faire la semitransparenc il suffit d'appliquer les regle de
  proportionnalité tels que c = ka + (1-k)b  dans un intervalle pour k[0;1].

  ainsi 0<=k<=1 et donc si k = 0 alors c=b et si k = 1 alors c=a.
  On fait sa pour les 3 couleurs:
  *)
  ATB3[J].rgbtRed:=byte((invlvl*(ATB[J].rgbtRed-ATB2[J].rgbtRed))shr 8 +ATB2[J].rgbtRed);
  ATB3[J].rgbtGreen:=byte((invlvl*(ATB[J].rgbtGreen-ATB2[J].rgbtGreen))shr 8 +ATB2[J].rgbtGreen);
  ATB3[J].rgbtBlue:=byte((invlvl*(ATB[J].rgbtBlue-ATB2[J].rgbtBlue))shr 8 +ATB2[J].rgbtBlue);
  end;
end;
Posté le : 15/12/2002 00:18:10

Déposé sur Drole de truc (jl'ai pas fait exprés!!!)

heu... le bitmap doi tetre au pixelformat:=pf24bit;
voila, bye.
Posté le : 17/11/2002 20:34:16

Déposé sur Méthode de tri rapide ( quick-sort )

ok, mais imaginont que ton array soit un array de type record, et que tu cherche à trier qu'une des valeur... g beau me creuser la tete je vois pas comment faire :s
Posté le : 11/11/2002 07:25:04

1 2 3 4


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,203 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales