]> pd.if.org Git - mmurtl/commitdiff
autocommit for files dated 1995-02-09 16:03:26
authorRichard Burgess <>
Thu, 9 Feb 1995 16:03:26 +0000 (16:03 +0000)
committerNathan Wagner <nw@hydaspes.if.org>
Mon, 17 Oct 2016 14:03:48 +0000 (14:03 +0000)
msamples/beeper/beeper.asm [new file with mode: 0644]
msamples/beeper/beeper.run [new file with mode: 0644]

diff --git a/msamples/beeper/beeper.asm b/msamples/beeper/beeper.asm
new file mode 100644 (file)
index 0000000..364a4e2
--- /dev/null
@@ -0,0 +1,69 @@
+\r
+.DATA\r
+EXTRN _Alarm FWORD\r
+EXTRN _KillAlarm FWORD\r
+EXTRN _Sleep FWORD\r
+EXTRN _MicroDelay FWORD\r
+EXTRN _GetCMOSTime FWORD\r
+EXTRN _GetCMOSDate FWORD\r
+EXTRN _GetTimerTick FWORD\r
+EXTRN _Tone FWORD\r
+EXTRN _Beep FWORD\r
+EXTRN _AllocExch FWORD\r
+EXTRN _DeAllocExch FWORD\r
+EXTRN _GetTSSExch FWORD\r
+EXTRN _SetPriority FWORD\r
+EXTRN _NewTask FWORD\r
+EXTRN _SpawnTask FWORD\r
+EXTRN _SendMsg FWORD\r
+EXTRN _ISendMsg FWORD\r
+EXTRN _WaitMsg FWORD\r
+EXTRN _CheckMsg FWORD\r
+EXTRN _Request FWORD\r
+EXTRN _MoveRequest FWORD\r
+EXTRN _Respond FWORD\r
+EXTRN _GetpJCB FWORD\r
+EXTRN _GetJobNum FWORD\r
+EXTRN _LoadNewJob FWORD\r
+EXTRN _Chain FWORD\r
+EXTRN _ExitJob FWORD\r
+EXTRN _KillJob FWORD\r
+EXTRN _SetUserName FWORD\r
+EXTRN _GetUserName FWORD\r
+EXTRN _SetCmdLine FWORD\r
+EXTRN _GetCmdLine FWORD\r
+EXTRN _SetPath FWORD\r
+EXTRN _GetPath FWORD\r
+EXTRN _SetExitJob FWORD\r
+EXTRN _GetExitJob FWORD\r
+EXTRN _SetSysIn FWORD\r
+EXTRN _GetSysIn FWORD\r
+EXTRN _SetSysOut FWORD\r
+EXTRN _GetSysOut FWORD\r
+EXTRN _SetJobName FWORD\r
+EXTRN _RegisterSvc FWORD\r
+EXTRN _UnRegisterSvc FWORD\r
+EXTRN _GetSystemDisk FWORD\r
+L_lit DB 66,101,101,112,101,114,0\r
+\r
+\r
+.CODE\r
+PUBLIC _main:\r
+       PUSH EBP\r
+       MOV EBP,ESP\r
+       PUSH OFFSET L_lit+0\r
+       PUSH 6\r
+       CALL FWORD PTR _SetJobName\r
+L_1:\r
+       MOV EAX,1\r
+       AND EAX,EAX\r
+       JZ L_2\r
+       PUSH 50\r
+       CALL FWORD PTR _Sleep\r
+       PUSH 150\r
+       PUSH 10\r
+       CALL FWORD PTR _Tone\r
+       JMP L_1\r
+L_2:\r
+       POP EBP\r
+       RETN\r
diff --git a/msamples/beeper/beeper.run b/msamples/beeper/beeper.run
new file mode 100644 (file)
index 0000000..1b1bd90
Binary files /dev/null and b/msamples/beeper/beeper.run differ