Spielablauf :
Nach Programmstart muß der Spieler zunächst die obere Intervallgrenze eingeben und R/S drücken. Die untere Grenze ist 1, die obere die größte darstellbare Integerzahl (dann dauert es natürlich für Spieler und HP-41CX etwas länger . . . ;-) ).
Auf die Frage MOGELST DU ? muß der Spieler mit N antworten, wenn er ehrlich ist und sich bei den Antworten NICHT vertut - anderenfalls findet der HP-41CX die zu ratende Zahl natürlich nicht ! ;-) Der HP-41CX zeigt dann eine Zahl an und der Spieler drückt die Taste G, wenn die zu ratende Zahl größer ist, oder K, wenn sie kleiner ist. Hat der HP-41CX die Zahl gefunden, muß R gedrückt werden.
Hat der Spieler oben mit J geantwortet, so muß er noch die Zahl eintippen, die der HP-41CX herausfinden soll. Dann übernimmt der HP-41CX das Ratenund das Bewerten. Zum Schluß werden die Zahl der Versuche und die vom HP-41CX benötigte Zeit ausgegeben.
Programmlisting :
In den Zeilen 4 bis 12 werden drei Tastenzuweisungen vorgenommen, wobei eventuell vorhandene alte Zuweisungen gelöscht werden !
001 LBL "SPIEL4b" (4b deshalb, weil bei Spiel4a der Spieler die Zahl raten muß) 002 " ZAHL RATEN" 003 AVIEW 004 "KL" 005 32 006 PASN 007 "GR" 008 22 009 PASN 010 "RI" 011 52 012 PASN 013 4 E-3 014 CLRGX 015 CF 29 016 CF 05 017 FIX 1 018 CLST 019 SETSW 020 "OBERE INTER" 021 "VALLGRENZE ?" 022 PROMPT 023 STO 00 024 CLA 025 74 026 AON 027 "MOGELST DU ? 028 PROMPT 029 AOFF 030 ATOX 031 CLA 032 X=Y? 033 GTO 05 034 "ZAHL ?" 035 PROMPT 036 SF 27 037 LBL 07 038 XEQ 02 039 LBL 01 040 FIX 0 041 FS? 05 042 GTO 06 043 CLA 044 STOPSW 045 VIEW 01 046 STOP 047 LBL 02 048 RUNSW 049 RCL 00 050 2 051 / 052 INT 053 STO 01 054 STO 02 055 XEQ 03 056 RTN 057 LBL "KL" 058 RUNSW 059 3 060 RCL 02 061 X=Y? 062 GTO 11 063 RCL 02 064 RND 065 2 066 / 067 INT 068 RND 069 STO 02 070 E 071 RCL 02 072 X<=Y? 073 XEQ 04 074 LBL 12 075 RCL 02 076 ST- 01 077 XEQ 03 078 GTO 01 079 LBL "GR" 080 RUNSW 081 RCL 02 082 2 083 / 084 FIX 0 085 RND 086 STO 02 087 2 088 RCL 02 089 X=Y? 090 XEQ 04 091 RCL 02 092 ST+ 01 093 XEQ 03 094 GTO 01 095 LBL 03 096 ISG 03 097 "" (Leeranweisung) 098 RTN 099 LBL 04 100 E 101 STO 02 102 RTN 103 LBL 11 104 2 105 STO 02 106 GTO 12 107 LBL "RI" 108 "VERSUCHE: " 109 ARCL 03 110 AVIEW 111 PSE 112 FIX 6 113 SF 29 114 "BENOETIGTE" 115 AVIEW 116 PSE 117 "ZEIT IN STD:" 118 AVIEW 119 PSE 120 RCLSW 121 VIEW X 122 CF 05 123 FIX 4 124 CLKEYS 125 GTO 13 126 LBL 05 127 SF 05 128 "ZU RATENDE" 129 " ZAHL:" 130 PROMPT 131 RUNSW 132 STO 04 133 "START SPIEL4b" 134 AVIEW 135 PSE 136 GTO 07 137 LBL 06 138 VIEW 01 139 PSE 140 RCL 01 141 RCL 04 142 X=Y? 143 GTO 08 144 X>Y? 145 GTO 09 146 GTO 10 147 LBL 08 148 STOPSW 149 TONE 8 150 "RICHTIG" 151 AVIEW 152 GTO "RI" 153 LBL 09 154 "GROESSER" 155 AVIEW 156 PSE 157 GTO "GR" 158 LBL 10 159 "KLEINER" 160 AVIEW 161 PSE 162 GTO "KL" 163 LBL 13 164 CF 27 165 4 E-3 166 CLRGX 167 CLST 168 CLA 169 END
Zurück zu Ausgewählte (Spiel-)Programme für den HP-41CX
Zurück zu Naturwissenschaften und mathematische Spielereien
Kai Schröder, 30.5.2001