ETH Zuerich - Startseite
Professur für CAAD

 


caad d-arch


Caad Teaching
 

 
Bachelor of Architecture: CAAD II ss07

 
Master of Advanced Studies
in Architecture, CAAD


 
DWF-Processing
Programmieren statt Zeichnen


 
Graustufen - Ein Atlas
Schweizer Wohngebäude als XML Daten


 
DWF- Denken in Systemen:
In Collaboration with the Technical University Vienna


 
Seminarwoche:
BlowUp


 
Archiv

 
Caad Projects
 

 
Theory
 
Design
 
Building
 
Practice

 
Related pages
 

 
Swiss Federal Institute of Technology Zurich
 
Institute of Building Technology
 
Faculty of Architecture

 
Other pages

 










hbt d-arch

MAS ETH ARCH/CAAD - 2005/06 - STUDENT PAGES
Master of Advanced Studies in Architecture, Specialization in Computer Aided Architectural Design | 065-0005/6
Supervision: Prof. Dr. Ludger Hovestadt, Philipp Schaerer
Chair of CAAD, ETH Zurich





PERSPECTIVE

-- NDSSladjanaMarkovic - 09 Nov 2005

  • perspective
    perspective.gif
    PROCEDURE perspective;
    
    VAR
    rectWidth, rectHeight : INTEGER;
    r,g,b:LONGINT;
    i,m: INTEGER;
    startY: INTEGER;
    gap : REAL;
    
    BEGIN
    
       For m:=0 TO 12 DO BEGIN
    
    rectWidth:=20;
    rectHeight:=20;
    gap:=50;
    
          ColorIndexToRGB (13,r,g,b);
          Fillback(r,g,b);
          rect(0,rectWidth,rectWidth,34*rectHeight+gap);
    
             For i:=0 TO 12 DO BEGIN
    
             ColorIndexToRGB (79,r,g,b);
             Fillback(r,g,b);
             startY := gap+i*rectHeight+i*gap;
             rect(0,startY,rectWidth,startY+rectHeight);
       
       MoveObjs(2*m+1,2*m,FALSE,FALSE);
    
              END;
    
          END;
    
       END;
    
    RUN(perspective);
    

Revision r1.1 - 09 Nov 2005 - 11:36 - NDSSladjanaMarkovic
Parents: WebHome > NDSSladjanaMarkovic > MiniAssignmentI
Copyright © 1999-2003 by the contributing authors. All material on this collaboration platform is the property of the contributing authors.

This website has been archived and is no longer maintained.