Re: Moebius
Publié : jeu. 08/juil./2010 18:41
Eh ben voilà! 

La procédure fonctionne bien sans être compilées par MoebiusPolink: Unresolved external error '_PB_StringBasePosition
Polink: Fatal error: 1 unresolved external (s)
Code : Tout sélectionner
ProcedureDLL.s m_h(ad.l,lng.l)
For i=0 To lng-1
num.q=PeekC(ad+i)
If Chr(num)<" "
cart$=cart$+"."
Else
cart$=cart$+Chr(num)
EndIf
hexs.s=hexs.s+RSet(Hex(num),2,"0")+" "
Next
sort.s="$"+Hex(ad)+" "+hexs+" "+cart$
ProcedureReturn sort
EndProcedure
q.q=12345678900987654321
b.s="12345678900987654321"
D.D=12345678900987654321
DDd.D=ValD("1.2345678900987654321E19")
aaa$= m_h(@b,32)
Debug m_h(@q,8)+" "+Str(q)
Debug m_h(@q,10)
Debug m_h(@d,8)+" "+StrD(d)
Debug m_h(@d,10)
Debug m_h(@ddd,8)+" "+StrD(d)
Debug m_h(@ddd,10)
Autre sujet : Moebius semble avoir la même limitation que Tailbite concernant les string.moebius /LIBNAME "DROOPY" /OUTPUT "d:\MyLib" /PBPATH "C:\Program Files (x86)\PureBasic451\" /PBCOMPILER "C:\Program Files (x86)\PureBasic451\Compilers\pbcompiler.exe" /PBOBJ2LIB "C:\Program Files (x86)\PureBasic451\Compilers\polib.exe" /PBFASM "C:\Program Files (x86)\PureBasic451\Compilers\fasm.exe" /PBLIBMAKER "C:\Program Files (x86)\PureBasic451\SDK\LibraryMaker.exe"
Code : Tout sélectionner
ProcedureDLL.s Un()
ret.s="UN"
ProcedureReturn ret
EndProcedure
ProcedureDLL.s PlusUn(text.s)
ret.s=text+Un()
ProcedureReturn ret
EndProcedure
Dobro a écrit :ou en est ce programme ? Moebius .... ?![]()
arreté ?
Dernière connexion le Mer 11/Avr/2012 19:44 ProbablementDobro a écrit :Re ?? Progi1984 a disparu dans le triangle des bermudes ??