File:Fictional indus culture city 1.png
Original file (1,600 × 1,200 pixels, file size: 1.15 MB, MIME type: image/png)
Captions
Captions
Summary
[edit]
| Description |
English: Fictional Harappan (Indus) culture city. Only general layout. |
| Date | |
| Source | Own work |
| Author | Merikanto |
Povray 3.7 source code
//
// povray 3.7
//
// fictional indus (harappan) culture city
//
// v 0000 39.4.2021
//
- include "colors.inc"
- include "textures.inc"
- include "stones.inc"
- include "stones1.inc"
- include "woods.inc"
- include "rand.inc"
camera
{
location <0,5,-5>*30
// location <0,240,0>
look_at <-10,0,0>
}
light_source {
<1000,1000,1000>
color rgb White
}
sky_sphere {
pigment {
gradient y
color_map {
[ 0.5 color CornflowerBlue ]
[ 1.0 color MidnightBlue ]
}
scale 2
translate -1
}
}
#declare kol1=(Green+Brown)/2;
#declare kol2=(Green*2+Brown)/3;
object {
plane {
y,0
}
texture {
pigment {
// checker
brick
pigment{kol1},
pigment{ kol2 }
scale 5
}
}
}
//#declare house_tex1=T_Stone0;
- macro house1(koo)
- declare vitkutin=array[11][11] ;
/*
{
{1,1,1},
{1,0,1}
{1,1,2}
}
- /
- declare ras1 = seed(koo);
- for (ix,0,2)
#for (iz,0,2)
// #declare honk1= int(rand(ras1)*2);
#declare honk1=int(Rand_Gauss(3, 1, ras1));
#declare vitkutin[iz][ix]= honk1;
#end
#end
- declare koeffx1=1.0;
union {
- for (ix,0,2)
#for (iz,0,2)
#declare svitsi=vitkutin[iz][ix];
#declare kox1=ix*1.0;
#declare koz1=iz*1.0;
#declare kox2=kox1+1.0;
#declare koz2=koz1+1.0;
// #declare svitsi=0;
#if(svitsi = 1)
box
{
<kox1,0,koz1>,<kox2,1,koz2>
texture {
T_Stone1
scale 0.01
}
}
#end
#if(svitsi = 2)
box
{
<kox1,0,koz1>,<kox2,1.5,koz2>
texture {
T_Stone1
scale 0.01
}
}
#end
#if(svitsi = 3)
box
{
<kox1,0,koz1>,<kox2,1.2,koz2>
texture {
T_Stone1
scale 0.01
}
}
#end
#if(svitsi = 4)
box
{
<kox1,0,koz1>,<kox2,1.1,koz2>
texture {
T_Stone1
scale 0.01
}
}
#end
#end
#end
}
- end
- macro housegroup4(fuba)
- declare xnum=2;
- declare znum=1;
- declare tx=0;
- declare tz=0;
- declare iz=-znum;
- while (iz<znum)
#declare tz=iz*3;
- declare ix=-xnum;
- while (ix<xnum)
#declare tx=ix*3;
#declare tbase1=ix+iz+fuba;
//#declare tx=0;
//#declare tz=0;
object {
house1(tbase1)
translate x*tx
translate z*tz
}
- declare ix=ix+1;
- end
- declare iz=iz+1;
- end
- end
- macro cortel1()
- for (iza,0,4)
object {
#declare fuba=iza;
// kortel1
// #declare fuba=12234+gaba1;
//#declare kortel1=
union {
union {
housegroup4(fuba)
translate x*6
}
#declare fuba=fuba+1;
union {
housegroup4(fuba)
translate x*0
}
#declare fuba=fuba+1;
union {
housegroup4(fuba)
translate x*-6
}
}
translate z*(iza*6.5)
}
#end
#end
- macro cortel2()
- for (iza,0,7)
object {
#declare fuba=iza+122;
union {
union {
housegroup4(fuba)
translate x*6
}
#declare fuba=fuba+1;
union {
housegroup4(fuba)
translate x*0
}
#declare fuba=fuba+1;
union {
housegroup4(fuba)
translate x*-6
}
}
translate z*(iza*6.5)
}
#end
#end
// city wall
difference {
box {
<-1,0,-1>,<1,1,1>
}
box {
<-0.98,-0.1,-0.98>,<0.98,1.2,0.98>
}
texture {
T_Stone3
scale 0.01
}
scale <62,2,74>
translate <16,0,30>
}
// acropolis wall
difference {
box {
<-1,0,-1>,<1,1,1>
}
box {
<-0.98,-0.1,-0.98>,<0.98,1.2,0.98>
}
texture {
T_Stone3
scale 0.01
}
scale <40,2,50>
translate <-86,0,54>
}
// acropolis houses
union {
union {
cortel1()
translate z*-16
translate x*-92
}
/*
union {
cortel1()
translate z*-16
translate x*-120
}
*/
union {
cortel1()
translate z*-16
translate x*-82
}
translate z*86
translate x*20
}
// middle wall
difference {
box {
<-1,0,-1>,<1,1,1>
}
box {
<-0.92,-0.1,-0.92>,<0.92,1.5,0.92>
}
texture {
T_Stone3
scale 0.01
}
scale <40,0,20>
translate <-86,0,84>
}
difference {
box {
<-1,0,-1>,<1,1,1>
}
box {
<-0.92,-0.1,-0.92>,<0.92,1.5,0.92>
}
texture {
T_Stone3
scale 0.01
}
scale <20,0,20>
translate <-86-20,0,84>
}
// middle cortels
#for (ixa,-1,0)
// #for (iza,-1,0)
union {
cortel2()
// translate z*iza*32
translate x*ixa*28
translate x*-60
translate z*10
}
// #end
#end
// palaces etc
box
{
<-1,0,-1>,<1,1,1>
texture {
T_Stone2
scale 0.01
}
scale <6,2,10>
translate <-106+12,0,84>
}
box
{
<-1,0,-1>,<1,1,1>
texture {
T_Stone2
scale 0.01
}
scale <8,2,4>
translate <-110,0,94>
}
box
{
<-1,0,-1>,<1,1,1>
texture {
T_Stone2
scale 0.01
}
scale <4,2,8>
translate <-110,0,74>
}
// city floor
box
{
<-1,0,-1>,<1,0.00002,1>
texture {
T_Stone42
scale 0.03
}
scale <104,0,74>
translate x*-28
translate z*28
}
// big water pool
object {
//plane {y,0}
box { <-1,-1,-1>,<1,1,1> }
texture {
pigment
{
color NavyBlue
}
normal
{
ripples
scale 0.2
}
}
scale <42,0.02,24>
translate y*-0.01
translate x*-88
translate z*-20
}
// river 1
object {
//plane {y,0}
box { <-1,-1,-1>,<1,1,1> }
texture {
pigment
{
color NavyBlue
}
normal
{
ripples
scale 0.2
}
}
scale <8,0.02,200>
translate y*-0.01
translate x*-65
translate z*-200
}
// river 2
object {
//plane {y,0}
box { <-1,-1,-1>,<1,1,1> }
texture {
pigment
{
color NavyBlue
}
normal
{
ripples
scale 0.2
}
}
scale <8,0.02,200>
translate y*-0.01
translate x*-134
translate z*180
}
// way 1
object {
//plane {y,0}
box { <-1,-1,-1>,<1,1,1> }
texture {
T_Stone42
scale 0.03
}
scale <2,0.02,400>
translate y*-0.01
translate x*15.5
// translate z*180
}
// way 2
object {
//plane {y,0}
box { <-1,-1,-1>,<1,1,1> }
texture {
T_Stone42
scale 0.03
}
scale <2,0.02,400>
rotate y*90
translate y*-0.01
translate x*400
translate z*32
}
// updtown cortels
#for (ixa,-1,2)
#for (iza,-1,2)
union {
cortel1()
translate z*iza*36
translate x*ixa*30
}
#end
#end
Licensing
[edit]
- You are free:
- to share – to copy, distribute and transmit the work
- to remix – to adapt the work
- Under the following conditions:
- attribution – You must give appropriate credit, provide a link to the license, and indicate if changes were made. You may do so in any reasonable manner, but not in any way that suggests the licensor endorses you or your use.
- share alike – If you remix, transform, or build upon the material, you must distribute your contributions under the same or compatible license as the original.
File history
Click on a date/time to view the file as it appeared at that time.
| Date/Time | Thumbnail | Dimensions | User | Comment | |
|---|---|---|---|---|---|
| current | 08:59, 30 April 2022 | | 1,600 × 1,200 (1.15 MB) | Merikanto (talk | contribs) | Uploaded own work with UploadWizard |
You cannot overwrite this file.
File usage on Commons
There are no pages that use this file.
