12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364656667686970 |
- # autoservisF
- if $ARGS[0] = 'start':
- $metka = $ARGS[0]
- $loc = $CURLOC
- cla
- *clr
- gs 'stat'
- set minut += 5
- gs 'avtonorm'
- '<center><B>Driving</B></center>'
- '<center><img src="images\etogame\autoservis1.jpg"></center>'
- if cardrive = 7:
- if wrek = 0:
- if teh >= tehcar * 75/100: 'Master your car inspected and said that she does not need any repairs or maintenance in those.'
- if teh < tehcar*75/100:
- 'Master looked at your car and said that the cost of work <<normrem>>.'
- if money >= normrem:
- act 'Pay and repair':
- cla
- *clr
- set money -= normrem
- set minut += 60
- set teh = tehcar
- wrek = 0
- '<center><img src="images\etogame\autoservis2.jpg"></center>'
- 'You sat for an hour in the recreation room pretending that watching TV is finally repaired the car and you have paid in cash <<normrem>> rubles'
- act 'Leave': gt 'Nord'
- end
- end
- end
- end
- if wrek = 1:
- 'Master prisvisnul looking at your unit and said that the cost of work <<normrem>>.'
- if money >= normrem:
- act 'Pay and repair':
- cla
- *clr
- set money -= normrem
- set minut += 60
- set tehcar = tehcar / 2
- set teh = tehcar
- wrek = 0
- '<center><img src="images\etogame\autoservis2.jpg"></center>'
- 'You sat for an hour in the recreation room pretending that watching TV is finally repaired the car and you have paid in cash <<normrem>> rubles'
- 'Master before giving clues told you that you would not have tried to bring the car to this state.'
- act 'Leave': gt 'Nord'
- end
- end
- end
- end
- if cardrive ! 7: 'Master smiled and said, "Girl, I need a car to see what though, that what you say. Fetches it to the car service, we´ll see."'
- if wrek = 1 and cardrive ! 7 and car > 0:
- 'At the service station operates a service evacuation of damaged cars to service centers, the cost in 2500'
- if money >= 2500:
- act 'Pay shipping cars 2500rub (1:00)':
- cla
- *clr
- set money -= 2500
- set cardrive = 7
- set minut += 60
- '<center><img src="images\etogame\autoservis2.jpg"></center>'
- 'You sat for an hour in the service station, waiting when will bring your car. Finally the time has passed and your car was delivered to the gate Car.'
- act 'To master': gt 'autoservisF','start'
- end
- end
- end
- act 'Leave': gt 'Nord'
- end
- --- autoservisF ---------------------------------
|