美容室・ビューティーサロン
タイ・美容室
トップ プライス アクセス スペシャル プロモーション インフォメーション
ヘアービューティーサロン・アクル・ワールドのクーポン券
タイの美容室・ビューティーサロン・アクル・ワールド
TotalTOTALToday今日Yesterday昨日
copyright©2006 interactive scene co.,ltd. - All rights reserved.
icalScreenHeight = $LogicalScreenHeight; } if ($GlobalColorTableFlag) { $globalColorTable[$Gif] = $GlobalColorTable; if ($Gif > 0) { if ($GlobalColorTable ne $globalColorTable[$Gif - 1]) { $useLocalColorTable = 1; } } } if ($pflag) { printf("=====================================\n"); printf("GifHeader\n"); printf("=====================================\n"); printf("Signature: %s\n", $Signature); printf("Version: %s\n", $Version); printf("Logical Screen Width: %d\n", $LogicalScreenWidth); printf("Logical Screen Height: %d\n", $LogicalScreenHeight); printf("Global Color Table Flag: %d\n", $GlobalColorTableFlag); printf("Color Resolution: %d\n", $ColorResolution); printf("Sort Flag: %d\n", $SortFlag); printf("Size of Global Color Table: %d * 3\n", $SizeOfGlobalColorTable); printf("Background Color Index: %d\n", $BackgroundColorIndex); printf("Pixel Aspect Ratio: %d\n", $PixelAspectRatio); printf("Global Color Table: \n"); Dump($GlobalColorTable); } } ;# ===================================== ;# Image Block ;# ===================================== sub ImageBlock { $ImageSeparator = ord(substr($buf, $cnt, 1)); $cnt++; $ImageLeftPosition = ord(substr($buf, $cnt, 1)) + ord(substr($buf, $cnt + 1, 1)) * 256; $cnt += 2; $ImageTopPosition = ord(substr($buf, $cnt, 1)) + ord(substr($buf, $cnt + 1, 1)) * 256; $cnt += 2; $ImageWidth[$Gif] = ord(substr($buf, $cnt, 1)) + ord(substr($buf, $cnt + 1, 1)) * 256; $cnt += 2; $ImageHeight = ord(substr($buf, $cnt, 1)) + ord(substr($buf, $cnt + 1, 1)) * 256; $cnt += 2; $PackedFields20[$Gif] = ord(substr($buf, $cnt, 1)); $cnt++; $LocalColorTableFlag = ($PackedFields20[$Gif] & 0x80) >> 7; $InterlaceFlag = ($PackedFields20[$Gif] & 0x40) >> 6; $SortFlag = ($PackedFields20[$Gif] & 0x20) >> 5; $Reserved = ($PackedFields20[$Gif] & 0x18) >> 3; if ($LocalColorTableFlag) { $SizeOfLocalColorTable = 2 ** (($PackedFields20[$Gif] & 0x07) + 1); $LocalColorTable = substr($buf, $cnt, $SizeOfLocalColorTable); $cnt += $SizeOfLocalColorTable * 3; } else { $SizeOfLocalColorTable = 0; $LocalColorTable = ""; } $LzwMinimumCodeSize[$Gif] = ord(substr($buf, $cnt, 1)); $cnt++; $ImageData[$Gif] = &DataSubBlock(); if ($pflag) { printf("=====================================\n"); printf("Image Block\n"); printf("=====================================\n"); printf("Image Separator: 0x%02x\n", $ImageSeparator); printf("Image Left Position: %d\n", $ImageLeftPosition); printf("Image Top Position: %d\n", $ImageTopPosition); printf("Image Width: %d\n", $ImageWidth[$Gif]); printf("Image Height: %d\n", $ImageHeight); printf("Local Color Table Flag: %d\n", $LocalColorTableFlag); printf("Interlace Flag: %d\n", $InterlaceFlag); printf("Sort Flag: %d\n", $SortFlag); printf("Reserved: --\n"); printf("Size of Local Color Table: %d\n", $SizeOfLocalColorTable); printf("Local Color Table: \n"); Dump($LocalColorTable); printf("LZW Minimum Code Size: %d\n", $LzwMinimumCodeSize[$Gif]); printf("Image Data: \n"); Dump($ImageData[$Gif]); printf("Block Terminator: 0x00\n"); } } ;# ===================================== ;# Graphic Control Extension ;# ===================================== sub GraphicControlExtension { $ExtensionIntroducer = ord(substr($buf, $cnt, 1)); $cnt++; $GraphicControlLabel = ord(substr($buf, $cnt, 1)); $cnt++; $BlockSize = ord(substr($buf, $cnt, 1)); $cnt++; $PackedFields23 = ord(substr($buf, $cnt, 1)); $cnt++; $Reserved = ($PackedFields23 & 0xe0) >> 5; $DisposalMethod = ($PackedFields23 & 0x1c) >> 5; $UserInputFlag = ($PackedFields23 & 0x02) >> 1; $TransparentColorFlag[$Gif] = $PackedFields23 & 0x01; $DelayTime = ord(substr($buf, $cnt, 1)) + ord(substr($buf, $cnt+1, 1)) * 256; $cnt += 2; $TransparentColorIndex[$Gif] = ord(substr($buf, $cnt, 1)); $cnt++; $BlockTerminator = ord(substr($buf, $cnt, 1)); $cnt++; if ($pflag) { printf("=====================================\n"); printf("Graphic Control Extension\n"); printf("=====================================\n"); printf("Extension Introducer: 0x%02x\n", $ExtensionIntroducer); printf("Graphic Control Label: 0x%02x\n", $GraphicControlLabel); printf("Block Size: %d\n", $BlockSize); printf("Reserved: --\n"); printf("Disposal Method: %d\n", $DisposalMethod); printf("User Input Flag: %d\n", $UserInputFlag); printf("Transparent Color Flag: %d\n", $TransparentColorFlag[$Gif]); printf("Delay Time: %d\n", $DelayTime); printf("Transparent Color Index: %d\n", $TransparentColorIndex[$Gif]); printf("Block Terminator: 0x00\n"); } } ;# ===================================== ;# Comment Extension ;# ===================================== sub CommentExtension { $ExtensionIntroducer = ord(substr($buf, $cnt, 1)); $cnt++; $CommentLabel = ord(substr($buf, $cnt, 1)); $cnt++; &DataSubBlock(); if ($pflag) { printf("=====================================\n"); printf("Comment Extension\n"); printf("=====================================\n"); printf("Extension Introducer: 0x%02x\n", $ExtensionIntroducer); printf("Comment Label: 0x%02x\n", $CommentLabel); printf("Comment Data: ...\n"); printf("Block Terminator: 0x%02x\n", $BlockTerminator); } } ;# ===================================== ;# Plain Text Extension ;# ===================================== sub PlainTextExtension { $ExtensionIntroducer = ord(substr($buf, $cnt, 1)); $cnt++; $PlainTextLabel = ord(substr($buf, $cnt, 1)); $cnt++; $BlockSize = ord(substr($buf, $cnt, 1)); $cnt++; $TextGridLeftPosition = ord(substr($buf, $cnt, 1)) + ord(substr($buf, $cnt + 1, 1)) * 256; $cnt += 2; $TextGridTopPosition = ord(substr($buf, $cnt, 1)) + ord(substr($buf, $cnt + 1, 1)) * 256; $cnt += 2; $TextGridWidth = ord(substr($buf, $cnt, 1)) + ord(substr($buf, $cnt + 1, 1)) * 256; $cnt += 2; $TextGridHeight = ord(substr($buf, $cnt, 1)) + ord(substr($buf, $cnt + 1, 1)) * 256; $cnt += 2; $CharacterCellWidth = ord(substr($buf, $cnt, 1)); $cnt++; $CharacterCellHeight = ord(substr($buf, $cnt, 1)); $cnt++; $TextForegroundColorIndex = ord(substr($buf, $cnt, 1)); $cnt++; $TextBackgroundColorIndex = ord(substr($buf, $cnt, 1)); $cnt++; &DataSubBlock(); if ($pflag) { printf("=====================================\n"); printf("Plain Text Extension\n"); printf("=====================================\n"); printf("Extension Introducer: 0x%02x\n", $ExtensionIntroducer); printf("Plain Text Label: 0x%02x\n", $PlainTextLabel); printf("Block Size: 0x%02x\n", $BlockSize); printf("Text Grid Left Position: %d\n", $TextGridLeftPosition); printf("Text Grid Top Position: %d\n", $TextGridTopPosition); printf("Text Grid Width: %d\n", $TextGridWidth); printf("Text Grid Height: %d\n", $TextGridHeight); printf("Text Foreground Color Index: %d\n", $TextForegroundColorIndex); printf("Text Background Color Index: %d\n", $TextBackgroundColorIndex); printf("Plain Text Data: ...\n"); printf("Block Terminator: 0x00\n"); } } ;# ===================================== ;# Application Extension ;# ===================================== sub ApplicationExtension { $ExtensionIntroducer = ord(substr($buf, $cnt, 1)); $cnt++; $ExtentionLabel = ord(substr($buf, $cnt, 1)); $cnt++; $BlockSize = ord(substr($buf, $cnt, 1)); $cnt++; $ApplicationIdentifire = substr($buf, $cnt, 8); $cnt += 8; $ApplicationAuthenticationCode = substr($buf, $cnt, 3); $cnt += 3; &DataSubBlock(); if ($pflag) { printf("=====================================\n"); printf("Application Extension\n"); printf("=====================================\n"); printf("Extension Introducer: 0x%02x\n", $ExtensionIntroducer); printf("Extension Label: 0x%02x\n", $PlainTextLabel); printf("Block Size: 0x%02x\n", $BlockSize); printf("Application Identifire: ...\n"); printf("ApplicationAuthenticationCode: ...\n"); printf("Block Terminator: 0x00\n"); } } ;# ===================================== ;# Trailer ;# ===================================== sub Trailer { $cnt++; if ($pflag) { printf("=====================================\n"); printf("Trailer\n"); printf("=====================================\n"); printf("Trailer: 0x3b\n"); printf("\n"); } } ;# ===================================== ;# Data Sub Block ;# ===================================== sub DataSubBlock { local($n, $from); $from = $cnt; while ($n = ord(substr($buf, $cnt, 1))) { $cnt++; $cnt += $n; } $cnt++; return(substr($buf, $from, $cnt - $from)); } ;# ===================================== ;# Memory Dump ;# ===================================== sub Dump { local($buf) = @_; my($i); if (length($buf) == 0) { return; } for ($i = 0; $i < length($buf); $i++) { if ((