From 23b95852f614781909dc5803e2a56c6f78441b54 Mon Sep 17 00:00:00 2001
From: Richard Burgess <>
Date: Thu, 9 Feb 1995 16:03:44 +0000
Subject: [PATCH] autocommit for files dated 1995-02-09 16:03:44

---
 msamples/service/service.run | Bin 0 -> 7172 bytes
 msamples/service/testsvc.asm | 140 +++++++++++++++++++++++++++++++++++
 2 files changed, 140 insertions(+)
 create mode 100644 msamples/service/service.run
 create mode 100644 msamples/service/testsvc.asm

diff --git a/msamples/service/service.run b/msamples/service/service.run
new file mode 100644
index 0000000000000000000000000000000000000000..af47be4af8ca51533b2ebb1568a324568efe903d
GIT binary patch
literal 7172
zcmb7J4RBP|6@DQxEV%gApH`T5b^XEmGit_2MGy;?8$gZjfR5<MlmHt;h=3t0sHGF<
z?RIv3M3GvDPOVJ~ZK*SD8K;h^wz!HSGA(Ls6`@kJW4n*dbkdS(o^*%T?|k>Y-IqkH
z&E$N0-+kwvzkBYv_wIJr7=}@^ISTAG4dceM4P$YwVQi^Ghx|PeG@g`(!t0&FbGtoY
z4aC~!g4K&R;7wkYZB@RYU}h%Z$xD~L_(6zn+cFMM(=^|0C+BM)@5Qec*7#f*^?fv7
z0=H58_9=#8y;|4SSLx~Udyb-~y++G!OTv)GLb68<CEM%Jz<+y<{`BILN9g?mp4yIy
zu5|e&ajJMeB}V!r6ym`&G<>=9=^*;64rWis>s|7~uAg~|C^nxcoR495fU7OW0XY#*
zuiLbQ3$^I%x%l+QZksKv(*)bk@#5#;jkDLopC7HSqNBY|hcP_F<`DCxrbOc#Ghg;~
zPXu#gA+KDg1+6NJ<<|Hdb1MCI(}j68Xr~8%^r)D5ieSE;quZvy8g^U7nxu|S9b#m?
z8gU{J(3b!}i#FR!yV`C{zO(Cu=h+`G+0D$DA=38P>8Pio=C1mjdQal|41}Az)O(gY
z)i>&4^n|%6zbE~d+Ch6yULCU2hZ+kxbs(n>=4jx)yxN~v{bb9j_qDLgePL(9wiC?<
z(RnZ|Q!_RAO!Pt$)*qfME<a7r`X%VJRsU}!l*1p|2RN?SP`eun!}6ThFh|zCkvcma
zvFl-wFgn*^RG$pZt9?wQoO*Y}sJS9O6cDEo9pc@)j%c>ro6XFhMY7vrX5L{VZDxMX
z#_eXN7Y*kR0BU;_BLZ#cco)&len}Ll{ZsMLZDuCnV|dAabevG)$^qwT850A*Lg#UL
zkXXn=Mjns^d{~c9uUSHmvAKHZ9z3Ik*>LWzyb>dF^_D^qRKyY2EO(um`6I1eZf0I&
zW0{%x2^(w7%wue9Ff$LZvDnP4Wn+bzX+*=>4zSfeNt2tjM!R`mWB>3!?N_Wq0}{w`
zuQh+jbtX|31FXV$^lMwSL9o*wg=vwPJO`=byofzd#HM4OiuGNNX0F~thN^yfRgY({
zxgSq{$EjMyLA=y!dzNsd4;6ol8i|m>(wVB?+(LUK@TG{y-qOcf1(d#z;Qbx?sb-HX
z2n_4Tx`J(pE|!I;7EP44-+YqNE|d<MX&(lgr-U<CtEFfq&hHp3nqCKXC=*LFR|K*G
z%i<MT+MW?Y`XR(QBg}y*)f~<ZWz0r8hV-nr5v7lpyb_g?|M0*L@b}D}6~T({$u5S3
zq}Meof=XJf!w^&kzqfr{@lB+ct=vjYi1_0$AQ}vM^FJI^W&11*Ki14uz0u+-=&)Qb
zytZMJ*ijW}4V)cXt%Hq)*1S4_>gTCJmZp+~u1lAuQnGj$=_Nhb6Ab515QaqyzGU$=
z|AovL%9^dB&WCu7$d;s_eV4N*^<58`p-R44%q~43ivb~H2J&i%_8f;zWssXwM{~*v
zTbC@pf*n;X64~bSsvNFRB}*!ljCNl4jdAYA{v>=Dla<Yw<w#ikx&-k9o*Iz!VsWk&
z;UTYNeMw<*9H|zqUUNB+wi_y(MWe-|(-ZNd#Hvz`l0^vO6)1NY*sq{dB9|<#*52u5
zCKXAPiBd6N%AePaSPx*`*qA%4sdvDmEw|jD^!wKL2|Gf_(kS6{ehOxmHa=~YC(*&D
zN92hv3g<WR6o?JBr_jtT!Ry9?lZ5j!+nKka$#PN8USI<iZW|k@d7Ick%}%p{D&D~c
zO5I#GP$^%;ZfUuwl#9@CWGLKrWg_0I*pZX)yf$7>KI#qwhWSRnGcR~_Tg)FY^QsJY
z2*X7chB;#xt`P=K!_7XI`FyjBv&45OiEplwH_xl%@@Du$b60bz_GLuvcrcB61%#7h
z9-Oe#L-t|J>(L7eT@zb}mteR$UaAvp&DY}N1SC0>bi&zyiXmN6ULq$eFKxXrq`jv2
zODs^y2$?-jGv+L)1gJh|>FQHm^`BNqC`-yuap`AE+cUZ>Spy@g7Zh$A%Q9JN{D44N
zpeTUl&9hbnCB$+&{feMhm}K2bxPx;9->&!HO4VkV!Qg)m`JaQ%^w5Bou>*>u2DlFL
zM-taW;_@A|)k@*B+{^UvtQ?5BM#j9#FxnVtz!X~zNq*w+kDV}z|KhLkI@zA^;@iOj
z*Rf1zeT3J(S&~QMzVyq~$qCmVnU;|_KDO8NsB+SaudWCX6>@gLm~FRVmP7z<79v2G
z2=w7)QTT9hlS6#F=f$^%1%w#~g;CZ97;zu);!See6`RVHyt4-Ce7inCv|txDv`F!7
zw&TxGa&WofeyPedjcMq}xv8-bk|l#>{Npm7myocJvN4HCT96wObhS3pi|?eyfKeao
zG$VZQ;$3(>T6LYikWn=m7&KnTWOm_fRgt7!Ff~vT5!3zglVEp`ItHtIl#5t>dxY<j
zwc2_eV0qStNcn9nJfe;v;gKdGi4$xUW9~%dCZf-8%fT%H%A;UtJF8o`OsRkHK+=9)
zo>V!fhS7(zGAzfDC^iIXTkgbBi5B(GP4$kH;L7<$jv)H{Vhtc~;bFAm;ieHDO5*v&
zWyq1@4{cSKSfg<3WlA#t5k@-48T}&oA)T4z%0<+RpH%vwzD+?n1Pt2v4{9JP4Na8r
zZy8}+xbo>b7fc(nH^SW3tAL3eWCSL-dIywT@X|3oxxRE~KK%sOI6s_{n&M;B4~6SY
z4OoJuT`gct0`bGS6ae7}SuK+%Fh+kXQ01#G7@jHhoOtQ8kSTU^blAZqeq`>6WlwQu
zI-Pd7c601|!=GScDtR1aT}-b7ndPw(N6bccj4WMs^g<E$N62ItgPl~;ogH_XPm5jI
zF9#jLW?bQTkR1L3<Cq42JFc)?JBH<?danN;dP0_b4mAlq-`QIOsZqb9qGpocae2Vu
zuehqi6MT+}H>a{A?C^P`9sbrBhmFxJ=Z<0d9FaXq*gn&iE2+rLR$QJj+LYNoM`ey5
z9L+J-pOXYXq-Kmet)tb9@uunX#w55@Myz7O(c5Jt9E35F{WRt^SaP(G2-wq6dt>C0
z`WfTR$Ie0yn46@6TxXaWd1{^4+En_8hl<h!){4@&#)5yAL-n;cM(yT^^$FN71N#Ck
zN2-gtNxrKQIr22GsdR9x6cz^&k&cwNcVBOq*?*&`Z%26vG;ECFybcXzs*rthfo2>4
zBm3m+GjGp$V?hZuHs)^v*sRkL5txy?bJOh7vB2Ak!0xZ%twe5KY3TnG?i(By@ae|$
z>NQhE^!njJ3$8g57kH(=Hp4j~E8hfFf+}T=U#t2SKRoaT_@!9&;%bz=hP?Ugbp6Q+
zX1Phfc<QeyuswTf2wzjEp`P^iT79LGuPK6(XSq}S0p~$>DH0m+@{w^p&s_&z8J4f-
z^|wcDN5SsJZuKwh0wRQmUpEjpQ}z1d21kpdex5|n_oE<(TXPrvkTa50<iIaSDh#tk
z`#Hk?pTVY}0|Jx9DL9>r1lhPk0_E7_JQ!k@3#C{phugp$87I3{_^5LwpUa*qhhktK
zhV!**C|_$c<Q|bW${Fhn=<%MDx#-DC(2~X1ixTE!@hbnTQs-JUo|UiL<!?4oc4M3y
ziHnI#iEYHS#0|u5Vve|(xRuyT+(Fz)>?0P4dx>um4-k(Ki^M^qOEhFxHzLFsaWXMM
zyqMTPoKBogoKKW%GJZ%PE+w`R*Ah1nyNNmCX5v<2FL4KPC$W!MAnql;MLa+}LM##o
zi7wHQgN6|y#)y-N3F5`X2I6$$Y~p-klDL?-l-NdGOWZ*0CgzBniCc-i#2v()#6Dty
zxR>}A@c{7%u}B;wx<rF{5h2R23WhP6m>^zEY#>f2$`1*KAwM@De~3D><gSY!CWvc^
z8;IS+9C0&oE3ub&%k9lKsD+CXM$lN4>b!sD@>F8M>UCW$9UZ9^S4^5{%(>;x#QiND
zD_0~|r5;$<)wyO>DzScLM@OP7)p_sA)h%7AL|0oXu}+Vb5jUwjZ@6{N!nua(>|E2C
zShG5DQ|f_bYg#&2Bo?ObOQ+U#%>Y-Rw9*K)-_vq`DzPTrl~|p=cUh`)Mq(=M5D!1?
zuP_;@a3)UX4`Jgv6f=xpgO-6V0PV)L@JUb#bP;GTE+2nG&3P8|6zCyPC+Kd_0#GB!
z03F4TWiNo_N3#^@R?umniI}z;&<D^dsrh@*9#9`hl6oU(J!max6=*qV31}hcMv(mS
zH4D@Lx)d}ObS`KLXacAP^beRIOZBgy0_Yc@%^(|Of$jr+19TTier~%NG!1km=n{~8
PyDV<V&gjYhCx8D1bdXP!

literal 0
HcmV?d00001

diff --git a/msamples/service/testsvc.asm b/msamples/service/testsvc.asm
new file mode 100644
index 0000000..fc6d273
--- /dev/null
+++ b/msamples/service/testsvc.asm
@@ -0,0 +1,140 @@
+
+.DATA
+EXTRN _AllocExch FWORD
+EXTRN _DeAllocExch FWORD
+EXTRN _GetTSSExch FWORD
+EXTRN _SetPriority FWORD
+EXTRN _NewTask FWORD
+EXTRN _SpawnTask FWORD
+EXTRN _SendMsg FWORD
+EXTRN _ISendMsg FWORD
+EXTRN _WaitMsg FWORD
+EXTRN _CheckMsg FWORD
+EXTRN _Request FWORD
+EXTRN _MoveRequest FWORD
+EXTRN _Respond FWORD
+L_lit DB 69,114,114,111,114,32,37,100,32,97,108,108,111,99,97,116
+ DB 105,110,103,32,69,120,99,104,97,110,103,101,46,13,10,0
+ DB 78,85,77,66,69,82,83,32,0,69,114,114,111,114,32,37
+ DB 100,32,102,114,111,109,32,82,101,113,117,101,115,116,46,13
+ DB 10,0,69,114,114,111,114,32,37,100,32,102,114,111,109,32
+ DB 87,97,105,116,77,115,103,46,13,10,0,69,114,114,111,114
+ DB 32,37,100,32,102,114,111,109,32,78,85,77,66,69,82,83
+ DB 32,83,101,114,118,105,99,101,46,13,10,0,78,85,77,66
+ DB 69,82,83,32,83,101,114,118,105,99,101,32,103,97,118,101
+ DB 32,111,117,116,32,110,117,109,98,101,114,58,32,37,100,46
+ DB 13,10,0
+PUBLIC _Number DD 0h
+PUBLIC _Exch DD 0h
+PUBLIC _Message DD 2 DUP(0)
+
+
+.CODE
+EXTRN _fopen: NEAR
+EXTRN _fclose: NEAR
+EXTRN _remove: NEAR
+EXTRN _rename: NEAR
+EXTRN _fgetc: NEAR
+EXTRN _fgets: NEAR
+EXTRN _fputs: NEAR
+EXTRN _fputc: NEAR
+EXTRN _printf: NEAR
+EXTRN _sprintf: NEAR
+EXTRN _fprintf: NEAR
+EXTRN _ftell: NEAR
+EXTRN _rewind: NEAR
+EXTRN _fseek: NEAR
+EXTRN _fread: NEAR
+EXTRN _fwrite: NEAR
+PUBLIC _main:
+	PUSH EBP
+	MOV EBP,ESP
+	SUB ESP,8
+	PUSH OFFSET _Exch
+	CALL FWORD PTR _AllocExch
+	MOV DWORD PTR [EBP-4], EAX
+	MOV EAX,DWORD PTR [EBP-4]
+	AND EAX,EAX
+	JZ L_1
+	PUSH OFFSET L_lit+0
+	PUSH DWORD PTR [EBP-4]
+	MOV EDI, 4
+	CALL _printf
+	ADD ESP,8
+L_1:
+	PUSH OFFSET L_lit+32
+	PUSH 1
+	PUSH _Exch
+	LEA EAX,DWORD PTR [EBP-8]
+	PUSH EAX
+	XOR EAX,EAX
+	PUSH EAX
+	PUSH OFFSET _Number
+	PUSH 4
+	XOR EAX,EAX
+	PUSH EAX
+	XOR EAX,EAX
+	PUSH EAX
+	XOR EAX,EAX
+	PUSH EAX
+	XOR EAX,EAX
+	PUSH EAX
+	XOR EAX,EAX
+	PUSH EAX
+	CALL FWORD PTR _Request
+	MOV DWORD PTR [EBP-4], EAX
+	MOV EAX,DWORD PTR [EBP-4]
+	AND EAX,EAX
+	JZ L_2
+	PUSH OFFSET L_lit+41
+	PUSH DWORD PTR [EBP-4]
+	MOV EDI, 4
+	CALL _printf
+	ADD ESP,8
+L_2:
+	MOV EAX,DWORD PTR [EBP-4]
+	AND EAX,EAX
+	JNZ L_3
+	PUSH _Exch
+	PUSH OFFSET _Message
+	CALL FWORD PTR _WaitMsg
+	MOV DWORD PTR [EBP-4], EAX
+	MOV EAX,DWORD PTR [EBP-4]
+	AND EAX,EAX
+	JZ L_4
+	PUSH OFFSET L_lit+66
+	PUSH DWORD PTR [EBP-4]
+	MOV EDI, 4
+	CALL _printf
+	ADD ESP,8
+	JMP L_5
+L_4:
+	MOV EAX,4
+	MOV ESI,OFFSET _Message
+	ADD ESI,EAX
+	MOV EAX,DWORD PTR [ESI]
+	AND EAX,EAX
+	JZ L_6
+	PUSH OFFSET L_lit+91
+	MOV EAX,4
+	MOV ESI,OFFSET _Message
+	ADD ESI,EAX
+	PUSH DWORD PTR [ESI]
+	MOV EDI, 4
+	CALL _printf
+	ADD ESP,8
+	JMP L_7
+L_6:
+	PUSH OFFSET L_lit+124
+	PUSH _Number
+	MOV EDI, 4
+	CALL _printf
+	ADD ESP,8
+L_7:
+L_5:
+L_3:
+	PUSH _Exch
+	CALL FWORD PTR _DeAllocExch
+	MOV ESP,EBP
+	POP EBP
+	RETN
-- 
2.40.0