home *** CD-ROM | disk | FTP | other *** search
/ Magazyn Amiga 14 / MA_Cover_14.iso / source / e / powerd / modules.lha / modules / lib / powerd.m < prev   
Encoding:
Text File  |  2000-02-01  |  4.1 KB  |  119 lines
  1. OPT    LINK='powerd.lib'
  2.  
  3. // String/EString functions ////////////
  4. RPROC EStrAdd(a0:PTR TO CHAR,a1:PTR TO CHAR,d0=-1)(PTR TO CHAR)
  5. LPROC EStrCopy(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length=-1)(PTR TO CHAR)
  6. LPROC EStringF(dstr:PTR TO CHAR,fstr:PTR TO CHAR,list=NIL:LIST OF LONG)(PTR TO CHAR)
  7. RPROC EStrLen(a0:PTR TO CHAR)(LONG)
  8. RPROC EStrMax(a0:PTR TO CHAR)(LONG)
  9. RPROC InStr(a0:PTR TO CHAR,a1:PTR TO CHAR,d0=0:LONG)(LONG)
  10. RPROC MidEStr(a0:PTR TO CHAR,a1:PTR TO CHAR,d1,d0)(PTR TO CHAR)
  11. //LPROC MidStr(string:PTR TO CHAR,str:PTR TO CHAR,start,length)(PTR TO CHAR)
  12. RPROC IsAlpha(d0:LONG)(BOOL)
  13. RPROC IsBin(d0:LONG)(BOOL)
  14. RPROC IsHex(d0:LONG)(BOOL)
  15. RPROC IsNum(d0:LONG)(BOOL)
  16. RPROC LowerStr(a0:PTR TO CHAR)(PTR TO CHAR)
  17. RPROC NewEStr(d0:UWORD)(PTR TO CHAR)
  18. LPROC OStrCmp(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length=-1)(LONG)
  19. LPROC ReadEStr(fh:BPTR,estr:PTR TO CHAR)(LONG)
  20. //LPROC ReadStr(fh:BPTR,str:PTR TO CHAR)(LONG)
  21. RPROC ReEStr(a0:PTR TO CHAR)
  22. RPROC RemEStr(a1:PTR TO CHAR)
  23. LPROC RightEStr(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length)(PTR TO CHAR)
  24. //LPROC RightStr(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length)(PTR TO CHAR)
  25. RPROC SetEStr(a0:PTR TO CHAR,d0:LONG)
  26. LPROC StrAdd(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length=-1)(BOOL)
  27. LPROC StrCmp(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length=-1)(BOOL)
  28. LPROC StrCopy(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length=-1)(BOOL)
  29. LPROC StringF(dstr:PTR TO CHAR,fstr:PTR TO CHAR,list=NIL:LIST OF LONG)(PTR TO CHAR)
  30. RPROC StrLen(a0:PTR TO CHAR)(LONG)
  31. RPROC TrimStr(a0:PTR TO CHAR)(PTR TO CHAR)
  32. RPROC UpperStr(a0:PTR TO CHAR)(PTR TO CHAR)
  33.  
  34. // Math functions //////////////////////
  35. RPROC Abs(d0:LONG)(LONG)//='\ttst.l\td0\n\tbge.s\t.noneg\n\tneg.l\td0\n.noneg\n'
  36. RPROC And(d0:LONG,d1:LONG)(LONG)='\tand.l\td1,d0\n'
  37. RPROC BitCount(d0:LONG)(LONG)
  38. RPROC BitSize(d0:LONG)(LONG)
  39. RPROC EOr(d0:LONG,d1:LONG)(LONG)='\teor.l\td1,d0\n'
  40. RPROC HiBit(d0:LONG)(LONG)
  41. RPROC LoBit(d0:LONG)(LONG)
  42. RPROC Or(d0:LONG,d1:LONG)(LONG)='\tor.l\td1,d0\n'
  43. RPROC Neg(d0:LONG)(LONG)='\tneg.l\td0\n'
  44. RPROC Not(d0:LONG)(LONG)='\tnot.l\td0\n'
  45. RPROC Rol(d0:LONG,d1:LONG)(LONG)='\trol.l\td1,d0\n'
  46. RPROC Ror(d0:LONG,d1:LONG)(LONG)='\tror.l\td1,d0\n'
  47. RPROC Shl(d0:LONG,d1:LONG)(LONG)='\tasl.l\td1,d0\n'
  48. RPROC Shr(d0:LONG,d1:LONG)(LONG)='\tasr.l\td1,d0\n'
  49. RPROC Sign(d0:LONG)(LONG)
  50.  
  51. // FPU functions ///////////////////////
  52. RPROC Pow(fp0:DOUBLE,fp1:DOUBLE)(DOUBLE)
  53.  
  54. // Intuition support functions /////////
  55. RPROC Mouse()(LONG)
  56. RPROC MouseX(a0:PTR TO Window)(LONG)
  57. RPROC MouseXY(a0:PTR TO Window)(LONG,LONG)
  58. RPROC MouseY(a0:PTR TO Window)(LONG)
  59. RPROC WaitIMessage(a0:PTR TO Window)(LONG,LONG,LONG,LONG)
  60.  
  61. // Miscellaneous functions /////////////
  62. RPROC CtrlC()(BOOL)
  63. RPROC CtrlD()(BOOL)
  64. RPROC CtrlE()(BOOL)
  65. RPROC CtrlF()(BOOL)
  66.  
  67. RPROC Byte(a0:PTR TO BYTE)(LONG)
  68. RPROC Word(a0:PTR TO WORD)(LONG)
  69. RPROC Long(a0:PTR TO LONG)(LONG)
  70. RPROC UByte(a0:PTR TO BYTE)(LONG)
  71. RPROC UWord(a0:PTR TO WORD)(LONG)
  72. RPROC ULong(a0:PTR TO LONG)(LONG)
  73.  
  74. RPROC PutByte(a0:PTR TO BYTE,d0:LONG)(LONG)
  75. RPROC PutWord(a0:PTR TO WORD,d0:LONG)(LONG)
  76. RPROC PutLong(a0:PTR TO LONG,d0:LONG)(LONG)
  77.  
  78. RPROC Bounds(d0:LONG,d1:LONG,d2:LONG)(LONG)
  79. RPROC Even(d0:LONG)(BOOL)
  80. RPROC Odd(d0:LONG)(BOOL)
  81. RPROC Max(d0:LONG,d1:LONG)(LONG)
  82. RPROC Min(d0:LONG,d1:LONG)(LONG)
  83.  
  84. RPROC Rnd(d0:LONG)(LONG)
  85. RPROC RndQ(d0:LONG)(LONG)
  86.  
  87. EPROC FileLength(name:PTR TO CHAR)(LONG)
  88. RPROC KickVersion(d0:LONG)(BOOL)
  89.  
  90. LPROC Inp(fh:BPTR)(LONG)
  91. LPROC Out(fh:BPTR,ch:LONG)
  92.  
  93. EPROC RealStr(str:PTR TO UBYTE,f:DOUBLE,n=1)(PTR TO UBYTE)
  94. EPROC RealEStr(estr:PTR TO UBYTE,f:DOUBLE,n=1)(PTR TO UBYTE)
  95. EPROC RealVal(str:PTR TO UBYTE,pos=0)(DOUBLE)
  96. EPROC Val(s:PTR TO UBYTE,n=0)(LONG)
  97.  
  98. RPROC AllocVecPooled(a0:APTR,d0:LONG)(PTR)
  99. RPROC FreeVecPooled(a0:APTR,a1:PTR)
  100.  
  101.  
  102.  
  103. EPROC OpenW(l,t,w,h,i,f,n=NIL,s=NIL,st=1,g=NIL,tags=NIL:PTR TO TagItem)(PTR TO Window)
  104. EPROC OpenS(w,h,d,t=0,n=NIL,tags=NIL:PTR TO TagItem)(PTR TO Screen)
  105. RPROC CloseW(a0:PTR TO Window)
  106. RPROC CloseS(a0:PTR TO Screen)
  107.  
  108. RPROC SetStdRast(d1:PTR TO RastPort)(PTR TO RastPort)
  109. RPROC Colour(d0,d1=0)
  110. RPROC Line(d0,d1,d2,d3,d4=-1)
  111. RPROC Plot(d0,d1,d2=-1)
  112. RPROC Box(d0,d1,d2,d3,d4=-1)
  113. RPROC Ellipse(d0,d1,d2,d3,d4=-1)
  114. RPROC Circle(d0,d1,d2,d3=-1)
  115. /*
  116. RPROC IBox(x,y,w,h,c=-1)
  117. RPROC TextF(x,y,fmt,args)
  118. */
  119.