1
0

music_actions.qsrc 2.2 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768
  1. # music_actions
  2. if ARGS[0] = 'start':
  3. cla
  4. if $location_type = 'private':
  5. if ml_guitar['carried'] = 1:
  6. act 'Place the guitar next to your desk':
  7. ml_guitar['carried'] = 0
  8. ml_guitar['location'] = $ARGS[0]
  9. end
  10. elseif ml_guitar['location'] = $ARGS[0]:
  11. act 'Pick up the guitar':
  12. ml_guitar['carried'] = 1
  13. ml_guitar['location'] = 'carried'
  14. end
  15. end
  16. if $ARGS[0] = 'sitr': gt 'sitr'
  17. elseif ARGS[0] = 'daichan': gt 'daichan'
  18. else gt ARGS[0], 'start'
  19. end
  20. if ml_guitar['carried'] = 1:
  21. act 'Play something on the guitar (10 minutes)':
  22. mood += 10
  23. minut += 10
  24. gs 'stat'
  25. 'You pick up your guitar and start to play some songs you know, just for your own entertainment.'
  26. 'You hum along the tune, relaxing into the music, just enjoying it. When you look up a quarter of an hour passed and you are in a much better mood.'
  27. end
  28. end
  29. if ml_online['account'] = 0 and internet > 0:
  30. act 'Set up an online music account (0:30)': gt 'music_onlinemusic', 'setupAccount'
  31. end
  32. !!Uploading recorded music if there are any not uploaded yet
  33. if ml_uploadablemusic > 0 and internet > 0 and ml_online['account'] = 1:
  34. if pcs_inhib < 30:
  35. if pcs_inhib < 10:
  36. $diff = 'hard'
  37. elseif pcs_inhib < 20:
  38. $diff = 'medium'
  39. else
  40. $diff = 'easy'
  41. end
  42. gs 'willpower', 'skill', 'self', $diff
  43. will_cost = (will_cost * 2) - (pcs_perform)
  44. if will_cost <= pcs_willpwr:
  45. act 'Upload music (<<will_cost>> Willpower)': gt 'music_onlinemusic', 'uploadmusic'
  46. else
  47. act 'Upload music (<font color="red"><<will_cost>> Willpower</font>)': '<br><font color="red">You don''t have enough willpower to use this action.</font>'
  48. end
  49. end
  50. act 'Upload music': gt 'music_onlinemusic', 'uploadallmusic'
  51. end
  52. if ml_uploadablemusic > 0:
  53. act 'Delete old recordings': gt 'music_onlinemusic', 'deleteoldmusic'
  54. end
  55. end
  56. --- music_actions ---------------------------------