XP 스크립트

제작자 : 양키

에고;; 이거 만든다고 45분정도 걸렸내요 ㅠㅠ(공책에 쓰는시간까지..)
맨첨엔 그냥 1<a<10 이래서 에러먹길래 그냥 and함수까지 넣어서
1 < a and a < 10 이런 원리로 만들었어요;
확률은 복권이라면서도 꽝이 잘 안걸리내요 -ㅅ-;;
확률은 알아서 위의 숫자를 바꿔주시면 될거에요;;(그대로 하시면 4등 엄청 잘 당첨되죠;;)
실행 방법
이벤트->스크립트->bokgun = Bokgun.new
                                    bokgun.Bokgun1

이케 하시면 될겁니다. 자 이제 스크립트 본문으로 갑니다~!!
--------------------------------------------------------------------------------------------------------------------------
#----------------------------------------------------------------------------------
#
#                                즉석 복권 스크립트 BY.스방
#
#----------------------------------------------------------------------------------
class Bokgun
  def Bokgun1
    a = rand(100)+1 #1등(1/100)2등(10/100)3등(30/100)4등(40/100)꽝(50/100)
    if a == 1 #1등 확률
      p "축하합니다. 1등 당첨입니다. 상금 30만원입니다."
      $game_party.gain_gold(300000)
    end
    if 2 < a and a < 11 #2등 확률
      p "축하합니다. 2등 당첨입니다. 상금 10만원입니다."
      $game_party.gain_gold(100000)
    end
    if 10 < a and a < 31 #3등 확률
      p "축하합니다. 3등 당첨입니다. 상품으로 네크리스 오브 레지스트가 있겠습니다."
      $game_party.gain_armer(88, 1)
    end
    if 39 < a and a < 51
      p "축하합니다. 4등 당첨입니다. 상품으로 풀 파워 엘릭서 50개가 있겠습니다."
      $game_party.gain_item(58, 50)
    end
    if 50 < a and a < 101
      p "안타깝습니다. 꽝입니다. 다시 도전해보세요 ^^"
    end
  end
end

Who's 백호

?

이상혁입니다.

http://elab.kr

Comment '6'

List of Articles
번호 분류 제목 글쓴이 날짜 조회 수
공지 스크립트 자료 게시물 작성시 주의사항 습작 2012.12.24 6203
301 이동 및 탈것 Mouse_move file 백호 2009.02.21 923
300 기타 ATS-Advanced Time System 1 file 백호 2009.02.21 964
299 키입력 新전체키 스크립트 예제 - 양키 7 file 백호 2009.02.21 2081
» 기타 복권 스크립트 6 백호 2009.02.21 1258
297 전투 사이트뷰 전투 스크립트 (CBS R1) 8 file 백호 2009.02.21 3499
296 메뉴 Breath Of Fire 스타일의 메뉴 3 file 백호 2009.02.21 2343
295 영상 avi 동영상 실행 스크립트 9 백호 2009.02.21 2281
294 기타 KGC꺼 몬스터도감 수정해봤어요;;; 9 file 백호 2009.02.21 2135
293 전투 Kingdom Hearts 스타일의 전투 시스템 1 백호 2009.02.21 1709
292 전투 대전게임 Fighter 1 file 백호 2009.02.21 1436
291 기타 killer님 요청하신 스크립트입니다. 1 나뚜루 2009.02.21 784
290 타이틀/게임오버 게임오버 화면 에서 커맨드 윈도우 스크립트 12 file 백호 2009.02.21 3031
289 전투 에너미 HP·SP투시 11 file 백호 2009.02.21 3088
288 저장 ASM - Advanced Save Menu 3 file 백호 2009.02.21 1639
287 이동 및 탈것 그래픽의 크기로 좁은길은 못지나가게한다. 7 file 백호 2009.02.21 1816
286 메시지 윈도우즈 확장 file 백호 2009.02.21 2566
285 전투 전투배경 확장 3 file 백호 2009.02.21 1817
284 이동 및 탈것 점프 높이를 자유자제로 조절하는 스크립트!! 8 file 백호 2009.02.21 1540
283 타이틀/게임오버 타이틀과 타이틀 BGM 랜덤으로 변경하는 스크립트 2 file 백호 2009.02.21 1045
282 전투 사이비 CTB 1 file 백호 2009.02.21 1701
Board Pagination Prev 1 ... 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 ... 52 Next
/ 52