Welcome to the Lounge

Kenneth Kasajian wrote:

Go back and re-read it

Kenneth Kasajian wrote:

a lot of people bash C but those same people don't realize that whatever language they prefer is probably written in C

Kenneth Kasajian wrote:

I challenged the readers to name a language that was not written in C

Kenneth Kasajian wrote:

not originally written in C ... Pascal is one

Kenneth Kasajian wrote:

implementation details of specific compilers

Kenneth Kasajian wrote:

I don't think it's a limitation

Kenneth Kasajian wrote:

C's null-terminated string is hardly preferable

Colborne_Greg wrote:

the "with" operator

Public Shared Function RotateStream(stream As IsolatedStorageFileStream, angle As Int16) As WriteableBitmap
    stream.Position = 0

    Dim bitmap = New BitmapImage()

    bitmap.SetSource(stream)

    Dim WriteableBitmapSource = New WriteableBitmap(bitmap)
    Dim WriteableBitmapTarget As WriteableBitmap
    Dim Target As Int64

    With WriteableBitmapSource

        Select Case angle
            Case 360 : Return WriteableBitmapSource
            Case 180 : WriteableBitmapTarget = New WriteableBitmap(.PixelWidth, .PixelHeight)
            Case Else : WriteableBitmapTarget = New WriteableBitmap(.PixelHeight, .PixelWidth)
        End Select

        For xAxis = 0 To .PixelWidth
            For yAxis = 0 To .PixelHeight
                Select Case angle
                    Case 90
                        Target = (.PixelWidth - yAxis - 1) + (xAxis * WriteableBitmapTarget.PixelHeight)
                        WriteableBitmapTarget.Pixels(Target) = .Pixels(xAxis + yAxis * .PixelWidth)
                    Case 180
                        Target = (.PixelWidth - xAxis - 1) + (.PixelHeight - yAxis - 1) * .PixelWidth
                        WriteableBitmapTarget.Pixels(Target) = .Pixels(xAxis + yAxis * .PixelWidth)
                    Case 270
                        Target = yAxis + (.PixelWidth - xAxis - 1) * WriteableBitmapTarget.PixelWidth
                        WriteableBitmapTarget.Pixels(Target) = .Pixels(xAxis + yAxis * .PixelWidth)
                End Select
            Next
        Next

    End With

    Return WriteableBitmapTarget
End Function

public static WriteableBitmap RotateStream(IsolatedStorageFileStream stream, int angle)
       {
           stream.Position = 0;
           if (angle % 90 != 0 || angle < 0) throw new ArgumentException();

           int target;
           BitmapImage bitmap = new BitmapImage();

           bitmap.SetSource(stream);

           WriteableBitmap wbSource = new WriteableBitmap(bitmap);

           if (angle % 360 == 0) return wbSource;
           WriteableBitmap wbTarget = null;

           if (angle % 180 == 0)
           {
               wbTarget = new WriteableBitmap(wbSource.PixelWidth, wbSource.PixelHeight);
           }

           else
           {
               wbTarget = new WriteableBitmap(wbSource.PixelHeight, wbSource.PixelWidth);
           }
           for (int x = 0; x < wbSource.PixelWidth; x++)
           {
               for (int y = 0; y < wbSource.PixelHeight; y++)
               {
                   switch (angle % 360)
                   {
                       case 90:
                           target = (wbSource.PixelHeight - y - 1) + x * wbTarget.PixelWidth;
                           wbTarget.Pixels[target] = wbSource.Pixels[x + y * wbSource.PixelWidth];
                           break;
                       case 180:
                           target = (wbSource.PixelWidth - x - 1) + (wbSource.PixelHeight - y - 1) * wbSource.PixelWidth;
                           wbTarget.Pixels[target] = wbSource.Pixels[x + y * wbSource.PixelWidth];
                           break;
                       case 270:
                           target = y + (wbSource.PixelWidth - x - 1) * wbTarget.PixelWidth;
                           wbTarget.Pixels[target] = wbSource.Pixels[x + y * wbSource.PixelWidth];
                           break;
                   }
               }
           }
           return wbTarget;
       }

Colborne_Greg wrote:

to copy a class

Colborne_Greg wrote:

It can utilize every C, C++, and C# library.

Colborne_Greg wrote:

Plus it looks pretty.

Colborne_Greg wrote:

For example the "with" operator is in Visual basic but is not in C.

Colborne_Greg wrote:

Visual basic .net is C with English words and no bracket issue, the GOTO fail would never had been an issue in VB.