واضح آرشیو وب فارسی:سایت ریسک: t=2317">فايل pcd rdcode 17 مرداد 1382, 00:46سلام آيا كسي مي دونه از چه سايتي ميشه فايلهاي pcd تهيه كرد؟ :?: ACTIVE 17 مرداد 1382, 06:53سلام آيا كسي مي دونه از چه سايتي ميشه فايلهاي pcd تهيه كرد؟ :?: باسلام آقا بيشتر توضيح بدين منظوره شما"PSD" نيست ؟ باسپاس :wink: ----------------------------- ImanYari 17 مرداد 1382, 19:40اگه منظورتون فايلهاي PSD نيست! پس اينه: تا جايي كه من اطلاع دارم اين فايلها مربوط به Photo CD ها كه در واقع يك نوع فرمت سي دي (مانند Video CD و Audio CD) هستن كه در دستگاهاي VCD و پخش كننده هاي ديگه قابل نمايش هستن در واقع فرمت خاصي نيستن بلكه اين يه روش رايت سي دي محسوب ميشه! در نرم افزارهاي رايت گزينه اي با اين عنوان وجود داره كه ميتونه اينطور فايلها رو روي سي درست كنه اميدوارم جوابتون رو گرفته باشين rdcode 17 مرداد 1382, 22:31به من گفته شده اين فايل(pcd يا psd) قابليت افزايش يا تنظيم dpi رو داره . حالا نميدونم كه فايلي با اين مشخصات pcd يا psd هست ؟ به هر حال اگر متوجه منظورم شديد لطفا براي download چنين فايلي آدرسي معرفي كنيد. ImanYari 17 مرداد 1382, 22:42قابليت تنظيم dpi در واقع براي تمامي فرمتهاي گرافيكي صدق ميكنه ولي فكر ميكنم شما دقيقا منظورتون از dpi تعداد نقاط در اينچ براي چاپ بايد باشه در اين صورت فايل مورد نظر شما psd هست ولي منظور شما رو از download اون نفهميدم!! اين فايل همون فرمت استاندارد فتوشاپ هستش كه توسط همين نرم افزار هم توليد ميشه و مورد ديگه هم اينكه افزايش dpi اگر به منظور افزايش كيفيت باشه ( يعني شما يك عكس بي كيفيت رو به يك عكس با كيفيت تبديل كنين) اساسا غير ممكنه! باز هم اگر ممكنه واضحتر توضيح بدين و دقيقا بگين كه دنبال چي هستين؟ rahmani 17 مرداد 1382, 23:13با سلام ، فرمت pcd/ photo cd format بله همانطور كه گفتيد اين فرمت هنگام باز شدن ميتواند با يك dpi انتخابي باز شود.تكنولوژي آن در اصل متعلق به شركت kodak بوده و فرمت مناسبي براي ذخيره سازي مي باشد .بسيار كم حجم است و مي تواند اطلاعات را در رزولوشن هاي مختلف در خود ذخيره كند .cd هاي تصويري بزرگ( البوم) معمولا در اين فرمت ذخيره مي شوند. مثل كليپهاي كورل كه تصاوير آن حتي تا سايز نزديك به a 4 قابل چاپند. تكنولوژي آن عمومي نشده و شما هم نمي توانيد با اين فرمت فايل ذخيره كنيد. اما فتوشاپ مي تواند آنرا با رزولوشن دلخواه و همچنين در فضاي رنگ دلخواه باز كند. اگر اطلاعات بيشتر خواستيد پيغام بگذاريد. Babak Sateli 28 مرداد 1382, 02:19توضیح آقا/خانم rahmani بسیار مناسب بود من فقط می خواستم تا اطلاعات تکمیلی را به جواب ایشان اضافه کنم ... یک تصویر PCD به 5 روش مختلف کدگذاری می شود. [1] Base/16 یک تصویر 128 در 192 پیکسل را با حجم 25 کیلوبایت برای رنگ 8 بیتی و 74 کیلوبایت برای رنگ 24 بیتی را در بر می گیرد. [2] Base/4 یک تصویر 256 در 384 پیکسل را با حجم 99 کیلوبایت برای رنگ 8 بیتی و 295 کیلوبایت برای رنگ 24 بیتی را در بر می گیرد. [3] Base یک تصویر 768 در 512 پیکسل را با حجم 394 کیلوبایت برای رنگ 8 بیتی و 1200 کیلوبایت برای رنگ 24 بیتی را در بر می گیرد. [4] 4*Base یک تصویر 1536 در 1024 پیکسل را با حجم 1600 کیلوبایت برای رنگ 8 بیتی و 4800 کیلوبایت برای رنگ 24 بیتی را در بر می گیرد. [5] 16*Base یک تصویر 2048 در 3072 پیکسل را با حجم 6300 کیلوبایت برای رنگ 8 بیتی و 18900 کیلوبایت برای رنگ 24 بیتی را در بر می گیرد. سه روش کدگذاری اول به روش کدگذاری YCbYr (4:1:1) ساخته می شوند. دو روش آخر به روش نزولی کدگذاری می شوند. روش کدگذاری در سه خط اول با افست 02000h ، 0b 800h و 30000h شروع می شود. جهت خواندن کد YcbYr و تبدیل آن به سه رنگ RGB می بایست مقدار w را در این فایل خواند. هر خط w شامل یک خط رنگ می باشد. در زیر من روش خواندن کدگذاری YCbCr و تبدیل آن به RGB را نوشته ام که برنامه نویسان پاسکال و یا دلفی می توانند از آن استفاده نمایند. Procedure YCbCr2RGB(Y,Cb,Cr:integer; Var r,g,b:integer); Const C=256; c11:real= 0.0054980*C; c12:real= 0.0000000*C; c13:real= 0.0051681*C; c21:real= 0.0054980*C; c22:real=-0.0015446*C; c23:real=-0.0026325*C; c31:real= 0.0054980*C; c32:real= 0.0079533*C; c33:real= 0.0000000*C; Begin r:=round(c11*Y +c12*(Cb-156) +c13*(Cr-137)); g:=round(c21*Y +c22*(Cb-156) +c23*(Cr-137)); b:=round(c31*Y +c32*(Cb-156) +c33*(Cr-137)); If r<0 Then r:=0; If g<0 Then g:=0; If b<0 Then b:=0; If r>255 Then r:=255; If g>255 Then g:=255; If b>255 Then b:=255; End; حال با استفاده از این شیوه می توانید تصاویر PCD را نمایش دهید: Procedure LoadPCD(FileName:string); Type buf=Array[0..MaxLineLen-1] Of byte; buf3=Array[0..3*MaxLineLen-1] Of byte; Var ofs:longint; infile:file; y,x,xx:word; Y1,Y2,CbCr:buf; Line:buf3; r,g,b:integer; Function VerticalOrientation:boolean; Var buf:Array[0..127] Of byte; Begin reset(invoer,1); BlockRead(invoer,buf,128); VerticalOrientation:=(buf[72] And 63)<>8; End; Begin assign(infile,FileName); reset(infile,1); bpp:=24; Case PCDsize Of 1: Begin W:=192; H:=128; seek(invoer,$2000); End; 2: Begin W:=384; H:=256; seek(invoer,$B 800); End; 3: Begin W:=768; H:=512; seek(invoer,$30000); End; End; ofs:=0; For y:=0 To (h Div 2)-1 Do Begin BlockRead(infile,Y1,w); BlockRead(infile,Y2,w); BlockRead(infile,CbCr,w); xx:=0; For x:=0 To w-1 Do Begin YCbCr2RGB(Y1[x],CbCr[x Div 2],CbCr[(w Div 2)+(x Div 2)],r,g,b); Line[xx]:=b; Line[xx+1]:=g; Line[xx+2]:=r; inc(xx,3); End; { save your line here ! } inc(ofs,w*3); xx:=0; For x:=0 To w-1 Do Begin YCbCr2RGB(Y2[x],CbCr[x Div 2],CbCr[(w Div 2)+(x Div 2)],r,g,b); Line[xx]:=b; Line[xx+1]:=g; Line[xx+2]:=r; inc(xx,3); End; { save your line here ! } inc(ofs,w*3); End; close(infile); End; End; موفق باشید
این صفحه را در گوگل محبوب کنید
[ارسال شده از: سایت ریسک]
[مشاهده در: www.ri3k.eu]
[تعداد بازديد از اين مطلب: 843]