Für dieses Forum muß Javascript im Browser aktiviert werden!
Kommentar: Einfügen von HTML im Kommentar: Link einfügen: <a href="LINKURL" target="_blank">LINKTITEL</a> Bild einfügen: <img src="BILDURL"> Text formatieren: <b>fetter Text</b> <i>kursiver Text</i> <u>unterstrichener Text</u> Kombinationen sind auch möglich z.B.: <b><i>fetter & kursiver Text</i></b> C2 Quellcode formatieren: <code>Quellcode</code> ASM Quellcode formatieren: <asm>Quellcode</asm> (Innerhalb eines Quellcodeabschnitts ist kein html möglich.) Wichtig: Bitte mache Zeilenumbrüche, bevor Du am rechten Rand des Eingabefeldes ankommst ! > Hallo André, > > vielen Dank für die Info. > > dann bist du meine Rettung! Das Problem liegt wahrscheinlich im Bereich ASM Adaption > auf die CC2 Hardware (Memorymodell, SP, IR, Timing etc..) > > Ich habe das C-Programm minimiert (Ein-/Ausgabe numerisch, Parameterübergabe aus C2) und erfolgreich in TurboC getestet. > Den gleichen C-Source habe ich dann mittels Tasking in ASM übersetzt und den ASM Text an die CC2 adaptiert. > > Und es funktiert... mit Einschränkungen. > > Unter gewissen Prämissen hängt das Programm. Das ASM Programm ist nach klar lesbar und parallel > zum C-Code sind die Prozeduren, Variablen, Konstanten, etc. zu lesen und verstehen. > > Habe ich beispielsweise nur eine Dame auf dem Schachfeld funktioniert die Zugprüfung. Ist es nur ein Turm > bleibt er hängen. Bei der Eingrenzung "wandert" der Fehler, bis er weg ist. Dann funktioniert auch der Turm. > Ein oder zweimal (ohne Änderung) anschließend hängt er wieder. Das bedeutet die UNIT kommt nicht wieder > aus dem Call ins C2 zurück. Eine zweite Testthreat zum Beispiel bleibt ebenfalls hängen. > > Das Programm benutzt 30000H als Codesegment, 80000H als Datasegment und 34000H als Constantsegment. > Zum Download benutze ich "dein" CC2-Tool Programm. Das OS ist das aktuelle. > > Das ASM Programm an sich muss eigentlich funktionieren, alle Fehleranalysen haben das gezeigt. Es wurde > per Compiler aus einem C-programm erstellt welches felhlerfrei läuft, wenn man es per TurboC compiliert. > Es läuft ebenfalls, mit Modifikationen, als C2 Source, nur eben grottenlangsam. > > Meine Bitte: > Schau dir doch bitte mal das ASM Programm an. Wenn du hier Tips geben kannst bin ich dir dankbar. > Für mich ist das eine große Hilfe, da das Programm, wie beschrieben, nach riesiegem Aufwand eigentlich läuft. > Als sonstige Alternative bleibt mir nur die Harwareplattform zu wechseln und auf z.B. AVR umzusteigen. > > Ich schicke dir parallel per E-Mail (wie geht das eigentlich übers Formum?) die C und ASM Sources, > sowie das C2 Modul. > > > Tausend Dank vorab > > Frank Neul > > > <asm> > ;******************************************************************/ > ;* Author : Frank W. Neul (frank.neul@t-online.de */ > ;* Vorlage : Frank W. Neul (frank.neul@t-online.de */ > ;* Datum : 04.04.2008 */ > ;* Getestet : Nein */ > ;* Getestet : Nein */ > ;******************************************************************/ > > $case > $segmented > $model(large) > $extend > $nomod166 > $stdnames(reg164ci.def) > > regdef R0-R15 > > ;*********************************************************** > userseg SECTION CODE word at 30000h > assume dpp3:userseg > assume dpp3:system > assume dpp2:dataseg > assume dpp1:constseg > ;*********************************************************** > > ; Definition der OS-Routinen > OSseg EQU 0 > POP_R4 EQU 0765AH ;uses: R4, R12, R13, R14 ; Wert in R4 > POP_LNG EQU 07680H ;return in R4, R5 ; Wert in R4(Lo-Word), R5(Hi-Word) > PUSH_LNG EQU 075fEH ; Wert in R12, R13 > PUSH_R12 EQU 075D6H ;push R12 ; Wert in R12 > > Version EQU 110 ;Aktuelle Version der Routine > > > ;*********************************************************** > ;Holt Parameter (int R2,R3,R4,R5) > getparm proc far > calls OSseg,POP_R4 ;int count vom Stack in R4 holen > mov R5,R4 ;4.Parameter in R5 > calls OSseg,POP_R4 ;int count vom Stack in R4 holen > mov R6,R4 ;3.Parameter in R6 zwischenspeichern > calls OSseg,POP_R4 ;int count vom Stack in R4 holen > mov R3,R4 ;2.Parameter in R3 > calls OSseg,POP_R4 ;int count vom Stack in R4 holen > mov R2,R4 ;1.Parameter in R2 > mov R4,R6 ;3. Parameter aus R6 zurückholen > ret ;Ruecksprung > getparm endp > ;*********************************************************** > > ;*********************************************************** > ;Setzt Parameter (R2) returns long > setparm proc far > pop R1 ;2 x POP > pop R1 > mov R13,#0 ;Lower Word auf Null > mov R12,R2 ;R2 als Ergebnis > calls OSseg,PUSH_LNG ;Longwert auf den Stack laden > ret > setparm endp > ;*********************************************************** > > > > ;*********************************************************** > ; Function _main > _main proc far > movw dpp2,#pag dataseg ;Daten: Data Page Pointers > movw dpp1,#pag constseg ;Konstanten: Data Page Pointers > call getparm ;Hole Parameter (long R2,R3,R4,R5) > call _main_start ;main_start ist die ausführende C-Funktion > movw dpp2,#02h ;DPP2 Originalwert setzen (2) > movw dpp1,#01h ;DPP1 Originalwert setzen (1) > jmp setparm ;Übergebe R2 als: returns int > ret > _main endp > ; End of function > ; End of section > > > ; Function _main_start > _main_start proc far > call __save_1 > movw r8,r2 > movw r9,r3 > movw r10,r4 > movw r6,r5 > movw r7,#01h > cmpw r8,#01h > jmp cc_ne,_3 > call _initialisiere > _3: > cmpw r8,#02h > jmp cc_ne,_4 > movw r2,r9 > movw r3,r10 > movw r4,r6 > call _zugnr_eingabe > ; TEST DEBUG ---------------------------- > movw r7,r2 ; Original > ; movw r7,_LocalStack > _4: > cmpw r8,#03h > jmp cc_ne,_5 > movw _SpielerSpieler,ZEROS > call _computer_zug > _5: > cmpw r8,#04h > jmp cc_ne,_6 > cmpw r9,#01h > jmp cc_ne,_7 > movw r7,_Message > _7: > cmpw r9,#02h > jmp cc_ne,_8 > movw r7,_Zug_Schlag > _8: > cmpw r9,#03h > jmp cc_ne,_9 > movw r7,_Zug_Figur > _9: > cmpw r9,#04h > jmp cc_ne,_10 > movw r7,_Zug_Von > _10: > cmpw r9,#05h > jmp cc_ne,_11 > movw r7,_Zug_Nach > _11: > cmpw r9,#06h > jmp cc_ne,_12 > movw r7,_Zug_Umwandlung > _12: > cmpw r9,#07h > jmp cc_ne,_13 > movw r11,r10 > shl r11,#01h > movw r7,[r11+#dpp2:_Brett] > _13: > cmpw r9,#08h > jmp cc_ne,_14 > movw r7,_SollTiefe > _14: > _6: > cmpw r8,#05h > jmp cc_ne,_15 > cmpw r9,#01h > jmp cc_ne,_16 > movw _Message,r6 > _16: > cmpw r9,#02h > jmp cc_ne,_17 > movw _Zug_Schlag,r6 > _17: > cmpw r9,#03h > jmp cc_ne,_18 > movw _Zug_Figur,r6 > _18: > cmpw r9,#04h > jmp cc_ne,_19 > movw _Zug_Von,r6 > _19: > cmpw r9,#05h > jmp cc_ne,_20 > movw _Zug_Nach,r6 > _20: > cmpw r9,#06h > jmp cc_ne,_21 > movw _Zug_Umwandlung,r6 > _21: > cmpw r9,#07h > jmp cc_ne,_22 > shl r10,#01h > movw [r10+#dpp2:_Brett],r6 > _22: > cmpw r9,#08h > jmp cc_ne,_23 > movw _SollTiefe,r6 > _23: > _15: > cmpw r8,#06h > jmp cc_ne,_24 > movw r7,#Version > _24: > movw r2,r7 > jmp __restore_2 > ret > _main_start endp > ; End of function > ; End of section > > global _sgn > ; Function _sgn > _sgn proc far > cmpw r2,#00h > jmp cc_ne,_26 > movw r2,#00h > ret > _26: > cmpw r2,#00h > jmp cc_sle,_28 > movw r2,#01h > ret > _28: > movw r2,#0ffffh > ret > _sgn endp > ; End of function > ; End of section > > global _abs > ; Function _abs > _abs proc far > movw r11,#00h > cmpw r2,#00h > jmp cc_slt,_31 > movw r11,r2 > _31: > cmpw r2,#00h > jmp cc_sge,_32 > negw r2 > movw r11,r2 > _32: > movw r2,r11 > ret > _abs endp > ; End of function > ; End of section > > global _initialisiere > ; Function _initialisiere > _initialisiere proc far > movw _ZugNr,ZEROS > movw r11,#dpp1:_GrundStellung > movw r12,#dpp2:_Brett > movw r13,#00h > _34: > movw [r12+],[r11] > addw r11,#02h > cmpi1 r13,#77h > jmp cc_ult,_34 > movw r11,#19h > movw _wKoenig,r11 > movw r11,#5fh > movw _sKoenig,r11 > movw r11,#dpp2:_Rochade > movw r12,#00h > _35: > movw [r11],ZEROS > addw r11,#02h > cmpi1 r12,#02h > jmp cc_ult,_35 > movw r11,#15h > movw r12,#dpp2:_Bewegt+2ah > _36: > movw [r12],ZEROS > addw r12,#02h > cmpi1 r11,#62h > jmp cc_ult,_36 > movw _Ep_Feld,ZEROS > movw r11,#1964h > movw _MatSumme,r11 > movw _MatBilanz,ZEROS > movw _StapelGrenze,ZEROS > movw r11,#04h > movw _SollTiefe,r11 > movw _Tiefe,ZEROS > movw r11,#01h > movw _Farbe,r11 > ret > _initialisiere endp > ; End of function > ; End of section > > global _init_spielbaum > ; Function _init_spielbaum > _init_spielbaum proc far > cmpw ZEROS,_Tiefe > jmp cc_eq,_37 > movw r11,#dpp2:_Ep_Feld > movw [r11],_Ep_Feld+02h > movw r11,#dpp2:_MatBilanz > movw [r11],_MatBilanz+02h > movw r11,#dpp2:_MatSumme > movw [r11],_MatSumme+02h > movw _Tiefe,ZEROS > _37: > ret > _init_spielbaum endp > ; End of function > ; End of section > > global _naechstbesterzug > ; Function _naechstbesterzug > _naechstbesterzug proc far > movw r2,#0ffffh > movw r11,#8300h > movw r12,_Tiefe > shl r12,#01h > movw r13,[r12+#dpp2:_StapelGrenze] > movw r3,#dpp2:_StapelGrenze+02h > addw r3,r12 > jmp _38 > _39: > movw r12,r13 > shl r12,#03h > subw r12,r13 > shl r12,#01h > movw r12,[r12+#dpp2:_ZugStapel+0ch] > cmpw r12,r11 > jmp cc_sle,_40 > movw r2,r13 > movw r11,r12 > _40: > addw r13,#01h > _38: > cmpw r13,[r3] > jmp cc_slt,_39 > cmpw r2,#00h > jmp cc_slt,_41 > movw r11,r2 > shl r11,#03h > subw r11,r2 > shl r11,#01h > movw r12,#8300h > movw [r11+#dpp2:_ZugStapel+0ch],r12 > _41: > ret > _naechstbesterzug endp > ; End of function > ; End of section > > global _alpha_beta > ; Function _alpha_beta > _alpha_beta proc far > call __save_3 > movw r8,r2 > movw r9,r3 > movw r10,r4 > subw _KnotenAnzahl,ONES > subcw _KnotenAnzahl+02h,ONES > call __cocofun_8 > movw r4,_Farbe > call _bewerte_stellung > movw r6,r2 > movw r1,_InSchach > cmpw r1,#01h > jmp cc_ne,_43 > movw r13,_Tiefe > movw r11,r13 > addw r11,r10 > movw r12,#01h > addw r12,_MaxErweiterung > cmpw r11,r12 > jmp cc_slt,_44 > _43: > movw r13,_Tiefe > cmpw r13,#02h > jmp cc_slt,_45 > movw r11,r13 > addw r11,r10 > cmpw r11,_MaxErweiterung > jmp cc_sge,_46 > movw r11,r13 > shl r11,#01h > movw r12,[r11+#_NachFeld] > movw r11,[r11+#_NachFeld+0fffeh] > cmpw r12,r11 > jmp cc_ne,_47 > movw r11,r8 > subw r11,#96h > cmpw r6,r11 > jmp cc_slt,_48 > movw r11,r9 > addw r11,#96h > cmpw r6,r11 > jmp cc_sgt,_49 > _44: > addw r10,#01h > _49: > _48: > _47: > _46: > _45: > cmpw r10,#0fffbh > jmp cc_slt,_50 > movw r11,#7d00h > subw r11,r13 > cmpw r6,r11 > jmp cc_eq,_51 > cmpw r13,#14h > jmp cc_sge,_52 > cmpw r6,r9 > jmp cc_slt,_53 > movw r11,r10 > addw r11,r1 > cmpw r11,#01h > jmp cc_sgt,_54 > _50: > _51: > _52: > movw r2,r6 > jmp _55 > _54: > _53: > movw r2,r10 > call _generiere_zuege > cmpw r10,#00h > jmp cc_sle,_56 > movw r7,#8300h > jmp _58 > _56: > movw r7,r6 > jmp _58 > _59: > movw r2,r0 > call _zug_ausfuehren > movw r2,r9 > negw r2 > movw r3,r8 > negw r3 > movw r4,r10 > subw r4,#01h > call _alpha_beta > negw r2 > movw r6,r2 > movw r2,r0 > call _zug_zuruecknehmen > cmpw r6,r7 > jmp cc_sle,_60 > movw r7,r6 > cmpw r6,r9 > jmp cc_slt,_61 > cmpw r10,#00h > jmp cc_sle,_62 > movw r2,r0 > call _kopiere_hvar > jmp _63 > _61: > cmpw r6,r8 > jmp cc_sle,_64 > cmpw r10,#00h > jmp cc_sle,_65 > movw r2,r0 > call _kopiere_hvar > _65: > movw r8,r6 > _64: > _60: > _58: > call _naechstbesterzug > movw r0,r2 > cmpw r0,#00h > jmp cc_sge,_59 > _62: > _63: > cmpw r6,r9 > jmp cc_slt,_66 > cmpw r0,#00h > jmp cc_slt,_67 > movw r11,_Tiefe > shl r11,#03h > addw r11,#dpp2:_KillerTab > movw r12,r11 > addw r12,#04h > movw r13,r11 > movw [r12],[r13+] > movw r13,[r13] > movw [r12+#02h],r13 > movw r12,r0 > shl r12,#03h > subw r12,r0 > shl r12,#01h > addw r12,#dpp2:_ZugStapel > movw [r11],[r12] > movw r12,[r12+#02h] > movw [r11+#02h],r12 > _67: > _66: > movw r11,#7cffh > subw r11,_Tiefe > negw r11 > cmpw r7,r11 > jmp cc_ne,_68 > cmpw r1,#00h > jmp cc_ne,_69 > movw r2,#00h > jmp _70 > _69: > _68: > movw r2,r7 > _70: > _55: > jmp __restore_4 > ret > _alpha_beta endp > ; End of function > ; End of section > > global _kopiere_hvar > ; Function _kopiere_hvar > _kopiere_hvar proc far > movw r11,r2 > shl r11,#03h > subw r11,r2 > shl r11,#01h > addw r11,#dpp2:_ZugStapel > call __cocofun_22 > addw r13,#dpp2:_HVar > shl r12,#02h > addw r13,r12 > movw [r13],[r11] > movw r11,[r11+#02h] > movw [r13+#02h],r11 > movw r11,#01h > call __cocofun_22 > movw r14,#dpp2:_HVar+50h > addw r14,r13 > addw r13,#dpp2:_HVar > movw r4,r12 > shl r4,#02h > addw r13,r4 > shl r12,#02h > addw r14,r12 > _72: > movw r12,r11 > shl r12,#02h > movw r4,r13 > addw r4,r12 > movw r5,r14 > addw r5,r12 > movw r12,[r5] > jmp cc_ne,_73 > movw [r4],[r5+] > movw r5,[r5] > movw [r4+#02h],r5 > ret > _73: > movw [r4],[r5+] > movw r5,[r5] > movw [r4+#02h],r5 > addw r11,#01h > jmp _72 > ret > _kopiere_hvar endp > ; End of function > ; End of section > > ; Function __cocofun_22 > __cocofun_22 proc far > ; Function body __cocofun_22 > movw r12,_Tiefe > movw r13,r12 > shl r13,#02h > addw r13,r12 > shl r13,#04h > ret > __cocofun_22 endp > ; End of function > ; End of section > > global _zug_ausfuehren > ; Function _zug_ausfuehren > _zug_ausfuehren proc far > movw [-r15],r8 > movw [-r15],r9 > movw r11,r2 > subw _ZugNr,ONES > shl r2,#03h > subw r2,r11 > shl r2,#01h > addw r2,#dpp2:_ZugStapel > movw r14,[r2] > movw r4,[r2+#02h] > movw r5,[r2+#0ah] > movw _LetzterZug,r11 > subw _Tiefe,ONES > movw r13,_Tiefe > shl r13,#01h > movw [r13+#_NachFeld],r4 > addw r13,#dpp2:_Ep_Feld > movw [r13],ZEROS > call __cocofun_9 > movw r3,r11 > addw r3,#dpp2:_MatBilanz > movw r12,[r11+#dpp2:_MatBilanz+0fffeh] > negw r12 > movw [r3],r12 > movw r8,_Tiefe > shl r8,#01h > addw r8,#dpp2:_MatSumme > movw r11,[r11+#dpp2:_MatSumme+0fffeh] > movw [r8],r11 > shl r14,#01h > movw r11,r14 > addw r11,#dpp2:_Bewegt > movw r12,[r11] > addw r12,#01h > movw [r11],r12 > movw r9,r4 > shl r9,#01h > movw r11,r9 > addw r11,#dpp2:_Bewegt > movw r12,[r11] > addw r12,#01h > movw [r11],r12 > cmpw r5,#00h > jmp cc_eq,_75 > movw r11,r5 > shl r11,#01h > addw r11,#dpp2:_Brett > movw r12,[r11] > jmp cc_ne,_76 > movw [r13],r5 > jmp _77 > _76: > movw [r11],ZEROS > movw r11,[r3] > subw r11,#64h > movw [r3],r11 > jmp _78 > _75: > movw r11,[r2+#04h] > jmp cc_eq,_79 > shl r11,#01h > movw r11,[r11+#dpp1:_FigMaterial] > movw r12,[r3] > subw r12,r11 > movw [r3],r12 > cmpw r11,#64h > jmp cc_eq,_80 > movw r12,[r8] > subw r12,r11 > movw [r8],r12 > _80: > _79: > _77: > _78: > addw r14,#dpp2:_Brett > movw r13,r9 > addw r13,#dpp2:_Brett > movw [r13],[r14] > movw [r14],ZEROS > movw r11,[r2+#06h] > jmp cc_eq,_81 > movw r12,_Farbe > mulu r12,r11 > movw [r13],MDL > shl r11,#01h > movw r11,[r11+#dpp1:_FigMaterial] > subw r11,#64h > movw r12,[r3] > subw r12,r11 > movw [r3],r12 > movw r2,r8 > addw r11,[r2] > addw r11,#64h > movw [r8],r11 > jmp _82 > _81: > movw r11,#08h > addw r11,r2 > movw r12,[r11] > cmpw r12,#01h > jmp cc_ne,_83 > movw r11,#00h > movw [r9+#dpp2:_Brett+02h],r11 > movw r11,_Farbe > shl r11,#01h > movw [r9+#dpp2:_Brett+0fffeh],r11 > jmp _84 > _83: > movw r11,[r11] > cmpw r11,#02h > jmp cc_ne,_85 > movw r11,#00h > movw [r9+#dpp2:_Brett+0fffch],r11 > movw r11,_Farbe > shl r11,#01h > movw [r9+#dpp2:_Brett+02h],r11 > _84: > movw r12,#01h > movw [r11+#dpp2:_Rochade+02h],r12 > _85: > _82: > movw r11,[r13] > cmpw r11,#06h > jmp cc_ne,_86 > movw _wKoenig,r4 > jmp _87 > _86: > call __cocofun_23 > _87: > movw r11,_Farbe > negw r11 > movw _Farbe,r11 > movw r9,[r15+] > movw r8,[r15+] > ret > _zug_ausfuehren endp > ; End of function > ; End of section > > ; Function __cocofun_23 > __cocofun_23 proc far > ; Function body __cocofun_23 > cmpw r11,#0fffah > jmp cc_ne,_88 > movw _sKoenig,r4 > _88: > ret > __cocofun_23 endp > ; End of function > ; End of section > > global _zug_zuruecknehmen > ; Function _zug_zuruecknehmen > _zug_zuruecknehmen proc far > addw _ZugNr,ONES > movw r5,r2 > shl r5,#03h > subw r5,r2 > shl r5,#01h > addw r5,#dpp2:_ZugStapel > movw r4,[r5] > movw r2,[r5+#02h] > movw r11,[r5+#0ah] > movw r12,_Farbe > negw r12 > movw _Farbe,r12 > addw _Tiefe,ONES > shl r2,#01h > movw r12,r2 > addw r12,#dpp2:_Brett > movw r13,r4 > shl r13,#01h > movw r3,r13 > addw r3,#dpp2:_Brett > movw [r3],[r12] > movw [r12],ZEROS > cmpw r11,#00h > jmp cc_eq,_89 > movw r14,[r5+#04h] > cmpw r14,#01h > jmp cc_ne,_90 > shl r11,#01h > movw r12,_Farbe > negw r12 > movw [r11+#dpp2:_Brett],r12 > jmp _91 > _90: > _89: > movw r11,[r5+#04h] > jmp cc_eq,_92 > movw r14,_Farbe > negw r14 > mulu r14,r11 > movw [r12],MDL > _92: > _91: > addw r13,#dpp2:_Bewegt > movw r11,[r13] > subw r11,#01h > movw [r13],r11 > movw r11,r2 > addw r11,#dpp2:_Bewegt > movw r12,[r11] > subw r12,#01h > movw [r11],r12 > movw r11,#08h > addw r11,r5 > movw r12,[r11] > cmpw r12,#01h > jmp cc_ne,_93 > movw r11,_Farbe > shl r11,#01h > movw [r2+#dpp2:_Brett+02h],r11 > movw r12,#00h > movw [r2+#dpp2:_Brett+0fffeh],r12 > jmp _94 > _93: > movw r11,[r11] > cmpw r11,#02h > jmp cc_ne,_95 > movw r11,_Farbe > shl r11,#01h > movw [r2+#dpp2:_Brett+0fffch],r11 > movw r12,#00h > movw [r2+#dpp2:_Brett+02h],r12 > _94: > movw r12,#00h > movw [r11+#dpp2:_Rochade+02h],r12 > _95: > movw r11,[r5+#06h] > jmp cc_eq,_96 > movw [r3],_Farbe > _96: > movw r11,[r3] > cmpw r11,#06h > jmp cc_ne,_97 > movw _wKoenig,r4 > ret > _97: > jmp __cocofun_23 > ret > _zug_zuruecknehmen endp > ; End of function > ; End of section > > global _sbauerbewertung > ; Function _sbauerbewertung > _sbauerbewertung proc far > movw [-r15],r8 > movw [-r15],r9 > movw r13,#0bh > subw r13,r3 > call __cocofun_9 > movw r14,[r11+#dpp2:_MatSumme] > cmpw r14,#0a8ch > jmp cc_sle,_100 > movw r11,r2 > shl r11,#01h > movw r8,[r11+#dpp1:_sBFeldWert] > cmpw r5,#04h > jmp cc_sge,_101 > cmpw r4,#06h > jmp cc_sge,_102 > cmpw r4,#02h > jmp cc_sgt,_103 > _102: > cmpw r13,#04h > jmp cc_sle,_104 > subw r8,#0fh > jmp _105 > _100: > movw r8,r13 > shl r8,#02h > _101: > _103: > _104: > _105: > shl r4,#02h > movw r11,r4 > addw r11,#dpp2:_Bauern > movw r12,[r4+#dpp2:_Bauern+0fffeh] > jmp cc_ne,_106 > movw r12,[r4+#dpp2:_Bauern+06h] > jmp cc_ne,_107 > subw r8,#0ch > movw r12,[r4+#dpp2:_Bauern+02h] > cmpw r12,#01h > jmp cc_sle,_108 > subw r8,#0ch > _108: > _107: > _106: > movw r12,[r4+#dpp2:_Bauern+02h] > cmpw r12,#01h > jmp cc_sle,_109 > subw r8,#0fh > _109: > movw r5,r2 > shl r5,#02h > movw r9,[r5+#dpp2:_BKontrolle+02h] > cmpw r9,#00h > jmp cc_sgt,_110 > movw r12,[r5+#dpp2:_BKontrolle+0ffdah] > cmpw r12,#00h > jmp cc_sle,_111 > _110: > addw r8,r13 > _111: > movw r11,[r11] > jmp cc_ne,_112 > cmpw r9,#00h > jmp cc_ne,_113 > ;--------------------------------------- > ; TEST > movw r3,#dpp2:_BKontrolle-28h > ; movw r3,#dpp2:_BKontrolle+0ffd8h > ;--------------------------------------- > addw r3,r5 > movw r11,[r5+#dpp2:_BKontrolle+0ffdah] > cmpw r11,[r3] > jmp cc_sge,_114 > subw r8,#0ah > movw r11,[r4+#dpp2:_Tuerme] > cmpw r11,#00h > jmp cc_sle,_115 > subw r8,#08h > jmp _116 > _114: > _113: > movw r11,r2 > movw r12,r2 > shl r12,#02h > addw r12,#dpp2:_BKontrolle > jmp _117 > _118: > movw r3,[r12] > cmpw r3,#00h > jmp cc_sgt,_119 > subw r12,#28h > subw r11,#0ah > _117: > cmpw r11,#26h > jmp cc_sgt,_118 > cmpw r14,#0a8ch > jmp cc_sge,_120 > movw r11,r13 > shl r11,#04h > addw r8,r11 > movw r11,r4 > addw r11,#dpp2:_Tuerme > movw r12,[r4+#dpp2:_Tuerme+02h] > cmpw r12,#00h > jmp cc_sle,_121 > movw r12,r13 > shl r12,#01h > addw r8,r12 > _121: > movw r11,[r11] > cmpw r11,#00h > jmp cc_sle,_122 > movw r11,r13 > shl r11,#01h > subw r8,r11 > _122: > cmpw r14,#00h > jmp cc_ne,_123 > movw r11,r13 > shl r11,#03h > addw r8,r11 > _123: > cmpw r9,#00h > jmp cc_sgt,_124 > movw r11,[r5+#dpp2:_BKontrolle+0ffdah] > cmpw r11,#00h > jmp cc_sle,_125 > _124: > movw r11,r13 > shl r11,#02h > addw r8,r11 > _125: > shl r2,#01h > movw r11,[r2+#dpp2:_Brett+0ffech] > cmpw r11,#00h > jmp cc_sge,_126 > movw r11,[r5+#dpp2:_BKontrolle+0ffdah] > jmp cc_ne,_127 > shl r13,#02h > subw r8,r13 > jmp _128 > _120: > movw r11,r13 > shl r11,#03h > addw r8,r11 > cmpw r9,#00h > jmp cc_sgt,_129 > movw r11,[r5+#dpp2:_BKontrolle+0ffdah] > cmpw r11,#00h > jmp cc_sle,_130 > _129: > shl r13,#01h > addw r8,r13 > _130: > _126: > _127: > _128: > _115: > _116: > _112: > _119: > movw r2,r8 > movw r9,[r15+] > movw r8,[r15+] > ret > _sbauerbewertung endp > ; End of function > ; End of section > > global _wbauerbewertung > ; Function _wbauerbewertung > _wbauerbewertung proc far > movw [-r15],r0 > movw [-r15],r8 > call __cocofun_9 > movw r13,[r11+#dpp2:_MatSumme] > cmpw r13,#0a8ch > jmp cc_sle,_132 > movw r11,r2 > shl r11,#01h > movw r14,[r11+#dpp1:_wBFeldWert] > cmpw r5,#04h > jmp cc_sge,_133 > cmpw r4,#06h > jmp cc_sge,_134 > cmpw r4,#02h > jmp cc_sgt,_135 > _134: > cmpw r3,#04h > jmp cc_sle,_136 > subw r14,#0fh > jmp _137 > _132: > movw r14,r3 > shl r14,#02h > _133: > _135: > _136: > _137: > shl r4,#02h > movw r11,r4 > addw r11,#dpp2:_Bauern > movw r12,[r4+#dpp2:_Bauern+0fffch] > jmp cc_ne,_138 > movw r12,[r4+#dpp2:_Bauern+04h] > jmp cc_ne,_139 > subw r14,#0ch > movw r12,[r11] > cmpw r12,#01h > jmp cc_sle,_140 > subw r14,#0ch > _140: > _139: > _138: > movw r11,[r11] > cmpw r11,#01h > jmp cc_sle,_141 > subw r14,#0fh > _141: > movw r5,r2 > shl r5,#02h > movw r8,[r5+#dpp2:_BKontrolle] > cmpw r8,#00h > jmp cc_sgt,_142 > call __cocofun_15 > jmp cc_sle,_143 > _142: > addw r14,r3 > _143: > movw r11,[r4+#dpp2:_Bauern+02h] > jmp cc_ne,_144 > cmpw r8,#00h > jmp cc_ne,_145 > movw r0,#dpp2:_BKontrolle+28h > addw r0,r5 > movw r11,[r5+#dpp2:_BKontrolle+2ah] > cmpw r11,[r0] > jmp cc_sle,_146 > subw r14,#0ah > movw r11,[r4+#dpp2:_Tuerme+02h] > cmpw r11,#00h > jmp cc_sle,_147 > subw r14,#08h > jmp _148 > _146: > _145: > movw r11,r2 > jmp _149 > _150: > movw r12,r11 > shl r12,#02h > movw r12,[r12+#dpp2:_BKontrolle+02h] > cmpw r12,#00h > jmp cc_sgt,_151 > addw r11,#0ah > _149: > cmpw r11,#51h > jmp cc_slt,_150 > cmpw r13,#0a8ch > jmp cc_sge,_152 > movw r11,r3 > shl r11,#04h > addw r14,r11 > movw r11,[r4+#dpp2:_Tuerme] > cmpw r11,#00h > jmp cc_sle,_153 > movw r11,r3 > shl r11,#01h > addw r14,r11 > _153: > movw r11,[r4+#dpp2:_Tuerme+02h] > cmpw r11,#00h > jmp cc_sle,_154 > movw r11,r3 > shl r11,#01h > subw r14,r11 > _154: > cmpw r13,#00h > jmp cc_ne,_155 > movw r11,r3 > shl r11,#03h > addw r14,r11 > _155: > cmpw r8,#00h > jmp cc_sgt,_156 > call __cocofun_15 > jmp cc_sle,_157 > _156: > movw r11,r3 > shl r11,#02h > addw r14,r11 > _157: > shl r2,#01h > movw r11,[r2+#dpp2:_Brett+14h] > cmpw r11,#00h > jmp cc_sge,_158 > movw r11,#dpp2:_BKontrolle+28h > addw r11,r5 > movw r11,[r11] > jmp cc_ne,_159 > shl r3,#02h > subw r14,r3 > jmp _160 > _152: > movw r11,r3 > shl r11,#03h > addw r14,r11 > cmpw r8,#00h > jmp cc_sgt,_161 > call __cocofun_15 > jmp cc_sle,_162 > _161: > shl r3,#01h > addw r14,r3 > _162: > _158: > _159: > _160: > _147: > _148: > _144: > _151: > movw r2,r14 > movw r8,[r15+] > movw r0,[r15+] > ret > _wbauerbewertung endp > ; End of function > ; End of section > > ; Function __cocofun_15 > __cocofun_15 proc far > ; Function body __cocofun_15 > movw r11,#dpp2:_BKontrolle+28h > addw r11,r5 > movw r11,[r11] > cmpw r11,#00h > ret > __cocofun_15 endp > ; End of function > ; End of section > > global _bewerte_stellung > ; Function _bewerte_stellung > _bewerte_stellung proc far > call __save_3 > subw r15,#1ch > movw r8,r2 > movw r9,r3 > movw [r15+#1ah],r4 > cmpw r4,#01h > jmp cc_ne,_164 > call __cocofun_24 > jmp cc_eq,_165 > movw r2,_wKoenig > movw r3,#0ffffh > jmp _166 > _164: > call __cocofun_16 > jmp cc_ne,_167 > _165: > movw r2,#7d00h > subw r2,_Tiefe > jmp _168 > _167: > movw r2,_sKoenig > movw r3,#01h > _166: > call _attackiert_feld > movw _InSchach,r2 > call __cocofun_9 > movw r12,[r11+#dpp2:_MatBilanz] > movw [r15+#18h],r12 > movw r11,[r11+#dpp2:_MatSumme] > movw [r15+#0ch],r11 > cmpw r11,#02bch > jmp cc_sle,_169 > subw r8,#15eh > movw r11,[r15+#18h] > cmpw r11,r8 > jmp cc_slt,_170 > addw r9,#015eh > cmpw r11,r9 > jmp cc_sle,_171 > _170: > movw r2,[r15+#18h] > jmp _172 > _171: > _169: > call _init_bewertung > movw r8,#00h > movw [r15+#10h],r8 > movw [r15+#0eh],r8 > movw [r15+#06h],r8 > movw [r15+#12h],r8 > movw [r15+#14h],r8 > movw r11,_Rochade+04h > movw [r15+#16h],r11 > movw r1,_Rochade > movw r11,r8 > cmpw ZEROS,_Bewegt+2ch > jmp cc_sge,_173 > movw r11,#01h > _173: > movw r12,[r15+#16h] > addw r12,r11 > movw [r15+#0ah],r12 > movw r11,#00h > cmpw ZEROS,_Bewegt+2eh > call __cocofun_3 > cmpw ZEROS,_Bewegt+34h > call __cocofun_3 > cmpw ZEROS,_Bewegt+36h > call __cocofun_3 > cmpw ZEROS,_Bewegt+0b8h > jmp cc_sge,_177 > movw r11,#01h > _177: > movw r12,r1 > addw r12,r11 > movw [r15],r12 > movw r11,#00h > cmpw ZEROS,_Bewegt+0bah > call __cocofun_17 > cmpw ZEROS,_Bewegt+0c0h > call __cocofun_17 > cmpw ZEROS,_Bewegt+0c2h > call __cocofun_27 > movw r11,#02h > movw [r15+#08h],r11 > _181: > movw r9,[r15+#08h] > shl r9,#02h > movw r11,[r15+#08h] > addw r9,r11 > shl r9,#01h > addw r9,#01h > movw r10,#01h > movw r7,r9 > shl r7,#01h > movw r11,r7 > addw r11,#dpp2:_Brett > movw [r15+#02h],r11 > addw r7,#dpp1:_ZentrumTab > movw r0,#dpp2:_Bauern+04h > addw r11,#14h > movw [r15+#04h],r11 > _182: > movw r11,[r15+#02h] > movw r6,[r11] > cmpw r6,#0fffah > jmp cc_ne,_183 > movw r11,[r15+#0ch] > cmpw r11,#0a8ch > jmp cc_sge,_184 > movw r2,r7 > subw r8,[r2] > jmp _185 > _184: > movb rh4,#00h > cmpw r1,#00h > call __cocofun_11 > cmpw ZEROS,_Bewegt+0beh > jmp cc_sge,_187 > movb rl4,#01h > _187: > movb rh5,#00h > cmpw ZEROS,_Bewegt+0c4h > jmp cc_sge,_188 > movb rh5,#01h > _188: > movb rl5,#00h > cmpw ZEROS,_Bewegt+0b6h > jmp cc_sge,_189 > movb rl5,#01h > _189: > andb rh5,rl5 > orb rl4,rh5 > andb rh4,rl4 > jmp cc_eq,_190 > addw r8,#23h > _190: > movw r11,[r7] > shl r11,#02h > addw r8,r11 > movw r12,#0ffffh > movw r13,r10 > shl r13,#02h > movw r14,r9 > shl r14,#01h > movw r5,r13 > addw r5,#dpp2:_Tuerme > addw r13,#dpp2:_Bauern > addw r5,#0fffch > addw r13,#0fffch > _191: > movw r11,r12 > shl r11,#01h > movw r4,r11 > addw r4,r14 > movw r4,[r4+#dpp2:_Brett+0ffech] > cmpw r4,#0ffffh > jmp cc_ne,_192 > subw r8,#0fh > _192: > addw r11,r14 > movw r11,[r11+#dpp2:_Brett+0ffd8h] > cmpw r11,#0ffffh > jmp cc_ne,_193 > subw r8,#06h > _193: > movb rh4,#00h > movw r11,[r13] > jmp cc_ne,_194 > movb rh4,#01h > _194: > movb rl4,#00h > movw r11,[r5] > cmpw r11,#00h > jmp cc_sle,_195 > movb rl4,#01h > _195: > andb rh4,rl4 > jmp cc_eq,_196 > addw r8,#0ch > _196: > addw r5,#04h > addw r13,#04h > cmpi1 r12,#00h > jmp cc_sle,_191 > _185: > _183: > cmpw r6,#0fffbh > jmp cc_ne,_197 > movw r11,[r15] > cmpw r11,#04h > jmp cc_sge,_198 > cmpw r9,#5bh > jmp cc_sge,_199 > addw r8,#0fh > jmp _200 > _198: > movw r11,#0ah > movw MDL,_wKoenig > call __cocofun_5 > movw MDL,_wKoenig > call __cocofun_6 > addw r8,r12 > _199: > _200: > _197: > cmpw r6,#0fffch > jmp cc_ne,_201 > movw r11,[r7] > movw r12,r11 > shr r12,#0fh > addw r12,r11 > ashr r12,#01h > subw r8,r12 > _201: > cmpw r6,#0fffdh > jmp cc_ne,_202 > ;----------------------------------- > ;TEST > movw r11,dpp3:0ff00h > ; movw r11,0ff00h > ;----------------------------------- > shr r11,#06h > andw r11,#01h > movb rh4,#00h > cmpw r9,r11 > call __cocofun_11 > cmpw r9,#4bh > call __cocofun_25 > orb rh4,rl4 > movw r11,[r15+#04h] > movw r11,[r11] > movb rl4,#00h > cmpw r11,#0ffffh > call __cocofun_25 > andb rh4,rl4 > jmp cc_eq,_206 > addw r8,#14h > _206: > movw r11,[r15+#10h] > addw r11,#01h > movw [r15+#10h],r11 > _202: > cmpw r6,#0fffeh > jmp cc_ne,_207 > movw r11,#00h > cmpw r9,#26h > jmp cc_sgt,_208 > movw r11,#01h > _208: > movw r12,[r15+#14h] > addw r12,r11 > movw [r15+#14h],r12 > call __cocofun_4 > subw r8,r11 > movw r11,[r0] > jmp cc_ne,_211 > subw r8,#08h > movw r11,[r0+#02h] > jmp cc_ne,_212 > subw r8,#05h > _212: > _211: > _207: > cmpw r6,#0ffffh > jmp cc_ne,_213 > movw r2,r9 > movw r3,[r15+#08h] > movw r4,r10 > movw r5,[r15] > call _sbauerbewertung > subw r8,r2 > movw r11,[r15+#06h] > addw r11,#01h > movw [r15+#06h],r11 > _213: > cmpw r6,#01h > jmp cc_ne,_214 > movw r2,r9 > movw r3,[r15+#08h] > movw r4,r10 > movw r5,[r15+#0ah] > call _wbauerbewertung > addw r8,r2 > movw r11,[r15+#06h] > addw r11,#01h > movw [r15+#06h],r11 > _214: > cmpw r6,#02h > jmp cc_ne,_215 > ;----------------------------------- > ; TEST > movw r11,dpp3:0ff04h > ; movw r11,0ff04h > ;----------------------------------- > shr r11,#07h > andw r11,#01h > cmpw r9,r11 > movw r11,#01h > subcw r11,#00h > movw r12,[r15+#12h] > addw r12,r11 > movw [r15+#12h],r12 > call __cocofun_4 > addw r8,r11 > movw r11,[r0+#02h] > jmp cc_ne,_218 > addw r8,#08h > movw r11,[r0] > jmp cc_ne,_219 > addw r8,#05h > _219: > _218: > _215: > cmpw r6,#03h > jmp cc_ne,_220 > movw r11,r9 > shl r11,#01h > ;----------------------------------- > ; TEST > movw r12,dpp3:0ff00h > ; movw r12,0ff00h > ;----------------------------------- > shr r12,#03h > andw r12,#01h > movb rh4,#00h > cmpw r9,r12 > call __cocofun_11 > cmpw r9,#2dh > call __cocofun_25 > orb rh4,rl4 > movw r11,[r11+#dpp2:_Brett+0ffech] > movb rl4,#00h > cmpw r11,#01h > call __cocofun_25 > andb rh4,rl4 > jmp cc_eq,_224 > subw r8,#14h > _224: > movw r11,[r15+#0eh] > addw r11,#01h > movw [r15+#0eh],r11 > _220: > cmpw r6,#04h > jmp cc_ne,_225 > movw r11,[r7] > movw r12,r11 > shr r12,#0fh > addw r12,r11 > ashr r12,#01h > addw r8,r12 > _225: > cmpw r6,#05h > jmp cc_ne,_226 > movw r11,[r15+#0ah] > cmpw r11,#04h > jmp cc_sge,_227 > cmpw r9,#1ch > jmp cc_sle,_228 > subw r8,#0fh > jmp _229 > _227: > movw r11,#0ah > movw MDL,_sKoenig > call __cocofun_5 > movw MDL,_sKoenig > call __cocofun_6 > subw r8,r12 > _228: > _229: > _226: > cmpw r6,#06h > jmp cc_ne,_230 > movw r11,[r15+#0ch] > cmpw r11,#0a8ch > jmp cc_sge,_231 > movw r2,r7 > addw r8,[r2] > movw r11,_sKoenig > movw r2,r9 > subw r2,r11 > call _abs > movb rh4,#00h > cmpw r2,#02h > call __cocofun_11 > cmpw r2,#14h > call __cocofun_25 > orb rl4,rh4 > jmp cc_eq,_234 > movw r11,#0ah > movw r12,[r15+#0ch] > jmp cc_ne,_235 > movw r11,#1eh > _235: > movw r12,#01h > cmpw r12,_Farbe > jmp cc_ne,_236 > subw r8,r11 > jmp _237 > _236: > addw r8,r11 > jmp _238 > _231: > movb rh4,#00h > movw r11,[r15+#16h] > call __cocofun_11 > cmpw ZEROS,_Bewegt+32h > jmp cc_sge,_240 > movb rl4,#01h > _240: > movb rh5,#00h > cmpw ZEROS,_Bewegt+38h > jmp cc_sge,_241 > movb rh5,#01h > _241: > ;----------------------------------- > ; TEST > movw r11,dpp3:0ff04h > ; movw r11,0ff04h > ;----------------------------------- > shr r11,#01h > andw r11,#01h > shl r11,#01h > movb rl5,#00h > movw r11,[r11+#dpp2:_Bewegt] > cmpw r11,#00h > jmp cc_sle,_242 > movb rl5,#01h > _242: > andb rh5,rl5 > orb rl4,rh5 > andb rh4,rl4 > jmp cc_eq,_243 > subw r8,#23h > _243: > movw r11,[r7] > shl r11,#02h > subw r8,r11 > movw r13,#0ffffh > movw r14,r10 > shl r14,#02h > movw r5,r9 > shl r5,#01h > addw r5,#dpp2:_Brett > addw r5,#0fffeh > _244: > movw r11,r5 > addw r5,#02h > movw r12,[r11+#14h] > cmpw r12,#01h > jmp cc_ne,_245 > addw r8,#0fh > _245: > movw r11,[r11+#28h] > cmpw r11,#01h > jmp cc_ne,_246 > addw r8,#06h > _246: > movw r11,r13 > shl r11,#02h > movw r12,r11 > addw r12,r14 > movb rh4,#00h > movw r12,[r12+#dpp2:_Bauern+02h] > jmp cc_ne,_247 > movb rh4,#01h > _247: > addw r11,r14 > movb rl4,#00h > movw r11,[r11+#dpp2:_Tuerme+02h] > cmpw r11,#00h > jmp cc_sle,_248 > movb rl4,#01h > _248: > andb rh4,rl4 > jmp cc_eq,_249 > subw r8,#0ch > _249: > cmpi1 r13,#01h > jmp cc_slt,_244 > _234: > _237: > _238: > _230: > addw r0,#04h > movw r11,[r15+#02h] > addw r11,#02h > movw [r15+#02h],r11 > addw r7,#02h > movw r11,[r15+#04h] > addw r11,#02h > movw [r15+#04h],r11 > addw r9,#01h > cmpi1 r10,#07h > jmp cc_sle,_182 > movw r11,[r15+#08h] > cmpi1 r11,#09h > movw [r15+#08h],r11 > jmp cc_ult,_181 > movw r11,[r15+#06h] > jmp cc_ne,_250 > movw r11,[r15+#0ch] > cmpw r11,#15eh > jmp cc_sle,_251 > cmpw r11,#28ah > jmp cc_eq,_252 > call __cocofun_9 > movw r2,[r11+#dpp2:_MatBilanz] > call _abs > cmpw r2,#64h > jmp cc_sge,_253 > movw r11,[r15+#0ch] > cmpw r11,#02bch > jmp cc_sgt,_254 > _252: > _251: > movw r2,#00h > jmp _255 > _254: > _253: > _250: > movw r11,_Tiefe > movw r12,[r15+#0eh] > cmpw r12,#02h > jmp cc_slt,_256 > addw r8,#0fh > _256: > movw r12,[r15+#10h] > cmpw r12,#02h > jmp cc_slt,_257 > subw r8,#0fh > _257: > movw r12,[r15+#12h] > cmpw r12,#00h > jmp cc_sle,_258 > movw r12,_sKoenig > cmpw r12,#51h > jmp cc_slt,_259 > addw r8,#0ah > movw r12,[r15+#12h] > cmpw r12,#01h > jmp cc_sle,_260 > addw r8,#19h > _260: > _259: > _258: > movw r12,[r15+#14h] > cmpw r12,#00h > jmp cc_sle,_261 > movw r12,_wKoenig > cmpw r12,#26h > jmp cc_sgt,_262 > subw r8,#0ah > movw r12,[r15+#14h] > cmpw r12,#01h > jmp cc_sle,_263 > subw r8,#19h > _263: > _262: > _261: > movw r12,[r15+#1ah] > cmpw r12,#0ffffh > jmp cc_ne,_264 > negw r8 > _264: > cmpw r11,#01h > jmp cc_slt,_265 > shl r11,#01h > movw r12,[r11+#dpp2:_Mobilitaet] > movw r11,[r11+#dpp2:_Mobilitaet+0fffeh] > subw r12,r11 > movw r11,r12 > ashr r11,#03h > shr r11,#0ch > addw r11,r12 > ashr r11,#04h > subw r8,r11 > _265: > movw r2,[r15+#18h] > addw r2,r8 > _255: > _172: > _168: > addw r15,#1ch > jmp __restore_4 > ret > _bewerte_stellung endp > ; End of function > ; End of section > > ; Function __cocofun_27 > __cocofun_27 proc far > ; Function body __cocofun_27 > jmp cc_sge,_180 > movw r11,#01h > _180: > movw r12,[r15] > addw r12,r11 > movw [r15],r12 > ret > __cocofun_27 endp > ; End of function > ; End of section > > ; Function __cocofun_25 > __cocofun_25 proc far > ; Function body __cocofun_25 > jmp cc_ne,_204 > movb rl4,#01h > _204: > ret > __cocofun_25 endp > ; End of function > ; End of section > > ; Function __cocofun_24 > __cocofun_24 proc far > ; Function body __cocofun_24 > movw r2,_sKoenig > movw r3,#01h > call _attackiert_feld > cmpw r2,#01h > ret > __cocofun_24 endp > ; End of function > ; End of section > > ; Function __cocofun_17 > __cocofun_17 proc far > ; Function body __cocofun_17 > call __cocofun_27 > movw r11,#00h > ret > __cocofun_17 endp > ; End of function > ; End of section > > ; Function __cocofun_16 > __cocofun_16 proc far > ; Function body __cocofun_16 > movw r2,_wKoenig > movw r3,#0ffffh > call _attackiert_feld > cmpw r2,#01h > ret > __cocofun_16 endp > ; End of function > ; End of section > > ; Function __cocofun_11 > __cocofun_11 proc far > ; Function body __cocofun_11 > jmp cc_ne,_186 > movb rh4,#01h > _186: > movb rl4,#00h > ret > __cocofun_11 endp > ; End of function > ; End of section > > ; Function __cocofun_6 > __cocofun_6 proc far > ; Function body __cocofun_6 > div r11 > movw r2,MDH > movw MDL,r9 > div r11 > subw r2,MDH > call _abs > addw r12,r2 > shl r12,#01h > ret > __cocofun_6 endp > ; End of function > ; End of section > > ; Function __cocofun_5 > __cocofun_5 proc far > ; Function body __cocofun_5 > div r11 > movw r2,MDL > movw MDL,r9 > div r11 > subw r2,MDL > call _abs > movw r12,r2 > movw r11,#0ah > ret > __cocofun_5 endp > ; End of function > ; End of section > > ; Function __cocofun_4 > __cocofun_4 proc far > ; Function body __cocofun_4 > movb rh4,#00h > cmpw r10,#03h > jmp cc_slt,_209 > movb rh4,#01h > _209: > movb rl4,#00h > cmpw r10,#05h > jmp cc_sgt,_210 > movb rl4,#01h > _210: > andb rh4,rl4 > movbz r11,rh4 > shl r11,#02h > ret > __cocofun_4 endp > ; End of function > ; End of section > > ; Function __cocofun_3 > __cocofun_3 proc far > ; Function body __cocofun_3 > jmp cc_sge,_174 > movw r11,#01h > _174: > movw r12,[r15+#0ah] > addw r12,r11 > movw [r15+#0ah],r12 > movw r11,#00h > ret > __cocofun_3 endp > ; End of function > ; End of section > > global _notiere_zug > ; Function _notiere_zug > _notiere_zug proc far > movw r13,r2 > movw r14,r3 > shl r2,#01h > movw r11,[r2+#dpp2:_Brett] > movw r12,#01h > cmpw r12,_Farbe > jmp cc_ne,_267 > cmpw r11,#03h > jmp cc_eq,_268 > cmpw r11,#02h > jmp cc_ne,_269 > jmp _270 > _267: > cmpw r11,#0fffdh > jmp cc_eq,_271 > cmpw r11,#0fffeh > jmp cc_ne,_272 > _271: > _268: > _270: > movw r2,_Tiefe > shl r2,#01h > addw r2,#dpp2:_Mobilitaet > movw r11,r14 > shl r11,#01h > movw r11,[r11+#dpp1:_ZentrumTab] > addw r11,[r2] > movw [r2],r11 > _272: > _269: > movw r3,_Tiefe > movw r2,r3 > shl r2,#02h > addw r2,#dpp2:_HVar > cmpw r13,[r2] > jmp cc_ne,_273 > movw r11,[r2+#02h] > cmpw r11,r14 > jmp cc_ne,_274 > call __cocofun_1 > movw r11,#01f4h > jmp _275 > _274: > _273: > shl r3,#03h > addw r3,#dpp2:_KillerTab > cmpw r13,[r3] > jmp cc_ne,_276 > movw r11,[r3+#02h] > cmpw r11,r14 > jmp cc_ne,_277 > call __cocofun_1 > movw r11,#0fah > jmp _278 > _277: > _276: > movw r11,[r3+#04h] > cmpw r11,r13 > jmp cc_ne,_279 > movw r11,[r3+#06h] > cmpw r11,r14 > jmp cc_ne,_280 > call __cocofun_1 > movw r11,#96h > jmp _281 > _280: > _279: > call __cocofun_1 > movw r11,#00h > _275: > _278: > _281: > movw [r12+#0ch],r11 > movw [r12],r13 > movw [r12+#02h],r14 > movw r11,#00h > movw [r12+#04h],r11 > movw [r12+#06h],r11 > movw [r12+#08h],r11 > movw [r12+#0ah],r11 > movw r11,_Index > cmpw r11,#03e8h > jmp cc_sge,_282 > subw _Index,ONES > ret > _282: > movw r11,#03h > movw _Message,r11 > ret > _notiere_zug endp > ; End of function > ; End of section > > ; Function __cocofun_1 > __cocofun_1 proc far > ; Function body __cocofun_1 > call __cocofun_26 > addw r12,#dpp2:_ZugStapel > ret > __cocofun_1 endp > ; End of function > ; End of section > > global _notiere_schlagzug > ; Function _notiere_schlagzug > _notiere_schlagzug proc far > movw r14,r2 > movw r4,r3 > shl r3,#01h > movw r2,[r3+#dpp2:_Brett] > cmpw r2,#06h > jmp cc_eq,_284 > cmpw r2,#0fffah > jmp cc_eq,_285 > call _abs > movw r11,r2 > shl r11,#01h > movw r12,[r11+#dpp1:_FigMaterial] > movw r11,_Index > movw r5,r11 > shl r5,#03h > subw r5,r11 > shl r5,#01h > addw r5,#dpp2:_ZugStapel > movw [r5],r14 > movw [r5+#02h],r4 > movw [r5+#04h],r2 > addw r5,#0ch > movw r11,r14 > shl r11,#01h > movw r2,[r11+#dpp2:_Brett] > call _abs > shl r2,#01h > movw r11,[r2+#dpp1:_FigMaterial] > movw r13,r11 > ashr r13,#02h > shr r13,#0dh > addw r13,r11 > ashr r13,#03h > subw r12,r13 > movw [r5],r12 > movw r11,_Tiefe > cmpw r11,#00h > jmp cc_sle,_286 > shl r11,#01h > movw r11,[r11+#_NachFeld+0fffeh] > cmpw r4,r11 > jmp cc_ne,_287 > movw r11,[r5] > addw r11,#012ch > movw [r5],r11 > _287: > _286: > movw r2,_Tiefe > shl r2,#02h > addw r2,#dpp2:_HVar > cmpw r14,[r2] > jmp cc_ne,_288 > movw r11,[r2+#02h] > cmpw r11,r4 > jmp cc_ne,_289 > movw r11,[r5] > addw r11,#01f4h > jmp _290 > _289: > _288: > movw r2,_Tiefe > shl r2,#03h > addw r2,#dpp2:_KillerTab > cmpw r14,[r2] > jmp cc_ne,_291 > movw r11,[r2+#02h] > cmpw r11,r4 > jmp cc_ne,_292 > movw r11,[r5] > addw r11,#0fah > jmp _293 > _292: > _291: > movw r11,_Tiefe > shl r11,#03h > movw r11,[r11+#dpp2:_KillerTab+04h] > cmpw r11,r14 > jmp cc_ne,_294 > movw r11,[r2+#06h] > cmpw r11,r4 > jmp cc_ne,_295 > movw r11,[r5] > addw r11,#96h > _290: > _293: > movw [r5],r11 > _295: > _294: > call __cocofun_1 > movw r13,#00h > movw [r12+#06h],r13 > movw [r12+#08h],r13 > movw [r12+#0ah],r13 > cmpw r11,#03e8h > jmp cc_sge,_296 > addw r11,#01h > movw _Index,r11 > ret > _296: > movw r11,#03h > movw _Message,r11 > _284: > _285: > ret > _notiere_schlagzug endp > ; End of function > ; End of section > > global _notiere_epzug > ; Function _notiere_epzug > _notiere_epzug proc far > movw r11,r3 > shl r11,#01h > movw r11,[r11+#dpp2:_Brett] > cmpw r11,#06h > jmp cc_eq,_298 > cmpw r11,#0fffah > jmp cc_eq,_299 > call __cocofun_1 > movw [r12],r2 > movw [r12+#02h],r3 > movw r11,#01h > movw [r12+#04h],r11 > movw r11,#00h > movw [r12+#06h],r11 > movw [r12+#08h],r11 > movw [r12+#0ah],r4 > movw r11,#64h > movw [r12+#0ch],r11 > movw r11,_Index > cmpw r11,#03e8h > jmp cc_sge,_300 > subw _Index,ONES > ret > _300: > movw r11,#03h > movw _Message,r11 > _298: > _299: > ret > _notiere_epzug endp > ; End of function > ; End of section > > global _notiere_umwandlung > ; Function _notiere_umwandlung > _notiere_umwandlung proc far > movw [-r15],r8 > movw [-r15],r9 > movw [-r15],r10 > movw r8,r2 > movw r9,r3 > shl r3,#01h > movw r11,[r3+#dpp2:_Brett] > jmp cc_ne,_302 > movw r4,#05h > _303: > movw r2,r8 > movw r3,r9 > call _notiere_zug > call __cocofun_26 > movw [r12+#dpp2:_ZugStapel+0fff8h],r4 > cmpd1 r4,#03h > jmp cc_uge,_303 > jmp _304 > _302: > movw r10,#05h > _305: > movw r2,r8 > movw r3,r9 > call _notiere_schlagzug > call __cocofun_26 > movw [r12+#dpp2:_ZugStapel+0fff8h],r10 > cmpd1 r10,#03h > jmp cc_uge,_305 > _304: > movw r10,[r15+] > movw r9,[r15+] > movw r8,[r15+] > ret > _notiere_umwandlung endp > ; End of function > ; End of section > > ; Function __cocofun_26 > __cocofun_26 proc far > ; Function body __cocofun_26 > movw r11,_Index > movw r12,r11 > shl r12,#03h > subw r12,r11 > shl r12,#01h > ret > __cocofun_26 endp > ; End of function > ; End of section > > global _attackiert_feld > ; Function _attackiert_feld > _attackiert_feld proc far > movw r13,r2 > cmpw r3,#01h > jmp cc_ne,_306 > movw r11,r13 > shl r11,#01h > addw r11,#dpp2:_Brett > movw r12,[r11+#0ffeeh] > cmpw r12,#01h > jmp cc_eq,_307 > movw r11,[r11+#0ffeah] > cmpw r11,#01h > jmp cc_eq,_308 > _306: > cmpw r3,#0ffffh > jmp cc_ne,_309 > movw r11,r13 > shl r11,#01h > addw r11,#dpp2:_Brett > movw r12,[r11+#12h] > cmpw r12,#0ffffh > jmp cc_eq,_310 > movw r11,[r11+#16h] > cmpw r11,#0ffffh > jmp cc_eq,_311 > _309: > movw r2,#dpp1:_Offset+10h > movw r11,#08h > _312: > movw r12,r13 > addw r12,[r2] > shl r12,#01h > movw r12,[r12+#dpp2:_Brett] > jmp cc_eq,_313 > cmpw r12,#64h > jmp cc_eq,_314 > cmpw r3,#01h > jmp cc_ne,_315 > cmpw r12,#04h > jmp cc_ne,_316 > jmp _317 > _315: > cmpw r12,#0fffch > jmp cc_eq,_318 > _316: > _313: > _314: > addw r2,#02h > cmpi1 r11,#0fh > jmp cc_ult,_312 > movw r5,#00h > jmp _319 > _320: > movw r11,r13 > movw r12,r5 > shl r12,#01h > movw r12,[r12+#dpp1:_Offset] > movw r14,#00h > _321: > addw r14,#01h > addw r11,r12 > movw r4,r11 > shl r4,#01h > movw r4,[r4+#dpp2:_Brett] > jmp cc_eq,_321 > movw r12,r11 > shl r12,#01h > movw r12,[r12+#dpp2:_Brett] > cmpw r12,#64h > jmp cc_eq,_322 > shl r11,#01h > movw r2,[r11+#dpp2:_Brett] > cmpw r3,#01h > jmp cc_ne,_323 > cmpw r2,#00h > jmp cc_sle,_324 > cmpw r2,#06h > jmp cc_ne,_325 > cmpw r14,#01h > jmp cc_sgt,_326 > jmp _327 > _325: > call __cocofun_18 > jmp cc_sgt,_328 > movw r11,[r11+#dpp1:_FigOffset+02h] > cmpw r11,r5 > jmp cc_slt,_329 > jmp _330 > _323: > cmpw r2,#00h > jmp cc_sge,_331 > cmpw r2,#0fffah > jmp cc_ne,_332 > cmpw r14,#01h > jmp cc_sgt,_333 > jmp _334 > _332: > call _abs > call __cocofun_18 > jmp cc_sgt,_335 > movw r11,[r11+#dpp1:_FigOffset+02h] > cmpw r11,r5 > jmp cc_slt,_336 > _334: > _330: > _327: > _318: > _317: > _310: > _311: > _307: > _308: > movw r2,#01h > ret > _336: > _335: > _333: > _331: > _324: > _326: > _328: > _329: > _322: > addw r5,#01h > _319: > cmpw r5,#08h > jmp cc_slt,_320 > movw r2,#00h > ret > _attackiert_feld endp > ; End of function > ; End of section > > ; Function __cocofun_18 > __cocofun_18 proc far > ; Function body __cocofun_18 > movw r11,r2 > shl r11,#02h > subw r11,r2 > shl r11,#01h > movw r12,[r11+#dpp1:_FigOffset] > cmpw r12,r5 > ret > __cocofun_18 endp > ; End of function > ; End of section > > global _generiere_zuege > ; Function _generiere_zuege > _generiere_zuege proc far > call __save_3 > subw r15,#04h > movw r1,r2 > call __cocofun_9 > movw r12,[r11+#dpp2:_StapelGrenze] > movw _Index,r12 > movw r12,#00h > movw [r11+#dpp2:_Mobilitaet],r12 > movw r8,#15h > movw r11,#dpp2:_Brett+14h > movw [r15+#02h],r11 > movw r11,#dpp2:_Brett+18h > movw [r15],r11 > movw r9,#dpp2:_Brett+2ah > _339: > movw r2,[r9+] > jmp cc_eq,_340 > cmpw r2,#64h > jmp cc_eq,_341 > movw r12,_Farbe > cmpw r12,#01h > jmp cc_ne,_342 > cmpw r2,#00h > jmp cc_slt,_343 > _342: > cmpw r12,#0ffffh > jmp cc_ne,_344 > cmpw r2,#00h > jmp cc_sgt,_345 > _344: > call _abs > cmpw r2,#01h > jmp cc_ne,_346 > cmpw r12,#01h > jmp cc_ne,_347 > movw r10,r8 > shl r10,#01h > movw r11,[r10+#dpp2:_Brett+14h] > jmp cc_ne,_348 > cmpw r8,#51h > jmp cc_slt,_349 > movw r3,#0ah > addw r3,r8 > call __cocofun_19 > jmp _350 > _349: > cmpw r1,#00h > jmp cc_sle,_351 > movw r4,#0ah > addw r4,r8 > movw r2,r8 > movw r3,r4 > call _notiere_zug > cmpw r8,#26h > jmp cc_sgt,_352 > movw r11,[r10+#dpp2:_Brett+28h] > jmp cc_ne,_353 > movw r3,r8 > addw r3,#14h > call __cocofun_13 > movw [r12+#dpp2:_ZugStapel+0fffch],r4 > _353: > _352: > _351: > _350: > _348: > movw r11,[r10+#dpp2:_Brett+16h] > cmpw r11,#00h > jmp cc_sge,_354 > movw r3,#0bh > addw r3,r8 > cmpw r8,#51h > jmp cc_slt,_355 > call __cocofun_19 > jmp _356 > _355: > movw r2,r8 > call _notiere_schlagzug > _356: > _354: > movw r11,[r10+#dpp2:_Brett+12h] > cmpw r11,#00h > jmp cc_sge,_357 > movw r3,#09h > addw r3,r8 > cmpw r8,#51h > jmp cc_slt,_358 > call __cocofun_19 > jmp _359 > _358: > movw r2,r8 > call _notiere_schlagzug > jmp _360 > _347: > cmpw ONES,_Farbe > jmp cc_ne,_361 > movw r4,r8 > shl r4,#01h > movw r11,[r4+#dpp2:_Brett+0ffech] > jmp cc_ne,_362 > cmpw r8,#26h > jmp cc_sgt,_363 > movw r3,r8 > subw r3,#0ah > call __cocofun_19 > jmp _364 > _363: > cmpw r1,#00h > jmp cc_sle,_365 > movw r5,r8 > subw r5,#0ah > movw r2,r8 > movw r3,r5 > call _notiere_zug > cmpw r8,#51h > jmp cc_slt,_366 > movw r11,[r4+#dpp2:_Brett+0ffd8h] > jmp cc_ne,_367 > movw r3,r8 > subw r3,#14h > call __cocofun_13 > movw [r12+#dpp2:_ZugStapel+0fffch],r5 > _367: > _366: > _365: > _364: > _362: > movw r11,[r15+#02h] > movw r11,[r11] > cmpw r11,#00h > jmp cc_sle,_368 > cmpw r11,#64h > jmp cc_eq,_369 > movw r3,r8 > subw r3,#0bh > cmpw r8,#26h > jmp cc_sgt,_370 > call __cocofun_19 > jmp _371 > _370: > movw r2,r8 > call _notiere_schlagzug > _371: > _369: > _368: > movw r11,[r15] > movw r11,[r11] > cmpw r11,#00h > jmp cc_sle,_372 > cmpw r11,#64h > jmp cc_eq,_373 > movw r3,r8 > subw r3,#09h > cmpw r8,#26h > jmp cc_sgt,_374 > call __cocofun_19 > jmp _375 > _374: > movw r2,r8 > call _notiere_schlagzug > jmp _376 > _346: > movw r0,r2 > shl r0,#02h > subw r0,r2 > shl r0,#01h > movw r10,[r0+#dpp1:_FigOffset+04h] > movw r6,[r0+#dpp1:_FigOffset] ; Wert Figoffset.Anfang > movw r7,r6 > shl r7,#01h > addw r7,#dpp1:_Offset ; Ptr Offset > addw r0,#dpp1:_FigOffset+02h ; Ptr FigOffset.ende > jmp _377 > _378: > movw r5,[r7+] ; _Offset in r5, r7+2 > movw r4,r8 > _379: ; weitergleiten: > addw r4,r5 ; Von + Offset = Nach > movw r11,r4 > shl r11,#01h > movw r11,[r11+#dpp2:_Brett] > jmp cc_ne,_380 > cmpw r1,#00h > jmp cc_sle,_381 > movw r2,r8 > movw r3,r4 > call _notiere_zug > _381: > cmpw r10,#00h ; langschritt==0 ? > jmp cc_eq,_382 > jmp _379 ; goto weitergleiten > _380: > movw r11,r4 > shl r11,#01h > movw r11,[r11+#dpp2:_Brett] > cmpw r11,#64h > jmp cc_eq,_383 > movw r12,_Farbe > cmpw r12,#01h > jmp cc_ne,_384 > cmpw r11,#00h > jmp cc_slt,_385 > _384: > cmpw r12,#0ffffh > jmp cc_ne,_386 > cmpw r11,#00h > jmp cc_sle,_387 > _385: > movw r2,r8 > movw r3,r4 > call _notiere_schlagzug > _386: > _387: > _383: > _382: > addw r6,#01h > _377: > movw r2,r0 > cmpw r6,[r2] > jmp cc_sle,_378 > ;TEST DEBUG -------------------------------- > jmp _DebugExit_002 > ; ----------------------------------------- > _357: > _359: > _360: > _361: > _372: > _373: > _375: > _376: > _343: > _345: > _340: > _341: > movw r11,[r15+#02h] > addw r11,#02h > movw [r15+#02h],r11 > movw r11,[r15] > addw r11,#02h > movw [r15],r11 > cmpi1 r8,#62h > jmp cc_ult,_339 > call __cocofun_9 > movw r13,[r11+#dpp2:_Ep_Feld] > jmp cc_eq,_388 > movw r14,r13 > shl r14,#01h > addw r14,#dpp2:_Brett > movw r11,#01h > cmpw r11,_Farbe > jmp cc_ne,_389 > movw r11,[r14+#0ffeeh] > cmpw r11,#01h > jmp cc_ne,_390 > movw r2,r13 > subw r2,#09h > movw r4,r13 > subw r4,#0ah > movw r3,r13 > call _notiere_epzug > _390: > movw r11,[r14+#0ffeah] > cmpw r11,#01h > jmp cc_ne,_391 > movw r2,r13 > subw r2,#0bh > movw r4,r13 > subw r4,#0ah > jmp _392 > _389: > movw r11,[r14+#12h] > cmpw r11,#0ffffh > jmp cc_ne,_393 > movw r2,#09h > addw r2,r13 > movw r4,#0ah > addw r4,r13 > movw r3,r13 > call _notiere_epzug > _393: > movw r11,[r14+#16h] > cmpw r11,#0ffffh > jmp cc_ne,_394 > movw r2,#0bh > addw r2,r13 > movw r4,#0ah > addw r4,r13 > _392: > movw r3,r13 > call _notiere_epzug > _394: > _391: > _388: > movw r11,#01h > cmpw r11,_Farbe > jmp cc_ne,_395 > movw r2,#19h > cmpw r2,_wKoenig > jmp cc_ne,_396 > cmpw ZEROS,_Bewegt+32h > jmp cc_ne,_397 > movw r11,#02h > cmpw r11,_Brett+38h > jmp cc_ne,_398 > cmpw ZEROS,_Bewegt+38h > jmp cc_ne,_399 > cmpw ZEROS,_Brett+34h > jmp cc_ne,_400 > cmpw ZEROS,_Brett+36h > jmp cc_ne,_401 > call __cocofun_2 > jmp cc_ne,_402 > movw r2,#1ah > call __cocofun_2 > jmp cc_ne,_403 > movw r2,#1bh > call __cocofun_2 > jmp cc_ne,_404 > movw r2,#19h > movw r3,#1bh > call __cocofun_10 > _404: > _403: > _402: > _401: > _400: > _399: > _398: > movw r11,#02h > cmpw r11,_Brett+2ah > jmp cc_ne,_405 > cmpw ZEROS,_Bewegt+2ah > jmp cc_ne,_406 > cmpw ZEROS,_Brett+30h > jmp cc_ne,_407 > cmpw ZEROS,_Brett+2eh > jmp cc_ne,_408 > cmpw ZEROS,_Brett+2ch > jmp cc_ne,_409 > movw r2,#19h > call __cocofun_2 > jmp cc_ne,_410 > movw r2,#18h > call __cocofun_2 > jmp cc_ne,_411 > movw r2,#17h > call __cocofun_2 > jmp cc_ne,_412 > movw r2,#19h > movw r3,#17h > jmp _413 > _395: > movw r2,#5fh > cmpw r2,_sKoenig > jmp cc_ne,_414 > cmpw ZEROS,_Bewegt+0beh > jmp cc_ne,_415 > movw r11,#0fffeh > cmpw r11,_Brett+0c4h > jmp cc_ne,_416 > cmpw ZEROS,_Bewegt+0c4h > jmp cc_ne,_417 > cmpw ZEROS,_Brett+0c0h > jmp cc_ne,_418 > cmpw ZEROS,_Brett+0c2h > jmp cc_ne,_419 > call __cocofun_7 > jmp cc_ne,_420 > movw r2,#60h > call __cocofun_7 > jmp cc_ne,_421 > movw r2,#61h > call __cocofun_7 > jmp cc_ne,_422 > movw r2,#5fh > movw r3,#61h > call __cocofun_10 > _422: > _421: > _420: > _419: > _418: > _417: > _416: > movw r11,#0fffeh > cmpw r11,_Brett+0b6h > jmp cc_ne,_423 > cmpw ZEROS,_Bewegt+0b6h > jmp cc_ne,_424 > cmpw ZEROS,_Brett+0bch > jmp cc_ne,_425 > cmpw ZEROS,_Brett+0bah > jmp cc_ne,_426 > cmpw ZEROS,_Brett+0b8h > jmp cc_ne,_427 > movw r2,#5fh > call __cocofun_7 > jmp cc_ne,_428 > movw r2,#5eh > call __cocofun_7 > jmp cc_ne,_429 > movw r2,#5dh > call __cocofun_7 > jmp cc_ne,_430 > movw r2,#5fh > movw r3,#5dh > _413: > call _notiere_zug > call __cocofun_26 > movw r11,#02h > movw [r12+#dpp2:_ZugStapel+0fffah],r11 > _430: > _429: > _428: > _427: > _426: > _425: > _424: > _423: > _415: > _414: > _396: > _397: > _405: > _406: > _407: > _408: > _409: > _410: > _411: > _412: > ; TEST DEBUG ------------------------------------ > _DebugExit_002: > ;------------------------------------------------ > call __cocofun_9 > movw r12,_Index > movw [r11+#dpp2:_StapelGrenze+02h],r12 > addw r15,#04h > jmp __restore_4 > ret > _generiere_zuege endp > ; End of function > ; End of section > > ; Function __cocofun_19 > __cocofun_19 proc far > ; Function body __cocofun_19 > movw r2,r8 > jmp _notiere_umwandlung > ret > __cocofun_19 endp > ; End of function > ; End of section > > ; Function __cocofun_13 > __cocofun_13 proc far > ; Function body __cocofun_13 > movw r2,r8 > call _notiere_zug > jmp __cocofun_26 > ret > __cocofun_13 endp > ; End of function > ; End of section > > ; Function __cocofun_10 > __cocofun_10 proc far > ; Function body __cocofun_10 > call _notiere_zug > call __cocofun_26 > movw r11,#01h > movw [r12+#dpp2:_ZugStapel+0fffah],r11 > ret > __cocofun_10 endp > ; End of function > ; End of section > > ; Function __cocofun_7 > __cocofun_7 proc far > ; Function body __cocofun_7 > movw r3,#01h > call _attackiert_feld > cmpw r2,#00h > ret > __cocofun_7 endp > ; End of function > ; End of section > > ; Function __cocofun_2 > __cocofun_2 proc far > ; Function body __cocofun_2 > movw r3,#0ffffh > call _attackiert_feld > cmpw r2,#00h > ret > __cocofun_2 endp > ; End of function > ; End of section > > global _init_bewertung > ; Function _init_bewertung > _init_bewertung proc far > movw r11,#15h > movw r12,#dpp2:_BKontrolle+54h > _431: > movw r13,#00h > movw [r12],r13 > movw [r12+#02h],r13 > addw r12,#04h > cmpi1 r11,#62h > jmp cc_ult,_431 > movw r11,#dpp2:_Bauern > movw r12,#dpp2:_Tuerme > _432: > movw r14,#00h > movw [r11],r14 > movw [r11+#02h],r14 > addw r11,#04h > movw [r12],r14 > movw [r12+#02h],r14 > addw r12,#04h > cmpi1 r13,#09h > jmp cc_ult,_432 > movw r14,#15h > movw r4,#dpp2:_Brett+2ah > movw r5,#dpp2:_BKontrolle+78h > movw r2,#dpp2:_BKontrolle+80h > _433: > movw r11,[r4] > jmp cc_eq,_434 > cmpw r11,#64h > jmp cc_eq,_435 > cmpw r11,#01h > jmp cc_ne,_436 > movw r12,[r5] > addw r12,#01h > movw [r5],r12 > movw r12,[r2] > addw r12,#01h > movw [r2],r12 > call __cocofun_20 > addw r12,#dpp2:_Bauern > movw r13,[r12] > addw r13,#01h > movw [r12],r13 > _436: > cmpw r11,#0ffffh > jmp cc_ne,_437 > movw r11,r14 > shl r11,#02h > ;--------------------------------------- > ; TEST > movw r12,#dpp2:_BKontrolle-22h > ; movw r12,#_BKontrolle+0ffdeh > ;--------------------------------------- > addw r12,r11 > movw r13,[r12] > addw r13,#01h > movw [r12],r13 > ;--------------------------------------- > ; TEST > movw r12,#dpp2:_BKontrolle-2ah > ; movw r12,#_BKontrolle+0ffd6h > ;--------------------------------------- > addw r12,r11 > movw r11,[r12] > addw r11,#01h > movw [r12],r11 > call __cocofun_21 > addw r11,#dpp2:_Bauern+02h > movw r12,[r11] > addw r12,#01h > movw [r11],r12 > _437: > movw r11,[r4] > cmpw r11,#0fffeh > jmp cc_ne,_438 > call __cocofun_20 > addw r12,#dpp2:_Tuerme+02h > movw r13,[r12] > addw r13,#01h > movw [r12],r13 > _438: > cmpw r11,#02h > jmp cc_ne,_439 > call __cocofun_21 > addw r11,#dpp2:_Tuerme > movw r12,[r11] > addw r12,#01h > movw [r11],r12 > _439: > _434: > _435: > addw r4,#02h > addw r5,#04h > addw r2,#04h > cmpi1 r14,#62h > jmp cc_ult,_433 > ret > _init_bewertung endp > ; End of function > ; End of section > > > ; Function __cocofun_21 > __cocofun_21 proc far > ; Function body __cocofun_21 > movw r11,#0ah > movw MDL,r14 > div r11 > movw r11,MDH > shl r11,#02h > ret > __cocofun_21 endp > ; End of function > ; End of section > > ; Function __cocofun_20 > __cocofun_20 proc far > ; Function body __cocofun_20 > movw r12,#0ah > movw MDL,r14 > div r12 > movw r12,MDH > shl r12,#02h > ret > __cocofun_20 endp > ; End of function > ; End of section > > global _computer_zug > ; Function _computer_zug > _computer_zug proc far > call __save_3 > subw r15,#14h > movw r11,#00h > movw [r15+#0eh],r11 > movw _Message,ZEROS > call _init_spielbaum > movw r2,#8300h > movw r3,#7d00h > movw r4,_Farbe > call _bewerte_stellung > cmpw r2,#7d00h > jmp cc_ne,_440 > movw r11,#04h > jmp _441 > _440: > movw r11,_InSchach > movw [r15+#12h],r11 > movw _KnotenAnzahl,ZEROS > movw _KnotenAnzahl+02h,ZEROS > movw r2,#01h > call _generiere_zuege > movw r11,#01h > jmp _442 > _443: > movw r11,[r15+#10h] > cmpw r11,#01h > jmp cc_ne,_444 > movw r11,#8300h > movw [r15+#0eh],r11 > movw r9,#7d00h > jmp _445 > _444: > movw r9,[r15+#0eh] > addw r9,#64h > movw r11,[r15+#0eh] > subw r11,#64h > movw [r15+#0eh],r11 > _445: > movw r11,[r15+#10h] > addw r11,#03h > movw _MaxErweiterung,r11 > movw r10,#00h > movw r6,#dpp2:_ZugStapel > movw r1,r6 > movw r7,[r15+#10h] > subw r7,#01h > jmp _446 > _447: > call __cocofun_8 > movw r2,r10 > call _zug_ausfuehren > movw r2,r9 > negw r2 > movw r3,[r15+#0eh] > call __cocofun_14 > cmpw r10,#00h > jmp cc_ne,_448 > movw r11,[r15+#0eh] > cmpw r8,r11 > jmp cc_sge,_449 > movw r9,#8300h > jmp _450 > _449: > cmpw r8,r9 > jmp cc_slt,_451 > movw r9,r8 > movw r8,#7d00h > _450: > movw r2,#00h > call _zug_ausfuehren > negw r8 > movw r3,r9 > negw r3 > movw r2,r8 > movw r4,r7 > call _alpha_beta > negw r2 > movw r8,r2 > movw r2,#00h > call _zug_zuruecknehmen > _451: > movw [r15+#0eh],r8 > movw r9,r8 > addw r9,#01h > movw r2,#00h > call _kopiere_hvar > jmp _452 > _448: > movw r11,[r15+#0eh] > cmpw r8,r11 > jmp cc_sle,_453 > movw r0,r11 > movw [r15+#0eh],r8 > movw r9,#7d00h > movw r2,r10 > call _zug_ausfuehren > movw r2,#8300h > movw r3,r8 > call __cocofun_14 > cmpw r8,r0 > jmp cc_sle,_454 > movw [r15+#0eh],r8 > movw r9,r8 > addw r9,#01h > movw r2,r10 > call _kopiere_hvar > movw r2,r15 > movw r3,r6 > movw r4,#07h > call __cpnnw > movw r11,r10 > movw r12,r10 > shl r12,#03h > subw r12,r10 > shl r12,#01h > ;--------------------------------------- > ; TEST > addw r12,#dpp2:_ZugStapel-0eh > ; addw r12,#_ZugStapel+0fff2h > ;--------------------------------------- > movw r13,r1 > jmp _455 > _456: > movw r2,r13 > movw r3,r12 > movw r4,#07h > call __cpnnw > subw r13,#0eh > subw r12,#0eh > subw r11,#01h > _455: > cmpw r11,#00h > jmp cc_sgt,_456 > movw r2,#dpp2:_ZugStapel > movw r3,r15 > movw r4,#07h > call __cpnnw > _454: > _453: > _452: > addw r6,#0eh > addw r1,#0eh > addw r10,#01h > _446: > cmpw r10,_StapelGrenze+02h > jmp cc_slt,_447 > movw r11,[r15+#10h] > addw r11,#01h > _442: > movw [r15+#10h],r11 > cmpw r11,_SollTiefe > jmp cc_sle,_443 > movw r11,[r15+#0eh] > cmpw r11,#8301h > jmp cc_sle,_457 > movw r11,#dpp2:_Zug_Von > movw [r11],_ZugStapel > movw r11,#dpp2:_Zug_Nach > movw [r11],_ZugStapel+02h > movw r11,_ZugStapel > call __cocofun_12 > movw r11,#dpp2:_Zug_Umwandlung > movw [r11],_ZugStapel+06h > movw r11,#dpp2:_Zug_Schlag > movw [r11],_ZugStapel+04h > movw r2,#00h > call _zug_ausfuehren > movw r11,[r15+#0eh] > cmpw r11,#7cf6h > jmp cc_slt,_458 > movw r11,#05h > jmp _459 > _458: > movw r11,[r15+#0eh] > cmpw r11,#830ah > jmp cc_sgt,_460 > movw r11,#06h > jmp _461 > _457: > movw r11,#00h > movw r12,[r15+#12h] > cmpw r12,#01h > jmp cc_eq,_462 > movw r11,#01h > _462: > addw r11,#07h > _441: > _459: > _461: > movw _Message,r11 > _460: > addw r15,#14h > jmp __restore_4 > ret > _computer_zug endp > ; End of function > ; End of section > > ; Function __cocofun_14 > __cocofun_14 proc far > ; Function body __cocofun_14 > negw r3 > movw r4,r7 > call _alpha_beta > negw r2 > movw r8,r2 > movw r2,r10 > jmp _zug_zuruecknehmen > ret > __cocofun_14 endp > ; End of function > ; End of section > > ; Function __cocofun_12 > __cocofun_12 proc far > ; Function body __cocofun_12 > shl r11,#01h > movw r2,[r11+#dpp2:_Brett] > call _abs > movb rh4,[r2+#dpp1:_FigSymbol] > movbs r11,rh4 > movw _Zug_Figur,r11 > ret > __cocofun_12 endp > ; End of function > ; End of section > > ; Function __cocofun_8 > __cocofun_8 proc far > ; Function body __cocofun_8 > movw r11,_Tiefe > movw r12,r11 > shl r12,#02h > addw r12,r11 > shl r12,#04h > shl r11,#02h > addw r11,r12 > movw r12,#00h > movw [r11+#dpp2:_HVar],r12 > ret > __cocofun_8 endp > ; End of function > ; End of section > > global _zug_zurueck > ; Function _zug_zurueck > _zug_zurueck proc far > movw r11,#01h > cmpw r11,_Tiefe > jmp cc_ne,_463 > movw r2,_LetzterZug > call _zug_zuruecknehmen > _463: > ret > _zug_zurueck endp > ; End of function > ; End of section > > global _zugnr_eingabe > ; Function _zugnr_eingabe > _zugnr_eingabe proc far > movw [-r15],r6 > movw [-r15],r8 > movw [-r15],r9 > movw [-r15],r10 > movw r8,r2 > movw r9,r3 > movw r10,r4 > movw _Message,ZEROS > movw r2,#01h > call _generiere_zuege > ; TEST DEBUG ---------------------------------- > ; jmp _DebugExit_001 > ;---------------------------------------------- > call __cocofun_9 > movw r6,[r11+#dpp2:_StapelGrenze] > jmp _464 > _465: > movw r11,r6 > shl r11,#03h > subw r11,r6 > shl r11,#01h > movw r12,[r11+#dpp2:_ZugStapel] > cmpw r12,r8 > jmp cc_ne,_466 > movw r12,[r11+#dpp2:_ZugStapel+02h] > cmpw r12,r9 > jmp cc_ne,_467 > movw r11,[r11+#dpp2:_ZugStapel+06h] > jmp cc_eq,_468 > cmpw r10,#53h > jmp cc_ne,_469 > addw r6,#01h > jmp _470 > _469: > cmpw r10,#4ch > jmp cc_ne,_471 > addw r6,#02h > jmp _472 > _471: > cmpw r10,#54h > jmp cc_ne,_473 > addw r6,#03h > _473: > _472: > _470: > _468: > call _init_spielbaum > movw r11,r6 > shl r11,#03h > subw r11,r6 > shl r11,#01h > addw r11,#dpp2:_ZugStapel+04h > movw _Zug_Schlag,[r11] > movw r11,r8 > call __cocofun_12 > movw _Zug_Von,r8 > movw _Zug_Nach,r9 > movw _Zug_Umwandlung,r10 > movw r8,_LetzterZug > movw r2,r6 > call _zug_ausfuehren > cmpw ONES,_Farbe > jmp cc_ne,_474 > call __cocofun_16 > jmp cc_ne,_475 > movw r11,#01h > _476: > movw _Message,r11 > movw r2,r6 > call _zug_zuruecknehmen > movw _LetzterZug,r8 > _477: > movw r2,#00h > jmp _478 > _474: > call __cocofun_24 > jmp cc_ne,_479 > movw r11,#02h > jmp _476 > _479: > _475: > movw r2,#01h > jmp _480 > _467: > _466: > addw r6,#01h > _464: > call __cocofun_9 > movw r11,[r11+#dpp2:_StapelGrenze+02h] > cmpw r6,r11 > jmp cc_slt,_465 > jmp _477 > _480: > _478: > ;TEST DEBUG ----------------------------------- > _DebugExit_001: > ;---------------------------------------------- > > movw r10,[r15+] > movw r9,[r15+] > movw r8,[r15+] > movw r6,[r15+] > ret > _zugnr_eingabe endp > ; End of function > ; End of section > > ; Function __cocofun_9 > __cocofun_9 proc far > ; Function body __cocofun_9 > movw r11,_Tiefe > shl r11,#01h > ret > __cocofun_9 endp > ; End of function > ; End of section > > ; Function __restore_4 > __restore_4 proc far > movw r10,[r15+] > movw r9,[r15+] > movw r8,[r15+] > movw r7,[r15+] > movw r6,[r15+] > movw r1,[r15+] > movw r0,[r15+] > ret > __restore_4 endp > ; End of function > ; End of section > > ; Function __restore_2 > __restore_2 proc far > movw r10,[r15+] > movw r9,[r15+] > movw r8,[r15+] > movw r7,[r15+] > movw r6,[r15+] > movw r14,[r15+] > movw r15,r14 > ret > __restore_2 endp > ; End of function > ; End of section > > ; Function __save_3 > __save_3 proc far > movw [-r15],r0 > movw [-r15],r1 > movw [-r15],r6 > movw [-r15],r7 > movw [-r15],r8 > movw [-r15],r9 > movw [-r15],r10 > ret > __save_3 endp > ; End of function > ; End of section > > ; Function __save_1 > __save_1 proc far > movw r14,r15 > movw r15,#dpp2:_LocalStackPointer > movw [-r15],r14 > movw [-r15],r6 > movw [-r15],r7 > movw [-r15],r8 > movw [-r15],r9 > movw [-r15],r10 > ret > __save_1 endp > ; End of function > ; End of section > > ;--------------------------------------------------------------------- > ; Function __cpnnw > ; Kopiert eine Anzahl Bytes von Quelle nach Ziel FNEUL > ; r2= Ziel, r3=Quelle, r4=anzahl Bytes > global __cpnnw > __cpnnw proc far > movw [r2+],[r3] ; Setze Ziel mit Quelle und erhöhe Zielzähler 2 > addw r3,#02 ; Erhöhe Quellzähler 2 > cmpd1 r4,#01 ; Vergleiche mit Vorgabe Anzahl > jmp cc_ugt,__cpnnw ; Noch eine Wiederholung > ret > __cpnnw endp > ; End of function > ; End of section > ;--------------------------------------------------------------------- > > > ;*********************************************************** > userseg ends > > > ;*********************************************************** > constseg SECTION DATA word at 34000h > ;*********************************************************** > global _GrundStellung > _GrundStellung label > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 02h > dw 04h > dw 03h > dw 05h > dw 06h > dw 03h > dw 04h > dw 02h > dw 64h > dw 64h > dw 01h > dw 01h > dw 01h > dw 01h > dw 01h > dw 01h > dw 01h > dw 01h > dw 64h > dw 64h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > dw 64h > dw 64h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > dw 64h > dw 64h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > dw 64h > dw 64h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > dw 64h > dw 64h > dw 0ffffh > dw 0ffffh > dw 0ffffh > dw 0ffffh > dw 0ffffh > dw 0ffffh > dw 0ffffh > dw 0ffffh > dw 64h > dw 64h > dw 0fffeh > dw 0fffch > dw 0fffdh > dw 0fffbh > dw 0fffah > dw 0fffdh > dw 0fffch > dw 0fffeh > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > dw 64h > ; End of section > > global _Offset > _Offset label > dw 0fff7h > dw 0fff5h > dw 09h > dw 0bh > dw 0ffffh > dw 0ah > dw 01h > dw 0fff6h > dw 13h > dw 15h > dw 0ch > dw 0fff8h > dw 0ffedh > dw 0ffebh > dw 0fff4h > dw 08h > ; End of section > > global _FigOffset > _FigOffset label > db 00h ; Leeres Feld > db 00h > db 00h > db 00h > db 00h > db 00h > > dw 0ffffh ; Bauern > dw 0ffffh > db 00h > db 00h > > ; TEST ----------------------- > dw 04h ; Turm > dw 07h > dw 01h ; weitergleiten > > ; ORG > ; dw 04h ; Turm > ; dw 07h > ; dw 01h ; weitergleiten > > db 00h ; Läufer > db 00h > dw 03h > dw 01h > > dw 08h ; Springer > dw 0fh > db 00h > db 00h > > db 00h ; Dame > db 00h > dw 07h > dw 01h > > db 00h ; Koenig > db 00h > dw 07h > db 00h > db 00h > ; End of section > > global _ZentrumTab > _ZentrumTab label > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > dw 04h > db 00h > db 00h > dw 08h > dw 0ch > dw 0ch > dw 08h > db 00h > db 00h > dw 04h > db 00h > db 00h > db 00h > db 00h > dw 04h > dw 08h > dw 0ch > dw 10h > dw 10h > dw 0ch > dw 08h > dw 04h > db 00h > db 00h > db 00h > db 00h > dw 08h > dw 0ch > dw 10h > dw 14h > dw 14h > dw 10h > dw 0ch > dw 08h > db 00h > db 00h > db 00h > db 00h > dw 0ch > dw 10h > dw 14h > dw 18h > dw 18h > dw 14h > dw 10h > dw 0ch > db 00h > db 00h > db 00h > db 00h > dw 0ch > dw 10h > dw 14h > dw 18h > dw 18h > dw 14h > dw 10h > dw 0ch > db 00h > db 00h > db 00h > db 00h > dw 08h > dw 0ch > dw 10h > dw 14h > dw 14h > dw 10h > dw 0ch > dw 08h > db 00h > db 00h > db 00h > db 00h > dw 04h > dw 08h > dw 0ch > dw 10h > dw 10h > dw 0ch > dw 08h > dw 04h > db 00h > db 00h > db 00h > db 00h > dw 04h > db 00h > db 00h > dw 08h > dw 0ch > dw 0ch > dw 08h > db 00h > db 00h > dw 04h > ; End of section > > global _wBFeldWert > _wBFeldWert label > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > dw 04h > dw 04h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > dw 06h > dw 06h > dw 06h > db 00h > db 00h > db 00h > db 00h > dw 06h > dw 06h > dw 08h > dw 08h > dw 08h > dw 04h > dw 06h > dw 06h > db 00h > db 00h > db 00h > db 00h > dw 08h > dw 08h > dw 10h > dw 16h > dw 16h > dw 04h > dw 04h > dw 04h > db 00h > db 00h > db 00h > db 00h > dw 0ah > dw 0ah > dw 14h > dw 1ah > dw 1ah > dw 0ah > dw 0ah > dw 0ah > db 00h > db 00h > db 00h > db 00h > dw 0ch > dw 0ch > dw 16h > dw 1ch > dw 1ch > dw 0eh > dw 0eh > dw 0eh > db 00h > db 00h > db 00h > db 00h > dw 12h > dw 12h > dw 1ch > dw 20h > dw 20h > dw 14h > dw 14h > dw 14h > ; End of section > > global _sBFeldWert > _sBFeldWert label > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > dw 12h > dw 12h > dw 1ch > dw 20h > dw 20h > dw 14h > dw 14h > dw 14h > db 00h > db 00h > db 00h > db 00h > dw 0ch > dw 0ch > dw 16h > dw 1ch > dw 1ch > dw 0eh > dw 0eh > dw 0eh > db 00h > db 00h > db 00h > db 00h > dw 0ah > dw 0ah > dw 14h > dw 1ah > dw 1ah > dw 0ah > dw 0ah > dw 0ah > db 00h > db 00h > db 00h > db 00h > dw 08h > dw 08h > dw 10h > dw 16h > dw 16h > dw 04h > dw 04h > dw 04h > db 00h > db 00h > db 00h > db 00h > dw 06h > dw 06h > dw 08h > dw 08h > dw 08h > dw 04h > dw 06h > dw 06h > db 00h > db 00h > db 00h > db 00h > dw 04h > dw 04h > db 00h > db 00h > db 00h > db 00h > db 00h > db 00h > dw 06h > dw 06h > dw 06h > ; End of section > > global _FigMaterial > _FigMaterial label > db 00h > db 00h > dw 64h > dw 01f4h > dw 015eh > dw 0145h > dw 0384h > db 00h > db 00h > ; End of section > > global _FigSymbol > _FigSymbol label > db 2eh > db 42h > db 54h > db 4ch > db 53h > db 44h > db 4bh > db 00h ; Dummy for even adresses FNEUL > ; End of section > > ;*********************************************************** > constseg ends > > ;*********************************************************** > dataseg SECTION DATA word at 84000h > ;*********************************************************** > > ;global Variable definition section > global _kommando > _kommando label > ds 2 > ; End of section > > global _Message > _Message label > ds 2 > ; End of section > > global _Zug_Schlag > _Zug_Schlag label > ds 2 > ; End of section > > global _Zug_Figur > _Zug_Figur label > ds 2 > ; End of section > > global _Zug_Von > _Zug_Von label > ds 2 > ; End of section > > global _Zug_Nach > _Zug_Nach label > ds 2 > ; End of section > > global _Zug_Umwandlung > _Zug_Umwandlung label > ds 2 > ; End of section > > global _Brett > _Brett label > ds 240 > ; End of section > > global _Ep_Feld > _Ep_Feld label > ds 40 > ; End of section > > global _ZugStapel > _ZugStapel label > ds 11214 > ; End of section > > global _Bewegt > _Bewegt label > ds 198 > ; End of section > > global _Rochade > _Rochade label > ds 6 > ; End of section > > global _Index > _Index label > ds 2 > ; End of section > > global _StapelGrenze > _StapelGrenze label > ds 40 > ; End of section > > global _HVar > _HVar label > ds 1600 > ; End of section > > global _KillerTab > _KillerTab label > ds 160 > ; End of section > > global _BKontrolle > _BKontrolle label > ds 480 > ; End of section > > global _Bauern > _Bauern label > ds 40 > ; End of section > > global _Tuerme > _Tuerme label > ds 40 > ; End of section > > global _Mobilitaet > _Mobilitaet label > ds 40 > ; End of section > > global _NachFeld > _NachFeld label > ds 40 > ; End of section > > global _wKoenig > _wKoenig label > ds 2 > ; End of section > > global _sKoenig > _sKoenig label > ds 2 > ; End of section > > global _MatBilanz > _MatBilanz label > ds 40 > ; End of section > > global _MatSumme > _MatSumme label > ds 40 > ; End of section > > global _Farbe > _Farbe label > ds 2 > ; End of section > > global _SpielerSpieler > _SpielerSpieler label > ds 2 > ; End of section > > global _SollTiefe > _SollTiefe label > ds 2 > ; End of section > > global _MaxErweiterung > _MaxErweiterung label > ds 2 > ; End of section > > global _Tiefe > _Tiefe label > ds 2 > ; End of section > > global _KnotenAnzahl > _KnotenAnzahl label > ds 4 > ; End of section > > global _LetzterZug > _LetzterZug label > ds 2 > ; End of section > > global _InSchach > _InSchach label > ds 2 > ; End of section > > global _ZugNr > _ZugNr label > ds 2 > ; End of section > > global _LocalStack > _LocalStack label > ds 510 > global _LocalStackPointer > _LocalStackPointer label > ds 2 > > global _Stack > _Stack label > ds 510 > global _StackPointer > _StackPointer label > ds 2 > > ; End of section > ;*********************************************************** > dataseg ends > end > </asm> > > > > Hallo Frank, > > > > Ich kann Dir Dein Program leider nicht mit Tasking C übersetzen, da ich selbst > > mit Tasking nur in ASM arbeite. > > > > Jedoch hat sich bei den meisten Programmen, die ich in den Fingern hatte, gezeigt, > > daß durch simple Optimierungen oft 50% und mehr an Geschwindigkeit herausgeholt werden kann. > > Die CC2 hat viele Funktionen, die in C umschrieben werden. Dadurch läßt sich > > oft am meisten sparen. > > Wenn Du willst, kannst Du mir deine implementation in C2 schicken. (bitte als ZIP oder RAR). > > Ich kann dann kurz rübersehen und Dir sagen, wie stark sich das ganze optimieren läßt. > > Ich denke, wenn die Züge am Ende unter 5 Minuten dauern, wäre Dir auch schon geholfen. > > Man kann notfalls auch einzelne sehr rechenintensive Routinen in ASM umsetzen, aber > > das Programm selbst unter C2 laufen lassen. > > Diese Methode würde ich sogar bevorzugen, da so leichter Änderungen möglich wären. > > > > MfG André H. > > > > > > > Hallo zusammen, > > > > > > ist vieleicht etwas viel verlangt, aber trotzdem wichtig: > > > > > > Meine CC2 steuert einen Eigenbau Schachroboter. Das macht die schon seit Jahren, > > > nun auch mit Farbdisplay und magneto sensitivem Schachbrett. Das Projekt nähert sich nun dem > > > Ende. Nach Fertigstellung werde ich hierfür einen eigenen Internetauftritt realisieren. > > > > > > Das Problem: > > > Unter anderem habe ich den MINIMAX Schachalgorithmus auf die CC2 umgesetzt. Das klappt > > > prima und schlägt fast alles. Es kann jedoch, unter C2 als Programmiersprache, schon bis zu > > > 9 Minuten dauern bis die CC2 den richtigen Zug ermittelt hat. > > > > > > Schneller gehts, wenn das Programm (liegt auch in C vor) mittels C-Compiler, Assembler und Linker in > > > Intel Hex Format vorliegen würde. Die Demo Tasking EDE schafft nur 199 Zeilen, > > > das Programm hat ca. 2600. > > > > > > Hat jemand von euch Erfahungen im Umsetzen von großen C-Anwendungen auf die CC2? > > > > > > Bitte verkneift euch die Antwort, "Es gibt doch andere Hardware..." > > > > > > Ich freue mich auf eure Messages. > > > > > > Gruß > > > > > > Frank > > >
