PureBasic

Mytic a écrit :@Non ! Pourquoi ? Je ne vois pas l’utilité.
Une variable c’est aussi une mémoire, Donc pourquoi se compliquer la vie alors qu’on peut faire simple.

[Edit] Quand tu dis injection, tu parles de la compilation ou l’exécution ?

les 2 mon capitaine

je pensais a un truc du genre

on cree un executable contenant juste l'interpreteur pret a marcher
puis avec l'editeur (bouton compilation) on injecte dans cette executable "vide" le code a interpreter....

lors du lancement de cette executable contenant maintenant le code injecté

il s'execute en interpretant le code injecté !!

un peu comme cette exemple

cette exemple utilise le Notepad , on lui injecte avant de le lancer un code
se trouvant dans la procedure "RemoteThread()"

ensuite on execute le notepad, cela lance notre code injecté !!

Code : Tout sélectionner


DisableDebugger ;DISABLES DEBUGGER! This is needed.
Procedure RemoteThread()
  MessageRequester("Success", "Injection successed!"); <----- code injecté dans le notepad !!! :d
  Beep_(100,200) ; <----- code injecté dans le notepad !!! :D
EndProcedure
Procedure InjectCode(Process.s, *lpCodeToInject)
  CreateProcess_(0,Process.s,0,0,0,#CREATE_SUSPENDED,0,0,@sinfo.STARTUPINFO,@pinfo.PROCESS_INFORMATION)
  dwPID = pinfo\dwProcessId
  hProcess = pinfo\hProcess
  dwWritten.l = #Null : pbModule.l = GetModuleHandle_(0) : dwSize.l = PeekL(pbModule+PeekW(pbModule+$3C)+$50)
  VirtualFreeEx_(hProcess, pbModule, 0, #MEM_RELEASE)
  lpBuffer.l = VirtualAllocEx_(hProcess, pbModule, dwSize, #MEM_COMMIT | #MEM_RESERVE, #PAGE_EXECUTE_READWRITE)
  If lpBuffer = #Null : While ResumeThread_(pinfo\hThread)>1 : Wend : CloseHandle_(hProcess)  :   ProcedureReturn #False : EndIf
  If WriteProcessMemory_(hProcess, lpBuffer, pbModule, dwSize, dwWritten) = 0
    While ResumeThread_(pinfo\hThread)>1 : Wend : CloseHandle_(hProcess)
    ProcedureReturn #False
  EndIf
  hThread.l = CreateRemoteThread_(hProcess, #Null, 0, *lpCodeToInject, pbModule, #Null, #Null)
  
  If hThread=#Null : CloseHandle_(hProcess) : ProcedureReturn #False : EndIf
  While ResumeThread_(pinfo\hThread)>1 : Wend
  CloseHandle_(hThread)
  ProcedureReturn #True
EndProcedure
 
If InjectCode("notepad.exe", @RemoteThread()) = #False
  MessageRequester("Error!", "Injection failed!")
EndIf
End

Kaspersky n’aime pas trop cette méthode

ou bien !

on cree une zone data reperable dans l'interpreteur
avec suffisament d'espace

et on compille en executable l'interpreteur

ensuite au moment de la pseudo compilation, on retrouve la zone de data
pour y inserer notre code a faire executer par l'interpreteur compillé ... hum !!

je vais dormir moi

Mytic a écrit :Kaspersky n’aime pas trop cette méthode

autorise juste ce prg , ça craint rien !!

j'ai fait une copie de Notepad lol
Sinon…elle est vraiment bonne ton idée….
Je vais lui trouver une place dans mon code

(au fait ,t'as vu le mini jeu dans le post ( !!!!Petit concours !!!!))

Mytic a écrit :(au fait ,t'as vu le mini jeu dans le post ( !!!!Petit concours !!!!))

j'aurai pas le temps , je continue a refaire tout le noyau de mon PureGolo

et puis faudrai que je reprenne la Guitare, sinon vais plus savoir jouer a force

(deja que c'est pas evident

)

Mytic a écrit :Je vais essayer de retirer la partie de compilation de mon programme pour que je la post !
Comme ça, elle te donnera des idées pour ton programme.

j'attends ça avec impatience

allez Bonne nuit

Au fait ! , j’avais remarquer que les commandes de pureGolo ne se coloriées pas que si elles NE sont pas écrites de la même manière que celle dans ton code.
Ça vient pas de ton code mais de la lib, tu devrais ajouter un Lcase( ).

Dobro a écrit : j'attends ça avec impatience

allez Bonne nuit

Je suis entrain de te créer un exemple.

Mytic a écrit :Au fait ! , j’avais remarquer que les commandes de pureGolo ne se coloriées pas que si elles sont écrites de la même manière que celle dans ton code.
Ça vient pas de ton code mais de la lib, tu devrais ajouter un Lcase( ).

merci , je vais voir ce que je peux faire ...

d'un autre coté, je vens de me rendre compte que dans l'editeur de Purebasic , si tu tappe le nom d'une instruction tout en majuscule, l'editeur ne le colore pas non plus !!

donc, finalement c'est peut etre bien d'obliger les gens a taper les commandes comme attendu par le prg..

(ça m'arrange en plus)

bon, j'oblige a l'écriture minuscule, comme ça plus de problemes

Que des Problèmes.
En tapant Proxs sur Google j’ai trouvé une société sous le Nom de ProXS.
Est-ce que je devrai changer le nom de mon programme ? Ou le garder ?
Mais l’abréviation n’est pas pareille .
Mon Proxs c’est : PROgrammation eXtrêmement Simplifié.
Et leur Proxs : Professional Fixture Accessories

JProxs c’est mieux ?

Mytic a écrit :JProxs c’est mieux ?

franchement , a ta place je chercherai un nom moins compliqué et plus fun !!

pas forcement qui veule dire quelque chose, mais qui se retient !!
donc pas trop de syllabes , pas trop se consonne du genre "xwz" !!

mettre du "X" ou "XS" partout est une tres mauvaise idée, qui deviens ringue a force !! et qui parait tres pompeux pour rien, style marque de parfum !!

le "J" rappel Java, bref, pas genial !!
cherche un nom rigolo, et facile a retenir sans chercher a vouloir faire "langage informatique" !!

d'ailleurs aujourd'hui je prefererai dire , que je programme en "champignon" plutot qu'en purebasic
parceque Purebasic , il y a Basic avec tout le coté péjoratif donné par les magazines a 2 balles depuis 30 ans !!

dire qu'on programme en Champignon intriguerai plus les gens, et du coups cherchera a en savoir plus !!

(finiraient ptet par aimer)

je cherche depuis 3 h et je trouve rien

PureBasic

Enfin le projet PROXS à terme !!!