메타 :: 위젯 :: GTK :: Sprite. 메타 :: 위젯 :: GTK :: Sprite는 C64 스타일 스프라이트를 수행하는 Perl 모듈입니다.
지금 다운로드

메타 :: 위젯 :: GTK :: Sprite. 순위 및 요약

메타 :: 위젯 :: GTK :: Sprite. 태그

위젯 Perl 모듈 메타 GTK Sprite.

메타 :: 위젯 :: GTK :: Sprite. 설명

META :: 위젯 :: GTK :: Sprite는 C64 스타일 스프라이트를 수행하는 Perl 모듈입니다. META :: WIDGET :: GTK :: Sprite는 C64 스타일 Sprites를 수행하는 Perl 모듈입니다 .Synopsis 사용 GTK; 그놈을 사용하십시오; init gnome "test.pl"; meta :: 위젯 :: GTK :: Sprite; MY $ MW = NEW GTK :: Window ( "Toplevel"); My ($ 캔버스) = 그놈 :: 캔버스 -> new (); $ MW-> 추가 ($ 캔버스); $ 캔버스 -> 쇼; 내 $ croot = $ canvas-> root; MY $ SPRITES = NEW META :: 위젯 :: GTK :: Sprite ($ Croot); MY $ P1 = $ SPRITES-> CREATE ( "./ player1.xpm", 100, 0); $ sprites-> slide_to_time ($ p1,5000, 100, 100); MY $ P2 = $ SPRITES-> create ( "./ player2.xpm", 0, 0); $ sprites-> slide_to_speed ($ p2,10, 100, 100); $ sprites-> set_collision_handler (bang); $ mw-> 쇼; GTK-> 주요; Sub Bang {Print "Bang! N"; 출구; } Sprite는 C64의 간단한 그래픽 프로그래밍을 가져 오는 모듈입니다 (LookyLikearse 구성 요소가없는 희망으로). 캔버스에서 '스프라이트'로 사진을 선언 한 다음 해당 주위를 이동하고 서로 충돌시킵니다. 캔버스는 그놈 :: 캔버스 객체입니다. sprite.methodsnew meta :: widget :: gtk :: sprite ($ canvas_root)를 시작하기 전에 gtk :: 캔버스 객체를 가져야합니다. 새 메서드는 캔버스에 대한 캔버스 루트 오브젝트를 하나의 인수로 취합니다. 다음과 같이 캔버스에서 캔버스 루트를 얻을 수 있습니다 : My $ croot = $ canvas-> root; $ sprite_number = $ sprites-> create ( "/ path / to / filename", 10, 20); 만들기 이미지를로드합니다 디스크에서 파일 (바로 지금, XPM 형식 만)을 만들고 스프라이트를 만드십시오. 두 숫자는 캔버스의 x 및 y 위치입니다. $ sprites-> show ($ sprite_number); 캔버스 $ sprites-> 숨기기 ($ sprite_number)에 sprite가 나타납니다. 스프라이트 그림을 캔버스에서 사라지게하십시오. 그것은 여전히 다른 스프라이트와 충돌 할 수 있습니다. 아무것도 누르지 않으려면 방해가되지 않거나 자신의 충돌 핸들러에서 그것을 무시하거나 무시하십시오. $ sprites-> 파괴 ($ sprite_number); 스프라이트를 완전히 파괴합니다. $ sprites-> move_to ($ sprite_number, 10, 20); 즉시 주어진 위치로 $ sprite_number로 명명 된 sprite를 텔레포트합니다. 대비 slide_to_xxx 함수. $ sprites-> slile_to_time ($ sprite_number, $ time, 10, 20); 캔버스를 통해 스프라이트 $ sprite_number '슬라이드'를 10, 20으로 만듭니다. 그렇게하려면 시간 초가 걸릴 것입니다. 느리게 속도가 나가는 것처럼 보입니다. $ sprites -> slile_to_speed ($ sprite_number, $ speed, 10, 20); Sprite $ sprite_number를 10, 20으로 sprite $ sprite_number로 '슬라이드'합니다. 초당 $ 속도 픽셀의 속도로 이동합니다. . $ SPRITES-> POS ($ sprite_number); $ sprite_number $ Sprites-> Velocity ($ sprite_number, 5, 6)의 X 및 Y 좌표를 반환합니다. $ sprite_number의 속도를 설정합니다. 숫자는 x 및 y 속도입니다. 음수는 스프라이트가 거꾸로 이동할 것입니다. $ sprites-> set_collision_handler (Collision_Handler); 두 개의 스프라이트가 충돌 할 때 호출 될 함수를 이름으로 지정합니다. 충돌 탐지 시스템은 지금 매우 기절합니다. 충돌을 효율적으로 탐지하는 것이 매우 어려운 것으로 밝혀졌습니다.이 기능은 다음과 같이 호출됩니다 : Collision_Handler ($ sprite_number, $ sprite_number); 두 개의 스프라이트 숫자가 충돌 한 두 개의 스프라이트입니다. 여러 개의 스프라이트 충돌하면 많은 충돌 처리기 콜백이 발생할 수 있습니다. 음색 핸들러 Sprite.pm을 설정하면 모든 애니메이션 루프를 충돌하기 위해 모든 스프라이트를 확인합니다. 나는 이것을 최적화하지 않았으므로 더 많은 스프라이트를 추가 할 때 거의 엄청난 속도로 느려집니다. 충돌을 스위치 끄기 위해 핸들러를 Undef로 설정하려면 핸들러를 설정하십시오. 요구 사항 : · Perl.

메타 :: 위젯 :: GTK :: Sprite. 관련 소프트웨어