†‡Ó1è1D¤RECNAME¤X¤W¤I¤B¤OL¤P¨D¨N¨SC¨SEL¨T¨U¨TT¨B¨LO¨NAME¤XX¨ÉBELL±BELL²POSØDÐPOÓLOWESÔØSCORÅRECORÄËÎNPLÒÓCÐROLÌLÌÌDÔMAØÊAÄÔÚÇNÓÐDIÇTOTAÌCÃP΀€€€€€€@@@ @ @ @ @ @@@€@ !"#$%&'()*+,-./01'A€@'A9%%-------------------------------›%%-- DICE POKER = KNIFFEL --›%%-- DEUTSCHE UEBERSETZUNG --›%%-------------------------------› "D:DICE POKER"› "BY THE GREAT POLARO"›$$------------------------------›$$----- DIMENSIONING -----------›$$------------------------------›ºº€;A,;@ ,‚;@',ƒ;@ ,„;@ ,…;@ ,†;@ ,‡9@,ˆ9@,‰9@,Š9@<@,‹9@<@,Œ9@,9@,Ž9@,119@,9@,‘;@ ,’9@,$$------------------------------›$$----- RESET SCREEN -----------›$$------------------------------›5#@@K:5@‚‡ +@AR@90@S0@@m0@@ @‡0@@@ #X“-@@ $6…7“<“,. ( “46”-A…@6•-A…L6–-A… X6—-A@$9-@-(@   ëîéææåì 96˜-@'$$------------------------------›($$----- OPEN FILES -------------›)$$------------------------------›*R@ @C>@@D:TOPTENH BR @D+n@4@@D:TOPTENH“-@@W(@ j(@n “,$$------------------------------›-$$----- TOP TEN DISPLAY --------›.$$------------------------------›/@6™-A™™@@@@D:TOPTEN0s-@@0(@ ôïð 10 ðõîëôå;(@O“-@@[6š-g“ @s6š-@1Q 6‚.@‘$@›2-š“%@D(@“ H›Q6‚.=:›,2 ‘46‘. 3“"@6.‘6œ-›4F-@B:‘,"6š-@:‘7<,,8š!@d*š @’F6š-š%@25N(@>:š, 1-@&B:‚,@%“B(@ ‚H› ™N6™-›6 “@7$$------------------------------›8$$----- PLAYER SELECTION -------›9$$------------------------------›: T:,"@X;#6‚.1 2 3 4 óðéåìåò# Ap<BR:,"@&6˜-˜%@* ”6˜"@B6˜-@=L AP"R:,"@06˜-˜&@4 ”@˜"L6˜-@>Œ)-+˜&@,$@%@@8(@ L“-@@P “b-@@o(@‚ŒT:,"@@`?! 6ž-˜ž"@!6ž-@ •d##-----------------------------›e##----- INITILIZATION ---------›f##-----------------------------›i6±-n{ 6Ÿ-ž“-@,6‡8“,-;6ˆ8“,-J68“,-Y68“,-h6Ž8“,-w68“,-{ “pOž-Ÿ%“-@66Š8ž<“,-G6‹8ž<“,-K “O žs6ž-Ÿ6ž-@‚D 6€.#A(“-@@,"‚@6€7B:€,%@,.‚D “È##-----------------------------›Ò##----- GAME DISPLAY ----------›Ü##-----------------------------›ù4“-@@#-“0(@…4 “þ 6‚. Ap #AG“-@@"‚/-“%@C(@ ‚G “G“-@@"‚/-“%@C(@ ‚G “! #A&Q“-@@"‚/-@ “%@C(@‚ G “Q AA0*-@@*(@ D##-----------------------------›I##----- START GAME ------------›N##-----------------------------›X*Ÿ-@*(@#žZB“-@@&6‡8“,-* “06 -ž4žB6 - &@["-@"(@…]=6˜-@6¡-)6¢-¢%@=¢"@A_¢"@Ab##-----------------------------›c##----- ROLL OR NOT -----------›d##-----------------------------›l"6‚.(÷)URF (ó)ETZ." Apq@w@v<R: ,"@ 6˜-˜%@$ ”0˜"@<6˜-@x AP{<R: ,"@ 6˜-˜&@$ ”0˜"<6˜-@| R: ,"@ ” AP}†)-+˜&@,$@%@@8(@ L“-@@P “b-@@o(@‚†T: ,"@A0€ •˜"@A… AŠ##-----------------------------›‹##----- DICE SELECTION --------›Œ##-----------------------------›Ž'6‚.WELCHEN WURF HALTEN' Ap”,R: ,"@6˜-@" ”, A ž<R: ,"@ 6˜-˜%@$ ”0˜"@<6˜-@ F APR: ,"@*6˜-˜&@. ”:˜"F6˜-@¢W)-+˜&@,$@%@@8(@ø@6‚. O‡8˜,"@W6‚.X¤e“-@@ “A-+˜&@,$@%@@N(@‚eT: ,"@A`ª/ •‡8˜,"@%6‡8˜,-/ A†¬6‡8˜,-@®6“-@@6‚. .‡8“,"@66‚.X°`)-+“&@,$@%@@6(@‚: “H6˜-˜%@T˜"@`6˜-@² Ap¼##-----------------------------›½##----- DICE ROLLING ----------›¾##-----------------------------›¿*-@@*(@÷õòæ ¢Á6‚.WUERFELN ApÆx£-@@+“-@@P6‰8“,-P:H:,$@,%@T “fAVxAW@Ç4¤-@@‡8¤,*6‰8¤,-ˆ8¤,4 AÊ%%2@@@@Ëj)6‚.€7+‰8¤,&@,$@'%@,K2@V(‚ b6ˆ8¤,-‰8¤,f ¤j £î##-----------------------------›ð##----- DICE TOTALS -----------›ø##-----------------------------›26¥-#“-@@.6¥-¥%ˆ8“,2 “*“-@@&6‰8“,-* “76¦-#“-@@7§-@@2 ˆ8§,"“ 6‰8“,-‰8“,%@)‰8“,!¦26¦-‰8“,  § “V$Š8ž<@,!*¦"@H6Š8ž<@,-Š8ž<@,%AL —V A U$¦"@*‹8ž<@,";6Š8ž<@,-@P? —K6¢-U A •  A##-----------------------------›##----- READY TO SELECT -------› ##-----------------------------›!.6¢-$6‚.BITTE WAEHLEN . Ap(##-----------------------------›)##----- SELECTION DISPLAY -----›*##-----------------------------›+36¡-¡%@¡"@)6¡-3 A,'6¨-@¡!@'6¨-@-‹8ž<¡,"@A/##A™%¡"‚#A™%¡#"„>?-@¡%¨(@„-R: ,"@1 ”5 –? AH. APR: ,"@ ”$ –. APMT: ,"@ A0N – • A R)6¡-¡&@¡")6¡-@W‹8ž<¡,"@AP\ A„##-----------------------------›‰##----- SCORE CALCULATIONS ----›Ž##-----------------------------›˜C6Š8ž<¡,-(“-@@1ˆ8“,"¡C6Š8ž<¡,-Š8ž<¡,%¡¬ “¡ @A µGG¡&@A PA UA `A pA uA ƒA ˆ¶""*** 3 OF A KIND *** DICE TOT›¸¦!@6Š8ž<¡,-¥º A »""*** 4 OF A KIND *** DICE TOT›¼¦!@6Š8ž<¡,-¥½ A À*** FULL HOUSE *** 25›ÂJ6-6¤-/§-@@>‰8§,"@J6-@É8§,"@6¤-@Å: §)+"@*¤"@,)¦"@:6Š8ž<¡,-@%È A Ê*** SMALL STRAIGHT *** 30›Ë AxÌii6©-+Œ8@,*Œ8@,,*++Œ8@,*Œ8@,,)+Œ8@,*Œ8@,,)+Œ8@,*Œ8@,,,Í©6Š8ž<¡,-@0Î A Ï*** LARGE STRAIGHT *** 40›Ð AxÑ36©-6ª-'6§-@36-@Ò0Œ8@,"$6§-@06-@Ó š-§6ª-ª%Œ8š, šÔª"@6©-@Õ©6Š8ž<¡,-@@Ö A ×*** CHANCE *** DICE TOTAL›Ø6Š8ž<¡,-¥ A Ü!!*** DICE POKER *** 0 POINTS›Þ##-----------------------------›ß##----- DISPLAY TOTALS --------›à##-----------------------------›á,6š-@ Š8ž<¡, @,6š-@â. -š¡%¨(@Š8ž<¡,.6‹8ž<¡,-@ã36‹8ž<¡,-@ ¡ @368ž,-8ž,%Š8ž<¡,ä068ž,-!8ž,!@b068ž,-@5å=68ž,-&«-@@968ž,-8ž,%Š8ž<«,= «æ^6Ž8ž,-8ž,%8ž,%8ž,# A`7“-@@F6‡8“,-J “Pž"Ÿ^6¬-¬%@ç##     Ä Á Ô Á  ÓÔÁÔÅÍÅÎÔÓ     ›è!!    ”    ›é!!”       ”›ê!!”   ”   ”›ë!!” ”   ” ”›ì!!” ” ” ” ”›í!!” ”” ”” ”› eins› zwei› drei› vier› fuenf› sechs›dreier pasch›vierer pasch›volles haus›kleine strasse›grosse strasse› chance›  kniffel›x EINS›y ZWEI›z DREI›{ VIER›| FUENF›} SECHS›~DREIER PASCH›VIERER PASCH›€VOLLES HAUS›KLEINE STRASSE›‚GROSSE STRASSE›ƒ CHANCE›„ KNIFFEL›Ü)) oben , bonus, unten, ôïôáì, òåëïòä›""----------------------------›""----- END OF GAME? ---------›"""----------------------------›@/ž6ž-ž%@#ž"Ÿ%@/6ž-@Až AUB?¬ @!-@@5(@ ? AE+6‚. SPIEL-ENDE  Au+6¬-Ožž-@ŸP*ž-@*(@#ž¤""----------------------------›®""----- END OF GAME PLACING --›¸""----------------------------›ÌŽ8ž, ™A01 AUŽ8ž,™16‚.HEY, TOP 10 ERREICHT&& Ž8ž,œ&6‚.DU HAST DEN REKORD 0 Au:6‚.NAMED[6­-6ƒ.‚6‚.& Ap,6‚.ƒ>-@@K(@‚T6¤-B:‚,[6„.NW6­-­%@'-¤%­%@@6(@-C)@šWš"AUAXš"A&A`ZT6„7­<­,.>:š,%-¤%@@2(@„>®"@J6®-T A\­%¤ @Apl% Ž8ž,œ6œ-Ž8ž,6.„% AAv 6¯-Ž8ž,Ð""----------------------------›Ú""----- UPDATING FILE --------›ä""----------------------------›î6‚.SICHERN  Apøo6°-@>@@D:WORKI@o@@D:TOPTEN1“-@@$@‘1@›GGIF NAME$="********************" THEN NAME$="********************"›°A p  ›¯ A €'(@‘(@›' A  Q(@„(@¯*(@‘7(@›E6“-“%@Q6°-@*‰ “@@@3@D:TOPTENK@~@2@ D:WORK,TOPTEN‰@¸ AUº T:±,"@A0» 6±-±%@½ ž ž % !!**** QUINTA SUBROUTINE ****›ªJ6‚.KNIFFEL Au'6š->Š8ž<@,"@PJ6š-@´>-š@'(@Š8ž<@,>6‹8ž<@,-@¾$""*** RECORD + NAME DISPLAY **›€ 6„.… 6„7@<@,.)6‚.=:œ,@-@&B:‚,@M(@‚_-@@}(@„7@<@,€$‡**** START BUTTON ****›ˆF:B2y,"@%’$|**** PLAYER INFO SUB ****›†;6¨-@#“-@@/“!@;6¨-@L-“%¨#(@ /6š-@@Š8ž<“, @L6š-@š Š8ž<“,!@™ 6š-¤& ‹8ž<“,-š“%¨&(@Š8ž<“,® “p""** DISPLAY TOTALS SUBROUTINE›zZ6’8,-8ž,'6’8@,-8ž,96’8@,-8ž,K6’8@,-Ž8ž,Z6’8@,-œ„x“-@#6‚.=:’8“,,46š-@&B:‚,H-@“%@Y(@ g-š“%@t(@‚x “Ž$X *** MESSAGE SUBROUTINE ***›bY 6¤-B:‚,-@+(@…I-+@ &¤,'@@V(@‚Y$L!!*** FLASHING SUBROUTINE ***›Vf“-@@ ! Ap=2@“@@A “c2@f$x*** IFANY SUBROUTINE ***›}*“-@@&6Œ8“,-* “‚C“-@@+§-@@4ˆ8§,"“C6Œ8“,-@Œ § “$4!*** BELL1 SUBROUTINE ***›5!b%2@@@@9“-@@= “_2@b$>!*** BELL2 SUBROUTINE ***›?!b%2@@@@9“-@@= “_2@b$H!*** POSX SUBROUTINE ***›I!!-@¡%¨(@‚!$€ D:KNIFFEL.BAS