Date: Wed, 29 Mar 1995 10:43:54 -0500 From: j5rson@halcyon.com (Jeffrey D. Iverson) Subject: GetCurApp XFCN 1.0 Here's an external which is not intended primarily for HyperCard users who can evaluate the expression . What it does is return the full pathname of the current application. I see this as useful with programs that use externals like Director, Authorware, SuperCard, Plus, OracleCard, Microphone, etc. Cheers! J5rson! Iverson Software Co. Complete Electronic Document Services Post Office Box 3 in NewtonBook, HyperCard, or Windows Help format. Rice Lake WI 54868-0003 ================================================== 715.236.7918 voice Disclaimer: I speak for myself. 715.234.6304 fax J5rson@halcyon.com (This file must be converted with BinHex 4.0) :&NGPG%0eFN&`F#"B4N01)$%Z-#jcDA3!8dP84&0*9#%!N!36R!#3"21N8dP8)3! "!!!6R(*-BA8#r`#3!aErr`d0%NGPG%0eFN&`F#"B4N01)$%Z-+S!N!1!!*!%!Je MEUSV!*!Drj!%8e4"5eG*6%3&!+GY$KUVRZET!!!2P3!!(N!!!!MP!!!+-9iIDQd !N!E'J![!q'-VTfI[fA(k4GJ6@K62A9RQEACDdFhUf"8EV0GYBfY(@'Y020NQqqL QXX&DQfeY6E)bZmd'+f[pIHbfN4%lXXQf*jY`Yh3IfB36bQdPDa&'f$i[BlpTZFN qeVA@AMFMamPYXJQ9Y4lCGLa#f`a2*EI*rV8ceDZ[kl+1NH0N%m4YX[%"H)jD!33 !N!"H!V$L+i!mhqa`b9AeX3@ZqDB&iTa2f8eeXIQL3lCARDah25lAEJ`-Y"d-Zd- KHFFAfVcbNmk9E5)Uf,`c2,#YIIYMGcHII+m2(MqZE@`[QB5F)qBbeiZjaYLFC@B aKpV0p8,Z8F'dc'l+S@Vch&KZS@Jk1GIPN!$01BIGA'I#THa`fA-1XkR1M%Zl)bE R(#DacQkDDmiYP%fV"A$P(+*JRQ[+,A3KJpJL3LchD3&LY6(6A#(A)$bd&+8r(R0 9SJda`jNAT[@ha"M08LleMT6EdL6PcZ$lc(+TY1-GLA#)PaT`ePr,2)#'e3$c9J+ X$J'Xp!2i4`"FU#cqhaKmp-8SKP'968IT0bP(SRmr&BRHqRdNH[ef*(VQH#6kZ9p 'AKMSL86Z2"FjmPlAfJ1*jelHkhX[j4dHrq"-9eHi3chldm$*dUE`'a8[(r[C`BY (AcadNFp[i(`5CiCc#HIAFHikH2%BqrV&`a"D@mP1S92dS3&cF(Ae+JKAVmD%2rm f*V#*'$!'p+kHI+8KQRY4M9ljTYSBMaGXPGPmT5fIPaS,)E@a%'9UP0&,1m,BE2N XF4!AF4)hD6$d#2pLQNE85TUjp[rpS"p-pf1T-MAa5@#,263K[%4cr$j,)9lN#)5 V0#F5aF)pI$("L4&1H)3AIIF%)&a9ic3`("&H[+qr40C`H)RJXc96Q$5FQi9cI'% &piTE3h#F9A5"i14QG`[KLf30XA-$L3-THbCp[TD@&5dS$Ge!H#QK+GCBB0,A6A! I$`@(ki&)k,jaGX0Lp)5RK[ZZ@31D11fEj0BBm"k1+l6ibJQD#4@(qlJZA`mA3YU e8+&fK-I*'YVfS1mPTX0RBc'T1kI"bCTC11)ej`bi%5UHLR)X0&-)cS()EU3'-kA lM[!CIl9Bh)8RQ&VfRl6VU6(JQ&G0fdHT!8dl5LEYR!$M1j-Dd0RM(*kJd(kFQKR f"(km!%JE@B1"Se#K0AT,F9ZeIY'X+FH#5jqFlEMlF--liqY'q15N"SqA52XpZ1% l`AN,*4,PG1KY`Hh$+1T9N!#iekrS"HI6RIYh2jIlI5C9jBqZ@6ebXkJlZ"m(826 e69bS`lK(R,BIK(%'NV'AaYRPB9C8P+a11-c''8XU'Rq'a!fc+8@j$6#'+V)S,QX EP*4,B%fKLR'QCU%k#e)QNdUPDj6K+5558%YQ,$@DKQU@a"hYV3K(390SMD3Sj`" 5Spb1*)T5EU21-A`"a[-%[j4*Jr8QDNm1drlfTF`)@&(VP'E015Z+ZkN-)jaEF`l &C4"1cJf#G!QeMi#%@05EK4TZ$9TKa)'X!CMJH5+I0@Z)ME5M9aDmX'aX#U9SePJ 32X(1+PR$QM6"NdL&6bD9YQBP203NNSBqDYDJ'QiSk0DFeH0PjI$L@FU&"Np6(UZ 02*)eG2NCHaj"h&qHM6Lh5[pF9DFA[YPBk-qAIRaXj,-aGNUeVE)FIM5rBHFrKB, `TR"D`dIc,"FGfF$aDc@mUZ'ere@`6E8H-Hic,$`X(5TK[FY9KSqU&cjHCYKBY)j $G`(Ar2l%EScMRB&9A@+iipFHRKfm(lN84!2918RKlBjNm366P4&hL`rAD!1Ui9* mh(c1V8RK0dfa,)81(6`@1*T,)CfmYh8T4PrV8QEk'f[hVYri$dM@PTGi)pVbe!) 5Qf!i5eP8S9M6#P1Pl*fa6,@D9@jE-E86f+(T$"U#T6#U%0QGXG%*"QT0CM40GC! !(4ZeX8&&b9M6U%$+MYfFB&L&eY40+Nf`C'ajhJ*T@lk'Hl!FrrI"mF%r9`rl`[X '"J*"HGF4ZH1Tm)(q)2i2i2'MAF43SrHrHiSTMefVZZi(B@K4Vle4lZfV#*Pri[H E3ZCArHYMhMq8898F9D@K9MD$U@d#+PVJ,qdhVXKE&RhIF`ZbBGMUm5pB[(-!kKI F%2GB[LYX%d-3CRl4rUFYll,T,GIB"j[HV`4lh0Qqe5hl[1RQkNApB&lF$aC8C&m &Y3[1Lh[%HU(fEEpBbcR2#BYljGl1#DMfTVhG$*SYFK$-E3U$d)C&Id4&ddZ$B(( MITN(0Uq*3#9XDPi"(VRAHlTT2i6![V6Aqa@jGh-RmCHqiENPf*FJBfZG@e&20(R BpjU#8-XqA"F%1r[KZJM$Jk!Tb$jN&lSk28&fS[8*le[Up2T'6a#jJqS*ce')E&J ,)U&fG1+''8M[@k`&j6V9%f'SV8Zl,5jJ`F8'ZVP'Crh0$'Yc$Hj9Id9)E(+a#b( aA**Gk!0fD0e'H'66qqBBqBE15pldC[GfMpIpl$2#dplZiT!!lU(C259ifj6TS9# ePS51EAZGAqaXV[%%NH1S-!rI@Np`HJMecN'PQhDJSm8Kh,cj4#qdiMpjDA3KL5l M@aTkl4qYcP+b0FNZZj95%T2akpBJZil[YC91GRfVDjf,AHHC1%qC+0eBhpLaXAZ NaFRH2Bm+I&GL`YiEV8iefE(40iXD%IDkZMUERHa['jcX'LBKf5bK!iH)[@m*G`S aj)1@Mp+V4Mid*#,'1P$9hPV0@BiSF2rX((%8'K$a9d*SQA'qiMhiV,[G+q2hF&F `F$J8f$d3f#-(`Z(qX&1`cZmk%*!!"liDN!$lqX222bfAUh2TXUArU9&HRi'q[R$ JL2ajTpaq+%"9qJ1XcXpSe6X(5CBri(hYb69VRRT!rI'IdV!YYAm*RFi0-!jQiN" 34hYETaIRA53(X8IEfl`1R,qeErGqr$-@[S2c+TarY'rh!F+GaCP`2mHCF'q$3%H 3!29,X1ehKd'NA98@Gpm@"(K)eZqA4hB"i1i%lI!HX-K3E811lErk"I%*CX*T1p% bXkZ`cqc-pE1l(61lULr6cZ6TIcj3m69qHe59%r*r!*!$$-$ilm06fAUFbYEN$Y, 0$S$L1H@H4@MZYC1GR"iR,-VAkiYbbQq0hmULAq3fB89@U@FTTiDr12lVqNfj'dp l)h5ccEVmMMcY1X)*l6,#)h4,pRNGf8F'V(GpETG(MKAKK"8jIK'H56e1pT&pIXE )EmQa,H%G"DkZ[-VXM'bbbA'b#5)f33AG"i`(aZXjk!&ik1X2h6U2!D9`!U`2dVU PB,!XAITIF5p!CHCbX49f!-pR43#Xa`5@,1D"klqhdbVF!8(QB4Ca)UJje[a(kf9 V`Yd!i(U-fF8Z-k1+U5jKTC9"!#Y2#B+9Ci9CQXr0"Ucm`HcT8MjpqJ1Djdr2,q4 jQNd25aJqD+0q5'0++(dVKDiTQXqDVQ3RkpriY*pEpdE@GGmXP,iTB3#lB"i3"QJ HHk[d,4MEl%$Ti`lGl(Ha$(1JUkhV!--`8ciK0"85I+BCDZGjhcZ#lDJKV*lf2'G 1mHra8qBe,c9r)eiAIZMN)k(RVRhCpej`"X#'$Qd'#E!f(T'Eb,F*mfBTq"SKCc+ XMEl2mcard4#k[l9DZ1F-R$Rc&-Emejqlkf6)K)mqr1M$QFK-C*NC%eQ@*95&U'P *d3da0Zc@*B-BdKiMS5ViS"*K506%%9@*#jG+GAQI4%ZEYlSP*ElBHcN["f#K0p6 A[c6rIaT[+`!4R2HrJr2rph(frreM!(r!'A3kY0LMAec15rpJKR[kqTGf1VMMXAB r$"a#Fb$!iD5jT94(Bk@im,*F32!3#AA[X("C8CQC!8DPHkBS!iFVV[U&-r6ZJcC jPh2PqbeV4l06R@4el)DHZIFf44jjFL0Ikhrh`'h(YBrHCPma(Zhkf3m(ShH[1Rj MT1fZj[!J@rGmq)9p8hfrIVcc+cpqie4hmqf(IFGrpq#Em82[qilrkHI`l*9+p$G R6dCh4Rk`ljZqYp)R48qNi3@I-9fB&(VVf-rA@IqE1)6CF@Yh9rQq"11+KEe5qHB %-i0l#!$V9X6kCl(d5ZBmh-"m6#YA$G*Hi-+--cYZ0%I8M#i0T0e$+NQU)j+eU5c Ar"dqQqhS$H%Hr",Z5jZ1K4Z,[rd[p8kG1I#M!fFQr[Sp1A(JD1%U6p(qq154i[T XJ5N+9GRZ'Q"Q0R,CbU,JbPkh$lM99FlLVDI!&YQi29KC[*B*VSdikjRTMG&S`@0 [CF'jDFDXA-RPc0U*Jh1YR0ml(JJ'j`VT041jBlRXLadeJ9F1jdM,f[ZC)'Ib+kY bFqmmRjZVGrc@qp9!0$T6m*!!I(IakLF+ELDi2r!SH#i+0b)0r%jllR!LZSSVl)S HFBcIRDpH!q3%1+$fjU&A@G0(q0Te6B)$mNd22aXJdCV89Lllbk2$plGmc4Q%F"! FhJGbi$[PC-fcV+[@BHDb`*N9Emlq4@Kr)cIq8eM6r[U'9%ephMFliE0R))4L0F( jhFHppC954CCe[GC9r8!Zk`+ACpUmqBCFd0BFKAVI0Ur6GA9&4BFVkji@SY'Za+$ IheYKJRQR$b@ph58k6#i@KIb3!!NASXq$qpLaL@22f-%al0YjQ,#3!)rFFJMXQhG !Y!kDd"aQq+Ce6jZG&@[0Z3i(%,DjPH@qa19!mJ!lBI*XcN1bJa%16+GS$d)fQmf $ZFD6[3,bmCZ#R1dP%(Fl2&RqJI`-acBj`5qD,m*KTU-fc)Y9aB-($jVj+T1j-$% qlMKh,RrrH%8l0jcBA@@ZVXTR@I[FaicdZ[d3M-2m"T-r@Zh0HEf3!&eV-ZCk6m% E+E"(!M@3!md"i0kaSk&-`5VmCm`%Z)Ue$P*JGh&`$YB8[GN#@fb`QrKA`a@ibI* fGQ&,ZlLYGC!!cY!Gk*rd,SX'Mr[Dbd(hDZLK(+c!afRUEIB`(XK`V"hZ!)ECaXb 6LR)V'e5@I44AZZ$%9LhSVf(3CXS'Z1#bhC,4QG&#DE66*EX9&Ae-dXL3!'6%-TU B6YG[rY4j"9KK1IGMk0b[81GQQ-[1MDcqfGi0Pm!43ab@G++S*%h[%#4$d[4'dQ- 366)bQU)6)bN4K+T*LT(D5l5-SXM+%%(N+6NQ'V+U0*,qT+`6[&Z3!$4&6"&mNa8 $5C(L*+h*)k)QBq1%UPeZ5R'*"SQ*bLD$)(8@6'P2@T0d(F[*G[UH8K'TJU3308' 5Hp15&K1eH(ZMfpf*1)B*pK'9q*F4QE4((*'9%JSpTXPTJlDNVi-C`k"p"Y94kkC #Pb5F9mD)E*!!-98EeQ[GlXrS5fMBK"+@cQJ5FSI!GCA@)P'0*%332&jNB!YXJc$ VQVBeq[fdX5EGNj%ej&e1N!#pDUC-l#IS+'9lbAPCfC+NNRf0a&3YV@UL)68325P UdKKQJYJT#GCE@P2MQCL"UZbRQPM#6LR++#Pj4$B3Fd`G'8'&b#@H,+5NVqHfl[! 1FTjfdX88`LfMS@c9092HrJYV6$D5T(FJh0m63@!,h&K`Y[NT(,Fl)QNMFNR'@*D 80'P`,aR54$5&1*@JQ%VKXjT*kf3XUC+iV"ZDM$U95&`D3B@U#B-5hd!Na)THCbP 48a-SfASp%dX585FliTP1&-jQUK4&0IlC3b5pBJbY50@6C%"($C0ZLRTc!b9"9Q+ T6,`Xci5FXJ5$F'80'8qPT&M*fRU41EAN#YJ8ACF#'k%!dDa8(Ih"JMk#*V%J"@b !PESmQ%)+dCp)$aQ88V*%rBGk(S*%(C8&S#B5b,#)5P&'a94'a+CS8GSSbY&bUdZ 1N!$1$+CN(H@JSeD(*85X5kN%UUfRC$9*%I(GNj(dNVXL*jC`&55NKpSXFS$f*-D 59)0*"$q8Y2`aJ@5VBfMTel[Gj)[S'E9FN!$dPH9*1YA'rh3N%98hb1f*"#@c3pe $!PrdZi0f#H-`3ZlX)@6EeYD@eLeq[cq`5-Yek,20JCE'kpUD@XN@-SU)rKdifD5 NX+`-AemZZ'8ECHp6,&XE@`,qVBJP)Ak""Id2aaCb1hUL)L'JXK6kh)[,M2*qBfN Z[,cIm1*$-r2dTIr&`)Q-fAfIabbXC`YG(PblR*N%1,VdrX6N%F*F&,Jj,arJ#[1 jLaZfE`$#C)X-UILM82@UeaCJDpYbFrZI@JGCEUl)4*dmm$l5`N!`jcR"iZE!jLN b(PpeIE@hki6*"$Xi2")Z-MYY#0lMj9YiQ,bDjiZ-[al@jcG&+QSD`$lh$25"&hF $4A[([C[!P[1F[fEGDrZ!VfD,$N%`1ipl[0IQGX"'CJkBB0&HfflkE2KBj'ZEfkr CE9BhqfD+GZ&'dpHqP8H8Z+Iae&G(NK,G9'#r+ch#4(#6@5p3i"%Ic*MeeF%Fm!c NND%kbNpkKDpk`NFH%J55kd)bi34iK,0)CGTa89eGGAidrffaqX*qYU20h2m6i"k Kh+0`@Te-X&"G&XqTb50YAMCBG,@Yjl*&&dTV+6ija3VfpAH%kFh[8Je$Vl5A0P) 0F01[6*ca2cm+$YjNpDGh`eD8Hh3Qd6L'm0$'eSX$C!`IrK@N2p36AVJ2UlSY3ij S1!dC4%pPM*Ir$`#3!pbp!!!: