glife/sugarcube/src/autogenerated/unsorted/music_onlinemusic.tw

:: music_onlinemusic
<<set $here = 'music_onlinemusic'>>
<<set $ARGS = $location_var[$here]>>
<<if $location_var[$here][0] == 'set_up_account'>>
	<<setinit $ml_online['account'] = 1>>
	<<set $time.minutes += 10>>
	<<gs 'internet_mobile' 'use_internet' $access['subscription'] 10>>
	You log into Youtube to set up a channel for your music. You can upload videos or live stream, but you will need to open a bank account if you want to receive any tips from viewers of your stream.
	<!-- !!	TODO: Ask for a screen name?-->
	<<actCLA 'Leave'>>
		<<gs 'music_actions' 'start'>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'live_stream'>>
	<!-- !!	TODO: Much, much better scene needed.-->
	<<setinit $ml_streaming['times_streamed'] += 1>>
	<<gs 'music_onlinemusic' 'stream_interruptions'>>
	<<if getvar("$ml_no_interruption") != 0>>
		<!-- !! TODO: Separate scenes by instrument used, not used-->
		<<set $ml_streamtime = 60>>
		<<gs 'music_onlinemusic' 'streaming_stats'>>
		<<if $inventory.get("computer") == 1 and getvar("$webcamera") == 1 and $location_type == 'private'>>
			<center><img <<$set_imgh>> src="images/pc/activities/music/gomixer_hero.jpg"/></center>
			You set up your webcamera and start the streaming app on your computer. After settling down comfortably, you start to stream.
			Your fans tipped you <<ml_superchats>> rubels for your performance.
		<<else>>
			<center><img <<$set_imgh>> src="images/pc/activities/music/gomixer_hero.jpg"/></center>
			<p>You set up your phone on a little tri-pod and log into your account. After settling down comfortably, you start to stream.</p>
			Your fans tipped you <<ml_superchats>> rubels for your performance.
		<</if>>
	<<else>>
		<!-- !! How many minutes did the stream last.-->
		<<set $ml_streaming = rand(1,60)>>
		<<gs 'music_onlinemusic' 'streaming_stats'>>
		<!-- !! TODO: Interruption events and such will come here-->
	<</if>>
	<<if $finances.hasBankAccount == 0>>
		<p>You have earned <b>ml_streaming['unclaimed_earnings']</b> rubels so far, but you need to open a bank account before you can receive the money.</p>
	<<else>>
		<p>You have <b>ml_streaming['unclaimed_earnings']</b> rubels on your account.</p>
		<<actCLA 'Stop the stream and transfer the money to your bank account'>>
			<<set $finances.bank += $ml_streaming['unclaimed_earnings']>>
			<<setinit $ml_streaming['unclaimed_earnings'] = 0>>
			<<gs 'music_onlinemusic' 'finish' 'streaming'>>
		<</actCLA>>
	<</if>>
	<<actCLA 'Stop the stream'>>
		<<gs 'music_onlinemusic' 'finish' 'streaming'>>
	<</actCLA>>
	<<set $ml_streamtime to null>>
	<<set $ml_no_interruption to null>>
<</if>>
<<if $location_var[$here][0] == 'record_song'>>
	<<set $recording_time = 30>>
	<<set $performed_minutes = 15>>
	<<gs 'music_onlinemusic' 'recording_interruptions'>>
	<<if getvar("$ml_no_interruption") != 0>>
		<!-- !!	TODO: Write a scene. It should describe that a song is recorded and then edited properly before uploading it to the net.-->
		<center><img <<$set_imgh>> src="images/pc/activities/music/phonerecording.jpg"/></center>
		You set up your phone and settle down comfortably to record a song. After several tries you finally end up with a version you are content with and upload it to your account.
		As you don't have a computer you can't really do much with the songs quality. But then you have seen quite a few people work with only with their phones. Like Ling Ling.
	<</if>>
	<<gs 'music_onlinemusic' 'recording_stats'>>
	<<set $recording_time to null>>
	<<set $ml_no_interruption to null>>
	<<set $performed_minutes to null>>
	<<if getvar("$ml_online['account']") == 1 and $access != 'denied'>>
		<<if $pc.pcs_inhib < 30>>
			<<if $pc.pcs_inhib < 10>>
				<<set $diff = 'hard'>>
			<<elseif $pc.pcs_inhib < 20>>
				<<set $diff = 'medium'>>
			<<else>>
				<<set $diff = 'easy'>>
			<</if>>
			<<gs 'willpower' 'skill' 'self' $diff>>
			<<set $will_cost = ($will_cost * 2) - (pcs_perform)>>
			<<if $will_cost <= $pc.pcs_willpwr>>
				<<actCLA 'Upload music (will_cost Willpower)'>>
					<<gt 'music_onlinemusic' 'uploadmusic' 'recording'>>
				<</actCLA>>
			<<else>>
				<<actCLA `'Upload music ('+$will_cost+')'`>><font color=red><br/>You don`t have enough willpower to use this action.</font><</actCLA>>
			<</if>>
		<<else>>
			<<actCLA 'Upload music'>>
				<<gt 'music_onlinemusic' 'uploadmusic' 'recording'>>
			<</actCLA>>
		<</if>>
	<</if>>
	<<actCLA 'Leave'>>
		<<gs 'music_onlinemusic' 'finish' 'recording'>>
	<</actCLA>>
<</if>>
<!-- !! IMPORTANT-->
<!-- !! TODO: Recording and Editing/Mixing needs to be split into two separate activities. So keep ''recrodSong'' as is and make this into purely about editing-->
<<if $location_var[$here][0] == 'edit_song'>>
	<!-- !!	TODO: Write a scene. It should describe that a song is recorded and then edited properly before uploading it to the net.-->
	<!-- !!	'<center><img <<$set_imgh>> src="images/pc/activities/music/editmusic.jpg"/></center>'-->
	<<video "pc/activities/music/editmusic.mp4">>
	You plug in your home studio kit and start up the recording software. After several tries you finally end up with a version you are content with.
	The next hour just flies by as you edit the video and the audio, trying to increate the quality of the recording as much as you can
	<<set $time.minutes += 90>>
	<<run $pc.skillExperienceGain('singing',rand(1,3))>>
	<<if getvar("$perform_lvl") < 35>>
		<<run $pc.skillExperienceGain('perform',rand(1,3))>>

	<</if>>
	<<if getvar("$musicprod_lvl") < 35>>
		<<run $pc.skillExperienceGain('musicprod',rand(1,3))>>

	<</if>>
	<<setinit $ml_performance['performed_minutes'] += 15>>
	<<setinit $ml_performance['total_time_performed'] += 15>>
	<<setinit $ml_onlinesong_hotcat[$ml_onlinesongcount] = $pc.hotcat>>
	<<if getvar("$ml_guitar['hasguitar']") == 1>>
		<<setinit $ml_onlinesong_skilllevel[$ml_onlinesongcount] = $pc.skillLevel("playInstrument") + $pc.skillLevel("singing") + $pcs_perform>>
		<<setinit $ml_onlinesong_freshness[$ml_onlinesongcount] = $pc.skillLevel("playInstrument") + $pc.skillLevel("singing") + $pcs_perform + (($pc.hotcat - 4) * 10)>>
		<<run $pc.skillExperienceGain('playInstrument',rand(1,3))>>
	<<else>>
		<<setinit $ml_onlinesong_skilllevel[$ml_onlinesongcount] = ($pc.skillLevel("singing") * 2) + $pcs_perform>>
		<<setinit $ml_onlinesong_freshness[$ml_onlinesongcount] = ($pc.skillLevel("singing") * 2) + $pcs_perform + (($pc.hotcat - 4) * 10)>>
	<</if>>
	<<setinit $ml_onlinesong_lastcalcday[$ml_onlinesongcount] = $time.daystart>>
	<<setinit $ml_onlinesong_uploaded[$ml_onlinesongcount] = 0>>
	<<set $ml_uploadablemusic += 1>>
	<<set $ml_onlinesongcount += 1>>
	<<if getvar("$ml_online['account']") == 1 and $access != 'denied'>>
		<<if $pc.pcs_inhib < 30>>
			<<if $pc.pcs_inhib < 10>>
				<<set $diff = 'hard'>>
			<<elseif $pc.pcs_inhib < 20>>
				<<set $diff = 'medium'>>
			<<else>>
				<<set $diff = 'easy'>>
			<</if>>
			<<gs 'willpower' 'skill' 'self' $diff>>
			<<set $will_cost = ($will_cost * 2) - (pcs_perform)>>
			<<if $will_cost <= $pc.pcs_willpwr>>
				<<actCLA 'Upload music (will_cost Willpower)'>>
					<<gt 'music_onlinemusic' 'uploadmusic'>>
				<</actCLA>>
			<<else>>
				<<actCLA `'Upload music ('+$will_cost+')'`>><font color=red><br/>You don`t have enough willpower to use this action.</font><</actCLA>>
			<</if>>
		<<else>>
			<<actCLA 'Upload music'>>
				<<gt 'music_onlinemusic' 'uploadmusic'>>
			<</actCLA>>
		<</if>>
	<<else>>
		<<actCLA 'Leave'>>
			<<gs 'music_actions' 'finish'>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'uploadmusic'>>
	<<if $pc.pcs_inhib < 30>>
		You hesitate for a long moment, but finally take a deep breath and click on the "Upload" button and your newly recorded song moves over to the internet for all to see.
		You bite in your lip, then close the screen before you change your mind and delete it.
	<<else>>
		You smile brightly and click on the "Upload" button. Now the whole world can see you play. And if they don't like it, well... "Haters gonna hate" you shrug mentally and close the screen. They will like it."
	<</if>>
	<<set $ml_uploadablemusic -= 1>>
	<<setinit $ml_onlinesong_uploaded[$ml_onlinesongcount - 1] = 1>>
	<<set $will_cost to null>>
	<<if $location_var[$here][1] == 'recording'>>
		<<actCLA 'Leave'>>
			<<gs 'music_onlinemusic' 'finish' 'recording'>>
		<</actCLA>>
	<<else>>
		<<actCLA 'Leave'>>
			<<gs 'music_actions' 'start'>>
		<</actCLA>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'uploadallmusic'>>
	<center><img src="images/pc/activities/music/uploadmusic.jpg"/></center>
	<<if getvar("$will_cost") > 0>>
		'You go through the songs you recorded and clear out the old ones that you really , really don't like anymore. Then after a moment of hesitation you take a deep breath and click on the "Upload" button.
		The screen changes and one by one , your songs move over to the internet for all to see.'
		You bite in your lip, then close the screen before you change your mind and delete them.
	<<else>>
		You smile brightly as you browse through your recordings, deleting some old ones, then finally click the "Upload" button. Now the whole world can see you play. And if they don't like it, well... "Haters gonna hate" you shrug mentally and close the screen, this is how art grows."
	<</if>>
	<<gs 'music_onlinemusic' 'deleting'>>
	<<set $i = 0>>
	<<warn 'JUMP MARKER ENCOUNTERED: :uploadallmusic'>>
	<<if getvar("$ml_onlinesong_uploaded["+$i+"]") == 0 and $access != 'denied'>>
		<<set $time.minutes += 5>>
		<<gs 'internet_mobile' 'use_internet' $access['subscription'] 5>>
		<<setinit $ml_onlinesong_uploaded[$i] = 1>>
		<<set $ml_uploadablemusic -= 1>>
	<</if>>
	<<set $i += 1>>
	<<if $i < $ml_onlinesongcount>>
		<<warn 'JUMP COMMAND ENCOUNTERED: jump uploadallmusic'>>

	<</if>>
	<<set $will_cost to null>>
	<<actCLA 'Leave'>>
		<<gs 'music_actions' 'start'>>
	<</actCLA>>
<</if>>
<<if $location_var[$here][0] == 'deleteoldmusic'>>
	You go through your recorded musics and delete all the old ones where your playing doesn''t really reflect what you can do these days
	<<gs 'music_onlinemusic' 'deleting'>>
	<<actCLA 'Leave'>>
		<<gs 'music_actions' 'start'>>
	<</actCLA>>
<</if>>
<!-- !!------------------------------------------------------------------------------------------------------------------------------>
<!-- !!-----------------------------------------   GoSub functions all go here   ---------------------------------------------------->
<!-- !!------------------------------------------------------------------------------------------------------------------------------>
<<if $location_var[$here][0] == 'deleting'>>
	<<set $ml_threshold_skilllevel = (($pc.skillLevel("playInstrument") + $pc.skillLevel("singing") + $pcs_perform) * 80) / 100>>
	<<set $i = 0>>
	<<set $j = -1>>
	<<warn 'JUMP MARKER ENCOUNTERED: :deletemusic'>>
	<<if getvar("$ml_onlinesong_uploaded") == 1 or (getvar("$ml_onlinesong_uploaded") == 0 and $ml_onlinesong_skilllevel > $ml_threshold_skilllevel)>>
		<<set $j += 1>>
		<<setinit $ml_tempsong_freshness[$j] = $ml_onlinesong_sfreshness[$i]>>
		<<setinit $ml_tempsong_lastcalcday[$j] = $ml_onlinesong_lastcalcday[$i]>>
		<<setinit $ml_tempsong_hotcat[$j] = $ml_onlinesong_hotcat[$i]>>
		<<setinit $ml_tempsong_skilllevel[$j] = $ml_onlinesong_skilllevel[$i]>>
		<<setinit $ml_tempsong_uploaded[$j] = $ml_onlinesong_uploaded[$i]>>
	<<else>>
		<<set $ml_uploadablemusic -= 1>>
	<</if>>
	<<set $i += 1>>
	<<if $i < $ml_onlinesongcount>>
		<<warn 'JUMP COMMAND ENCOUNTERED: jump deletemusic'>>

	<</if>>
	<<set $ml_onlinesong_freshness to null>>
	<<set $ml_onlinesong_lastcalcday to null>>
	<<set $ml_onlinesong_hotcat to null>>
	<<set $ml_onlinesong_skilllevel to null>>
	<<set $ml_onlinesong_uploaded to null>>
	<<set $i to null>>
	<<set $ml_onlinesongcount = 0>>
	<<if getvar("$j") >= 0>>
		<<warn 'JUMP MARKER ENCOUNTERED: :looprebuildsongs'>>
		<<setinit $ml_onlinesong_freshness[$ml_onlinesongcount] = $ml_tempsong_freshness[$ml_onlinesongcount]>>
		<<setinit $ml_onlinesong_hotcat[$ml_onlinesongcount] = $ml_tempsong_hotcat[$ml_onlinesongcount]>>
		<<setinit $ml_onlinesong_lastcalcday[$ml_onlinesongcount] = $ml_tempsong_lastcalcday[$ml_onlinesongcount]>>
		<<setinit $ml_onlinesong_skilllevel[$ml_onlinesongcount] = $ml_tempsong_skilllevel[$ml_onlinesongcount]>>
		<<setinit $ml_onlinesong_uploaded[$ml_onlinesongcount] = $ml_tempsong_uploaded[$ml_onlinesongcount]>>
		<<set $ml_onlinesongcount += 1>>
		<<if $ml_onlinesongcount <= $j>>
			<<warn 'JUMP COMMAND ENCOUNTERED: jump looprebuildsongs'>>

		<</if>>
	<</if>>
	<<set $ml_tempsong_freshness to null>>
	<<set $ml_tempsong_lastcalcday to null>>
	<<set $ml_tempsong_hotcat to null>>
	<<set $ml_tempsong_skilllevel to null>>
	<<set $ml_tempsong_uploaded to null>>
	<<set $ml_threshold_skilllevel to null>>
<</if>>
<<if $location_var[$here][0] == 'finish'>>
	<<if $location_type == 'public_outdoors'>>
		<<set $ml_rand_event = rand(0,100)>>
		<<if getvar("$ml_rand_event") <= 10 and $region == 'pav' and $npcs.get('A144','rel') > 40>>
			<<if $location_var[$here][1] == 'streaming'>>
				<<gs 'music_onlinemusic' 'anushka_streaming_end'>>
			<<elseif $location_var[$here][1] == 'recording'>>
				<<gs 'music_onlinemusic' 'anushka_recording_end'>>
			<</if>>
		<<elseif getvar("$ml_rand_event") <= 30 and $region == 'pav'>>
			<<gs 'music_gigstarts' 'zariyah_passing_by'>>
			<!-- !!	elseif ml_rand_event < 15 and $ARGS[1] = 'pav' and ((npc_rel['A20'] < 20 or npc_rel['A21'] < 20):-->
			<!-- !! TODO: if the gopniks don't like the PC and/or her music is awful, there is a chance that Lena and Lera harasses her.-->
			<!-- !!		gs 'music_buskingevents', 'lena_and_lera', 1-->
			<!-- !!	elseif ml_rand_event < 15 and $ARGS[1] = 'pav' and ( (npc_rel['A20'] < 40 or npc_rel['A21'] < 40) and (pcs_instrmusic < 30 or pcs_perform < 30 or pcs_vokal < 30) ):-->
			<!-- !!		gs 'music_buskingevents', 'lena_and_lera', 2-->
		<<else>>
			<<gs 'music_actions' 'finish'>>
		<</if>>
		<<set $ml_rand_event to null>>
	<<else>>
		<<gs 'music_actions' 'finish'>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'streaming_stats'>>
	<<set $time.minutes += $ml_streamtime>>
	<<gs 'internet_mobile' 'use_internet' $access['subscription'] $ml_streamtime>>
	<<set $ml_maxsuperchats = ($pc.fame('pav_music') + ($pc.fame('city_music') * 2) + $pc.fame('pushkin_music') + $pc.fame('village_music') + $pc.pcs_apprnc)>>
	<<set $ml_superchats = (rand( 0, ml_maxsuperchats) * ml_streamtime) / 60>>
	<<if getvar("$ml_guitar['hasguitar']") == 1 and (getvar("$ml_guitar['carried']") == 1 or $ml_guitar['location'] == $loc)>>
		<<set $ml_famebase = ($pc.skillLevel("playInstrument") + $pc.skillLevel("singing") + $pcs_perform + (($pc.hotcat - 5) * 20)) / 20>>
		<<run $pc.skillExperienceGain('playInstrument',rand(1,3))>>
	<<else>>
		<<set $ml_famebase = (($pc.skillLevel("singing") * 2) + $pcs_perform + (($pc.hotcat - 5) * 20)) / 20>>
	<</if>>
	<<run $pc.fameInc('pav','music',`rand(0, ml_famebase)`)>>
	<<run $pc.fameInc('city','music',`rand(0, ml_famebase)`)>>
	<<run $pc.skillExperienceGain('singing',rand(1,3))>>
	<<if getvar("$perform_lvl") < 35>>
		<<run $pc.skillExperienceGain('perform',rand(1,3))>>

	<</if>>
	<<setinit $ml_streaming['livestreamcount'] += 1>>
	<<setinit $ml_streaming['lastday'] = $time.daystart>>
	<<setinit $ml_performance['performed_minutes'] += $ml_streamtime>>
	<<setinit $ml_performance['total_time_performed'] += $ml_streamtime>>
	<<setinit $ml_streaming['total_earnings'] += $ml_superchats>>
	<<setinit $ml_streaming['unclaimed_earnings'] += $ml_superchats>>
<</if>>
<<if $location_var[$here][0] == 'recording_stats'>>
	<<set $time.minutes += $recording_time>>
	<<if getvar("$performed_minutes") > 10>>
		<<run $pc.skillExperienceGain('singing',rand(1,4))>>
		<<if getvar("$perform_lvl") < 35>>
			<<run $pc.skillExperienceGain('perform',rand(1,3))>>

		<</if>>
		<<setinit $ml_performance['performed_minutes'] += $performed_minutes>>
		<<setinit $ml_performance['total_time_performed'] += $performed_minutes>>
		<<setinit $ml_onlinesong_hotcat[$ml_onlinesongcount] = $pc.hotcat>>
		<<if getvar("$ml_guitar['hasguitar']") == 1 and (getvar("$ml_guitar['carried']") == 1 or $ml_guitar['location'] == $loc)>>
			<<setinit $ml_onlinesong_skilllevel[$ml_onlinesongcount] = $pc.skillLevel("playInstrument") + $pc.skillLevel("singing") + $pcs_perform>>
			<<setinit $ml_onlinesong_freshness[$ml_onlinesongcount] = $pc.skillLevel("playInstrument") + $pc.skillLevel("singing") + $pcs_perform + (($pc.hotcat - 4) * 10)>>
			<<run $pc.skillExperienceGain('playInstrument',rand(1,3))>>
		<<else>>
			<<setinit $ml_onlinesong_skilllevel[$ml_onlinesongcount] = ($pc.skillLevel("singing") * 2) + $pcs_perform>>
			<<setinit $ml_onlinesong_freshness[$ml_onlinesongcount] = ($pc.skillLevel("singing") * 2) + $pcs_perform + (($pc.hotcat - 4) * 10)>>
		<</if>>
		<<setinit $ml_onlinesong_lastcalcday[$ml_onlinesongcount] = $time.daystart>>
		<<setinit $ml_onlinesong_uploaded[$ml_onlinesongcount] = 0>>
		<<set $ml_uploadablemusic += 1>>
		<<set $ml_onlinesongcount += 1>>
	<</if>>
<</if>>
<<if $location_var[$here][0] == 'stream_interruptions'>>
	<!-- !! TODO: Will depend on chance and fame - the more famous Sveta is, the more likely someone will interrupt. Just like in real life.-->
	<!-- !{
	Planned scenarios:
	1.	Anushka shows up, just like with busking.
	If Sveta's skills are good enough for Anushka and they have a good relationship she can join in.
	2.  Lena and Lera show up and if they don't like Sveta will mess with the stream - running around,
	throwing twigs and leaves at Sveta, mocking her, making loud noises, etc.
	3.  Some other stuff.
	} -->
	<<set $ml_no_interruption = 1>>
<</if>>
<<if $location_var[$here][0] == 'recording_interruptions'>>
	<!-- !! TODO: Will depend on chance and fame - the more famous Sveta is, the more likely someone will interrupt. Just like in real life.-->
	<!-- !{
	Planned scenarios:
	1.	Anushka shows up, just like with busking.
	If Sveta's skills are good enough for Anushka and they have a good relationship she can join in.
	2.  Lena and Lera show up and if they don't like Sveta will mess with the recording - running around,
	throwing twigs and leaves at Sveta, mocking her, making loud noises, etc.
	3.  Some other stuff.
	} -->
	<<set $ml_no_interruption = 1>>
<</if>>
<!-- !!------------------------------------------------------------------------------------------------------------------------------>
<!-- !!-----------------------------------------   Outdoors events all go here   ---------------------------------------------------->
<!-- !!------------------------------------------------------------------------------------------------------------------------------>
<<if $location_var[$here][0] == 'anushka_streaming_end'>>
	<<gs 'music_actions' 'finish'>>
<</if>>
<<if $location_var[$here][0] == 'anushka_recording_end'>>
	<<gs 'music_actions' 'finish'>>
<</if>>