home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 1 / amigaformatcd01.iso / demos / secal / inc / libcalls / realtime.inc < prev    next >
Encoding:
Text File  |  1996-04-30  |  1.5 KB  |  71 lines
  1. pattern LockRealTime(_lockType) is
  2.     push a6;
  3.     d0.l:=_lockType;
  4.     a6:=RealTimeBase; jsr [a6-30];
  5.     pop a6;
  6. endp;                                                            # LOCKREALTIME
  7.  
  8. pattern UnlockRealTime(_lock) is
  9.     push a6;
  10.     a0:=_lock;
  11.     a6:=RealTimeBase; jsr [a6-36];
  12.     pop a6;
  13. endp;                                                            # UNLOCKREALTIME
  14.  
  15. pattern CreatePlayerA(_tagList) is
  16.     push a6;
  17.     a0:=_tagList;
  18.     a6:=RealTimeBase; jsr [a6-42];
  19.     pop a6;
  20. endp;                                                            # CREATEPLAYERA
  21.  
  22. pattern DeletePlayer(_player) is
  23.     push a6;
  24.     a0:=_player;
  25.     a6:=RealTimeBase; jsr [a6-48];
  26.     pop a6;
  27. endp;                                                            # DELETEPLAYER
  28.  
  29. pattern SetPlayerAttrsA(_player,_tagList) is
  30.     push a6;
  31.     safe a0:=_player; a1:=_tagList;;
  32.     a6:=RealTimeBase; jsr [a6-54];
  33.     pop a6;
  34. endp;                                                            # SETPLAYERATTRSA
  35.  
  36. pattern SetConductorState(_player,_state,_time) is
  37.     push a6;
  38.     safe a0:=_player; d0.l:=_state; d1.l:=_time;;
  39.     a6:=RealTimeBase; jsr [a6-60];
  40.     pop a6;
  41. endp;                                                            # SETCONDUCTORSTATE
  42.  
  43. pattern ExternalSync(_player,_minTime,_maxTime) is
  44.     push a6;
  45.     safe a0:=_player; d0.l:=_minTime; d1.l:=_maxTime;;
  46.     a6:=RealTimeBase; jsr [a6-66];
  47.     pop a6;
  48. endp;                                                            # EXTERNALSYNC
  49.  
  50. pattern NextConductor(_previousConductor) is
  51.     push a6;
  52.     a0:=_previousConductor;
  53.     a6:=RealTimeBase; jsr [a6-72];
  54.     pop a6;
  55. endp;                                                            # NEXTCONDUCTOR
  56.  
  57. pattern FindConductor(_name) is
  58.     push a6;
  59.     a0:=_name;
  60.     a6:=RealTimeBase; jsr [a6-78];
  61.     pop a6;
  62. endp;                                                            # FINDCONDUCTOR
  63.  
  64. pattern GetPlayerAttrsA(_player,_tagList) is
  65.     push a6;
  66.     safe a0:=_player; a1:=_tagList;;
  67.     a6:=RealTimeBase; jsr [a6-84];
  68.     pop a6;
  69. endp;                                                            # GETPLAYERATTRSA
  70.  
  71.