2 Copyright © 1995-2011, The AROS Development Team. All rights reserved.
9 /*****************************************************************************
23 BEEP produces a beep via Intuition DisplayBeep(NULL).
29 ******************************************************************************/
31 #include <proto/exec.h>
33 #include <intuition/intuition.h>
34 #include <intuition/intuitionbase.h>
35 #include <proto/intuition.h>
36 #include <intuition/screens.h>
38 const TEXT version
[] = "$VER: Beep 41.2 (03.03.2011)";
40 AROS_ENTRY(__startup
static ULONG
, Start
,
41 AROS_UFHA(char *, argstr
, A0
),
42 AROS_UFHA(ULONG
, argsize
, D0
),
43 struct ExecBase
*, SysBase
)
47 struct IntuitionBase
*IntuitionBase
;
49 IntuitionBase
= (struct IntuitionBase
*)OpenLibrary("intuition.library", 0);
55 CloseLibrary(&IntuitionBase
->LibNode
);