Показать сообщение отдельно
Старый 08.06.2009, 18:40   #11
Randomize
[object Object]
 
Аватар для Randomize
 
Регистрация: 01.08.2008
Адрес: В России
Сообщений: 4,355
Написано 2,471 полезных сообщений
(для 6,852 пользователей)
Ответ: Как приделать к BlitzMax DLL

Итог эксперементов:
Strict
Module Subject.AStar
Import Pub.Win32

Private
Local lib%

Public

lib = LoadLibraryA("AStar.dll")

Global AStar_INIT(xMap%,yMap%) = GetProcAddress(lib, "AStar_INIT")
Global EstimateHcost%(a%,b%,targetx%,targety%) = GetProcAddress(lib, "EstimateHcost")
Global FindPath%(pathfinderID%,mapWidth%,mapHeight%,startX%,startY%,targetX%,targetY%,stepBystep%) = GetProcAddress(lib, "FindPath")
Global ReadPathX%(pathfinderID%,pathLocation%) = GetProcAddress(lib, "ReadPathX")
Global ReadPathY%(pathfinderID%,pathLocation%) = GetProcAddress(lib, "ReadPathY")
Global ReadPath%(pathfinderID%) = GetProcAddress(lib, "ReadPath")
Global Get_walkability%(x%,y%) = GetProcAddress(lib, "Get_walkability")
Global Set_walkability(x%,y%,param%) = GetProcAddress(lib, "Set_walkability")
Global Get_listArray%(x%,y%) = GetProcAddress(lib, "Get_listArray")
Global Set_listArray(x%,y%,param%) = GetProcAddress(lib, "Set_listArray")
Global Get_parentX%(x%,y%) = GetProcAddress(lib, "Get_parentX")
Global Get_parentY%(x%,y%) = GetProcAddress(lib, "Get_parentY")
Global Get_Fcost%(x%,y%) = GetProcAddress(lib, "Get_Fcost")
Global Get_Gcost%(x%,y%) = GetProcAddress(lib, "Get_Gcost")
Global Get_Hcost%(x%,y%) = GetProcAddress(lib, "Get_Hcost")
Global CheckForIsland(x%,y%) = GetProcAddress(lib, "CheckForIsland")

lib = 0
Но вот Shimatta!!!!
Никак не хочет блиц его вкушивать.
Путь: BlitzMax\mod\subject.mod\AStar.mod\AStar.bmx
Тамже и DLL обитает...
MinGW есть.
Скомпилил.
Building test
Compiling:test.bmx
Compile Error: Can't find interface for module 'subject.astar'
[C:/Documents and Settings/Администратор/Рабочий стол/astar/test.bmx;1;1]
Build Error: failed to compile C:/Documents and Settings/Администратор/Рабочий стол/astar/test.bmx
Process complete
Wtf???
__________________
Retry, Abort, Ignore? █
Intel Core i7-9700 4.70 Ghz; 64Gb; Nvidia RTX 3070
AMD Ryzen 7 3800X 4.3Ghz; 64Gb; Nvidia 1070Ti
AMD Ryzen 7 1700X 3.4Ghz; 8Gb; AMD RX 570
AMD Athlon II 2.6Ghz; 8Gb; Nvidia GTX 750 Ti

Последний раз редактировалось Randomize, 08.06.2009 в 19:13.
(Offline)
 
Ответить с цитированием