Question Visual C# Problem with Practice World Generation code

Status
Not open for further replies.

Ceka

New member
Joined
Dec 10, 2010
Messages
2
Programming Experience
5-10
heres the code.
Problem: Nothing happens
VB.NET:
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace Random_generation
{
    class Program
    {
        static void Main(string[] args)
        {
            int Layer = 30;
            int BCount = 0;
            int B = 0;
            string Message = "";
            string M2 = "";
            int[,] Blocks = new int[100,100];


            Random rand = new Random();
            for (Layer = 30; Layer != 0;)
            {
                for (BCount = 1; BCount <= 10; )
                {
                    switch (Layer)
                    {
                        case 28 - 30: B = 0; break;
                        case 27: if (rand.Next(10) == 0 && Blocks[Layer - 1, BCount] == 1) B = 1; else B = 0; break;
 


                    
                    }
                    Blocks[Layer, BCount] = B;


                }
                Layer--;

            }
            for (Layer = 30; Layer != 0; )
            {
                while (BCount <= 10)
                {
                    if (BCount != 10)
                    {
                        M2 += Blocks[Layer, BCount].ToString();
                        
                    }
                    else
                    {
                        M2 += Blocks[Layer, BCount].ToString() + "\n";
                    }
                    BCount++;
                }
                Message += M2;
                Layer--;
            }
            Console.WriteLine(Message);


        }
    }
}
 
Status
Not open for further replies.
Back
Top