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
174 기타 멋진...제작자 정보를 그림으로 1 백호 2009.02.22 1233
173 기타 Near Fantastica's SDK Test Bed 3 file 백호 2009.02.22 885
172 기타 Text Scroll by Dubealex (Release 3) 2 file 백호 2009.02.22 940
171 기타 Multiple Currencies(여러 개의 통화단위 사용) 2 백호 2009.02.22 1124
170 기타 Terrain Encounter Areas by SephirothSpawn 백호 2009.02.22 778
169 기타 Random Character Generator by SephirothSpawn (SDK호환) 1 백호 2009.02.22 1041
168 기타 KGC - RMXP 스크립트 개발용 프로젝트 1.01 4 file 백호 2009.02.22 1515
167 기타 Dynamic Stores by Astro_mech@rmxp.net 1 file 백호 2009.02.22 878
166 기타 아래 스크립트에 대한 Guillaume777님의 개량판입니다. 백호 2009.02.22 880
165 기타 KGC 디버거 (최신 올라온 것에 비해 성능은 딸리지만) file 백호 2009.02.22 929
164 기타 일시정지 스크립트 2 file 백호 2009.02.22 1796
163 기타 Weather Script 1.02 by ccoa 1 file 백호 2009.02.22 810
162 기타 다중 파노라마 사용 by Guillaume777 file 백호 2009.02.22 886
161 기타 ABS 몬스터 HP 게이지 바 11 백호 2009.02.22 2485
160 기타 파노라마 스크롤 스크립트 개량판 by Guillaume777 1 백호 2009.02.22 896
159 기타 제작한 게임의 파일을 모두 exe파일 하나에 쓸어담기 by sheefo@Creation Asylum 1 file 백호 2009.02.22 1240
158 기타 ID띄우기 스크립트(新) 3 백호 2009.02.22 1280
157 기타 창고 시스템 8 백호 2009.02.22 1763
156 기타 Selected phyolomortis.com scripts 1 file 백호 2009.02.22 789
155 기타 스크립트 자료 3 file 백호 2009.02.22 905
Board Pagination Prev 1 2 3 4 5 6 7 8 9 10 11 12 13 Next
/ 13