SadBunny Posted February 18, 2008 Share Posted February 18, 2008 Great, thanks! I'll probably be spending the rest of the day playing piano and toying with your files! Roses are FF0000, violets are 0000FF... All my base are belong to you. Link to comment Share on other sites More sharing options...
jpam Posted February 18, 2008 Author Share Posted February 18, 2008 i am glad that you like it worked long on the demo, i wanted it to be perfect i like mod files too, they are alot better then midi files ! Link to comment Share on other sites More sharing options...
Dellairion Posted February 18, 2008 Share Posted February 18, 2008 Hmms get this weard error when i try to run it.It worked at school but now i try to run it at home and it gave me this:Toepassing met fout AutoIt3.exe, versie 3.2.10.0, tijdstempel 0x47493eab, module met fout ProSpeed.dll, versie 0.0.0.0, tijdstempel 0x47b748e8, uitzonderingscode 0xc0000005, foutmarge 0x0000ac4c, proces-id 0x59c, starttijd van toepassing 0x01c8724c6255c1e4. Hot Key ControllerPinball Trainer? Link to comment Share on other sites More sharing options...
jpam Posted February 18, 2008 Author Share Posted February 18, 2008 (edited) @Dellairion need more input is it from the demo or are u trying the udf ? updated the first post with newest udf download link newest prospeed.dll is working again ! Edited February 18, 2008 by jpam Link to comment Share on other sites More sharing options...
Dellairion Posted February 18, 2008 Share Posted February 18, 2008 (edited) I tried the demo, it works if i comment these lines in the FXStars() function: ;$fx1 = InitExtFX($Text) ;Antialiasing($Text, 0, 0, $fx1, -1, 0, 1) ;FreeExtFX($fx1) Edited February 18, 2008 by Dellairion Hot Key ControllerPinball Trainer? Link to comment Share on other sites More sharing options...
jpam Posted February 18, 2008 Author Share Posted February 18, 2008 I tried the demo, it works if i comment these lines in the FXStars() function: ;$fx1 = InitExtFX($Text) ;Antialiasing($Text, 0, 0, $fx1, -1, 0, 1) ;FreeExtFX($fx1)oÝ÷ Ûú®¢×¥¢¢»aÉb觲֫±«¢+ØÀÌØíQáÐô ÉÑáÑ µÀ àÀÀ°àÀÀ¤oÝ÷ ÙÈZ¢¶ÚºÚ"µÍÌÍÕ^HHÜX]Q^ oÝ÷ ÚØ^·©§ªê-yÊzÚ-+ºÚ"µÍÌÍÙHH[]^ ÌÍÕ^JBIÌÍÕ^HÜX]Q^ BP[X[XÚ[Ê ÌÍÕ^ ÌÍÙKLKJBQYQ^ ÌÍÕ^JBQYQ^ ÌÍÙJ Let me know if it works Link to comment Share on other sites More sharing options...
jpam Posted February 18, 2008 Author Share Posted February 18, 2008 also replace this line ; SetText($Text, $u, $offsetX, $offsetY, "0x0000"&Hex($colorSet,2), 0x000000, $fontHeight, 900, "Arial") Link to comment Share on other sites More sharing options...
Dellairion Posted February 18, 2008 Share Posted February 18, 2008 Nop still the same. Maybe it has something to do with Windows Vista? Hot Key ControllerPinball Trainer? Link to comment Share on other sites More sharing options...
jpam Posted February 18, 2008 Author Share Posted February 18, 2008 ah ! try at the begin of the script; #RequireAdmin Link to comment Share on other sites More sharing options...
bitchbi Posted February 19, 2008 Share Posted February 19, 2008 nice work! saw it @ german autoit forumbut is it possible that your hoster is down? could you pls reupp the includes?pagina niet gevondenMfG Link to comment Share on other sites More sharing options...
jpam Posted February 23, 2008 Author Share Posted February 23, 2008 (edited) New functions added ! FXToPngPngToFX MergeChannelPng3 new demos online !MergeChannelPngPngtoFX and FXtoPngPaintPng with Background bufferingLast prospeed.dll , UDF and demos can be found @http://prospeed-jan.xprofan.com/index.htmllast update 22/02/2008 Kind Regardsjpam Edited February 23, 2008 by jpam Link to comment Share on other sites More sharing options...
XxXFaNtA Posted February 23, 2008 Share Posted February 23, 2008 Great! Nice Update! Some stuff I really can use for a bigger Project Good job! /[center][/center] Link to comment Share on other sites More sharing options...
jpam Posted February 23, 2008 Author Share Posted February 23, 2008 @ XxXFaNtA thanks , i am glad you like it ! Stay tuned, there is comming alot more ! Link to comment Share on other sites More sharing options...
XxXFaNtA Posted February 23, 2008 Share Posted February 23, 2008 Great! I was searching long to be able to color Graphics.. But the GDI+ stuff wasn't e to.. For now I'm having a black->white gradianet and sliders to control the RGB values and recolor it with ExchangeRGB. Works great! /[center][/center] Link to comment Share on other sites More sharing options...
Kilhian Posted February 25, 2008 Share Posted February 25, 2008 Should prospeed.dll help me with loading each pixelcolor of the pic in a array ? $hnd=LoadExtImage(pic.bmp) $array= readpixel($hnd) ; 2D array, X,Y $array[X][Y]=$color_i_want _save_array_to_bmp Link to comment Share on other sites More sharing options...
Nordwind Posted February 25, 2008 Share Posted February 25, 2008 Should prospeed.dll help me with loading each pixelcolor of the pic in a array ? $hnd=LoadExtImage(pic.bmp) $array= readpixel($hnd) ; 2D array, X,Y $array[X][Y]=$color_i_want _save_array_to_bmp Yes, ProSpeed.dll can. Use InitExtFX to get imagedatas. This function return a pointer to a memory, where by offset 20 stays a long of the bytes, the image do use. At offset 40 exists a pointer to the raw imagedatas. Sorry, no AutoIt-Example from me. I prefer writing code with Assembler & XProfan. But I'm sure, my friend jpan will help you with a codepiece. Yesterday I rewrote ProSpeeds water-effect. Look at jpans website to see new demo. Link to comment Share on other sites More sharing options...
jpam Posted February 25, 2008 Author Share Posted February 25, 2008 working on it ! i am so far to write in array data copy array data back to bitmap and save it to harddisk buzzy to extract pixel data from array will not be finished till tomorro sorry Link to comment Share on other sites More sharing options...
Nordwind Posted February 25, 2008 Share Posted February 25, 2008 copy array data back to bitmapCopyArray()and save it to harddiskWriteFileFast()Comeone, jpan. It's easy... Link to comment Share on other sites More sharing options...
Kilhian Posted February 25, 2008 Share Posted February 25, 2008 sounds great while this time, i'm trying to understand what a pointer is...the aim oF my questions is to finish my projectthank you so much Link to comment Share on other sites More sharing options...
jpam Posted February 25, 2008 Author Share Posted February 25, 2008 i hope this is what you want ! needs last prospeed.dll and prospeed udfdownload @ http://prospeed-jan.xprofan.com/expandcollapse popup#include <GUIConstants.au3> #include <Prospeed.au3> Opt("GUIOnEventMode", 1) HotKeySet("{Esc}", "_exit") $gui = GUICreate("Prospeed", 800, 600, -1, -1) GUISetOnEvent($GUI_EVENT_CLOSE, "_exit") GUISetState() GetHDC() ;==== BItmap =================================== Comment this if you want to use Picture $bitmap = CreateExtBmp(100, 100) FillExtBmp($bitmap, 0, 0, 100, 50, 0xFF0000) FillExtBmp($bitmap, 0, 50, 100, 100, 0x0000FF) $array = InitExtFX($bitmap) CopyArray($hdc, 100, 0, $array) ;=============================================== ;==== Picture ================================== Uncomment this when you want to use picture ;~ $Load_Pic = LoadExtImage("water_bord.gif") ;~ $array = InitExtFX($Load_Pic) ;~ CopyArray($hdc, 200, 0, $array) ;=============================================== $arrayInfos = DllStructCreate("long;long;long;dword;dword;long;long;long;long;long;long;long", $array) $biSizeImage = DllStructGetData($arrayInfos, 6) $Pointer = DllStructGetData($arrayInfos, 11) $a = $biSizeImage/4 $z = $Pointer $Offset = 0 Dim $ArrayData[$a+1] ; create arrays for color data ; Byte Arrays contain 3 bytes (BGR) For $i = 0 To $a $getByte = GetAByte($z+$Offset) $ArrayData[$i] = Hex($getByte,6) ; fill array With Color data ConsoleWrite(Hex($getByte,6)&@CRLF) ; console write to check colordata If Hex($getByte,6) = "0000FF" Then ;colors are in BGR SetAByte($z+$Offset , 255) ; 1 byte Blue SetAByte($z+$Offset+1, 255) ; 1 byte Green SetAByte($z+$Offset+2, 255) ; 1 byte Red EndIf $Offset = $Offset +3 ; offset +3 for next Byte arrays Next ; ==== Bitmap ========================================== Comment this if you want to use Picture $width = GetBmpWidth($bitmap) $height = GetBmpHeight($bitmap) $bitmap2 = CreateExtBmp($width, $height) CopyArray($hdc, 0, 0, $array) CopyArray($bitmap2, 0, 0, $array) MsgBox(0,"","done!") SaveExtImage($bitmap2, "C:\new_bitmap2.bmp", 0, 10) ; ======================================================= ; ==== Picture ========================================== Uncomment this when you want to use picture ;~ $width = GetBmpWidth($Load_Pic) ;~ $height = GetBmpHeight($Load_Pic) ;~ $bitmap2 = CreateExtBmp($width, $height) ;~ CopyArray($hdc, 0, 0, $array) ;~ CopyArray($bitmap2, 0, 0, $array) ;~ MsgBox(0,"","done!") ;~ SaveExtImage($bitmap2, "C:\new_bitmap2.bmp", 0, 10) ; ==== Picture =========================================== While 1 Sleep(1000) WEnd Func _exit() Exit EndFunc Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now