jpam

well.....better late than never! The bug in the pack function was fixed years ago, but I totally forgot to upload the new version. have now uploaded the new version to the forum. jpam dbasedll.zip

@jwurmz dbf filenames are 8.3 dos style, its by design. fieldnames are 10 char zero terminated, it's allso by design. the GetSubRecord function skips the first byte of the record, that is the record delete mark. IsRecordDeleted() missing function The pack function was tested many times, but mybe there is still a bug in the code i have to dig up the source code next week i have some spare time to look into it. kind regards jpam

update 09-01-2016: added foxpro 2.x and visual foxpro read support added foxpro 2.x .fpt memo read support added visual foxpro .fpt memo read support download at 1st post

i downloaded the last editor thx for the info mLipok updated the function headers in the udf

@mLipok Version 3.4.1 allready got it working thx for the info

@mLipok no licenses on this dll, wrote it myself in masm v10 SciTE4AutoIt by pressing CTRL+ALT+H does nothing in my editor can you give me an example for a standard header?

hi forum peoples for people that are using dBaseIII and dBaseIV database files i want to share my dbase dll + udf that i wrote for one of my projects the dll supports; open/create/read/write dbaseIII dbf files open/create/read/write dBaseIV dbf files open/create/read/write dbaseIII dbt memo files open/create/read/write dBaseIV dbt memo files most basic functions are in the dll more functions wil be added when needed dll ,udf and several samples are included in zipfile Have fun Jpam update; udf has now standard function headers changed Opt("OnExitFunc", "Close_DLL") to OnAutoItExitRegister("Close_DLL") update 02-01-2016: added fast powerfull case-insensitive search() function to dll with wildcard support update 09-01-2016: added foxpro 2.x and visual foxpro read support added foxpro 2.x fpt memo read support added visual foxpro memo read support dbasedll.zip

make sure you have the right prospeed.dll and udf together there are different versions 2.8 and 3.0

as far i can see, the functions DBFAddField() and DBFGetFieldInfo() are not correct. the manual says; pszFieldName: The name of the new field. At most 11 character will be used. In order to use the xBase file in some packages it may be necessary to avoid some special characters in the field names such as spaces, or arithmetic operators. pszFieldName: If this pointer is not NULL the name of the requested field will be written to this location. The pszFieldName buffer should be at least 12 character is size in order to hold the longest possible field name of 11 characters plus a terminating zero character. it should be 10 characters zero terminated so if you write a fieldname bigger then 10 characters your offset is wrong for the next item (Field type) who start at byte 11 in the fieldtable i hope its only wrong in the manual and not the dll jpam

about the asm code; you don't decrease ecx and test when you process the last pixel 'shl' means shift left not rotate it shift the bits to the left and add zeros to the right better use 'rol' and 'ror' 'loop' is slow better use a conditional jmp with ecx Kind Regards jpam edit; sorry 'loop' decrements ecx

when searching my old harddisk i found ecfm.zip it is a full working version. i don't have acces to any server at the moment so if someone want to put ecfm on his own public server sent me a email, i send the zip to you. Kind Regards [email protected] jpam

use SetText in your WM_PAINT code

this is a demo for sprite collisions it's made for prospeed V2.8, but easy to convert to 3.0 i can send you the whole zip if you wish, just pm me with your mailadress. jpam #include <GUIConstants.au3> #include <Prospeed.au3> Opt("GUIOnEventMode", 1) HotKeySet("{Esc}","_exit") FileInstall("D:\snelheidscontrole\prospeed\Auto.jpg",@scriptdir & "\Auto.jpg",1) FileInstall("D:\snelheidscontrole\prospeed\AutoMask.gif",@scriptdir & "\AutoMask.gif",1) FileInstall("D:\snelheidscontrole\prospeed\FObjects2.gif",@scriptdir & "\FObjects2.gif",1) FileInstall("D:\snelheidscontrole\prospeed\KlExplosion.wav",@scriptdir & "\KlExplosion.wav",1) $GUI = GUICreate("Prospeed",800,600,-1,-1,$WS_POPUP) GUISetState() Background(@scriptdir & "\Auto.jpg", 0, 0) $mask = LoadImage(@scriptdir & "\AutoMask.gif", 0, 0, 800,600,4) $Sprite1 = @scriptdir & "\FObjects2.gif" $ball1 = sprite($Sprite1, 0, 24, 19, 19, 4, 1, 9, 600, 200) $ball2 = sprite($Sprite1, 0, 24, 19, 19, 4, 1, 9, 600, 250) $ball3 = sprite($Sprite1, 0, 24, 19, 19, 4, 1, 9, 600, 300) $ball4 = sprite($Sprite1, 0, 24, 19, 19, 4, 1, 9, 600, 350) $ball5 = sprite($Sprite1, 0, 24, 19, 19, 4, 1, 9, 600, 400) $ball6 = sprite($Sprite1, 0, 24, 19, 19, 4, 1, 9, 600, 450) DSoundInit() $plop = @scriptdir & "KlExplosion.wav" $load = DSoundLoad("Plopp.wav") SetBackAutoCollision($ball1, $mask, 2, 800, 600, $load) SetBackAutoCollision($ball2, $mask, 2, 800, 600, $load) SetBackAutoCollision($ball3, $mask, 2, 800, 600, $load) SetBackAutoCollision($ball4, $mask, 2, 800, 600, $load) SetBackAutoCollision($ball5, $mask, 2, 800, 600, $load) SetBackAutoCollision($ball6, $mask, 2, 800, 600, $load) Movesprite($ball1, 810, 600) Movesprite($ball2, 400, 600) Movesprite($ball3, 810, 600) Movesprite($ball4, 400, 600) Movesprite($ball5, 810, 600) Movesprite($ball6, 400, 600) SetSpriteSpeed($ball1, 3, 3) SetSpriteSpeed($ball2, 3, 3) SetSpriteSpeed($ball3, 3, 3) SetSpriteSpeed($ball4, 3, 3) SetSpriteSpeed($ball5, 3, 3) SetSpriteSpeed($ball6, 3, 3) While 1 $col = CollideUnknown() If $col > 0 Then $c = GetSpriteX($S_A) $d = GetSpriteY($S_A) $e = GetSpriteX($S_B) $f = GetSpriteY($S_B) GetSpriteInfos($S_A) $g = $goal_PosX $h = $goal_PosY GetSpriteInfos($S_B) $i = $goal_PosX $j = $goal_PosY If $c > $e Then $g = 1024 $i = 0 Else $g = 0 $i = 1024 EndIf If $d > $f Then $h = 768 $j = 0 Else $h = 0 $j = 768 EndIf MoveSprite($S_A, $g, $h) MoveSprite($S_B, $i, $j) EndIf WEnd Func _exit() Exit EndFunc

As far i can see it's not a wm_Paint issue. I think the sprite function wants to render a frame that not exist in your png. Sprite($S_Spriteplane, $S_Destination, $S_offsetX, $S_offsetY, $S_WIDTH, $S_HEIGHT, $S_FRAMES, $S_START_FRAME, $S_FRAME_SPEED, $S_posX, $S_posY) make sure if you are using a static png as sprite, that the $S_FRAMES para is 1 and $S_START_FRAME is allso 1 Regards jpam

uploaded demos_and_sourcecodes_autoit.zip most AutoIt Prospeed examples are ported to prospeed.dll 3.0 syntax last prospeed.dll and udf are included. http://prospeed-jan.xprofan.com/

Try it without the compress/decompress function and please let me know what the result is.

i did use a string in the above example

I see no problems overhere The dll does not read a key in a textfile, but it use the textfile as binary bytes to encrypt/decrypt the source file. You can even use a mp3 file to encrypt/decrypt. This is a proper way to use it; #include "Crypt.au3" ; Compress and Encrypt file $key = SetKey("key") $pMem = ReadFileFast(@ScriptDir&"\readme.txt") $compress = Compress($pMem) Crypt($compress, $key) WriteFileFast(@ScriptDir&"\readme.txt", $compress) ; Decrypt and Decompress file $pMem = ReadFileFast(@ScriptDir&"\readme.txt") Crypt($pMem, $key) $DeCompress = Decompress($pMem) WriteFileFast(@ScriptDir&"\readme.txt", $DeCompress) DelKey($key) Exit

i will look into that

created long time ago an example for tiles, http://prospeed-jan.xprofan.com/bin/tiles.zip

you have to set the right amount of frames from the sprite picture Sprite($S_Spriteplane, $S_Destination, $S_offsetX, $S_offsetY, $S_WIDTH, $S_HEIGHT, $S_FRAMES, $S_START_FRAME, $S_FRAME_SPEED, $S_posX, $S_posY)

something like this; #include <ProSpeed30.au3> $width = 860 $height = 488 GUICreate("", $width, $height) GUISetState() $hdc = GetHDC() $Background = BackgroundScroll(@ScriptDir & "\images\Background.bmp", 0, 0, -1, 1) $Mask = LoadFileImage(@ScriptDir & "\images\mask.gif") $Sprite1 = LoadSprite(@ScriptDir & "\images\Sprite.bmp") $Sprite = Sprite($Sprite1, $hdc, 0, 0, 32, 32, 32, 1, 1, 200, 405) SetSpriteSpeed($Sprite, 3, 0) Scroll_Stop() Do Sleep(1) Until GUIGetMsg() = -3

Try prospeed.dll it has all the tools you want to easy build your game. http://www.autoitscript.com/forum/index.ph...amp;hl=prospeed

The last efmc.exe should work without problems. was using WinExec, changed to CreateProcess Well , you have to wait even longer, because i lost my source code tonight, overwritten with another source file I have to rewrite the hole thing ! It should display your simple msgbox

That's because the program is not encrypting the exe yet the autoit exe get crippled when i use encryption ,(error can't find autoit script) its seems that only interpreting languages don't work anymore with native code C or asm the exe can be encrypted and they are running fine still searching for a solution. You have to redownload the zip, i have updated the program It has now icon support , put an icon in the workingdir and it add it to your new exe file, or if no icon is found then efmc extract the icon from the source file.