نمایش نتایج 1 تا 8 از 8

نام تاپیک: چه زبانی؟

  1. #1
    کاربر جدید آواتار raranjbar
    تاریخ عضویت
    خرداد 1388
    محل زندگی
    نجف آباد
    پست
    22

    چه زبانی؟

    میخواستم بدونم که این کدها به چه زبانی نوشته شده؟ اخه من فقط C#‎ کار کردم



    Directn1 VAR BYTE
    Directn2 VAR BYTE
    Directn3 VAR BYTE
    Steps1 VAR WORD
    Steps2 VAR WORD
    Steps3 VAR WORD
    SLEP VAR WORD
    I VAR WORD
    C VAR WORD
    M1 VAR WORD
    M2 VAR WORD
    M3 VAR WORD
    Dircmd1 VAR BYTE
    Dircmd2 VAR BYTE
    Dircmd3 VAR BYTE

    DIRS = %0000000000111111 : OUTS = %0000000000010101
    M1 = %0000000000000001 : M2 = %0000000000000100
    M3 = %0000000000010000
    Directn1 = "+" : Directn2 = "+" : Directn3 = "+"
    SLEP = 5
    SEROUT 16,6+$4000,["Welcome Stamp II 3x Serial RS-232 Driver!",13]
    SEROUT 16,6+$4000,["by Sigernes and Lorentzen UNIS 2003",13]
    SEROUT 16,6+$4000,["Command input format:",13]
    SEROUT 16,6+$4000,["Cmd>+/-STEPS1 +/-STEPS2 +/-STEPS3 ",13]
    SEROUT 16,6+$4000,["Input option: SPEED (msec/step)",13]
    SEROUT 16,6+$4000,["Example: Cmd>+200 -200 +200 1",13]

    Cmd:SEROUT 16,6+$4000,["Cmd>"]
    SERIN 16, 6+$4000,[Dircmd1, DEC Steps1]
    SERIN 16, 6+$4000,[Dircmd2, DEC Steps2]
    SERIN 16, 6+$4000,[Dircmd3, DEC Steps3]
    SERIN 16, 6+$4000,2000,nodata,[DEC SLEP]

    noData:

    if Dircmd1 = Directn1 then DL1
    M1 = M1^%0000000000000011
    DL1:

    if Dircmd2 = Directn2 then DL2
    M2 = M2^%0000000000001100
    DL2:

    if Dircmd3 = Directn3 then DL3
    M3 = M3^%0000000000110000
    DL3:

    C = Steps1

    if C > Steps2 then IFL1
    C = Steps2
    IFL1:

    if C > Steps3 then IFL2
    C = Steps3
    IFL2:

    FOR I = 1 to C

    if Steps3 = 0 then skip3
    if I > Steps3 then skip3
    OUTS = OUTS^M3
    M3 = M3^%0000000000110000
    skip3:

    if Steps2 = 0 then skip2
    if I > Steps2 then skip2
    OUTS = OUTS^M2
    M2 = M2^%0000000000001100
    skip2:

    if Steps1 = 0 then skip1
    if I > Steps1 then skip1
    OUTS = OUTS^M1
    M1 = M1^%0000000000000011
    skip1:

    pause SLEP
    NEXT
    Directn3 = Dircmd3
    Directn2 = Dircmd2
    Directn1 = Dircmd1




  2. #2
    کاربر تازه وارد
    تاریخ عضویت
    اسفند 1388
    محل زندگی
    قم - زنبیل آباد
    پست
    68

    نقل قول: چه زبانی؟

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

  3. #3

    نقل قول: چه زبانی؟

    نه براي اسمبلي نيست ، چون در قسمتي از برنامه از حلقه For استفاده شده!!! مثل اين كه برنامه نويس قصد داشته با مدارات الكترونيكي كار كنه. به هرحال از اين دست زبانها زياد است كه معمولاً كساني كه قصد دارند برنامه هايي براي كنترل ميكروكنترولرها و ... بسازند زبانهاي اين چنيني را هم براي كار كردن راحت تر برنامه نويس مي سازند. كه احتمال مي رود كه اين قطعه برنامه در نهايت توسط يك برنامه خاص به كد هاي Hex تبديل شود و سپس در يك ميكروكنترولر و يا چنين چيزي تعبيه شود. به هر حال اگه فهميدين نام اين زبان چيست ما رو هم بي خبر نزارين!!!

  4. #4
    کاربر جدید آواتار raranjbar
    تاریخ عضویت
    خرداد 1388
    محل زندگی
    نجف آباد
    پست
    22

    نقل قول: چه زبانی؟

    شاید این بتونه کمکتون کنه من که نفهمیدم .http://lcsr.jhu.edu/wiki/images/5/5b...anual_v1_9.pdf

  5. #5

    نقل قول: چه زبانی؟

    نقل قول نوشته شده توسط raranjbar مشاهده تاپیک
    میخواستم بدونم که این کدها به چه زبانی نوشته شده؟ اخه من فقط C#‎‎ کار کردم
    سلام.
    این یک Script هستش که توسط Stamp2.exe لود میشه و از اینجا ظاهرا کپی شده.

    موفق باشید.

  6. #6

    نقل قول: چه زبانی؟

    فقط اینو اضافه کنم که زبانش بیسیک هست

  7. #7
    کاربر جدید آواتار raranjbar
    تاریخ عضویت
    خرداد 1388
    محل زندگی
    نجف آباد
    پست
    22

    نقل قول: چه زبانی؟

    نقل قول نوشته شده توسط mehdi.mousavi مشاهده تاپیک
    سلام.
    این یک Script هستش که توسط Stamp2.exe لود میشه و از اینجا ظاهرا کپی شده.

    موفق باشید.
    شما میتونید Stamp2.exe آپلود کنید چون من هر چی گشتم نتونستم پیدا کنم

  8. #8

    نقل قول: چه زبانی؟

    نقل قول نوشته شده توسط raranjbar مشاهده تاپیک
    شما میتونید Stamp2.exe آپلود کنید چون من هر چی گشتم نتونستم پیدا کنم
    سلام.
    من اطلاعات فنی در مورد این محصول ندارم. فکر میکنم بهترین و سریعترین روش، تماس با تولید کننده اون محصول باشه.

    موفق باشید.

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •