Flower

עמוד
מוצגות 7 תגובות – 1 עד 7 (מתוך 7 סה״כ)
  • מאת
    תגובות
  • #77039
    CodeGuru
    מנהל בפורום

    שלום,

    למישהו יש עותק מהתוכנה לציור פרח שהייתה בתחרות אקסטרים הראשונה?

     

    #78414
    CodeGuru
    מנהל בפורום

    מצאתי בסוף עותק. רצ"ב התוכנית

    0E 07 BF 80 80 B9 7F 00-AA 81 C7 FF 00 E2 F9 B9
    60 00 29 CF F3 AB BB 80-40 B9 50 00 53 51 E8 0A
    00 59 49 5B 81 C3 00 01-E2 F2 F4 89 1E 5A 01 29
    CB 03 C9 8B D1 81 C2 FF-00 33 C0 E8 20 00 E8 1D
    00 38 D0 7C 09 FE C3 28-D0 80 EA 02 7C 0D 38 D0
    7D 07 FE C7 00 F0 80 C6-02 E2 E0 C3 43 47 E8 0E
    00 88 1F 50 A1 5A 01 03-C0 29 D8 8A D8 58 C3 88
    1F 50 A1 5A 01 02 E4 28-FC 8A FC 58 C3 88 1F 2A
    1E 5A 01 2A 3E 5B 01 86-DF 02 1E 5A 01 02 3E 5B
    01 C3

    ולמי שקל יותר לקרוא אסמבלי מאשר שפת מכונה, רצ"ב עותק נוסף:

    0000 0E            PUSH    CS                                
    0001 07            POP     ES                                
    0002 BF8080        MOV     DI,8080                           
    0005 B97F00        MOV     CX,007F                           
    0008 AA            STOSB                                     
    0009 81C7FF00      ADD     DI,00FF                           
    000D E2F9          LOOP    0008                              
    000F B96000        MOV     CX,0060                           
    0012 29CF          SUB     DI,CX                             
    0014 F3            REPZ                                      
    0015 AB            STOSW                                     
    0016 BB8040        MOV     BX,4080                           
    0019 B95000        MOV     CX,0050                           
    001C 53            PUSH    BX                                
    001D 51            PUSH    CX                                
    001E E80A00        CALL    002B                              
    0021 59            POP     CX                                
    0022 49            DEC     CX                                
    0023 5B            POP     BX                                
    0024 81C30001      ADD     BX,0100                           
    0028 E2F2          LOOP    001C                              
    002A F4            HLT                                       
    002B 891E5A01      MOV     [015A],BX                         
    002F 29CB          SUB     BX,CX                             
    0031 03C9          ADD     CX,CX                             
    0033 8BD1          MOV     DX,CX                             
    0035 81C2FF00      ADD     DX,00FF                           
    0039 33C0          XOR     AX,AX                             
    003B E82000        CALL    005E                              
    003E E81D00        CALL    005E                              
    0041 38D0          CMP     AL,DL                             
    0043 7C09          JL      004E                              
    0045 FEC3          INC     BL                                
    0047 28D0          SUB     AL,DL                             
    0049 80EA02        SUB     DL,02                             
    004C 7C0D          JL      005B                              
    004E 38D0          CMP     AL,DL                             
    0050 7D07          JGE     0059                              
    0052 FEC7          INC     BH                                
    0054 00F0          ADD     AL,DH                             
    0056 80C602        ADD     DH,02                             
    0059 E2E0          LOOP    003B                              
    005B C3            RET                                       
    005C 4347
    005E E80E00        CALL    006F                              
    0061 881F          MOV     [BX],BL                           
    0063 50            PUSH    AX                                
    0064 A15A01        MOV     AX,[015A]                         
    0067 03C0          ADD     AX,AX                             
    0069 29D8          SUB     AX,BX                             
    006B 8AD8          MOV     BL,AL                             
    006D 58            POP     AX                                
    006E C3            RET                                       
    006F 881F          MOV     [BX],BL                           
    0071 50            PUSH    AX                                
    0072 A15A01        MOV     AX,[015A]                         
    0075 02E4          ADD     AH,AH                             
    0077 28FC          SUB     AH,BH                             
    0079 8AFC          MOV     BH,AH                             
    007B 58            POP     AX                                
    007C C3            RET                                       
    007D 881F          MOV     [BX],BL                           
    007F 2A1E5A01      SUB     BL,[015A]                         
    0083 2A3E5B01      SUB     BH,[015B]                         
    0087 86DF          XCHG    BL,BH                             
    0089 021E5A01      ADD     BL,[015A]                         
    008D 023E5B01      ADD     BH,[015B]                         
    0091 C3            RET

     

    #78406
    ilum_shem
    משתתף

    זה לא עובד, חסר התרגום בשורה 005C

    ואם אפשר בבקשה, תרשום את זה שוב רק בשפת אסמבלר (בלי מס' שורה ואופקוד).

    #78403
    CodeGuru
    מנהל בפורום

    א. לא חסר תרגום לשורה

    5C

    מדובר במידע ולא בפקודה.

    ב. רצ"ב התוכנית לבקשתך:

    PUSH    CS                                
    POP     ES                                
    MOV     DI,8080h
    MOV     CX,007Fh                           
    line:
    STOSB                                     
    ADD     DI,00FFh                           
    LOOP    line
    MOV     CX,0060h                           
    SUB     DI,CX                             
    REPZ                                      
    STOSW                                     
    MOV     BX,4080h                           
    MOV     CX,0050h                           
    cloop:
    PUSH    BX                                
    PUSH    CX                                
    CALL    Circ                              
    POP     CX                                
    DEC     CX                                
    POP     BX                                
    ADD     BX,0100h                           
    LOOP    cloop
    HLT        
    Circ:                              
    MOV     ,BX                         
    SUB     BX,CX                             
    ADD     CX,CX                             
    MOV     DX,CX                             
    ADD     DX,00FFh                           
    XOR     AX,AX                             
    loopc:
    CALL    d2
    CALL    d2                              
    CMP     AL,DL                             
    JL      down                              
    INC     BL                                
    SUB     AL,DL                             
    SUB     DL,02                             
    JL      sof
    down:                             
    CMP     AL,DL                             
    JGE     l
    INC     BH                                
    ADD     AL,DH                             
    ADD     DH,02                             
    l:
    LOOP    loopc
    sof:
    RET                                       
    s:
    DB  'CG'
    d2:
    CALL    d1
    MOV     [BX],BL                           
    PUSH    AX                                
    MOV     AX,
                             
    ADD     AX,AX                             
    SUB     AX,BX                             
    MOV     BL,AL                             
    POP     AX                                
    RET                                       
    d1:
    MOV     [BX],BL                           
    PUSH    AX                                
    MOV     AX,
                             
    ADD     AH,AH                             
    SUB     AH,BH                             
    MOV     BH,AH                             
    POP     AX                                
    RET                                       
    d:
    MOV     [BX],BL                           
    SUB     BL,
                             
    SUB     BH,[s+1]                         
    XCHG    BL,BH                             
    ADD     BL,
                             
    ADD     BH,[s+1]                         
    RET

    #78401
    ilum_shem
    משתתף

    לא מתקמפל

    #78400
    CodeGuru
    מנהל בפורום

    העתק את הפקודות הבאות לחלון

    DOS

    ותקבל קובץ

    FLOWER.

    שים לב שהשורה עם המספרים ההקסהדצימלים צריכה להיות שורה (ארוכה) אחת.

    debug flower

    e 100

    0E 07 BF 80 80 B9 7F 00 AA 81 C7 FF 00 E2 F9 B9 60 00 29 CF F3 AB BB 80 40 B9 50 00 53 51 E8 0A 00 59 49 5B 81 C3 00 01 E2 F2 F4 89 1E 5A 01 29 CB 03 C9 8B D1 81 C2 FF 00 33 C0 E8 20 00 E8 1D 00 38 D0 7C 09 FE C3 28 D0 80 EA 02 7C 0D 38 D0 7D 07 FE C7 00 F0 80 C6 02 E2 E0 C3 43 47 E8 0E 00 88 1F 50 A1 5A 01 03 C0 29 D8 8A D8 58 C3 88 1F 50 A1 5A 01 02 E4 28 FC 8A FC 58 C3 88 1F 2A 1E 5A 01 2A 3E 5B 01 86 DF 02 1E 5A 01 02 3E 5B 01 C3
    rcx

    92

    w

    q

     

    #78394
    ilum_shem
    משתתף

    תודה

מוצגות 7 תגובות – 1 עד 7 (מתוך 7 סה״כ)
  • יש להתחבר למערכת על מנת להגיב.