رفتن به مطلب
برای استفاده از انجمن و عضـویت کلیک کنید.

پست های پیشنهاد شده

mehdializade    1

گروه دانشجو

سلام 
میخوام 3 مقدار از جنس بایت رو همزمان بفرستم
مقادیر RGB رو.هر لحظه مقدار R , G , B عوض میشن این مقادیر که هر کدوم بین 0 تا 255 هستش رو با هم ارسال کنه 
کاری که الان انجام میدم تکی هستش
به این صورت:
  buffer =b.GetBytes("UTF8")
  TcpStreams.Write(buffer)
ولی همزمان 3 تاش باهم میخوام ارسال بشه و معلوم باشه کدوم برای R , G , B هستش
 کسی میتونه کمکم کنه؟؟؟
ممنون میشم

به اشتراک گذاری این ارسال


لینک به ارسال
شهریار شریعتی    512

دپارتمان سرپرست

در ۱ ساعت قبل، mehdializade گفته است :

سلام 
میخوام 3 مقدار از جنس بایت رو همزمان بفرستم
مقادیر RGB رو.هر لحظه مقدار R , G , B عوض میشن این مقادیر که هر کدوم بین 0 تا 255 هستش رو با هم ارسال کنه 
کاری که الان انجام میدم تکی هستش
به این صورت:
  buffer =b.GetBytes("UTF8")
  TcpStreams.Write(buffer)
ولی همزمان 3 تاش باهم میخوام ارسال بشه و معلوم باشه کدوم برای R , G , B هستش
 کسی میتونه کمکم کنه؟؟؟
ممنون میشم

درود

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

مثلا :

Dim a,b,c As String
Dim data as Map
data.Initialize
data.Put("RColor",a)
data.Put("GColor",b)
data.Put("BColor",c) 
Dim json As JsonGenerator
json.Initialize(data)
json.ToString.GetByts("UTF-8") 'چیزی که باید بفرستید

وقتی هم دریافت کردید . مقدار جیسون رو پارس میکنید و اطالاعات رو استخراج میکنید

به اشتراک گذاری این ارسال


لینک به ارسال
mehdializade    1

گروه دانشجو

ارسال شده در (ویرایش شده)

خیلی خیلی ممنونم شهریار عزیز
من خیلی نیاز داشتم به یه سر نخ
 

ویرایش شده در توسط mehdializade
سرچ کردم داخل سایت به جواب رسیدم
  • پسندیدم 1

به اشتراک گذاری این ارسال


لینک به ارسال
mehdializade    1

گروه دانشجو

ارسال شده در (ویرایش شده)

راجع با دریافت اطلاعات هم باید بگم که دارم با ماژول وای فای و میکرو کنترلر کار میکنم ازین طرف که اعدادم ارسال بشه تو گیرنده رو یه کاریش میکنم
اگه سوال برام پیش اومد مزاحم میشم

ویرایش شده در توسط mehdializade

به اشتراک گذاری این ارسال


لینک به ارسال
شهریار شریعتی    512

دپارتمان سرپرست

در 48 دقیقه قبل، mehdializade گفته است :

راجع با دریافت اطلاعات هم باید بگم که دارم با ماژول وای فای و میکرو کنترلر کار میکنم ازین طرف که اعدادم ارسال بشه تو گیرنده رو یه کاریش میکنم
اگه سوال برام پیش اومد مزاحم میشم

اگر در میکروکنترل کلاسی برای دیکود کردن یا پارس کردن جیسون ندارید میتونید موقع ارسال کردن داده ها در بیسیک به جای جیسون ؛ داده هارو در یک متن به هم بچسبونین مثلا :

123,234,98

و در میکرو کنترل اونو اسپلیت کنید .

 

من در خدمتم

  • پسندیدم 1

به اشتراک گذاری این ارسال


لینک به ارسال
mehdializade    1

گروه دانشجو

سلام مجدد
شهریار جان یه مدت درگیر بودم الان برگشتم ادامه پروژه رو انجام بدم
با این روش رو استفاده کردم 
Dim a,b,c As String
Dim data as Map
data.Initialize
data.Put("RColor",a)
data.Put("GColor",b)
data.Put("BColor",c) 
.
.
.
اما انگار داده ای فرستاده نمیشه
من تو میکرو هر چیزی رو که دریافت میشه رو گذاشتم روی ال سی دی نمایش بده
به نظرتون کجای کارم مشکل داره؟
 

به اشتراک گذاری این ارسال


لینک به ارسال
شهریار شریعتی    512

دپارتمان سرپرست

در 4 ساعت قبل، mehdializade گفته است :

سلام مجدد
شهریار جان یه مدت درگیر بودم الان برگشتم ادامه پروژه رو انجام بدم
با این روش رو استفاده کردم 
Dim a,b,c As String
Dim data as Map
data.Initialize
data.Put("RColor",a)
data.Put("GColor",b)
data.Put("BColor",c) 
.
.
.
اما انگار داده ای فرستاده نمیشه
من تو میکرو هر چیزی رو که دریافت میشه رو گذاشتم روی ال سی دی نمایش بده
به نظرتون کجای کارم مشکل داره؟
 

درود

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

به اشتراک گذاری این ارسال


لینک به ارسال
mehdializade    1

گروه دانشجو

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

حالا یه راه دیگه من بپرسم ازتون
من با این برنامه میفرستم بعد دریافتمم اوکیه.
Buffer = "aaa".GetBytes("UTF8")
        TcpStreams.Write(Buffer)
تو قسمت دریافتم این رو میبینم
+idp,0,3=aaa
که aaa رو میکشم بیرون و استفاده میکنم
نمیشه یه همچین چیزی رو بفرستم؟
R=...
G=...
B=...
Buffer = (R.text,B.text,G.text).GetBytes("UTF8")
        TcpStreams.Write(Buffer)

البته با نگارش اصولی
 

به اشتراک گذاری این ارسال


لینک به ارسال
شهریار شریعتی    512

دپارتمان سرپرست

در 17 ساعت قبل، mehdializade گفته است :

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

حالا یه راه دیگه من بپرسم ازتون
من با این برنامه میفرستم بعد دریافتمم اوکیه.
Buffer = "aaa".GetBytes("UTF8")
        TcpStreams.Write(Buffer)
تو قسمت دریافتم این رو میبینم
+idp,0,3=aaa
که aaa رو میکشم بیرون و استفاده میکنم
نمیشه یه همچین چیزی رو بفرستم؟
R=...
G=...
B=...
Buffer = (R.text,B.text,G.text).GetBytes("UTF8")
        TcpStreams.Write(Buffer)

البته با نگارش اصولی
 

خب شما میتونید بدون استفاده از جیسون هم این کارو بکنید :

Dim R,G,B As String
Dim str As String
Dim Buffer() As Bytes
R = ...
G = ...
B = ...
str = R & "," & G & "," & B
Buffer = str.GetBytes("UTF-8")

بعد وقتی مقدار دریافت شد ، بیاید اون رو بر اساس کاما ( , ) جداسازی کنید .

به اشتراک گذاری این ارسال


لینک به ارسال
mehdializade    1

گروه دانشجو

سلام مجدد
خیلی اذیتت میکنم
فکر میکنم "باید" از json استفاده کنم
الان اولین مقادیر r g b رو ارسال میکنه و دریافتمم به این شکل انجام میشه ولی با تغییر مقادیر r g b دیگه ارسالی صورت نمیگیره
دیدین تو ارسال بافر این رو میفرستم؟
        TcpStreams.Write(Buffer)

تو جیسون چنین چیزی داره؟بعد از این کد ها

Dim a,b,c As String
Dim data as Map

data.Initialize

data.Put("RColor",a)

data.Put("GColor",b)

data.Put("BColor",c) 

Dim json As JsonGenerator

json.Initialize(data)

json.ToString.GetByts("UTF-8")

به اشتراک گذاری این ارسال


لینک به ارسال

برای ارسال دیدگاه یک حساب کاربری ایجاد کنید یا وارد حساب خود شوید

برای اینکه بتوانید دیدگاهی ارسال کنید نیاز دارید که کاربر سایت شوید

ایجاد یک حساب کاربری

برای حساب کاربری جدید در سایت ما ثبت نام کنید. عضویت خیلی ساده است !

ثبت نام یک حساب کاربری جدید

ورود به حساب کاربری

دارای حساب کاربری هستید؟ از اینجا وارد شوید

ورود به حساب کاربری

  • مطالب مشابه

    • توسط m0$tafa
      سلام میخوام از طریقیوزر نیم و پسود اکانت با php به اینستاگرام وصل بشم و موارد مثل ارسال عکس و ویدئو و نمایش فالوور ها و فالووینگ ها و .. رو در php انجام بدم. کسی کد سالم برای اینکار داره؟
      در github کلی کد دریافت کردم اما هیچکدام کار نمیکنن.
    • توسط chatbuzz
      سلام خدمت اساتید محترم 
      اول اینکه خواستم بدونم چطور میشه چند تا عکس با کتابخانه گلاید توی لیست ویو بنمایش در اورد؟
      دوم هم تو خیلی از برنامه ها دیدم وقتی لیست ویو اسکرول میشه به اون position عکس لود میشه و فرضا اگه ۱۰۰۰ ایتم باشه نمیاد یدفعه ای همه رو لود کنه ؟
      ممنون میشم اگه سورس یه مثالی هست ارائه بدین 
      با تشکر
    • توسط علیرضا آه مند
      سلام میکنم خدمت کاربران عزیز انجمن لرن نت.
      در این تاپیک میخوام تلگرام غیر‌ رسمی‌ای قرار بدم که بدون نیاز به پروکسی و هیلتر‌شکن میشه ازش استفاده کرد.
      این برنامه همون TeleRU هست که متاسفانه نسخه اصلیش مشکل Connecting داره و وصل نمیشه.
      اما در این نسخه که من و یکی از دوستان ویرایشش کردیم این مشکلات بر‌طرف شده.
      ویژگی های نسخه مد:
      1.پرسرعت تر از نسخه اصلی
      2.مصرف رم کمتر (باطری گوشی)
      3.بدون مشکل اتصال سرور (باگ)
      4.فشرده (حذف سورس اضافی)
      5.کاهش حجم از 26 مگابایت به 11 مگابایت
      6.اضافه کردن تم های جدید و زیبا
       
      ویرایش توسط : CTS & IC
       
      خب حالا ممکنه برای بعضی ها سوال بشه که چطوری میتونیم به این برنامه اعتماد کنیم؟
      -این برنامه فقط شما رو به سرور خودش وصل میکنه و بعد از اینکه وصل شد به سرور های تلگرام ریدارکت میکنه و امنیتش هم خیلی بالا هست.(مثل تلگرام طلایی و هاتگرام نیست)
       
      دانلود از لینک زیر
      دانلود مستقیم
      دانلود از سایت من
    • توسط chatbuzz
      وقت بخیر 
      از دوستان کسی هست نحوه کار کردن با سرویس رو توضیح بده و یا اگه نمونه سورسی هست به اشتراک بذاره استفاده کنیم
      و اینکه چجور میشه تو سرویس یه درخواست (job) هر چند دقیقه یکبار فرستاد و یک چیزی تو سرور چک کنه و برگرده کاری که خواستم برام بکنه؟
      با تشکر
  • کاربران آنلاین در این صفحه   0 کاربر

    هیچ کاربر عضوی،در حال مشاهده این صفحه نیست.

×