Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
Criação de objetos<strong>Furb</strong>ol<strong>Furb</strong>olclasse TPontox, y: inteiro;construtor constroi(x, y: inteiro);inicioesse.x := x;esse.y := y;fim;fim;varponto1: TPonto;ponto2: TPonto;criarobj(ponto1);(* chamada do construtor é opcional *)<strong>assembly</strong><strong>assembly</strong>ponto1 dw ?ponto2 dw ?1) push ax2) push 43) call criarobj4) mov ponto1,ax5) pop ax Parâmetro do procedimentocriarobj. Tamanho da representação doTAD (atributos).<strong>Furb</strong>olcriarobj(ponto2, constroi(gi, gj));<strong>assembly</strong>01) push ax02) push 403) call criarobj04) mov ponto2,ax05) pop ax06) push gj07) push gi08) push ponto209) push bp10) call TPonto@constroi