music_buskingevents.qsrc 1.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748
  1. # music_buskingevents
  2. if $ARGS[0] = 'busking':
  3. minut += 60
  4. instrmusic_exp += rand(1,3)
  5. vokal_exp += rand(1,3)
  6. perform_exp += rand(1,2)
  7. gs 'music_buskingevents', 'calculate_tips', $ARGS[1]
  8. money += ml_tipsearned
  9. gs 'stat'
  10. dynamic '<<$ARGS[1]>>_music += rand(0,3)'
  11. ml_performed_minutes += 60
  12. *clr & cla
  13. !! TODO: More meat to the scene.
  14. '<center><img <<$set_imgh>> src="images/pc/activities/music/guitarf'+ rand(1,2) +'.jpg"></center>'
  15. 'You start to play the songs you know, pushing your open guitar case forward a little in case people drop some change there.' + iif(ml_online['account'] = 1 and ml_online['active'] = 1, ' You also set up the sign with the link to your webprofile.', '') + ' After playing for an hour you have made <<ml_tipsearned>> <b>P</b> in tips.'
  16. act 'Finish': gt $curloc, 'start'
  17. end
  18. if $ARGS[0] = 'calculate_tips':
  19. if $ARGS[1] = 'city':
  20. ml_location_mod = 6
  21. elseif $ARGS[1] = 'pav':
  22. ml_location_mod = 1
  23. elseif $ARGS[1] = 'oldtown'
  24. ml_location_mod = 3
  25. end
  26. if week >= 5: ml_time_mod += 2
  27. if hour >= 17: ml_time_mod += 2
  28. ml_time_loc_mod = (ml_location_mod + ml_time_mod) / 2
  29. ml_tipsmax = (pcs_instrmusic + pcs_vokal + pcs_perform + ((hotcat-4)*35)) * ml_time_loc_mod
  30. ml_tipsearned = max(rand(0,ml_tipsmax),0)
  31. killvar 'ml_location_mod'
  32. killvar 'ml_time_mod'
  33. end
  34. --- music_buskingevents ---------------------------------