home *** CD-ROM | disk | FTP | other *** search
/ PDA Software Library / pdasoftwarelib.iso / PSION / 1997 / 1997.ZIP / 1002 < prev    next >
Encoding:
Internet Message Format  |  1997-06-03  |  9.3 KB
  1. From: Phil Davidson <fil@mojo.europe.dg.com>
  2. To: comp-binaries-psion@uunet.uu.net
  3. Newsgroups: comp.binaries.psion
  4. Subject: Mah Jongg Scoring Program is now Freeware - mjs.zip (1/1)
  5. Followup-To: comp.sys.psion.apps
  6. Path: toga.it.dtu.dk!ej
  7. Message-ID: <ej862563513@it.dtu.dk>
  8. Date: Fri, 2 May 1997 08:58:33 GMT
  9. Approved: ej@it.dtu.dk
  10. Lines: 306
  11.  
  12. MJS - Mah Jongg Scorer
  13. For the Psion 3a
  14. Copyright by Phil Davidson
  15.  
  16. Introduction
  17.  
  18. I have been playing Mah Jongg for a number of years now, one of the
  19. problems that our faced was that of keep score of a game.  We'd quickly
  20. work out what each hand had scored, but it took quite a few minutes
  21. on paper to work out the adjusted scores, and then to update the 
  22. ongoing score for the whole game.
  23.  
  24. At that time, I was blessed with my first Psion.  I soon recognised
  25. the potential for developing a small application that would allow
  26. me to track the scoring of a Mah Jongg game.
  27.  
  28. Out of that need, came this application.
  29.  
  30.  
  31. Overview
  32.  
  33. The MJS application does not calculate what an individual hand scores
  34. i.e. you can't tell it that you've got 2 pongs of minor tiles and
  35. a pong of dragons, and have it tell you what that scores.  We found
  36. that using the psion for this did not in anyway speed up our play,
  37. we can work out hand scores quite quickly.
  38.  
  39. What it can do though, is let you input the four hand scores, and
  40. will work out who owes who what, it will make the appropriate
  41. adjustements, and give you the resulting score, along with the new
  42. total score for the whole game.
  43.  
  44. Please note, this is not based around the fan scoring method, although if
  45. there's
  46. demand, I could make a fan scoring version.  The scoring mechanism is based
  47. around the 2 points for a pong in minor tiles, 32 for a concealed kong of
  48. major tiles, doubles for this and doubles for that.
  49.  
  50. I have tried to make the interface as intuitive as possible, but no doubt
  51. there are
  52. areas that can be improved.
  53.  
  54. Other features include:
  55.  
  56.     - Save/Load facility
  57.     - Enter Penalties scores
  58.     - Display hand scores
  59.     - Display total game score
  60.     - Dual format display (toggle with diamond key)
  61.     - Menu & Hotkey driven
  62.     - Tracks which is the current wind
  63.     - Tracks which player is East wind
  64.  
  65. Statistics database
  66.  
  67.     - number of games played
  68.     - number of games won
  69.     - average score
  70.     - best hand score
  71.     - best/worst game scores 
  72.     - average number of mahjongs
  73.     - % win rate
  74.     - etc...
  75.  
  76. Future Developments
  77.  
  78.     - History facility - keep a history of past games, who won,
  79.       scores etc.
  80.     - Anything you want to suggest that I can be bothered coding ;-)
  81.     - Ability to customise settings.  e.g. starting score - I've
  82.       assumed and hard coded a starting score of zero for games.
  83.     - No testing for 3c compatibility has been done
  84.     - If someone gives me a Siena I'll have a go at re-coding for
  85.       the smaller display (he says hopefully ;-)
  86.  
  87.  
  88. How to get MJS
  89.  
  90.     - Check out my home page, http://ds.dial.pipex.com/davidson/
  91.     - I have posted the zip file containing all required files to
  92.       comp.binaries.psion
  93.     - You can always email me at the address given below, and I
  94.       will email you a copy back.
  95.  
  96. Installation
  97.  
  98. Copy the files into the apps directory and install as normal.  
  99.  
  100.  
  101. Known Bugs, areas for improvement etc.
  102.  
  103.     - Cannot escape out of all dialog boxes. But all the major ones are
  104.       catered for.
  105.     - Error checking.  Again, sloppy on my part, I really need to
  106.       tighten the error checking - mostly on imputing values.
  107.       There is nothing here though that should spoil your
  108.       enjoyment.  I've been using this application for months
  109.       now and have never lost a game half way through.
  110.     - The statistics screen only displays about a dozen entries on the screen,
  111.       it crashes if you try to have more.  I need to implement a
  112.       paging/scrolling facility for the statistics screens/
  113.     - The score display.  I quite like the default score display,
  114.       but that doesn't everyone else will.  If you've got
  115.       suggestions - send them in.
  116.  
  117.  
  118.  
  119. Registration and how to contact me
  120.  
  121. There is NO registration, I had originally released  this as shareware, but
  122. have decided to release it as freeware. I still retain copyright, and
  123. request
  124. that you do not modify this distribution file in anyway, but do feel free
  125. to pass it on and around.
  126.  
  127. My news feed doesn't carry a lot of the psion newsgroups traffic,
  128. so I'll probably miss anything you post to usenet.
  129.  
  130. You can get me at the following email address
  131.  
  132. fil@mojo.europe.dg.com
  133. or
  134. davidson@dial.pipex.com
  135.  
  136.  
  137.  
  138. begin 600 mjs.zip
  139. M?4BR93!@'!=L8Q[$.(('QC:V`PXAV)*,<6P]US(HB4@6@11LUDBL) L<[$GB
  140. M33LAZCGWOD_)&#;=K3Q^[]YSSSGWW'///?><^ZXV-* =.9XXFNT=&T]LV0("
  141. M!E'@=G^'V?/38OT(^!0<8W?HAS]M^A&N= L"7"X4P*8?R=3/#9M^F&:>Q*=@
  142. M:,FNGP\6U\^3K[<2?X99JI_=-OUX3/U@\V>2-;JE]"/0#QIA\'BF60OTZ% T
  143. MO\"A(DQ8^7X;P/I5ZU=).&-/0Y_K>5@)\!5PC73W# 1G9L S'.P.:Z'&K[\@
  144. M>&CDP:&@V.$J"X]TC[#RO:X5( \&0P? $^[3(M@50- E/"]53\IEWY-=K\MQ
  145. M1DH(@SOLUX:#8? ,!4/=`R,/@ASN/A@$>4#K#H G%(R0!L'0HZ5%-F<H0ITD
  146. M/P(1[UEX!'R-PE[O, *G>@Y%-T'E"'A'J-8_R]]=42\!4<;9YZZ%JV"&:#8*
  147. M!MQ)`XY<5H51?[0"PG4X`WQ !(OYHX?A8U!!76G:!1<JO0`$KCB82&?&4DFE
  148. M']S(5T*XG0\M_ZT;.K>,/QKY$MP>N)%7('POS# "+UF30M83U]MW&OS'_='M
  149. M$/;#C&[(T0;>1P4C(<,S:)A<8- E_5$4=[\N[K]^GO_GSW/]< 3>%-@*7 -N
  150. M8[T=T-]^_:V[+=W-&0O-\'#0!0W$P+L%M'CM5NB-_H;@;@-R/@.:=TB3^Q X
  151. M:ZLV;+4:)6>CY&@4G8VBHU%P-@K4*+8A)$Y8) A;U[PDX\K>!KQ)F+*HO Z6
  152. M,32H4V/)^/WG59#N`;LX^:YBLFHB0Y\R/FX1;EB$,A>"L_ .-XIZ\/B[!_SD
  153. MELO\??>C(03"-D^M6T"1@<"CX 4(@ QI_$>_4!4932FG$DET4[JO076XV]E4
  154. M)>TBF] J`Q"$C,AL9#64Z0;1BJ81' G[AT-@[<*&D1C>0X^&V.9\S;N)=UK&
  155. M;#[W7+@>9MS;N(3;# E%!@B1PG&!]$]JXB4$3=;=!1<0E[<R"8LH=SHH):*4
  156. M+]E!7@35;H9OV+G\I)C+P^#NX( .#M@#8H>3+:&Z\&UGCC@Z\PX='YG_><'>
  157. MU3/%7766"EQQR9K3;5 J[E_<!H_EES3WTCRT+5KY)18ATN+,=%UXJHCK/M"V
  158. M$ <7$0`2[ 4G<+).A0L756\$O9F23DTDXQ>>0EKI$CJ^S5S.BZH'/1_YO M/
  159. MJ=R RE^!FIG#RF1=/<PCGKC1=#G:,8N;MR^&HC,7MCA/7(+)8IY.&VZ =^W\
  160. MXQA&GL#-]&/!58-#JJN"S<_,"C#&G@NB"P<AE@!1:*D$2 HL!F(`8,P.Q535
  161. M8*O55@.&!=,8'ADPT8$A,HQ:!X;DP) 81H,#0W9@R QC(V&@<O; ?XH-7#GF
  162. M9A=CV42TNVY"@9Q#BU(U4VMH%M7!6]'L%[Y ;7$V6+OZA;E(4":N#0<`!\LP
  163. M=16[.RF2Y I@JCWF$*E3[[<(1$S$J>%9K)2(6 0R4.U"_FZA:(*/0=$$]]E"
  164. MR'UU+;@UD4 5X=1$=M2$20PMDK"AR0PME$I;:+BH6-S:9 ;5E=7<DIPS>"?-
  165. MPR1ZH4BU!GLIKCU2L$_.WQ9L!'$DJ&<$#34\MK5A?EC $:P!5:81G$?1L>QB
  166. M>GZVTW5>\[ :VQ"Q5D8UK[E[$<1RK-S&[+EM#2T`1RI<0S&_(W-F)NE(7W4^
  167. MQ49X7"N/5#KIQ%I=ZYCM6%SB=BZX)T? P:5L"2Z($UGY1&X/],%+IF\J.B>Z
  168. MF6^"G2#ON;G:=A6IS>WCCL5G.A9IEZ[%78867REX[C.TN NU6,GW>KD)Y'I2
  169. MYGU8)5TV0703/]99Y8\ED]B)=C*15.ASU 9^A)9#G)<KJQ;S7"JX6Y@O6E_-
  170. M.ZC43J7VID*^TZ)Z\;:IF"@58/^97/Z0-=JE!'@VUP)ML!K<5%' Q;\\N,-]
  171. M"*Z^[E"@27#A_AUN$CP1]BD$"SV\(+J[64'TA X,TGH3J##8'R82_NJAERAW
  172. MXZN0CUM]O/@KZN-F4T!]+CX%JV$(FD7=:V [=P5>ODW%8]D8>H'59-OD`+2R
  173. MKQHFL F$1CBG&H: 51]6N;E@I9XJS&BPHF!%-Q3,2^@$?FHXTC.]A4_J@WL/
  174. MSJJ&_32QPT75L"(DWLTXZ96]5.G1*P&L,+MJ(JQI)#Q8ROGI7#/X< M:28!J
  175. MI=8GED3TI8V1,#- -,J4F_F6]8,\T/JOA6>A$JR?NXH.9V;IFW"-5C:D+9]3
  176. MBV !R=J9^F6#-F*"1@Q0CPEZ7@>Q94+,'!,RRB?DMVXU(=6VS\!+3PK*;Y\3
  177. M$IW768 P3U+;IX1$ML_(\\4SDEL/(5@G%1WSV%,6XPQB#W_UEN;?9K(>+&T3
  178. MH5A@AF+ZE.DNAG*S,5B.QK8ZAA&IWU:G:5ID$["-M@B9%J>YAE#(5> <.FO6
  179. MUQ,*N J*=&'IS;8\I[&MWU*4O<7NI4OEQ*DQ?:?>FWW2#&W76MJV=@7AS/YS
  180. MK]J-]>$;N1W0802P=YJ?\#WZQF=^PV?[7TD,2]^8Z6J&BIO?(W $WN:Y6^#F
  181. M?'""^#N@OP=UQ%!8[R@0'+!UZ;B(\Z8@/\ NXCS +N)$MT'E0? >Y&.AM\BV
  182. M9 1:%W ,&8E&OXCS@'D1YP&],G V?]&ZB!.,CV75\NYX7,'X*CVIQ=1E@<1X
  183. M(IO0ZW%UV6 J/O;HI%X_H2[3O]GS^L1'LG[K!C//T=0I_BE?RZ@5_O%$+*U7
  184. M);QC49H3)N=[EN \86+YE\"*FU@#2V"E_5$77,OE=WZ!$?MAZ)2*(W:'5GG,
  185. ML3S(N24SEY8E,Y? ;60N6Y?(7-J7S%QV+I6Y[/X_9"X#MY.Y#-U^YC+RR\A<
  186. MVIV9RTY[YK+5GKFT.#*7W;?(7 +.S&7 GKD,V3.7$5OF,H#;16"QS>!57$IQ
  187. M4O.XI0U9@SU<$ +V1=\:K;)''I0V,@33#>QB"#UVA-+]%4UA_RVC$22=OMUP
  188. MV_C)]39VE8M.KK^?DU#EKV* Y-;O>,L`VZVK=C,>@#\S[C__?CE=^C<NW_VH
  189. M`(<E?FAZ$LMQ2;_*?18KHY)YC/HF5M.2?LCZ/E8F)#W>_ 0KDY(>6[Z[#N!)
  190. M20\\_P,KYR0]^O2@N_R&9,2F_0K #R3ST.<B5E^6#(-]%^/%OS,;VWYS(\""
  191. MP]ZGMP,\[ +X7U!+`P04````" `JA) BC'G4??<```!@`@``!P```$UJ<RYP
  192. M:6.-D+%NPD ,AFTR=$%B9H&L2 QA[U(QL?$(Z1NT&PLBF:N^!X]Q#D@L2'V!
  193. MW4TD7U_>^WGT_#S4?GAL@]OO_O*#4O #4$L#!!0````(`(M&HB*@J%N_S0<`
  194. M8#U L$>V2$FT*5(A*7<T7[_O%2EW.[M8&#!:(EFL>O7J5>G^IP?U1MWK4?T4
  195. MLY[A<(GJQ2 QTN9QR<4V4_F@:!H+@3N7V6C8XCZ:&"*1J/[V#>/S&+VMCA.Z
  196. M=Z4&5]QD#^I.H@4,.3-R5T8UK:IW*9>:' 1[IW*$=\EV<0@.^_8[VIUCL:$X
  197. M+9X82O)T4"X8!^8M"$RR6&'?[]P1F5_C@B/A!OA9A.@:F'A]`SX.,/@-@ E#
  198. MIJ_(+7/@@"Z3MM]I6>.227J(H253N.R:2=X@KHCA>KDP#C O0;#'^R43*TF#
  199. ME%!--J PSDA<+L#T>M:KRC/0`E&$X2R6`QAK&<6%9U>!-G8V<@N<O_-&5^2(
  200. M0<[&N SC0>$V;R5VW#8WMO:\Y<K<H49^=@CMJDZBBF?<Q1\,]D#SLF?23Y7.
  201. MR%:*<W)(#8"K-3"!< VSP0$S7LV]N&?QY87ZV.&)L]"9ZX%$*+$@I?^W-CYY
  202. MJ[,E?K A<+K*DI-F>>C$#-0P`<7&V,D"$<-+*S+*B< D>P/6&#O!719:)^R7
  203. MAO PQYP=+%4-#%$,EXH0(&5VD]TDEQ0[P=J$Y#];4RN?6R&6NBSDIPN=7XS]
  204. MNEH7ERIT$YPT;>/?2QP&\$=X9IR>(@P^V?4?<N+>AD5]K3[&@E<H>, 19.$S
  205. M-8_<=V@4+@M\W9(2R U3K):_;N)MB 9[/^B\;=KO'@K$+!?7H>QUT21)`^72
  206. MGL0`A?M*;;[Q(K'V+JP@-_@O$JL#N['*RS P3F'?W<:_4Q1Z&E2.X8E_OJDY
  207. M1'1KVN1W6V.H3D)&. 31HR]NQHB"PH.N%>V"#!T()EET+6:MEY9;HL1 C(XG
  208. M%S0T*Q^E78K=?]=6CI-G1@.=QM!)?+:QRX ]67 C)SS'1R;N3JQ*LZIG2"=J
  209. MC!$VJ.^7@3U0-),T:%K)NFE<KZCKP,YE<X>I4M#G9 6[!#L.H/B?'"R^QP+?
  210. M3<]5MZLD(QD9G,BV3CR8@[;A?K_[EQW@<:H9D_14X1%!Z" TM@W^E2^__@8J
  211. M7DX<1%.,PJ %;(2BR<KH9U0C!*" 0-NS3G5NV>\$;6,[9RK.[033PT($;MQ\
  212. M43C36^OE5@ZV[(&9GC0TZIPH:-VS_,Z9^\U+(CJ=*#9@<ONFVCXCN'7 88@2
  213. MIK(\@$"_F^)C/-H%@[\]FH'-`%^U*.*M(WSWNE/L=_\!4$L!`C(+% ````@`
  214. M(3F<(E$>A]4<% ``W#(```<````````````@`+:!`````$UJ<RYO<&%02P$"
  215. M,@L4````" `JA) BC'G4??<```!@`@``!P```````````" `MH%!% ``36IS
  216. M+G!I8U!+`0(R"Q0````(`(M&HB*@J%N_S0<``&$0```'``````````$`( "V
  217. B@5T5``!-:G,N='AT4$L%!@`````#``,`GP```$\=````````
  218. `
  219. end
  220.  
  221. ---
  222. Please mail binaries to 'psion-binaries@it.dtu.dk' to put them in this group.
  223. This Psion binary was approved by Erik Johansen <ej@it.dtu.dk>
  224.                Also check out:  ftp://ftp.it.dtu.dk/pub/psion/index.html
  225.  
  226.