مشکل در جمع اعداد

[Hossein]

فکر میکنم بخاطر رنگتون باشه .

menufile    macro

    cls    16

    window 19,8,20,11,27

    window 20,12,20,15,27

    window 25,16,20,19,27

     

     

    gotoxy    27,10 

    print_msg msg16 ;open

    gotoxy    27,14

    print_msg msg17 ;save

    gotoxy    27,18

    print_msg msg18 ;search

     

endm

باید رنگها رو از 0 تا 15 انتخاب کنید .
این کاروب کنید ببینید حل میشه یا نه .

[NIIT]

ما میخوایم بعد از اینکه روی دکمه فایلمون زدیم بیاد مثلا چیزهایی رو نمایش بده ، اگه ما بخوایم ماشین حساب رو هم به همین ترتیب براش این کار انجام بدیم اونوقت رنگ دکمه هایی که برای ماشین حساب انتخاب کردیم با رنگ دکمه فایلمون برابر میشه، به نظر شما در قاعده کلی برنامه مشکلی پیش نمیاد؟

[Hossein]

این هم یه نمونه دیگه از کمبود های این نوع برنامه نویسی هست .
میتونید از مختصات خود ماوس استفاده کنید . که این مشکلات رو نداره .

[NIIT]

آقای master ، خواهش میکنم....واقعا دیگه ما نمیتونیم به عقب برگردیم و دوباره برنامه رو ویرایش کنیم، ما تا مدتها روی مختصات بودیم اما بی فایده بود به همین دلیل براساس توصیه شما روی رنگ کار کردیم.
یعنی اصلا برای اینکه مشکل این رنگها حل بشه راهی وجود نداره؟
چه دلیلی داره که فقط میاد رنگهای بین 0 تا 15 رو میخونه و برای رنگهای بعدی پاسخی نداره؟

آقای mater شما پاسخی برای حل مشکل متدها که نمیتونستن باهم فراخونی بشن پیدا کردین که ما بتونیم ازتون راهنمایی بگیریم
خیلی ممنون میشم پاسخ بدین
بااحترام

[Hossein]

نه هنوز نتونستم کامل برسم سرش و دقیق چک کنم . تا حالا نگاه که کردم چیزی سر درنیاوردم .

برای استفاده از مختصات ماوس میتونید از ماکرو و تابع زیر استفاده کنید . که تغییرات خیلی کمی باید بدید در کدتون ( فقط بخش شناسایی رنگها عوض میشه با این . و بخش های دیگه کدتون دست نمیخوره . )

detect_mouse    MACRO        x1,y1,x2,y2    ;result store in ah

        MOV    AX,x1

        PUSH    AX

        MOV    AX,y1

        PUSH    AX

        MOV    AX,x2

        PUSH    AX

        MOV    AX,y2

        PUSH    AX

        CALL        GetPos_proc

ENDM





GetPos_proc        PROC     NEAR

        POP    BX

        

        POP    y2

        POP    x2

        POP    y1

        POP    x1

        

        CMP    CX,x1

        JB    not_Inner        ;if cx>x1

        CMP    CX,x2

        JA    not_Inner        ;if cx<x2

        CMP    DX,y1

        JB    not_Inner        ;if dx>y1

        CMP    DX,y2

        JA    not_Inner        ;if dx<y2        

        MOV    AH,01h            ;clicked inner of shape

        JMP    yes_Inner

        not_Inner:

        MOV    AH,00h            ;Not clicked inner of shape

        yes_Inner:

        PUSH    BX

        RET

GetPos_proc        ENDP





how to use:

    detect_mouse    215,191,247,239        ;detecting down arrow click event

    CMP    AH,1

    JNZ    doloop1

    PRINT        27,20,go_down        

    PRINT        27,23,STRgo_down

    JMP    MainLoop



doloop1:

    ;check baghye halat ha

    detect_mouse    247,160,295,190        ;detecting down arrow click event

    CMP    AH,1

    JNZ    doloop2

    ; karhaye shoma 

    JMP    MainLoop

doloop2:

    ;be hamin sorat ta takhar



    ...



    JMP    MainLoop

مثلا شما اینجا اینو دارید :

  cmp    al,1    je    one

     

    cmp    al,2

    je    two

 

    cmp    al,3

    je    three

 

    cmp    al,4

    je    four

مثلا شما باید اینکارو بکنید :

DETECT_MOUSE    247,160,295,190    

CMP AH,1

JNE DOLOOP2

JMP ONE

JMP    MAINLOOP





DOLOOP2: 



DETECT_MOUSE    47,60,95,90

CMP AH,1

JNE DOLOOP3

JMP TWO

JMP    MAINLOOP



DOLOOP3:

....

باید براحتی بتونید ازش استفاده کنید . این کد رو اقای صالحیان همون ترم یک نوشتن برای استفاده از برنامشون و برای استفاده شما در اختیارتون قرار دادن .

[NIIT]

آقای حسنپور این کدی که دادین، کار کرد.....واقعا ازتون ممنونم ، و همینطور از دوست محترمتون هم سپاسگزارم
خیلی ممنونم که پیگیر این مشکل بودین
بینهایت متشکرم
بااحترام

[NIIT]

متاسفم......بنده اشتباه کردم و این کدی که شما فرمودین رو انجام دادیم اما وقتی برای چند عدد این کار رو انجام دادیم دچار خطاهایی از این دست شد که مربوط به متد Get_Proc هست میشه ، بنده خودم به اندازه سوادم این خطاهارو بررسی کردم وهمه push و pop ها رو چک کردم همش درست بود اما نمیدونم چرا به popهای متد Get_Proc خطا میگیره؟( فایلی به اسم ch رو باز کنین این خطاها رو مشاهده خواهید کرد)
ch.asm [526] : error A2006 : : y2
ch.asm [527] : error A2006 : :x2
ch.asm [528] : error A2006 : : y1
ch.asm [529] : error A2006 : : x1
ch.asm [531] : error A2006 : : x1
ch.asm [533] : error A2006 : :x2
ch.asm [535] : error A2006 : : y1
ch.asm [537] : error A2006 : : y2

مشکل بعدیمون در مورد اینه که ما اومدیم یه فایل اصلی به اسم menu طراحی کردیم که بیاد همه عملیاتای اصلی در اونجا جا بگیره، الان ما مشکلی که داریم اینه که با اینکه ما براش محیط گرافیکی تعریف کردیم اما با کلیلک کردن بلافاصله در محیط متنی قرار میگیره؟

و ، خوب حالا اینجا باز سوالاتمون به دو بخش تقسیم میشه ، بخش اولش اینه که نگاه کنین دو فایل به نامهای menuNEAR و menuFAR هست که هر کدوم برای ما میخوان دو کار یکسان اما عملکردای متفاوت دارن انجام بدن ، menuNEAR میاد مثلا کدهای save و open رو در خودش نگه میداره اما وقتی روی دکمه مورد نظرمون کلیک میکنیم که بیاد کارشو انجام بده میبینیم که چیزای عجیب غریب بهمون نمایش میده ، menuFAR کارش همینه و سوالمون اینه که چطوری بیایم از extrn استفاده کنیم تا دیگه مجبور نباشیم اون متدهای یا کدها رو داخل برنامه بیاریم و اینطوری برنامه تمیزتز و خلوتتر میشه.

سوال بعدیمون هم همچنان در مورد اینه که : چرا نمیتونه 4 متد برای عملگرهامونو همزمان با هم انجام بده و چرا operator از خودش الکی مقدار دهی میکنه؟


و ممنون میشم راهنمایی بفرمایین
بااحترام

[Hossein]

متاسفم......بنده اشتباه کردم و این کدی که شما فرمودین رو انجام دادیم اما وقتی برای چند عدد این کار رو انجام دادیم دچار خطاهایی از این دست شد که مربوط به متد Get_Proc هست میشه ، بنده خودم به اندازه سوادم این خطاهارو بررسی کردم وهمه push و pop ها رو چک کردم همش درست بود اما نمیدونم چرا به popهای متد Get_Proc خطا میگیره؟( فایلی به اسم ch رو باز کنین این خطاها رو مشاهده خواهید کرد) ch.asm [526] : error A2006 : : y2 ch.asm [527] : error A2006 : :x2 ch.asm [528] : error A2006 : : y1 ch.asm [529] : error A2006 : : x1 ch.asm [531] : error A2006 : : x1 ch.asm [533] : error A2006 : :x2 ch.asm [535] : error A2006 : : y1 ch.asm [537] : error A2006 : : y2

متغییر های x1,y1,x2,y2 رو تعریف نکردین! برید تو دیتا سگمنت اینها رو از نوع DW تعریف کنین باید این مشکلتون حل بشه .

بقیه سوالتون رو هم فردا نگاه میکنم اگر بلد بودم سعی میکنم حتما سریع جواب بدم .

[NIIT]

خیلی ممنونم ازتون آقای حسنپور
لطف میکنید


آقای حسنپور همونطور که فرمودین خطاها برطرف شدن ، ولی وقتی روی یک محدوده کلیک میکنم پیغامهای ناآشنایی میدهد
ممنون میشم به کدی که میفرستم نگاهی بیاندازید

بااحترام

[Hossein]

چطوری بیایم از extrn استفاده کنیم تا دیگه مجبور نباشیم اون متدهای یا کدها رو داخل برنامه بیاریم و اینطوری برنامه تمیزتز و خلوتتر میشه.

سلام . فرض کنین من یه تابع دارم با نام MUL که تو یه فایل دیگه اس و میخوام تو برنامم ازش استفاده کنم .
میام اول برنامم اینو مینویسیم :

EXTERN MUL:FAR

اگه متغییر باشه تو یه فایل دیگه که بخوام تو این فایلم ازش استفاده کنیم اینطور مینویسم :

EXTERN X:DWORD

که بجای DWORD نوع متغییرتون رو مینویسید .

حالا بریم سراغ فایل تابعمون .
ابتدای فایل تابعمون باید به اسمبلر بفهمونیم که قراره از این تابع تو یه فایل دیگه استفاده بشه . این کارو با دستور زیر در ابتدای فایل تابعمون انجام میدیم .:

PUBLIC MUL

وبعد جداگانه هر فایل رو کامپایل میکنید .
موقع لینک کردن اینطور اینها رو با هم لینک میکنید :

Link myasm.obj+MUL.obj

و تمام .

------------------

مشکل بعدیمون در مورد اینه که ما اومدیم یه فایل اصلی به اسم menu طراحی کردیم که بیاد همه عملیاتای اصلی در اونجا جا بگیره، الان ما مشکلی که داریم اینه که با اینکه ما براش محیط گرافیکی تعریف کردیم اما با کلیلک کردن بلافاصله در محیط متنی قرار میگیره؟

بیشتر توضیح بدید یعنی چی محیط متنی میره؟

در مورد اینکه چیزای عجیب غریب نشون میده . یک دلیل عمومیش اینه که یکجای حافظه رو شما دارید دست میزنید خراب میکنید اینطور میشه . یه پوش وپاپ کم یا اضافه یا نذاشتن مشخص کننده انتهای رشته یا خوندن بیش از حد یک رشته نمونه هایی از این دست مسائل هستن که باعث این نوع ارور ها میشن .

در مورد اجرای 4 تا تابع بصورت هم زمان! فقط با تردینگ میشه این کارو کرد! ولی من ربطشو به پروژه شما نمیفهم!!
اگر منظورتون همون مشکل سابقه که چرا کم میکنه و ضر بو تقسیم کار نمیکنه من هنوز نتونستم برم سرش و هنوز نمیدونم چرا .