pic _ TTexture new initializeWithFileName: 'GrnChplTwr.bmp' mipmap: true shrinkFit: false. win _ TWindow new. win contents: pic. space addChild: win.----------------------------------------
pic _ TTexture new initializeWithFileName: 'GrnChplTwr.bmp' mipmap: true shrinkFit: false. win _ TWindow new. win contents: pic. pic _ TTexture new initializeWithFileName: 'KAY.bmp' mipmap: true shrinkFit: false. win rectFront: pic. space addChild: win. win closeContents.----------------------------------------
下の入力ボックスに書き込んで”add to the page”ボタンで登録出来ます。 修正したい場合はページ左のアイコンの”edit”で出てくる画面で編集可能です。 ページ左のアイコンの”uploads”で画像(JPEG,GIF,PNG)のアップロードもできます。 Sunday, 31 October 2004, 2:54:27 am ■Morphをウィンうに表示。太字のところのモーフ名を変えるだす。 -------------------------------------- morph _ BouncingAtomsMorph new. morph beSticky. tm _ TMorphic new initializeOpaque: true extent: 512@512. teaWorld _ TMorphMonitor new initializeWithWorld: nil extent: 512@512. teaWorld eventsTo: tm. teaWorld world color: morph color. teaWorld world addMorphCentered: morph. win _ TWindow new. win translationX: 0.0 y: 0.0 z: 0.0. win rotationAroundY: 0. win contents: tm. win closeContents. space addChild: win. -------------------------------------- ■Projectをウィンドウに表示。太字のところのプロジェクト名を変えるだす。 -------------------------------------- tm _ TMorphic new initializeOpaque: true extent: 1024@768. teaWorld _ TMorphMonitor new initializeWithWorld: 'Squeak3.6' extent: 1024@768. teaWorld eventsTo: tm. win _ TWindow new. win translationX: 0.0 y: 0.0 z: 0.0. win contents: tm. win closeContents. space addChild: win. -------------------------------------- ってなかんじね。--thoru Link to this Page
|