View this PageEdit this PageAttachments to this PageHistory of this PageHomeRecent ChangesSearch the SwikiHelp Guide

OBY19

▲PREV　------　●　TOP　●　------　NEXT▼Uploaded Image: imager.jpg

舌を出したり目をカーソルの方を向かせたり

口から舌を出したり引っ込めたりするメソッドも追加しておきましょう。
それと黒目がカーソルの方向を向くメソッドもついでにやっちゃいます。

■舌を出したり引っ込めたりするメソッドを追加します。

● ObyLipsクラスshowTongueメソッド
新たに舌の形のCurveMorphを生成して口にくっつけちゃいます。
--------------------------------------------
showTongue
	| tongue |
	self hideTongue.
	tongue _ CurveMorph new.
	tongue setVertices: {0@0. 5@0. 5@10. 0@15. -5@10. -5@0}.
	tongue color: Color red.
	tongue borderWidth: 0.
	tongue center: self center + (0 @ ((self vertices at: 3) y - (self vertices at: 1) y // 2)).
	self addMorphFront: tongue
--------------------------------------------
アクセプト。
Alt + s ( Cmd + s )



● ObyクラスshowTongueメソッド
Obyからもアクセスできるようにします。
--------------------------------------------
showTongue
	self lips showTongue.
--------------------------------------------



● ObyLipsクラスhideTongueメソッド
舌を引っ込めるのは口のサブモーフを削除することで。
--------------------------------------------
hideTongue
	self submorphs do: [ :each | each delete]
--------------------------------------------
アクセプト。
Alt + s ( Cmd + s )



● ObyクラスhideTongueメソッド
Obyからもアクセスできるようにしまする。
--------------------------------------------
hideTongue
	self lips hideTongue.
--------------------------------------------


■黒目をカーソルに向かせるメソッドを追加します。

● ObyクラスlookAtHandメソッド
黒目をカーソルの方向に向かせます。
WorldのactiveHandって〜のがカーソルやね。
--------------------------------------------
lookAtHand
	| hand |
	self isInWorld ifFalse: [^ self].
	hand _ (self world activeHand) ifNil: [self world primaryHand].
	self lookAtMorph: hand
--------------------------------------------
アクセプト。
Alt + s ( Cmd + s )


★インスタンスを出してみる

--------------------------------------------
boby _ Oby new openInWorld
--------------------------------------------
Alt + d ( Cmd + d )


　　　　　　Uploaded Image: image.jpg



--------------------------------------------
boby showTongue
--------------------------------------------
Alt + d ( Cmd + d )


　　　　　　Uploaded Image: image1.jpg



--------------------------------------------
boby hideTongue
--------------------------------------------
Alt + d ( Cmd + d )


　　　　　　Uploaded Image: image.jpg


--------------------------------------------
boby lookAtHand
--------------------------------------------
Alt + d ( Cmd + d )


　　　　　　Uploaded Image: image2.jpg



▲PREV　------　●　TOP　●　------　NEXT▼







■　MEMO　■

Links to this Page